A83: Re: Storing to strings
[Prev][Next][Index][Thread]
A83: Re: Storing to strings
Dammit Ian...you're brilliant. The two things I really need, you've told
us all. :)
OK, now try this one...don't suppose you know anything about using the
lists and matrices on the TI do you? As in [A], [B], and L1, L2 etc. I've
asked this question God knows how many times...:)
Thanks again for the strings stuff,
James.
____________________
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/index.html
ICQ: 7413754
____________________________________
----------
> From: Ian Graf <ian_graf@geocities.com>
> To: assembly-83@lists.ticalc.org
> Subject: A83: Storing to strings
> Date: Friday, May 22, 1998 11:54 AM
>
>
> guess what!
>
> i also have a program that i made that will store to strings. it works
> _just_ like the create program one. all you have to change is that you
> copy
> the data out of the string and into the program. (hint hint use ldir)
> also note that the first two bytes of a string are the length
>
> if you have any other questions, or any major struggles, e mail me and i
> could
> make the program for you
>
>
> .NOLIST
> #define equ .equ
> #define EQU .equ
> #define end .end
> #include "ti83asm.inc"
> #include "tokens.inc"
> .LIST
>
> _createstrng .equ 4472h
> STRNGOBJ .equ 04h
>
> .org 9327h
>
> call _zerooop1 ; load var name
> ld hl,strngname ;
> ld de,op1 ;
> ld bc,3 ;
> ldir ;
> call _chkfindsym ; look it up
> call nc,_delvar ; if it is there delete it
> ld hl,13 ; length of string
> call _createstrng ; create it
> inc de ; skip 1st length byte
> inc de ; skip 2nd length byte
> ld hl,strng ; string data
> ld bc,13 ; string size
> ldir ; copy data
> ret
>
> strngname:
>
> .db STRNGOBJ,TVARSTRNG,TSTR1 ; object type strng, var type strng,
> var Str1
>
> strng:
>
> .db "IAN",tSpace,"IS",tSpace,"A",tSpace,"PIMP" ; IAN IS A PIMP
>
> .end
> END