Abwehr I I!K  $4;" " (4;" " ($4;"" 2$4;"" <.'"Ein Programm von Werner Spahl  1983" Fs'"In diesem Spiel muessen Sie die anfliegenden Raketen abschiessen,bevor diese Ihre 8 Kuppelstaed-te zerstoeren." P`"Dazu koennen Sie das Zielkreuz bewegen(1=H,2=R,8=L,9=R) und aufdessen Position feuern(0=F)." ZD"Die Vernichtung Ihrer Basis oderaller Staedte beendet das Spiel." dHI=3000 n!"Wollen Sie ein Spiel?(j/n)";Z$ x Z$"j"  $A(5):B(5):C(5) #X=10 :Y=15:E=0 A=3:B=0 $SC=0:ST=8:PH=0 ""SCORE:";SC;15;"HIGH:";HI 1;20,2;"";20,2;"OO";20,5;"";20,5;"OO";20,8;"";20,8;"OO";20,11 ;"";20,11 ;"OO";20,14;"";20,19;"";20,19;"OO";20,22;"";20,22;"OO";20,25;"";20,25;"OO";20,28;"";20,28;"OO" :21,0;"" M=0:PH=PH+1 -PH=4PH=7A=5:B=0 B=B+1 I=1A 5A(I)=8+24*(*11 ):B(I)=165 uC(I)=2*(A(I)<40()-2*(A(I)>210)+(2-4*(>.5))*(A(I)>40(A(I)<210) I  X,Y;" " "X-1,Y-1;" " ,X,Y-1;" " 6X+1,Y-1;" " @ E=0 J X,Y;" " T:X=X-(2Ʀ="1"X>2)+(2Ʀ="2"X<17) ^:Y=Y-(2Ʀ="8"Y>2)+(2Ʀ="9"Y<29) h X,Y;"+" r="0"450 | I=1A A(I)=0430 #A(I)=A(I)+C(I):B(I)=B(I)-8 U(21-((B(I)-8)/8),(A(I)/8))-568>0550& AA(I),B(I):C(I)-C(I),-7:4;A(I)+C(I),B(I)-7 I  330J-502*(E=1) 6;128,16 P6;Y*8-123{,(21-X)*8-16:.05|L,502 &1;6;128,16 <1;Y*8-123{,(21-X)*8-16 "X,Y;"":.1}L,-25  X-1,Y-1;"" X,Y-1;""  X+1,Y-1;""  E=1  &EAT=(21-((B(I)-8)/8),(A(I)/8))-568 0AT=3790 :AT=2750 D"AT=1AT=4610b NSC=SC+100d X0,6;SC bW=-11 l1;A(I)+W,B(I) v81;(165-B(I))/8*-C(I),165-B(I) W  M=M+1 M=A*B210 "M>A*B-AA(I)=0:440 5A(I)=8+24*(*11 ):B(I)=165 uC(I)=2*(A(I)<40()-2*(A(I)>210)+(2-4*(>.5))*(A(I)>40(A(I)<210) HPH>6ƥ>.5B(I+(I=1)-(I1))<80P720  440 FA(I)=A(I+(I=1)-(I1)):B(I)=B(I+(I=1)-(I1)) $C(I)=-C(I+(I=1)-(I1))  440 j20,(A(I)/8)-1;"":.2~L,-30:20,(A(I)/8)-1;" " ST=ST-1 ST=0870f  610b N20,14;"":.5,-40(:20,14;" "  11,0;"Ihre Basis wurde getroffen! " *SC>HI840H 4"Noch ein Spiel?(j/n)";Z$ > 120x H-"Aber Sie haben den Highscore ge-brochen! " RHI=SC \ 8204 f=1,0;"Alle Ihre Staedte wurden zer- stoert! " p 810* >