1
0
mirror of https://github.com/fadden/6502bench.git synced 2024-12-01 22:50:35 +00:00
6502bench/SourceGen/SGTestData/Expected/20052-branches-and-banks_Merlin32.S

49 lines
832 B
ArmAsm
Raw Normal View History

zero equ $00
2018-09-28 17:05:11 +00:00
longsym equ $123456
org $1000
clc
xce
sep #$30
jml L440000
2018-09-28 17:05:11 +00:00
lodat dfb $00
2018-09-28 17:05:11 +00:00
dfb $01
dfb $02
org $440000
L440000 cmpl L440000
L440004 ldal L440000
lda: L440000
lda zero
bmi L440004
2018-09-28 17:05:11 +00:00
dfb $62,$b2,$ff
dfb $d0,$b0
dfb $82,$a9,$ff
dat44 dw dat44
adr dat44
2018-09-28 17:05:11 +00:00
org $44ffc0
L44FFC0 cmpl L44FFC0
high44 beq :L44FFCB
2018-09-28 17:05:11 +00:00
dfb $30,$3c
dfb $82,$39,$00
:L44FFCB jml :L2000
2018-09-28 17:05:11 +00:00
org $2000
:L2000 bit :L2000
pea dat44
pea ^dat44
bne :L200E
jml [lodat]
2018-09-28 17:05:11 +00:00
:L200E nop
jsr j2
j2 jsr j2+3
jsr j2-3
2018-09-28 17:05:11 +00:00
jsl longsym
rts