mirror of
https://github.com/fadden/6502bench.git
synced 2024-08-21 18:28:59 +00:00
69 lines
1.2 KiB
ArmAsm
69 lines
1.2 KiB
ArmAsm
longsym equ $123456
|
|
|
|
org $1000
|
|
clc
|
|
xce
|
|
sep #$30
|
|
jmp L0000
|
|
|
|
org $0000
|
|
L0000 bit: L0000
|
|
L0003 lda L0000
|
|
lda L0003
|
|
dfb $d0,$ba
|
|
dfb $30,$b8
|
|
dfb $62,$b5,$ff
|
|
bcc L0016
|
|
brl L0080
|
|
|
|
lodat dfb $00
|
|
dfb $01
|
|
dfb $02
|
|
|
|
L0016 lda lodat+1
|
|
dfb $82,$a5,$ff
|
|
|
|
org $0080
|
|
L0080 bit: L0080
|
|
jml L440000
|
|
|
|
org $ffc0
|
|
LFFC0 bit LFFC0
|
|
LFFC3 dfb $82,$3d,$00
|
|
|
|
org $440000
|
|
L440000 cmpl L440000
|
|
L440004 ldal L440000
|
|
lda: L440000
|
|
lda L0000
|
|
bmi L440004
|
|
dfb $62,$b2,$ff
|
|
dfb $d0,$b0
|
|
dfb $82,$a9,$ff
|
|
|
|
dat44 dw dat44
|
|
adr dat44
|
|
|
|
org $44ffc0
|
|
L44FFC0 cmpl L44FFC0
|
|
high44 beq L44FFCB
|
|
dfb $30,$3c
|
|
dfb $82,$39,$00
|
|
|
|
L44FFCB jml L2000
|
|
|
|
org $2000
|
|
L2000 bit L2000
|
|
pea dat44
|
|
pea ^dat44
|
|
bne L200E
|
|
jml [lodat]
|
|
|
|
L200E nop
|
|
jsr j2
|
|
j2 jsr j2+3
|
|
jsr j2-3
|
|
jsl longsym
|
|
rts
|
|
|