mii_emu/test/asm/001_jmp_indirect.asm
Michel Pollet f7a56ebc01 Initial Commit
Cleaned up for release at last!

Signed-off-by: Michel Pollet <buserror@gmail.com>
2023-10-25 08:50:14 +01:00

18 lines
316 B
NASM

; 65c02 Indirect Indexed JMP ($xxx,X)
.org $2000
jump_ad = $3000
;.verbose
JMP skip
ind LDA #$99 ; $2003
BRA pass
skip: LDA #<ind ; $2000
LDY #$02
STA jump_ad,Y
INY
LDA #>ind
STA jump_ad,Y
LDX #$02
JMP ($3000,X) ; JMP -> $2003
fail BRK ; JMP Failed!
pass BRK