Re: A83: Re: calls...
[Prev][Next][Index][Thread]
Re: A83: Re: calls...
How does it find the programs? And when I compilled, sent it to my calc, then ran it, it didn't work.
It displayed:
#
!
Q
Done
Why?, do you have an 83p file of this, TASM is a real ass on my machine.
-Phelan 'Amen' Wolf
James Matthews wrote:
> Here you go Phelan:
>
> ; PROGRAM: PROGPTR
> ; VERSION: 2.00
> ; AUTHOR: David Eriksson, edison@kuai.se
> ; DATE: 10/26/96
>
> kEnter .EQU 05h ; Enter key
> kQuit .EQU 40h ; Quit key
>
> #define equ .equ ; these will make ti83asm.inc and tokens.inc work in
> TASM
> #define EQU .equ
>
> .NOLIST
> .INCLUDE "ti83asm.inc" ; TI83 System Routine Equates
> .INCLUDE "tokens.inc" ; TI83 Tokens
> .LIST
>
> .ORG 9327h ; All TI83 programs have base 9327h
>
> LD HL, (PROGPTR) ; get offset to program/list table
>
> LD A, 4 ; four programs/keypress
>
> main_loop:
> LD (count), A ; store latest update of count
>
> LD A, (HL) ; get type of data
> AND 01FH ; mask out bits 0-4
>
> CP 05H ; program
> JR Z, program
> CP 06H ; protected program
> JR Z, program
>
> CP 01H ; real list
> JR Z, list
>
> CP 0DH ; complex list
> JR Z, list
>
> JR the_end ; unknown/end of list
>
> program:
> DEC HL ; move back 3 bytes to length-of-name
> DEC HL
> DEC HL
>
> CP 06h ; display '*' for protected programs
> JR Z, protected
> LD A, ' '
> JR go_on
>
> protected:
> LD A, '*'
>
> go_on:
> CALL _PUTC
>
> LD B, (HL) ; load length-of-string
> program_loop:
> DEC HL ; move backwards to next char
> LD A, (HL) ; load char
> CALL _PUTC ; display char
> DJNZ program_loop
>
> DEC HL ; move backwards to next item
> CALL _NEWLINE
>
> LD A, (count) ; have we displayed four programs?
> DEC A
> JR NZ, main_loop
>
> key_loop:
> PUSH HL
> CALL _GETKEY ; wait for key
> POP HL
> CP kQuit
> JR Z, the_end
> CP kEnter ; enter key?
> JR NZ, key_loop ; no
>
> LD A, 4 ; four programs/keypress
> JR main_loop
>
> list:
> DEC HL ; move back 3 bytes to length-of-name
> DEC HL
> DEC HL
> LD B, (HL) ; load length-of-string
> list_loop:
> DEC HL ; move backwards to next char
> DJNZ list_loop
>
> DEC HL ; move backwards to next item
>
> LD A, (count) ; no change really, load A
> JP main_loop
>
> the_end:
> RET
>
> count:
> .DB 00h
>
> .END
>
> ____________________
>
> James Matthews.
> E-mail (family): matthews@tkb.att.ne.jp
> E-mail (private): james_matthews@hotmail.com
>
> Homepage: http://home.att.ne.jp/gold/tomcat21/index2.html
> ICQ: 7413754
> ____________________________________
>
> ----------
> > From: Phelan Wolf <gwatford@worldnet.att.net>
> > To: assembly-83@lists.ticalc.org
> > Subject: A83: calls...
> > Date: Wednesday, April 29, 1998 9:50 AM
> >
> >
> > what do these calls do:
> > _scrollUp
> > _scrollDown
> > ;or something like that
> >
> > And I still don't understand this VAT thing, I enter in the name I want
> > it to search for, and it searches and displays it on the screen, right?
> > How do I get it to find ALL the programs and display there names on the
> > screen, in a catolog or scrollable style.
> >
> > -Phelan 'Amen' Wolf
> >
> > PS: Thanks Trey for the input info, but still I need to find this out
> > does anyone know what the call is for an 'INPUT' command???
> >
References: