dos33fsprogs/megademo/wait_keypress.s
2018-09-22 23:07:59 -04:00

6 lines
129 B
ArmAsm

wait_until_keypress:
lda KEYPRESS ; 4
bpl wait_until_keypress ; 3
bit KEYRESET ; clear the keyboard buffer
rts ; 6