[A83] GetCSC help needed

To: assembly-83@lists.ticalc.org
Subject: [A83] GetCSC help needed
From: "Stephen Watson" <fif_freak00@hotmail.com>
Date: Tue, 16 Oct 2001 10:30:26 -0700
Reply-To: assembly-83@lists.ticalc.org


Since I haven't coded ASM in a while, I need some more help!  I'm having 
some trouble with the getcsc routine Dan Weiss gave to me a while back.  I 
forgot how to use it, basically.  Here's the code (with some stuff snipped 
out):

<ION HEADER STUFF>
<START LABEL>
	ld	hl, 00*256+17			; Make coords for text
	ld	(pencol), hl			; Load the coords to pencol/penrow
	ld	hl, menutext			; Load the text
	bcall(_vputs)				; Put the text on the screen
<OTHER TEXT CHOICES>
	ld	hl, 57*256+5
	ld	(pencol), hl
	ld	hl, author
	bcall(_vputs)
keypress:
	call	waitkey
	cp	a, SkYequ
	jp	z, NewPic
	cp	a, SkWindow
	jp	z, LoadPic
	cp	a, SkZoom
	jp	z, SwapPics
	cp	a, SkTrace
	jp	z, Help
	cp	a, SkDel
	jp	z, Quit
	jp	keypress
Quit:
	ret
Help:
	ret
NewPic:
	ret
LoadPic:
	ret
SwapPics:
	ret
waitkey:
	ei
WKA_loop:
	HALT
	bcall(_getcsc)
	or	a
	jr	z, WKA_loop
	ret
<TITLE PIC>
<TEXT SCREENS>
.end
end

_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp

Follow-Ups:

[A83] Re: GetCSC help needed

From: Peter-Martijn Kuipers <hyper@hysoft-automation.com>