TreeEaters--/@TREE EATERS By A.Beardmore Sinclair Programs, Jan 84 )0:0:6::8000@ "YOU() MUST KILL THE MARTIAN TREE EATERS ";2;"";6;" AT ALL COSTS":"BUT DON'T KNOCK DOWN THE TREES"::"O=UP. K=DOWN. S=RIGHT. A=LEFT. "::"BUT CAREFUL YOU HAVE NO BRAKE" 121,0;"PRESS ANY KEY TO START GAME"  0 a=0 21:2 2a,0;" ":a o1,1;6;"";21,1;""  6 8a=2 20:a,0;"";a,31;"":a  a=0 _(*19)+2,(*30)+1;4;"":a=a+1:a<80P 30 (F9 ,14;"";9 ,16;"";12 ,14;"" 2\a=10 11 :a,13 ;"";a,17;"":a:8,14;2;" " 720,1;"SCORE:=0 TREES KILLED:=0 " < x=0 Asc=0:tr=0 Fa$="" P$op=0:a=11 :s=15 U2q=(*19)+2:w=(*30)+1 V q,w;ٺ(*3)+1;"" d a,s;a$ x="a"x=1 ="s"x=2 ="o"x=3 ="k"x=4 a,s;2;" " !x=1 a$="":s=s-1 !x=2 a$="":s=s+1 !x=3 a$="":a=a-1 !x=4 a$="":a=a+1 ((a,s)=6 410:op=1 Pa=q s=w .05|L,40(:sc=sc+10 :op=1:500:85U $op=0 (a,s)" "400 op=0 sc>500 9700% a,s;a$ tr>15 9000(# op=0 , 100d /.09}8Q,-20:tr=tr+1:500  x=1 s=s+1 x=2 s=s-1 x=3 a=a+1 x=4 a=a-1  a,s;a$: *0,8;sc;0,28;tr  @a=0 7:s:"a"+a,s:a:0,0,0,0,24+36$,128+64@+3,255,255 Ja=0 7:s:"b"+a,s:a:255,255,128+64@+3,24+36$,0,0,0,0 Tia=0 7:s:"c"+a,s:a:7,7,11 ,11 ,11 ,11 ,7,7 ^a=0 7:s:"d"+a,s:a:128+64@+32 ,128+64@+32 ,128+64@+16,128+64@+16,128+64@+16,128+64@+16,128+64@+32 ,128+64@+32 ha=0 7:s:"e"+a,s:a:24,24+36$+2,24+36$+66B,255-129,24+36$,24,24,24 ra=0 7:s:"f"+a,s:a:24+36$,24,24+36$,36$,24+36$,24+36$,24+36$+66B,24+36$ |a=0 7:s:"g"+a,s:a:24+36$,24+36$+66B,24+36$,24+36$,36$,24+36$,24,24+36$ a=0 7:s:"h"+a,s:a:0,2,255-64@,255-16,255-16,255-64@,2,0 a=0 7:s:"i"+a,s:a:0,64@,255-2,255-8,255-8,255-2,64@,0 a=0 7:s:"p"+a,s:a:24,24+36$+66B,24+36$+66B,255-36$,255,255-129,36$,36$ !4 #(g:"SCORE ";sc::"YOU KNOCKED DOWN TOO MANY TREES"::"SO YOU WERE THROWN OUT":::7;"RATING" #- #. 1 #/.01z# =,40(:.1}L,20:.02{# =,40(:.1}L,15:.03{u\,40(:.1}L,10 :.1}L,20:.1}L,40( #2(sc>500 "FANTASTIC":9100# #3(sc>400 "VERY GOOD":9100# #4#sc>300, "GOOD":9100# #5&sc>250 "NOT BAD":9100# #6"sc>200 "BAD":9100# #7'sc>150 "VERY BAD":9100# #8)sc>100d "OLD GRANNY":9100# #9&sc0 "FORGET IT":9100# # 9500% %.0:21,0;"ANOTHER GO(Y/N)" %=""9500% %="y":1 %="n"9999' % 9500% %:.05|L,40(:.05|L,30:.05|L,502:.1}L,30:.1}L,40(:.1}L,20:"YOU HAVE KILLED ALL THE MARTIAN TREE EATERS..WELL DONE..":.01z# =,30:.01z# =,30:.01z# =,30:9500%