2021-10-02 20:47:05 +00:00
|
|
|
org $0000
|
|
|
|
dw $3000 ;load address
|
|
|
|
|
2021-10-09 16:58:37 +00:00
|
|
|
org $1000
|
|
|
|
org *+$1000
|
|
|
|
org *+$1000
|
2021-10-02 20:47:05 +00:00
|
|
|
L3000 bit L3000
|
|
|
|
:L3003 lda :L3003
|
2021-10-09 16:58:37 +00:00
|
|
|
and :LE003
|
2021-10-02 20:47:05 +00:00
|
|
|
jmp :L200C
|
|
|
|
|
|
|
|
org $200c
|
|
|
|
:L200C bit :L200C
|
|
|
|
jmp :L1012
|
|
|
|
|
|
|
|
org $1012
|
|
|
|
:L1012 bit :L1012
|
|
|
|
jsr :L4000
|
|
|
|
org $0000
|
|
|
|
dfb $00
|
|
|
|
hex ce554c4c2d5445524d20d0c5d4d3c3c9c920535452494e4700
|
|
|
|
dfb $80
|
|
|
|
dw :L3003
|
2021-10-09 16:58:37 +00:00
|
|
|
dw :LE003
|
2021-10-02 20:47:05 +00:00
|
|
|
dfb $80
|
|
|
|
|
|
|
|
org $4000
|
|
|
|
:L4000 bit :L4000
|
|
|
|
bit :L5000
|
|
|
|
bit :L500F
|
|
|
|
bit :L500F
|
|
|
|
nop
|
|
|
|
jmp :L4020
|
|
|
|
|
|
|
|
org $5000
|
|
|
|
:L5000 bit :L5000
|
|
|
|
bit :L4000
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
:L5008 bit :L5008
|
|
|
|
bit :L5017
|
|
|
|
nop
|
|
|
|
:L500F rts
|
|
|
|
|
|
|
|
org $4020
|
|
|
|
:L4020 bit :L4020
|
|
|
|
bit :L500F
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
jmp :L4040
|
|
|
|
|
|
|
|
org $5008
|
|
|
|
:L5008_0 bit :L5008_0
|
|
|
|
bit :L5000
|
|
|
|
nop
|
|
|
|
:L500F_0 bit :L500F_0
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
nop
|
|
|
|
:L5017 rts
|
|
|
|
|
|
|
|
org $4040
|
|
|
|
:L4040 bit :L4040
|
|
|
|
bit :L5017
|
|
|
|
nop
|
|
|
|
jmp :LE000
|
|
|
|
|
2021-10-09 16:58:37 +00:00
|
|
|
org $1082
|
|
|
|
org *+$cf7e
|
|
|
|
:LE000 bit :L200C
|
|
|
|
:LE003 nop
|
|
|
|
jmp :LD000
|
|
|
|
|
|
|
|
org *-$1007
|
|
|
|
:LD000 bit :LD000
|
2021-10-02 20:47:05 +00:00
|
|
|
jmp :LF000
|
|
|
|
|
|
|
|
org $f000
|
|
|
|
:LF000 bit :LF000
|
|
|
|
lda :L3003
|
2021-10-09 16:58:37 +00:00
|
|
|
and :LE003
|
2021-10-02 20:47:05 +00:00
|
|
|
nop
|
|
|
|
rts
|
|
|
|
|