msbasic/aim65_iscntc.s

18 lines
303 B
ArmAsm
Raw Permalink Normal View History

2014-02-14 06:40:56 +00:00
.segment "CODE"
ISCNTC:
lda DRA2
pha
lda #$7f
sta DRA2
pha
pla
lda DRB2
rol a
pla
sta DRA2
bcs RET2
jsr GETKEY
lda #$03
cmp #$03
;!!! runs into "STOP"