(m291) Correct offset via jump
This commit is contained in:
parent
a47bc38042
commit
8859196212
|
@ -260,7 +260,7 @@
|
||||||
.lines/tracks LDZ #00
|
.lines/tracks LDZ #00
|
||||||
&>tracks ( -- )
|
&>tracks ( -- )
|
||||||
#00 OVR #70 SFT2 ;mem/tracks ADD2 LDA cflc STHkr NEQ ?{
|
#00 OVR #70 SFT2 ;mem/tracks ADD2 LDA cflc STHkr NEQ ?{
|
||||||
POPr NIP .lines/tracks LDZ ADD !<select> }
|
POPr NIP .lines/folders LDZ ADD !<select> }
|
||||||
INC GTHk ?&>tracks
|
INC GTHk ?&>tracks
|
||||||
POP2 POPr JMP2r
|
POP2 POPr JMP2r
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue