2018-09-28 17:05:11 +00:00
|
|
|
.setcpu "6502"
|
|
|
|
.org $1000
|
|
|
|
.byte $03
|
|
|
|
.byte $02
|
|
|
|
|
|
|
|
L1002: bit L1002
|
|
|
|
.byte $2c
|
|
|
|
lda #$11
|
|
|
|
nop
|
|
|
|
.byte $2c
|
2019-11-17 01:15:03 +00:00
|
|
|
@L100A: ldx #$ff
|
2018-09-28 17:05:11 +00:00
|
|
|
nop
|
2019-11-17 01:15:03 +00:00
|
|
|
jsr @L100A
|
2018-09-28 17:05:11 +00:00
|
|
|
nop
|
|
|
|
.byte $2c
|
2019-11-17 01:15:03 +00:00
|
|
|
@L1012: ldx #$ff
|
2018-09-28 17:05:11 +00:00
|
|
|
nop
|
2019-11-17 01:15:03 +00:00
|
|
|
jsr @L1012
|
2018-09-28 17:05:11 +00:00
|
|
|
jsr $2456
|
2019-11-17 01:15:03 +00:00
|
|
|
@L101B: .dword $22a211a9
|
|
|
|
jsr @L101B
|
|
|
|
jsr @L1028
|
2018-09-28 17:05:11 +00:00
|
|
|
jsr $2456
|
2019-11-17 01:15:03 +00:00
|
|
|
@L1028: .dword $44a233a9
|
|
|
|
jsr @L103A
|
|
|
|
jsr @L103D
|
2018-09-28 17:05:11 +00:00
|
|
|
nop
|
|
|
|
lda $2456
|
2019-11-17 01:15:03 +00:00
|
|
|
jsr @L1045
|
2018-09-28 17:05:11 +00:00
|
|
|
rts
|
|
|
|
|
2019-11-17 01:15:03 +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
|
|
|
|
|
2019-11-17 01:15:03 +00:00
|
|
|
@L1045: lda #$99
|
2019-09-14 18:40:32 +00:00
|
|
|
rts
|
|
|
|
|