6502 command stream player, part 10
fix jump
This commit is contained in:
parent
84eb84b89f
commit
ffb4b9e640
|
@ -262,15 +262,16 @@ fcsRet:
|
||||||
fcsJump:
|
fcsJump:
|
||||||
; get address
|
; get address
|
||||||
jsr fcsReadNext
|
jsr fcsReadNext
|
||||||
tay
|
pha
|
||||||
jsr fcsReadNext
|
jsr fcsReadNext
|
||||||
|
pha
|
||||||
; ignore next two bytes
|
; ignore next two bytes
|
||||||
jsr fcsIgnoreNext
|
jsr fcsIgnoreNext
|
||||||
jsr fcsIgnoreNext
|
jsr fcsIgnoreNext
|
||||||
; a has high byte
|
pla
|
||||||
; y has low byte
|
|
||||||
sty chanPC,x
|
|
||||||
sta chanPC+1,x
|
sta chanPC+1,x
|
||||||
|
pla
|
||||||
|
sta chanPC,x
|
||||||
rts
|
rts
|
||||||
|
|
||||||
; TODO
|
; TODO
|
||||||
|
|
Loading…
Reference in a new issue