RE: TIB: Re:GetKey

To: <ti-basic@lists.ticalc.org>
Subject: RE: TIB: Re:GetKey
From: "Matthew" <mobets@flash.net>
Date: Thu, 3 Dec 1998 23:54:04 -0600
Delivered-To: ti-basic-outgoing@towerguard.unix.edu.sollentuna.se
Importance: Normal
In-Reply-To: <6ba4fb98.36671ca2@aol.com>
Reply-To: ti-basic@lists.ticalc.org




> -----Original Message-----
> From: owner-ti-basic@lists.ticalc.org
> [mailto:owner-ti-basic@lists.ticalc.org]On Behalf Of Tatsuo64@aol.com
> Sent: Thursday, December 03, 1998 5:20 PM
> To: ti-basic@lists.ticalc.org
> Subject: Re: TIB: Re:GetKey
>
>
>
> 	Thanks.  I believe you are right.  The loop to tell if
> something is in your
> way goes...
>
> :If sub(Str0,E-16,1) =/= " ":Then
> :Goto A
> :Else
> and then the stuff to do if there is a blank space.
>
> I have a lot of loops like this that execute every time a button
> is pressed.
> That would explain why it starts to get frustratingly slow
> (although it was
> already) and finally errs.  I thought the calculator dumped any
> routine from
> the stack after exiting.
>
> Now, how do I fix this?  I'm using a TI-83.
>
> Tatsuo
>

I've got another Idea.  If you have to have a few lines of code before the
goto i.e.:

If A=1:Then
code
code
goto B
end

Lbl B

you could put an end after Lbl b   :

If A=1:Then
code
code
goto B
end

Lbl B
End

this workes grate if you will only be able to get to Lbl B with a goto after
an if
other wise, you would have to do this:


If A=1:Then
code
code
goto B
end

Goto C
Lbl B
End
Lbl C

References:

Re: TIB: Re:GetKey

From: Tatsuo64@aol.com