Re: TIB: challenge

Re: TIB: challenge

• To: ti-basic@lists.ticalc.org
• Subject: Re: TIB: challenge
• From: Nathan Gaylinn <NathanG@firstva.com>
• Date: Tue, 15 Jun 1999 17:29:12 -0400
• Delivered-To: ti-basic-outgoing@towerguard.unix.edu.sollentuna.se
• Delivered-To: ti-basic@lists.ticalc.org
• References: <19990614114443.25710.rocketmail@web801.mail.yahoo.com> <3765945F.AC5B903D@ameritech.net> <001201beb6e1$9e149b40$0eb536cf@ppp>
• Reply-To: ti-basic@lists.ticalc.org

here's my 83 version, I have refined a lot, I think this is THE smallest
you can get for 83> Tell me if I'm wrong.

:8->X:4->Y
:While A<>45
:getKey->A
:Output(Y,X," "
:If A=24 and X<>1
:X-1->X
:If A=25 and Y<>1
:Y-1->Y
:If A=26 and X<>16
:X+1->X
:if A=34 and Y<>8
:Y+1->Y
:Output(Y,X,"O"
:End

The Character is "O" and if you press [CLEAR] it stops.
--
"What, behind the rabbit?"-King Arthur
The Heat Index   Nathang@firstva.com
      http://users.firstva.com/Nathang

• Re: TIB: challenge
• From: "<-Dave->" <the_Regul8r@bigfoot.com>

• Re: TIB: TI-Graph Link
• From: Prime the Chosen <emprime@yahoo.com>
• Re: TIB: TI-Graph Link
• From: Nathan <_surth_@ameritech.net>
• TIB: challenge
• From: "<-Dave->" <the_Regul8r@bigfoot.com>

• Prev: Re: TIB: I need help
• Next: Re: TIB: challenge
• Index(es):
  • Main
  • Thread