34 lines
536 B
ArmAsm
34 lines
536 B
ArmAsm
.segment "EXTRA"
|
|
.export MONRDKEY, MONCOUT, LOAD; SAVE; ISCNTC
|
|
|
|
LOAD:
|
|
rts
|
|
|
|
SAVE:
|
|
rts
|
|
|
|
ISCNTC:
|
|
lda $BC01
|
|
cmp #$03
|
|
beq @break
|
|
rts
|
|
@break:
|
|
jmp STOP
|
|
|
|
MONRDKEY:
|
|
lda $BC01
|
|
bmi @skipped
|
|
sta $BC00 ; echo
|
|
@skipped:
|
|
rts
|
|
|
|
MONCOUT:
|
|
sta $BC00
|
|
|
|
rts
|
|
|
|
.segment "RESETVEC"
|
|
.word $0000 ; NMI vector
|
|
.word COLD_START ; RESET vector
|
|
.word $0000 ; IRQ vector
|