[A83] A small thing I found With the Getcsc code you gave me Weiss

To: assembly-83@lists.ticalc.org
Subject: [A83] A small thing I found With the Getcsc code you gave me Weiss
From: "Steve Watson" <fif_freak00@hotmail.com>
Date: Tue, 13 Mar 2001 21:06:07 -0700
Reply-To: assembly-83@lists.ticalc.org


Well, I've found that I've had to hit two keys to get out of my program.  
I've included the source code so you can tell if anything is wrong.  I just 
don't like the fact that you have to hit two keys, y'know?
Here's the source:

	.nolist
	#include "ion.inc"
	.list

#ifdef TI83P
	.org progstart-2
	.db $BB,$6D
#else
	.org progstart
#endif
	ret
	jr nc,start
	.db "Testing 1,2,3...",0
start:
	bcall(_clrlcdf)
	bcall(_homeup)
	ld hl,txt
	bcall(_puts)
	call waitkey
waitkey:
	ei
WKA_loop:
	HALT
	bcall(_getcsc)
	or a
	jr z, WKA_loop
	bcall(_clrlcdf)
	ret
txt:
	.db "Test complete",0
.end
END
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com

Prev: [A83] Re: Forgot one thing...
Next: [A83] Re: A small thing I found With the Getcsc code you gave me Weiss
Index(es):
- Main
- Thread