21 lines
169 B
Text
21 lines
169 B
Text
|
define sysLastKey $ff
|
||
|
|
|
||
|
|
main:
|
||
|
|
jsr getKeyPress
|
||
|
|
;put the rest of your program here.
|
||
|
|
jsr delay
|
||
|
|
jmp main
|
||
|
|
|
||
|
|
|
||
|
|
getKeyPress:
|
||
|
|
lda $ff
|
||
|
|
sta $00
|
||
|
|
rts
|
||
|
|
|
||
|
|
delay:
|
||
|
|
nop
|
||
|
|
nop
|
||
|
|
dex
|
||
|
|
bne delay
|
||
|
|
rts
|