Re: A86: Cleared Screen with Text
[Prev][Next][Index][Thread]
Re: A86: Cleared Screen with Text
All of your code seems to be correct. The only possible thing that i can
see wrong is that _getkey may be malfunctioning. It does that once in a
while on my 1.2 rom. So what you might want to try is to use _getky and a
loop, and see if that helps. I dont have time to try it right now, but if
that doesnt work, mail me personally my email is chicane@reninet.com.
>#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
>
>
References: