Tanx  # ------- T A N X ------- --- @ PAUL STANLEY ---  0:7:0: 7000X sc1=0:sc2=sc1  9000(# c=0:8000@ #$>.5c=c+1:700 ( 100d , c=c+1 -c=8:30 . 700 / c=c+1 0c=8:30 2 40( dG1;21,12 ;"PLAYER 1":"ENTER ELEVATION (090) ";a n!a>90Za<0100d s"ENTER VELOCITY (210) ";v x!v<2v>10 115s ys1=f1 |o1=f1 max=100d+5*v e=a/10 g=8255v ms1>0s1<175g>10 (g,s1)=1k=g:.2~L,0:.2~L,-15:200 s1>0s1<175g,s1 s1=s1+(eg247)ū(q2,31)=71G1000 %e=a/10 :g=8255v g=k )o1>0o1<1751;g,o1 o1=o1+(eg90Za<0700 "ENTER VELOCITY (210) ";v !v<2v>10 715 s1=f2 o1=f2 max=155-5*v e=a/10 g=2470-v ns1>0s1<175g<239(g,s1)=1k=g:.2~L,0:.2~L,-15:800   s1>0s1<175g,s1  s1=s1+(eg>max)-(egmax) )e=e-(e/8g>max)+(e/4gmax) g  k=0  Qs1=21.5,-s1/8:(s1=q1k<8)ū(q1,0)=71G2000 %&e=a/10 :g=2470-v *g=k 4)o1>0o1<1751;g,o1 >o1=o1+(eg>max)-(egmax) H)e=e-(e/8g>max)+(e/4gmax) Rg \ q2,31;" " ef=1502:.002xn,*25:255-*20,(21-q2)*8+*15:f sc1=sc1+1  2500 q1,0;" " df=1100d:.002xn,*25:0+*20,(21-q1)*8+*15:f sc2=sc2+1  2500 ą:10 ,5;"PLAYER 1 HAS ";sc1;" POINT";("S"sc11);13 ,5;"PLAYER 2 HAS ";sc2;" POINT";("S"sc21) Τsc1+sc2=716,8;1;"G A M E O V E R";0;19,2;"PRESS ANY KEY TO PLAY AGAIN":0::sc1=0:sc2=sc1:30 200::30 XNq1=0:q2=10 :e=21:v=31:f=211-1 bK4;f,q1;"T";f,q2;5;"A";6;f,e;"N";7;f,v;"X" l .03{u\,f q2f>1f,q1;" ";f,q2;" ";f,e;" ";f,v;" " v>q1=q1+.6:q2=q2+.2~L:e=e-.25~:v=v-.65&fff f {"The 2 players take it in turn toenter the angle and velocity at which they want to fire to try and hit their opponent." "The shells must be fired over the hills but if you are lucky your shell may be able to go through a hill (particularly at the higher speeds.)" q"To stand the best chance of hitting your opponent try to use the smallest possible angle of elevation." S"The flashing caption at the bottom of the screen indicates whose go it is." "PRESS ANY KEY TO START"  0:: @q=18-*13 Jf=229 Tg=21q-1 ^L3;5;g,f;""+(""f=29);g,f-2;(""f=2) hg rq=q+*4-*4 | q<3q=4+*2 q>20q=20 f f=121 <(f,0)" "4;f-1,0;1;"" N(f,0)" "f1=(21-f)*8+16:q1=f-1:8116 f Rf=121:(f,31)" "4;f-1,31;1;"" E(f,31)" "f2=(21-f)*8+16:q2=f-1: f #( f="a""c"+7:g:f,g:f #20,1,2,60<,568,255,255,127,0,128,64@,60<,28,255,255,127 #