CrazyPaintceECRAZY PAINTER By Richard Tinner Sinclair Programs, Nov 84  hs=0 6:6:0: Z 9000(# d 6000p isheet=1 j sc=0 ksc2=0 l bug=0 n 2000 x 3000 x=11 :y=31 %x1=0:y1=-1 xx=x:yy=y 10,0;"SCORE=";sc;" HIGH SCORE=";hs x,y;0;6;"" D="8" ƫ(x,y+1)0 y1=1:x1=0 9="5" ƫ(x,y-1)0 y1=-1:x1=0 E="7" ƫ(x-1,y)0 x1=-1:y1=0 D="6" ƫ(x+1,y)0 x1=1:y1=0 x=x+x1:y=y+y1 (x,y)=546 600X (x,y)=502 500 )(x,y)480 x=xx:y=yy:150 y=31 150 xx,yy;2;6;"" sc=sc+1 0.004yn,-10 Msc>sl2*100d+sc2 10 ,31;6;6;" "  150 xx,yy;2;""  x,y;""  n=10 -5 -5  0.5,n n =sc>hs 1,4;"YOU HAVE A NEW HIGH-SCORE":hs=sc 121,2;"PRESS ANY KEY TO PLAY AGAIN" &0:0::100d X Ysheet=5 800  Zsheet=sheet+1 [sc2=sc \P10 ,3;"SHEET ";sheet-1;" COMPLETED BONUS 50":sc=sc+502 _(n=-10 10 :0.09}8Q,n:n ` b 110n    ! P=1 "sc=600X %N=1 32 &P:P: >0.05|L,N C$P=P+1:P=8 P=1 HN Isc=sc+150 M50,0;"*****WELL DONE YOU FINISHED*****" N'8;"YOU SCORED ";sc OAsc>hs 1,2;"YOU HAVE GOT A NEW HIGH-SCORE":hs=sc R621,0;" PRESS ANY KEY TO PLAY AGAIN " \(0:6:6::100d G1,0;0;0;"" Jn=1 20:n,0;0;0;"";n,31;"":n *10 ,31;0;6;"*" H21,0;0;0;"" sheet=1 Un=11  20:n,10 ;0;0;"";n-10 ,20;"":n sheet=2 [5,1;0;0;"";16,16;""  sheet=3 -11 ,20;0;0;""  ,10 ,7;0;0;"" *sheet=4 4X10 ,1;0;0;"";12 ,27;0;0;"" > bug=bug+4 bug>16 bug=16 n=1 bug 2a=(*20)+1:b=(*29)+1 (a,b)480 3010 a=11 3010 a,b;2;6;"" n  p6:6:0 z"0,9 ;"CRAZY PAINTER" '"Using the cusor keys(5,6,7,8)youhave to paint the floors of the rooms in your employers mansion.After you have painted a certainamount of the floor the door'*' will open and you will be able to enter the next room." !"Sounds easy but if you run over any of the newly painted floor you stick to the floor and neverleave that room,so remember to leave a clear path to the door. Also there are some floor bugs''which if painted will eat you!.The game ends when you die or when you paint 5 rooms" K"The higher the level the more you'll have to paint before leaving" %"SELECT LEVEL(1 EASY to 4 HARD)";sl sl>4 6040 sl<1 6040 sl=sl+1 sl2=sl 0.05|L,15   #(%n=0 23:d:"a"+n,d:n #2I24,24,60<,90Z,90Z,24,36$,36$ #