| %Indianstorm
%ICE 3M1
 %Mrs. Batista
 %Date: May,12/04
 %Turing
 %Program: Space Exploration
 
 drawfillbox (-2, -2, 650, 550, 7) %background
 
 drawfillbox (-1, 0, 650, 100, 2)
 drawline (-1, 0, -1, 100, 0)
 drawline (0, 100, 650, 100, 0)
 drawline (650, 100, 650, 0, 0)
 
 randomize
 var x, v, clr : int
 for i : 1 .. 200
 randint (x, 0, 639)
 randint (v, 61, 479)
 randint (clr, 1, 15)
 drawdot (x, v, clr)
 end for
 drawline (-1, 0, 650, 0, 0)
 drawfillbox (0, 100, 185, 120, 8)
 
 drawoval (125, 200, 100, 100, 3)
 drawfill (125, 200, 8, 3)
 drawfill (120, 110, 8, 3)
 drawfilloval (150, 200, 15, 15, 7)
 drawline(150,200,25,200,7)
 drawline(150,200,220,380,7)
 drawline(150,200,110,110,7)
 
 for s : 1 .. 2
 for y : 1 .. 15
 drawline (50 * y, 35 * y, 150, 200, 0*s)
 delay (100)
 drawline (50 * y, 35 * y, 150, 200, 12)
 delay (30)
 end for
 end for
 
 
 drawfilloval (655, 250, 50, 20, 0)
 drawfilloval (655, 250, 20, 20, 0)
 delay (30)
 drawfilloval (655, 250, 50, 20, 7)
 drawfilloval (655, 250, 20, 20, 7)
 delay (0)
 drawfilloval (650, 245, 50, 20, 0)
 drawfilloval (650, 250, 20, 20, 0)
 delay (30)
 drawfilloval (650, 245, 50, 20, 7)
 drawfilloval (650, 250, 20, 20, 7)
 delay (0)
 drawfilloval (645, 240, 50, 20, 0)
 drawfilloval (645, 250, 20, 20, 0)
 delay (30)
 drawfilloval (645, 240, 50, 20, 7)
 drawfilloval (645, 250, 20, 20, 7)
 delay (0)
 drawfilloval (640, 235, 50, 20, 0)
 drawfilloval (640, 250, 20, 20, 0)
 delay (30)
 drawfilloval (640, 235, 50, 20, 7)
 drawfilloval (640, 250, 20, 20, 7)
 delay (0)
 drawfilloval (635, 230, 50, 20, 0)
 drawfilloval (635, 250, 20, 20, 0)
 delay (30)
 drawfilloval (635, 230, 50, 20, 7)
 drawfilloval (635, 250, 20, 20, 7)
 delay (0)
 drawfilloval (630, 225, 50, 20, 0)
 drawfilloval (630, 250, 20, 20, 0)
 delay (30)
 drawfilloval (630, 225, 50, 20, 7)
 drawfilloval (630, 250, 20, 20, 7)
 delay (0)
 drawfilloval (625, 220, 50, 20, 0)
 drawfilloval (625, 250, 20, 20, 0)
 delay (30)
 drawfilloval (625, 220, 50, 20, 7)
 drawfilloval (625, 250, 20, 20, 7)
 delay (0)
 drawfilloval (620, 220, 50, 20, 0)
 drawfilloval (620, 250, 20, 20, 0)
 delay (30)
 drawfilloval (620, 220, 50, 20, 7)
 drawfilloval (620, 250, 20, 20, 7)
 delay (0)
 drawfilloval (615, 220, 50, 20, 0)
 drawfilloval (615, 250, 20, 20, 0)
 delay (30)
 drawfilloval (615, 220, 50, 20, 7)
 drawfilloval (615, 250, 20, 20, 7)
 delay (0)
 drawfilloval (610, 220, 50, 20, 0)
 drawfilloval (610, 250, 20, 20, 0)
 delay (30)
 drawfilloval (610, 220, 50, 20, 7)
 drawfilloval (610, 250, 20, 20, 7)
 delay (0)
 drawfilloval (605, 220, 50, 20, 0)
 drawfilloval (605, 250, 20, 20, 0)
 delay (30)
 drawfilloval (605, 220, 50, 20, 7)
 drawfilloval (605, 250, 20, 20, 7)
 delay (0)
 drawfilloval (600, 220, 50, 20, 0)
 drawfilloval (600, 250, 20, 20, 0)
 delay (30)
 drawfilloval (600, 220, 50, 20, 7)
 drawfilloval (600, 250, 20, 20, 7)
 delay (0)
 drawfilloval (595, 220, 50, 20, 0)
 drawfilloval (595, 250, 20, 20, 0)
 delay (30)
 drawfilloval (595, 220, 50, 20, 7)
 drawfilloval (595, 250, 20, 20, 7)
 delay (0)
 drawfilloval (590, 220, 50, 20, 0)
 drawfilloval (590, 250, 20, 20, 0)
 delay (30)
 drawfilloval (590, 220, 50, 20, 7)
 drawfilloval (590, 250, 20, 20, 7)
 delay (0)
 drawfilloval (585, 220, 50, 20, 0)
 drawfilloval (585, 250, 20, 20, 0)
 delay (30)
 drawfilloval (585, 220, 50, 20, 7)
 drawfilloval (585, 250, 20, 20, 7)
 delay (0)
 drawfilloval (580, 220, 50, 20, 0)
 drawfilloval (580, 250, 20, 20, 0)
 delay (30)
 drawfilloval (580, 220, 50, 20, 7)
 drawfilloval (580, 250, 20, 20, 7)
 delay (0)
 drawfilloval (575, 220, 50, 20, 0)
 drawfilloval (575, 250, 20, 20, 0)
 delay (30)
 drawfilloval (575, 220, 50, 20, 7)
 drawfilloval (575, 250, 20, 20, 7)
 delay (0)
 drawfilloval (570, 220, 50, 20, 0)
 drawfilloval (570, 250, 20, 20, 0)
 delay (30)
 drawfilloval (570, 220, 50, 20, 7)
 drawfilloval (570, 250, 20, 20, 7)
 delay (0)
 drawfilloval (565, 220, 50, 20, 0)
 drawfilloval (565, 250, 20, 20, 0)
 delay (30)
 drawfilloval (565, 220, 50, 20, 7)
 drawfilloval (565, 250, 20, 20, 7)
 delay (0)
 drawfilloval (560, 220, 50, 20, 0)
 drawfilloval (560, 250, 20, 20, 0)
 delay (30)
 drawfilloval (560, 220, 50, 20, 7)
 drawfilloval (560, 250, 20, 20, 7)
 delay (0)
 drawfilloval (555, 220, 50, 20, 0)
 drawfilloval (555, 250, 20, 20, 0)
 delay (30)
 drawfilloval (555, 220, 50, 20, 7)
 drawfilloval (555, 250, 20, 20, 7)
 delay (0)
 drawfilloval (550, 220, 50, 20, 0)
 drawfilloval (550, 250, 20, 20, 0)
 delay (30)
 drawfilloval (550, 220, 50, 20, 7)
 drawfilloval (550, 250, 20, 20, 7)
 delay (0)
 drawfilloval (545, 220, 50, 20, 0)
 drawfilloval (545, 250, 20, 20, 0)
 delay (30)
 drawfilloval (545, 220, 50, 20, 7)
 drawfilloval (545, 250, 20, 20, 7)
 delay (0)
 drawfilloval (540, 220, 50, 20, 0)
 drawfilloval (540, 250, 20, 20, 0)
 delay (30)
 drawfilloval (540, 220, 50, 20, 7)
 drawfilloval (540, 250, 20, 20, 7)
 delay (0)
 drawfilloval (535, 220, 50, 20, 0)
 drawfilloval (535, 250, 20, 20, 0)
 delay (30)
 drawfilloval (535, 220, 50, 20, 7)
 drawfilloval (535, 250, 20, 20, 7)
 delay (0)
 drawfilloval (530, 220, 50, 20, 0)
 drawfilloval (530, 250, 20, 20, 0)
 delay (30)
 drawfilloval (530, 220, 50, 20, 7)
 drawfilloval (530, 250, 20, 20, 7)
 delay (0)
 drawfilloval (525, 220, 50, 20, 0)
 drawfilloval (525, 250, 20, 20, 0)
 delay (30)
 drawfilloval (525, 220, 50, 20, 7)
 drawfilloval (525, 250, 20, 20, 7)
 delay (0)
 drawfilloval (520, 220, 50, 20, 0)
 drawfilloval (520, 250, 20, 20, 0)
 delay (30)
 drawfilloval (520, 220, 50, 20, 7)
 drawfilloval (520, 250, 20, 20, 7)
 delay (0)
 drawfilloval (515, 220, 50, 20, 0)
 drawfilloval (515, 250, 20, 20, 0)
 delay (30)
 drawfilloval (515, 220, 50, 20, 7)
 drawfilloval (515, 250, 20, 20, 7)
 delay (0)
 drawfilloval (510, 220, 50, 20, 0)
 drawfilloval (510, 250, 20, 20, 0)
 delay (30)
 drawfilloval (510, 220, 50, 20, 7)
 drawfilloval (510, 250, 20, 20, 7)
 delay (0)
 drawfilloval (505, 220, 50, 20, 0)
 drawfilloval (505, 250, 20, 20, 0)
 delay (30)
 drawfilloval (505, 220, 50, 20, 7)
 drawfilloval (505, 250, 20, 20, 7)
 delay (0)
 drawfilloval (500, 220, 50, 20, 0)
 drawfilloval (500, 250, 20, 20, 0)
 delay (30)
 drawfilloval (500, 220, 50, 20, 7)
 drawfilloval (500, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (485, 220, 50, 20, 0)
 drawfilloval (485, 250, 20, 20, 0)
 delay (30)
 drawfilloval (485, 220, 50, 20, 7)
 drawfilloval (485, 250, 20, 20, 7)
 delay (0)
 drawfilloval (480, 220, 50, 20, 0)
 drawfilloval (480, 250, 20, 20, 0)
 delay (30)
 drawfilloval (480, 220, 50, 20, 7)
 drawfilloval (480, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 drawfilloval (495, 220, 50, 20, 0)
 drawfilloval (495, 250, 20, 20, 0)
 delay (30)
 drawfilloval (495, 220, 50, 20, 7)
 drawfilloval (495, 250, 20, 20, 7)
 delay (0)
 drawfilloval (490, 220, 50, 20, 0)
 drawfilloval (490, 250, 20, 20, 0)
 delay (30)
 drawfilloval (490, 220, 50, 20, 7)
 drawfilloval (490, 250, 20, 20, 7)
 delay (0)
 
 
 
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (30)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (30)
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (30)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (30)
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (30)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (30)
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (30)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (20)
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (20)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (10)
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (0)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (0)
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (0)
 
 var exp1,exp2:int
 put "Choose Yes=1 0r No=2"
 get exp1
 if exp1=1 then
 put "Yes, Good Job"
 drawline(355,230,355,200,0)
 delay(0)
 drawline(355,235,355,200,0)
 delay(0)
 drawline(355,240,355,200,0)
 delay(700)
 drawline(355,245,355,200,0)
 delay(700)
 drawline(355,250,355,200,0)
 delay(700)
 drawline(355,255,355,200,0)
 delay(700)
 drawline(355,260,355,200,0)
 delay(700)
 drawline(355,265,355,200,0)
 delay(700)
 
 drawfilloval(355,265,3,3,0)
 
 
 
 randomize
 var clrr : int
 
 loop
 for zv : 1 .. 15
 
 randint(clrr,1,15)
 drawline(355,275,355,270,clrr)
 delay(0)
 drawline(360,265,365,265,clrr)
 delay(50)
 drawline(350,265,345,265,clrr)
 delay(100)
 
 drawfilloval (355, 200, 50, 20, 12)
 drawfilloval (355, 230, 20, 20, 12)
 delay(100)
 drawfilloval(355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay(0)
 
 
 drawline (50 * zv, 35 * zv, 150, 200, 0)
 delay (25)
 drawline (50 * zv, 35 * zv, 150, 200, 12)
 delay (25)
 end for
 end loop
 
 
 else
 loop
 drawfilloval (355, 200, 50, 20, 0)
 drawfilloval (355, 230, 20, 20, 0)
 delay (0)
 drawfilloval (355, 200, 50, 20, 7)
 drawfilloval (355, 230, 20, 20, 7)
 delay (100)
 put "You Lose"
 end loop
 
 end if
 |