dos33fsprogs/games/peasant/wait_a_bit.s
Vince Weaver 9ece0ceb8c peasant: move music playing to the language card
this was a huge pain

also had to remove all calls to the firmware
2021-09-25 22:44:07 -04:00

38 lines
389 B
ArmAsm

;====================================
; wait for keypress or a few seconds
;====================================
; A is length to wait
wait_a_bit:
bit KEYRESET
tax
keyloop:
lda #200 ; delay a bit
jsr wait
lda KEYPRESS
bmi done_keyloop
dex
bne keyloop
beq no_escape
done_keyloop:
and #$7f
cmp #27
bne no_escape
inc ESC_PRESSED
no_escape:
bit KEYRESET
rts