TIB: (86) I don't get why this doesn't work...

To: Ti-Basic Mailing List <ti-basic@lists.ticalc.org>
Subject: TIB: (86) I don't get why this doesn't work...
From: Nick Clark <Roachnik@home.com>
Date: Mon, 23 Nov 1998 17:00:44 -0800
Delivered-To: ti-basic-outgoing@towerguard.unix.edu.sollentuna.se
Organization: @Home Network
Reply-To: ti-basic@lists.ticalc.org


This is supposed to plant two random castles on the screen, the castles
looking something like this:

(pi)_ _(pi)
 |  (pi) |
 ~~~~~~~~~

The picture is alright on the calc, I've set it up. So why doesn't this
code work?


:ClLCD
:"(pi)_     _(pi)"(storeto)C1
:" |      (pi)       |"(storeto)C2
:"~~~~~"(storeto)C3
:randInt(1,5,1(storeto)CL1
:Lbl ABDB
:randInt(1,5,1(storeto)CL2
:If CL1==CL2
:Then
:Goto ABDB
:Else
:Text(12*CL1,10*CL2,C1
:Text(12*CL1+6,10*CL2,C2
:Text(12*CL1+12,10*CL2,C2
:Text(12*CL2,10*CL1,C1
:Text(12*CL2+6,10*CL1,C2
:Text(12*CL2+12,10*CL1,C2