A86: Cleared Screen with Text

To: assembly-86@lists.ticalc.org
Subject: A86: Cleared Screen with Text
From: Jeanne9005@aol.com
Date: Mon, 4 Jan 1999 12:04:19 EST
Delivered-To: assembly-86-outgoing@towerguard.unix.edu.sollentuna.se
Reply-To: assembly-86@lists.ticalc.org


	I have a code that displays text on the screen, then waits for a keypress to
go do something.  But while it waits on the keypress, the 1-7 rows go blank.
Is there something I need to change?  This is just a test program right now,
so don't ask why there is nothing with some of the labels.  Here's the code.

#include "Ti86asm.inc"
#include "Ti86und.inc"

.org _asm_exec_ram

CHEMFULL_BEGIN:
	call _clrLCD
	call _homeup
	ld hl,CHEMFULL_BEGIN_STRING
	call _puts
	call _getkey
	cp k1
	jp z,ELEMENT_INFO
	cp k2
	jp z,OTHER_CHEM
	cp k3
	jp z,SPECIAL
	cp k4
	jp z,VERSION
	cp k5
	jp z,EXIT

ELEMENT_INFO:
	call _clrLCD
	call _homeup
	ld hl,ELEMENT_INFO_STRING
	call _puts
	call _getkey
	cp k1
	jp z,YA
	cp k2
	jp z,YC
	cp k3
	jp z,YD
	cp k4
	jp z,B
	cp k5
	jp z,CHEMFULL_BEGIN

CHEMFULL_BEGIN_STRING:
	.db "   Chemistry DB/86",0
	.db " By: Glen Solsberry",0
	.db "1        Element Info",0
	.db "2          Other Chem",0
	.db "3         Specialized",0
	.db "4        Version Info",0
	.db "5                Quit",0

ELEMENT_INFO_STRING:
	.db "   Chemistry DB/86",0
	.db "",0
	.db "1              Number",0
	.db "2              Symbol",0
	.db "3               Index",0
	.db "4               Table",0
	.db "5           Main Menu",0

OTHER_CHEM:

SPECIAL:

VERSION:

EXIT:

YA:

YC:

YD:

B:

.end


Glen Solsberry
www.geocities.com/Area51/Orion/5990

Follow-Ups:

Re: A86: Cleared Screen with Text

From: Chris Phelps <chicane@reninet.com>