Gardenscapes

30010 PRINT 1 PRINT"•.To nova l e f t ? " I GET L»
50020 PR I NT " b • To ntavp- r i g h t ?"I0ETR*
50030 PRINT'c.To t l r # 7"» BET F*
50040 PRINTsPRINT "Thank you"
50050 WAIT 200
50060 RETURN
6 0 0 0 0 FOR Y 1 * 4 6 3 7 6 TO 4 6 3 B 3
6 0 0 1 0 READ Y2»POKE Y 1 . Y 2
6 0 0 7 0 DATA 0 , 3 0 , 5 3 , 4 5 , 5 3 , 3 3 , 4 3 , 3 3
&0030 NEXI V1
60040 FOR Y3-46360 TO 46367
60030 READ Y 4 I P O K £ Y 3 , Y 4
6OO6O DATA 51,18,22,IB,72,26,IB,33
6 0 0 7 0 NEXT Y3
60090 FOR Y3-46392 TO 46399
6 0 0 9 0 READ Y61POKF Y3.Y6
6 0 1 0 0 DATA 1 2 , 1 2 , 3 0 , 6 3 , 6 3 , 6 3 , 3 0 , 3 0
60110 NEXT YS
60120 FOR Y6=46BOB TO 46B15
60140 DATA 3 0 , 6 3 , 6 3 , 6 3 , 6 3 , 6 3 ,63,30
60*50 NEXT Y6
60*70 FOR 77*47064 TO 47071
60370 READ 78s POKE Z7.78
60380 DATA 1 8 , 3 3 , 3 3 , 1 6 , 1 2 , 6 3 , 4 5 , 6 3
60390 NEXT 27
60400 KJR79-47080T04 7087
60410 READA 11 POKE79,A1
60420 DATAO.O,12,30,63,63,30,12
60430 NEXT Z9
60440 FCTft A6-47A77 TO 47079
60450 RUAD 071POKE B6,B7
60460 DAIA 1 2 , 3 0 , 6 5 , 1 2 , 1 2 , 1 2 , 3 0 , 1 2
60470 NEXT B6
60480 FOR 88-46344 TO 46351
60490 READ B9i POKF B8,B9
60500 DATA 3 3 , 1 8 , 1 2 , 2 9 , 4 6 , 1 2 , 1 8 , 3 3
60510 NEXT B8
60520 RETURN