dos33fsprogs/games/riven_hgr/wait_a_bit.s

	;====================================
	; wait for keypress or a few seconds
	;====================================

wait_a_bit:

	bit	KEYRESET
	tax

keyloop:
	lda	#200			; delay a bit
	jsr	wait

	lda	KEYPRESS
	bmi	done_keyloop

	dex
	bne	keyloop

done_keyloop:
	bit	KEYRESET

	rts
riven_hgr: can actuall walk around sort of 2024-05-14 20:31:41 +00:00			`;====================================`
			`; wait for keypress or a few seconds`
			`;====================================`

			`wait_a_bit:`

			`bit KEYRESET`
			`tax`

			`keyloop:`
			`lda #200 ; delay a bit`
riven_hgr: use qboot instead of qload probably a mistake, was a huge pain, but freed up some room 2024-05-28 20:51:03 +00:00			`jsr wait`
riven_hgr: can actuall walk around sort of 2024-05-14 20:31:41 +00:00
			`lda KEYPRESS`
			`bmi done_keyloop`

			`dex`
			`bne keyloop`

			`done_keyloop:`
			`bit KEYRESET`

			`rts`