github.com/rzzzwilson.pymlac
1
0
Fork 0
mirror of https://github.com/rzzzwilson/pymlac.git synced 2025-06-10 09:32:41 +00:00
Code Issues Releases Wiki Activity

Fixed error in 'offset' ORGs

Browse Source
This commit is contained in:
Ross Wilson 2016-05-12 13:40:36 +07:00
parent 88f617cb94
commit a162c52fe7
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pymlac/blockpunch.asm
View File

@ -78,7 +78,8 @@ allbits data 0377 ; byte of all bits
;------------------------
; Punch block loader
;------------------------
org start+0100 ; 037540 + 0100 = 037640
; org start+0100 ; 037540 + 0100 = 037640
org 037640
pbldr lwc 0100 ;
dac fad ;
lwc 076 ;
@ -93,7 +94,8 @@ pbloop lac *fad ;
;------------------------
; Punch leader
;------------------------
org start+0120 ; 037540 + 0120 = 037660
; org start+0120 ; 037540 + 0120 = 037660
org 037660
pldr lwc 07 ; we want 16 bytes of leader (8 words)
dac wtb ; store leader count
cla ;
@ -105,7 +107,8 @@ pldr lwc 07 ; we want 16 bytes of leader (8 words)
;------------------------
; Punch end code
;------------------------
org start+0130 ; 037540 + 0130 = 037670
; org start+0130 ; 037540 + 0130 = 037670
org 037670
pend law 0377 ;
jms pbyte ;
jms pbyte ;