2018-09-28 17:05:11 +00:00
|
|
|
.setcpu "6502"
|
2018-11-18 22:36:03 +00:00
|
|
|
; .segment "SEG000"
|
2018-09-28 17:05:11 +00:00
|
|
|
.org $1000
|
|
|
|
.byte $03
|
|
|
|
.byte $02
|
|
|
|
|
|
|
|
L1002: bit L1002
|
|
|
|
.byte $2c
|
|
|
|
lda #$11
|
|
|
|
nop
|
|
|
|
.byte $2c
|
|
|
|
L100A: ldx #$ff
|
|
|
|
nop
|
|
|
|
jsr L100A
|
|
|
|
nop
|
|
|
|
.byte $2c
|
|
|
|
L1012: ldx #$ff
|
|
|
|
nop
|
|
|
|
jsr L1012
|
|
|
|
jsr $2456
|
|
|
|
L101B: .dword $22a211a9
|
|
|
|
jsr L101B
|
|
|
|
jsr L1028
|
|
|
|
jsr $2456
|
|
|
|
L1028: .dword $44a233a9
|
|
|
|
jsr L103A
|
2019-09-14 18:40:32 +00:00
|
|
|
jsr L103D
|
2018-09-28 17:05:11 +00:00
|
|
|
nop
|
|
|
|
lda $2456
|
2019-09-14 18:40:32 +00:00
|
|
|
jsr L1045
|
2018-09-28 17:05:11 +00:00
|
|
|
rts
|
|
|
|
|
2019-09-14 18:40:32 +00:00
|
|
|
L103A: jsr $2456
|
|
|
|
L103D: lda #$55
|
2018-09-28 17:05:11 +00:00
|
|
|
ldx #$66
|
|
|
|
rts
|
|
|
|
|
2019-09-14 18:40:32 +00:00
|
|
|
.byte $81
|
|
|
|
.byte $82
|
|
|
|
.byte $83
|
|
|
|
|
|
|
|
L1045: lda #$99
|
|
|
|
rts
|
|
|
|
|