Home » Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF » GAMES1/DOGFIGHT

GAMES1/DOGFIGHT

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF
Filename: GAMES1/DOGFIGHT
Read OK:
File size: 179C bytes
Load address: FFFF1D00
Exec address: FFFF8023
File contents
   50ENVELOPE1,0,0,0,0,0,0,0,100,-5,0,-5,100,0
   60ON ERROR GOTO 2070
   70DIMX(10),Y(10),x(10),y(10),dx(10),dy(10)
   80MODE6
   90VDU23;8202;0;0;0;
  100PROCQUES
  110MODE2
  120REM SET COLOURS
  130VDU19,0,6,0,0,0
  140VDU19,1,0,0,0,0
  150VDU19,2,7,0,0,0
  160VDU19,3,6,0,0,0
  170VDU19,4,4,0,0,0
  180VDU19,5,4,0,0,0
  190VDU19,6,7,0,0,0
  200VDU19,10,6,0,0,0
  210VDU19,11,6,0,0,0
  220VDU19,14,4,0,0,0
  230VDU19,15,6,0,0,0
  240REM DEFINE CHARS
  250VDU23,224,0,32,48,120,62,120,48,32
  260VDU23,225,0,1,126,62,62,14,14,2
  270VDU23,226,0,8,8,28,62,127,20,0
  280VDU23,227,0,64,63,62,62,56,56,32
  290VDU23,228,0,4,12,30,124,30,12,4
  300VDU23,229,0,32,56,56,62,62,63,64
  310VDU23,230,0,20,127,62,28,8,8,0
  320VDU23,231,0,2,14,14,62,62,126,1
  330VDU23,233,0,6,134,206,255,206,134,6
  340VDU23,234,52,114,60,28,30,231,98,32
  350VDU23,235,8,8,127,127,28,8,28,62
  360VDU23,236,4,78,60,56,120,231,70,4
  370VDU23,237,0,96,97,115,255,115,97,96
  380VDU23,238,4,70,231,120,56,60,78,4
  390VDU23,239,62,28,8,28,127,127,8,8
  400VDU23,240,32,98,231,30,28,60,114,32
  410VDU23,241,128,128,224,254,184,254,224,0
  420VDU23,242,15,255,255,255,109,255,255,60
  430VDU23,243,0,3,127,255,219,255,127,0
  440VDU23;8202;0;0;0;
  450GCOL0,3:MOVE0,1024:MOVE1280,1024:PLOT85,0,924:PLOT85,1280,924:MOVE0,100:MOVE1280,100:PLOT85,0,0:PLOT85,1280,0
  460GCOL0,15:MOVE0,924:DRAW1280,924:MOVE0,100:DRAW1280,100 
  470MOVE100,50:MOVE100,10:PLOT85,500,50:PLOT85,500,10
  480GCOL0,11:MOVE1180,10:MOVE1180,50:PLOT85,780,10:PLOT85,780,50
  490MOVE515,40:VDU5:GCOL0,0:PRINT"FUEL":VDU4
  500REM SET VARS
  510sc%=0:sc2%=0:c%=0:c2%=0:t=5:t2=1:X1%=550:X2%=650:Y2%=527:Y1%=527:OX1%=1400:OX2%=1300:OY1%=1227:OY2%=1227:ot=5:ot2=1:col%=0:F1=200:F2=200
  520REM CLOUDS
  530 IF C=1 THEN PROCCLOUD(200+RND(200),300+RND(50),150+RND(150),100+RND(50),3,15):PROCCLOUD(850+RND(100),650+RND(50),200+RND(100),100+RND(75),3,15) 
  540VDU19,10,0,0,0,0
  550VDU19,3,7,0,0,0
  560VDU19,15,4,0,0,0
  570VDU19,11,0,0,0,0
  580COLOUR15:COLOUR130:PRINTTAB(1,1);a%;:PRINTTAB(6,1);sc%;:COLOUR11:PRINTTAB(17,1);a2%;:PRINTTAB(13,1);sc2%;
  590REM READ IN DATA
  600FOR W=1 TO 8
  610READ X(W),Y(W)
  620NEXT W
  630FOR B = 1 TO 8
  640READ x(B),y(B)
  650NEXT B
  660FOR B = 1 TO 8
  670READ dx(B),dy(B)
  680NEXT B
  690REM INPUT
  700REPEAT
  710IF INKEY(-98) THEN t2=t2+T2:F2=F2-FR2:IF t2>8+T2 THEN t2=1
  720IF INKEY(-103) THEN t=t+T:F1=F1-FR1:IF t>8+T THEN t=1 
  730IF INKEY(-67) THENt2=t2-T2:F2=F2-FR2:IF t2<1 THEN t2=8+T2 
  740IF INKEY(-104) THEN t=t-T:F1=F1-FR1:IF t<1 THEN t=8+T     
  750IF c%=1 THEN PROCBOMB ELSE IF INKEY(-88) AND a%>0 THEN SOUND&10,1,6,10:co%=0:c%=1:a%=a%-1:ch%=0:dx=x(t):dy=y(t):x%=X1%+dx(t):y%=Y1%+dy(t):ox%=x%:oy%=y%:PROCBOMB:VDU4:COLOUR15:PRINTTAB(1,1);a%;" "   
  760IF c2%=1 THEN PROCB2 ELSE IF INKEY(-66) AND a2%>0 THEN SOUND&10,1,6,10:a2%=a2%-1:co2%=0:c2%=1:ch2%=0:dx2=x(t2):dy2=y(t2):x2%=X2%+dx(t2):y2%=Y2%+dy(t2):ox2%=x2%:oy2%=y2%:PROCB2:VDU4:COLOUR11:PRINTTAB(17,1);a2%;" ";  
  770PROCPLANE
  780PROCPLANE2
  790UNTIL sc%=10 OR sc2%=10 OR F1<=0 OR F2<=0
  800REM END
  810 TIME=0:REPEAT:UNTIL TIME>100
  820MODE6
  830VDU23;8202;0;0;0;
  840PRINTTAB(0,0)
  850*FX15,1
  860 IF F2<=0 AND F1<=0 THEN win=3: GOTO 910
  870 IF F1<=0 THEN win=2:GOTO 920
  880IF F2<=0 THEN win=1:GOTO 920
  890IF sc%=sc2% THEN win=3:GOTO910
  900IF sc%>sc2% THEN win=1 ELSE win=2
  910IF win=3 THEN PRINTTAB(8,9);"It's a draw!!!"
  920PRINTTAB(8,9);"Player#";win;" Wins!!!"
  930PRINTTAB(8,10);"Player#";win;" Wins!!!"
  940PRINTTAB(0,16);"Press any key to restart except 'N'..."
  950*FX15,1
  960G=GET
  970IF G=ASC"N" THEN MODE4:END
  980RESTORE:PROCQUES:GOTO110
  990REM PROCEDURES
 1000REM DRAW 1ST PLANE
 1010DEFPROCPLANE
 1020GCOL3,4
 1030MOVEOX1%,OY1%:VDU5:VDU223+ot+TY
 1040VDU4
 1050MOVEX1%,Y1%:VDU5:VDU223+t+TY:VDU4
 1060OX1%=X1%:OY1%=Y1%
 1070ot=t
 1080X1%=X1%+(X(t)*S):Y1%=Y1%+(Y(t)*S)
 1090IF X1%<-30THEN X1%=1310
 1100IF X1%>1310 THEN X1%=-30
 1110IF Y1%<75 THEN Y1%=930
 1120 IF Y1%>930 THEN Y1%=75
 1130F1=F1-FR
 1140IF F1<0 THEN F1=0
 1150GCOL0,0:MOVE100+(F1*2),10:DRAW100+(F1*2),50
 1160ENDPROC
 1170REM DRAW 2ND PLANE
 1180DEFPROCPLANE2
 1190GCOL3,1
 1200MOVEOX2%,OY2%:VDU5:VDU223+ot2+TY2
 1210VDU4
 1220MOVEX2%,Y2%:VDU5:VDU223+t2+TY2:VDU4
 1230OX2%=X2%:OY2%=Y2%
 1240ot2=t2
 1250X2%=X2%+(X(t2)*S2):Y2%=Y2%+(Y(t2)*S2)
 1260IF X2%<-30 THEN X2%=1310
 1270IF X2%>1310 THEN X2%=-30
 1280IF Y2%<75 THEN Y2%=930
 1290IF Y2%>930 THEN Y2%=75
 1300F2=F2-FR3
 1310IF F2<0 THEN F2=0
 1320GCOL0,0:MOVE780+(F2*2),10:DRAW780+(F2*2),50
 1330ENDPROC
 1340REM DRAW A CLOUD
 1350DEFPROCCLOUD(X%,Y%,SX%,SY%,C1%,C2%)
 1360VDU29,X%;Y%;
 1370L%=6+RND(8) 
 1380MOVE0,0:MOVESX%+SX%/L%,0
 1390X3%=SX%+SX%/10:Y3%=0 
 1400FOR I=0 TO 6.3 STEP 0.1
 1410X%=SX%*COS(I)+SX%/L%*COS(I*L%) 
 1420Y%=SY%*SIN(I)+SY%/L%*SIN(I*L%)
 1430GCOL0,C1%
 1440MOVE32,12:PLOT85,X%,Y%
 1450MOVEX3%,Y3%
 1460GCOL0,C2%:DRAWX%,Y% 
 1470X3%=X%:Y3%=Y% 
 1480NEXT
 1490VDU29,0;0;
 1495ENDPROC  
 1500REM PLAYER #1'S BOMBS
 1510DEFPROCBOMB
 1520GCOL3,4
 1530IF ch%=1 THEN PLOT69,ox%,oy% ELSE ch%=1
 1540PLOT69,x%,y%
 1550ox%=x%:oy%=y%
 1560y%=y%+dy:x%=x%+dx
 1570IF x%<-30 THEN x%=1310
 1580IF x%>1310 THEN x%=-30
 1590IF y%<75 THEN y%=930
 1600IF y%>930 THEN y%=75
 1610IF (x%>X2%-12 AND x%<X2%+72) AND (y%>Y2%-42 AND y%<Y2%+12) THEN PLOT69,ox%,oy%:PROCEXPLODE2:c%=0:ENDPROC
 1630co%=co%+1
 1640IF co%>12 THEN PLOT 69,ox%,oy%:c%=0:ENDPROC 
 1650ENDPROC
 1660REM PLAYER #2'S BOMB
 1670DEFPROCB2
 1680GCOL3,1
 1690IF ch2%=1 THEN PLOT69,ox2%,oy2% ELSE ch2%=1
 1700PLOT69,x2%,y2%
 1710ox2%=x2%:oy2%=y2%
 1720y2%=y2%+dy2:x2%=x2%+dx2
 1730IF x2%<-30 THEN x2%=1310
 1740IF x2%>1310 THEN x2%=-30
 1750IF y2%<75 THEN y2%=930
 1760IF y2%>930 THEN y2%=75
 1770IF (x2%>X1%-12 AND x2%<X1%+72) AND ( y2%>Y1%-42 AND y2%<Y1%+12) THEN PLOT 69,ox2%,oy2%:PROCEXPLODE:c2%=0:ENDPROC
 1780co2%=co2%+1
 1790IF co2%>12 THEN PLOT69,ox2%,oy2%:c2%=0
 1800ENDPROC
 1810REM PLAYER 2 HIT
 1820DEFPROCEXPLODE2
 1830SOUND&10,-10,6,3
 1840 FOR T5=1TO 20:VDU19,1,RND(16),0,0,0:NEXT:VDU19,1,0,0,0,0 
 1850sc%=sc%+1
 1860VDU4:COLOUR15:COLOUR130:PRINTTAB(6,1);sc%
 1870ENDPROC
 1880REM PLAYER 1 HIT
 1890DEFPROCEXPLODE
 1900SOUND&10,-10,6,3
 1910FOR T5=1TO 20:VDU19,4,RND(16),0,0,0:NEXT:VDU19,4,4,0,0,0
 1920sc2%=sc2%+1
 1930VDU4:COLOUR11:COLOUR130:PRINTTAB(13,1);sc2%;
 1940ENDPROC
 1950REM QUESTIONS
 1960DEFPROCQUES
 1961CLS:PRINTTAB(16,5);"Dogfight"
 1962PRINTTAB(0,10);"Joy Stick Controls: LEFT - Turn LEFT"
 1963PRINTTAB(0,12);"                    RIGHT- Turn RIGHT"
 1964PRINTTAB(0,14);"                    Button FIRE" 
 1965PRINTTAB(5,17);"Press a key to continue"
 1966KEY$=GET$ 
 1970 CLS:PRINTTAB(5,10);"Player#1 Bi-plane or Jet?";:H=GET:IF H<>ASC"J" AND H<>ASC"B" THEN 1970 ELSE IF H=ASC"B" THEN T=.5:S=1:TY=9:FR=0.1:FR1=0.2: ELSE T=.25:S=1.5:TY=0:FR=0.15:FR1=0.25 
 1980CLS:PRINTTAB(5,10);"Player#2 Bi-plane or Jet?";:H=GET:IF H<>ASC"J" AND H<>ASC"B" THEN 1980 ELSE IF H=ASC"B" THEN T2=.5:S2=1:TY2=9:FR2=0.2:FR3=0.1: ELSE T2=.25:S2=1.5:FR2=0.25:TY2=0:FR3=0.15 
 1990CLS:PRINTTAB(7,10)"Do you want clouds?";:H=GET:IF H<>ASC"Y" AND H<>ASC"N" THEN 1990 ELSE IF H=ASC"Y" THEN C=1 ELSE C=0
 2000CLS:PRINTTAB(0,10)"How much ammo for player #1(max=99)";:INPUTa%:IFa%<10 OR a%>99 THEN PRINTTAB(15,15);"SILLY";:TIME=T:REPEAT:UNTILTIME>T+100:GOTO2000: ELSE A=a%
 2010CLS:PRINTTAB(0,10)"How much ammo for player #2(max=99)";:INPUTa2%:IFa2%<10 OR a2%>99 THEN PRINTTAB(15,15);"SILLY";:TIME=T:REPEAT:UNTILTIME>T+100:GOTO2010: ELSE A2=a2% 
 2020ENDPROC
 2030REM DATA FOR DIRECTION
 2040DATA18,0,13,13,0,18,-13,13,-18,0,-13,-13,0,-18,13,-13
 2050DATA40,0,28,28,0,40,-28,28,-40,0,-28,-28,0,-40,28,-28   
 2060DATA60,-16,60,0,32,0,0,0,0,-16,0,-30,32,-30,60,-30
 2070MODE6:VDU19,0,4,0,0,0:REPORT
 2080PRINT" at line ";ERL
 2090END
2&�1,0,0,0,0,0,0,0,100,-5,0,-5,100,0
<� � � �TVH
F*�X(10),Y(10),x(10),y(10),dx(10),dy(10)
P�6
Z�23;8202;0;0;0;
d	�QUES
n�2
x� SET COLOURS
��19,0,6,0,0,0
��19,1,0,0,0,0
��19,2,7,0,0,0
��19,3,6,0,0,0
��19,4,4,0,0,0
��19,5,4,0,0,0
��19,6,7,0,0,0
��19,10,6,0,0,0
��19,11,6,0,0,0
��19,14,4,0,0,0
��19,15,6,0,0,0
�� DEFINE CHARS
�$�23,224,0,32,48,120,62,120,48,32
!�23,225,0,1,126,62,62,14,14,2
 �23,226,0,8,8,28,62,127,20,0
"�23,227,0,64,63,62,62,56,56,32
"!�23,228,0,4,12,30,124,30,12,4
,"�23,229,0,32,56,56,62,62,63,64
6 �23,230,0,20,127,62,28,8,8,0
@!�23,231,0,2,14,14,62,62,126,1
J%�23,233,0,6,134,206,255,206,134,6
T%�23,234,52,114,60,28,30,231,98,32
^"�23,235,8,8,127,127,28,8,28,62
h#�23,236,4,78,60,56,120,231,70,4
r%�23,237,0,96,97,115,255,115,97,96
|#�23,238,4,70,231,120,56,60,78,4
�"�23,239,62,28,8,28,127,127,8,8
�%�23,240,32,98,231,30,28,60,114,32
�)�23,241,128,128,224,254,184,254,224,0
�)�23,242,15,255,255,255,109,255,255,60
�%�23,243,0,3,127,255,219,255,127,0
��23;8202;0;0;0;
�V�0,3:�0,1024:�1280,1024:�85,0,924:�85,1280,924:�0,100:�1280,100:�85,0,0:�85,1280,0
�,�0,15:�0,924:�1280,924:�0,100:�1280,100 
�)�100,50:�100,10:�85,500,50:�85,500,10
�1�0,11:�1180,10:�1180,50:�85,780,10:�85,780,50
��515,40:�5:�0,0:�"FUEL":�4
�� SET VARS
��sc%=0:sc2%=0:c%=0:c2%=0:t=5:t2=1:X1%=550:X2%=650:Y2%=527:Y1%=527:OX1%=1400:OX2%=1300:OY1%=1227:OY2%=1227:ot=5:ot2=1:col%=0:F1=200:F2=200
� CLOUDS
{ � C=1 � �CLOUD(200+�(200),300+�(50),150+�(150),100+�(50),3,15):�CLOUD(850+�(100),650+�(50),200+�(100),100+�(75),3,15) 
�19,10,0,0,0,0
&�19,3,7,0,0,0
0�19,15,4,0,0,0
:�19,11,0,0,0,0
DB�15:�130:�1,1);a%;:�6,1);sc%;:�11:�17,1);a2%;:�13,1);sc2%;
N� READ IN DATA
X
� W=1 � 8
b� X(W),Y(W)
l� W
v� B = 1 � 8
�� x(B),y(B)
�� B
�� B = 1 � 8
�� dx(B),dy(B)
�� B
�� INPUT
��
�2� �(-98) � t2=t2+T2:F2=F2-FR2:� t2>8+T2 � t2=1
�.� �(-103) � t=t+T:F1=F1-FR1:� t>8+T � t=1 
�2� �(-67) �t2=t2-T2:F2=F2-FR2:� t2<1 � t2=8+T2 
�2� �(-104) � t=t-T:F1=F1-FR1:� t<1 � t=8+T     
�� c%=1 � �BOMB � � �(-88) � a%>0 � �&10,1,6,10:co%=0:c%=1:a%=a%-1:ch%=0:dx=x(t):dy=y(t):x%=X1%+dx(t):y%=Y1%+dy(t):ox%=x%:oy%=y%:�BOMB:�4:�15:�1,1);a%;" "   
��� c2%=1 � �B2 � � �(-66) � a2%>0 � �&10,1,6,10:a2%=a2%-1:co2%=0:c2%=1:ch2%=0:dx2=x(t2):dy2=y(t2):x2%=X2%+dx(t2):y2%=Y2%+dy(t2):ox2%=x2%:oy2%=y2%:�B2:�4:�11:�17,1);a2%;" ";  

�PLANE
�PLANE2
&� sc%=10 � sc2%=10 � F1<=0 � F2<=0
 	� END
* �=0:�:� �>100
4�6
>�23;8202;0;0;0;
H
�0,0)
R*FX15,1
\$ � F2<=0 � F1<=0 � win=3: � �tNC
f � F1<=0 � win=2:� �tXC
p� F2<=0 � win=1:� �tXC
z� sc%=sc2% � win=3:�tNC
�� sc%>sc2% � win=1 � win=2
�%� win=3 � �8,9);"It's a draw!!!"
�#�8,9);"Player#";win;" Wins!!!"
�$�8,10);"Player#";win;" Wins!!!"
�4�0,16);"Press any key to restart except 'N'..."
�*FX15,1
�G=�
�� G=�"N" � �4:�
��:�QUES:�Dn@
�� PROCEDURES
�� DRAW 1ST PLANE
���PLANE
��3,4
�OX1%,OY1%:�5:�223+ot+TY
�4
�X1%,Y1%:�5:�223+t+TY:�4
$OX1%=X1%:OY1%=Y1%
.ot=t
8%X1%=X1%+(X(t)*S):Y1%=Y1%+(Y(t)*S)
B� X1%<-30� X1%=1310
L� X1%>1310 � X1%=-30
V� Y1%<75 � Y1%=930
` � Y1%>930 � Y1%=75
jF1=F1-FR
t� F1<0 � F1=0
~&�0,0:�100+(F1*2),10:�100+(F1*2),50
��
�� DRAW 2ND PLANE
���PLANE2
��3,1
��OX2%,OY2%:�5:�223+ot2+TY2
��4
��X2%,Y2%:�5:�223+t2+TY2:�4
�OX2%=X2%:OY2%=Y2%
�
ot2=t2
�)X2%=X2%+(X(t2)*S2):Y2%=Y2%+(Y(t2)*S2)
�� X2%<-30 � X2%=1310
�� X2%>1310 � X2%=-30
� Y2%<75 � Y2%=930

� Y2%>930 � Y2%=75

F2=F2-FR3
� F2<0 � F2=0
(&�0,0:�780+(F2*2),10:�780+(F2*2),50
2�
<� DRAW A CLOUD
F"��CLOUD(X%,Y%,SX%,SY%,C1%,C2%)
P�29,X%;Y%;
ZL%=6+�(8) 
d�0,0:�SX%+SX%/L%,0
nX3%=SX%+SX%/10:Y3%=0 
x� I=0 � 6.3 � 0.1
�X%=SX%*�(I)+SX%/L%*�(I*L%) 
�Y%=SY%*�(I)+SY%/L%*�(I*L%)
�
�0,C1%
��32,12:�85,X%,Y%
��X3%,Y3%
��0,C2%:�X%,Y% 
�X3%=X%:Y3%=Y% 
��
��29,0;0;
��  
�� PLAYER #1'S BOMBS
�
��BOMB
��3,4
�!� ch%=1 � �69,ox%,oy% � ch%=1

�69,x%,y%
ox%=x%:oy%=y%
y%=y%+dy:x%=x%+dx
"� x%<-30 � x%=1310
,� x%>1310 � x%=-30
6� y%<75 � y%=930
@� y%>930 � y%=75
JV� (x%>X2%-12 � x%<X2%+72) � (y%>Y2%-42 � y%<Y2%+12) � �69,ox%,oy%:�EXPLODE2:c%=0:�
^
co%=co%+1
h#� co%>12 � � 69,ox%,oy%:c%=0:� 
r�
|� PLAYER #2'S BOMB
���B2
��3,1
�%� ch2%=1 � �69,ox2%,oy2% � ch2%=1
��69,x2%,y2%
�ox2%=x2%:oy2%=y2%
�y2%=y2%+dy2:x2%=x2%+dx2
�� x2%<-30 � x2%=1310
�� x2%>1310 � x2%=-30
�� y2%<75 � y2%=930
�� y2%>930 � y2%=75
�^� (x2%>X1%-12 � x2%<X1%+72) � ( y2%>Y1%-42 � y2%<Y1%+12) � � 69,ox2%,oy2%:�EXPLODE:c2%=0:�
�co2%=co2%+1
�#� co2%>12 � �69,ox2%,oy2%:c2%=0
�
� PLAYER 2 HIT
��EXPLODE2
&�&10,-10,6,3
02 � T5=1� 20:�19,1,�(16),0,0,0:�:�19,1,0,0,0,0 
:
sc%=sc%+1
D�4:�15:�130:�6,1);sc%
N�
X� PLAYER 1 HIT
b
��EXPLODE
l�&10,-10,6,3
v0� T5=1� 20:�19,4,�(16),0,0,0:�:�19,4,4,0,0,0
�sc2%=sc2%+1
��4:�11:�130:�13,1);sc2%;
��
�� QUESTIONS
�
��QUES
��:�16,5);"Dogfight"
�2�0,10);"Joy Stick Controls: LEFT - Turn LEFT"
�3�0,12);"                    RIGHT- Turn RIGHT"
�.�0,14);"                    Button FIRE" 
�%�5,17);"Press a key to continue"
�KEY$=� 
�� �:�5,10);"Player#1 Bi-plane or Jet?";:H=�:� H<>�"J" � H<>�"B" � �trG � � H=�"B" � T=.5:S=1:TY=9:FR=0.1:FR1=0.2: � T=.25:S=1.5:TY=0:FR=0.15:FR1=0.25 
���:�5,10);"Player#2 Bi-plane or Jet?";:H=�:� H<>�"J" � H<>�"B" � �t|G � � H=�"B" � T2=.5:S2=1:TY2=9:FR2=0.2:FR3=0.1: � T2=.25:S2=1.5:FR2=0.25:TY2=0:FR3=0.15 
�Y�:�7,10)"Do you want clouds?";:H=�:� H<>�"Y" � H<>�"N" � �dFG � � H=�"Y" � C=1 � C=0
�w�:�0,10)"How much ammo for player #1(max=99)";:�a%:�a%<10 � a%>99 � �15,15);"SILLY";:�=T:�:��>T+100:�dPG: � A=a%
�}�:�0,10)"How much ammo for player #2(max=99)";:�a2%:�a2%<10 � a2%>99 � �15,15);"SILLY";:�=T:�:��>T+100:�dZG: � A2=a2% 
��
�� DATA FOR DIRECTION
�6�18,0,13,13,0,18,-13,13,-18,0,-13,-13,0,-18,13,-13
9�40,0,28,28,0,40,-28,28,-40,0,-28,-28,0,-40,28,-28   
3�60,-16,60,0,32,0,0,0,0,-16,0,-30,32,-30,60,-30
�6:�19,0,4,0,0,0:�
 �" at line ";�
*�
�
00000000  0d 00 32 26 e2 31 2c 30  2c 30 2c 30 2c 30 2c 30  |..2&.1,0,0,0,0,0|
00000010  2c 30 2c 30 2c 31 30 30  2c 2d 35 2c 30 2c 2d 35  |,0,0,100,-5,0,-5|
00000020  2c 31 30 30 2c 30 0d 00  3c 0e ee 20 85 20 e5 20  |,100,0..<.. . . |
00000030  8d 54 56 48 0d 00 46 2a  de 58 28 31 30 29 2c 59  |.TVH..F*.X(10),Y|
00000040  28 31 30 29 2c 78 28 31  30 29 2c 79 28 31 30 29  |(10),x(10),y(10)|
00000050  2c 64 78 28 31 30 29 2c  64 79 28 31 30 29 0d 00  |,dx(10),dy(10)..|
00000060  50 06 eb 36 0d 00 5a 13  ef 32 33 3b 38 32 30 32  |P..6..Z..23;8202|
00000070  3b 30 3b 30 3b 30 3b 0d  00 64 09 f2 51 55 45 53  |;0;0;0;..d..QUES|
00000080  0d 00 6e 06 eb 32 0d 00  78 11 f4 20 53 45 54 20  |..n..2..x.. SET |
00000090  43 4f 4c 4f 55 52 53 0d  00 82 11 ef 31 39 2c 30  |COLOURS.....19,0|
000000a0  2c 36 2c 30 2c 30 2c 30  0d 00 8c 11 ef 31 39 2c  |,6,0,0,0.....19,|
000000b0  31 2c 30 2c 30 2c 30 2c  30 0d 00 96 11 ef 31 39  |1,0,0,0,0.....19|
000000c0  2c 32 2c 37 2c 30 2c 30  2c 30 0d 00 a0 11 ef 31  |,2,7,0,0,0.....1|
000000d0  39 2c 33 2c 36 2c 30 2c  30 2c 30 0d 00 aa 11 ef  |9,3,6,0,0,0.....|
000000e0  31 39 2c 34 2c 34 2c 30  2c 30 2c 30 0d 00 b4 11  |19,4,4,0,0,0....|
000000f0  ef 31 39 2c 35 2c 34 2c  30 2c 30 2c 30 0d 00 be  |.19,5,4,0,0,0...|
00000100  11 ef 31 39 2c 36 2c 37  2c 30 2c 30 2c 30 0d 00  |..19,6,7,0,0,0..|
00000110  c8 12 ef 31 39 2c 31 30  2c 36 2c 30 2c 30 2c 30  |...19,10,6,0,0,0|
00000120  0d 00 d2 12 ef 31 39 2c  31 31 2c 36 2c 30 2c 30  |.....19,11,6,0,0|
00000130  2c 30 0d 00 dc 12 ef 31  39 2c 31 34 2c 34 2c 30  |,0.....19,14,4,0|
00000140  2c 30 2c 30 0d 00 e6 12  ef 31 39 2c 31 35 2c 36  |,0,0.....19,15,6|
00000150  2c 30 2c 30 2c 30 0d 00  f0 12 f4 20 44 45 46 49  |,0,0,0..... DEFI|
00000160  4e 45 20 43 48 41 52 53  0d 00 fa 24 ef 32 33 2c  |NE CHARS...$.23,|
00000170  32 32 34 2c 30 2c 33 32  2c 34 38 2c 31 32 30 2c  |224,0,32,48,120,|
00000180  36 32 2c 31 32 30 2c 34  38 2c 33 32 0d 01 04 21  |62,120,48,32...!|
00000190  ef 32 33 2c 32 32 35 2c  30 2c 31 2c 31 32 36 2c  |.23,225,0,1,126,|
000001a0  36 32 2c 36 32 2c 31 34  2c 31 34 2c 32 0d 01 0e  |62,62,14,14,2...|
000001b0  20 ef 32 33 2c 32 32 36  2c 30 2c 38 2c 38 2c 32  | .23,226,0,8,8,2|
000001c0  38 2c 36 32 2c 31 32 37  2c 32 30 2c 30 0d 01 18  |8,62,127,20,0...|
000001d0  22 ef 32 33 2c 32 32 37  2c 30 2c 36 34 2c 36 33  |".23,227,0,64,63|
000001e0  2c 36 32 2c 36 32 2c 35  36 2c 35 36 2c 33 32 0d  |,62,62,56,56,32.|
000001f0  01 22 21 ef 32 33 2c 32  32 38 2c 30 2c 34 2c 31  |."!.23,228,0,4,1|
00000200  32 2c 33 30 2c 31 32 34  2c 33 30 2c 31 32 2c 34  |2,30,124,30,12,4|
00000210  0d 01 2c 22 ef 32 33 2c  32 32 39 2c 30 2c 33 32  |..,".23,229,0,32|
00000220  2c 35 36 2c 35 36 2c 36  32 2c 36 32 2c 36 33 2c  |,56,56,62,62,63,|
00000230  36 34 0d 01 36 20 ef 32  33 2c 32 33 30 2c 30 2c  |64..6 .23,230,0,|
00000240  32 30 2c 31 32 37 2c 36  32 2c 32 38 2c 38 2c 38  |20,127,62,28,8,8|
00000250  2c 30 0d 01 40 21 ef 32  33 2c 32 33 31 2c 30 2c  |,0..@!.23,231,0,|
00000260  32 2c 31 34 2c 31 34 2c  36 32 2c 36 32 2c 31 32  |2,14,14,62,62,12|
00000270  36 2c 31 0d 01 4a 25 ef  32 33 2c 32 33 33 2c 30  |6,1..J%.23,233,0|
00000280  2c 36 2c 31 33 34 2c 32  30 36 2c 32 35 35 2c 32  |,6,134,206,255,2|
00000290  30 36 2c 31 33 34 2c 36  0d 01 54 25 ef 32 33 2c  |06,134,6..T%.23,|
000002a0  32 33 34 2c 35 32 2c 31  31 34 2c 36 30 2c 32 38  |234,52,114,60,28|
000002b0  2c 33 30 2c 32 33 31 2c  39 38 2c 33 32 0d 01 5e  |,30,231,98,32..^|
000002c0  22 ef 32 33 2c 32 33 35  2c 38 2c 38 2c 31 32 37  |".23,235,8,8,127|
000002d0  2c 31 32 37 2c 32 38 2c  38 2c 32 38 2c 36 32 0d  |,127,28,8,28,62.|
000002e0  01 68 23 ef 32 33 2c 32  33 36 2c 34 2c 37 38 2c  |.h#.23,236,4,78,|
000002f0  36 30 2c 35 36 2c 31 32  30 2c 32 33 31 2c 37 30  |60,56,120,231,70|
00000300  2c 34 0d 01 72 25 ef 32  33 2c 32 33 37 2c 30 2c  |,4..r%.23,237,0,|
00000310  39 36 2c 39 37 2c 31 31  35 2c 32 35 35 2c 31 31  |96,97,115,255,11|
00000320  35 2c 39 37 2c 39 36 0d  01 7c 23 ef 32 33 2c 32  |5,97,96..|#.23,2|
00000330  33 38 2c 34 2c 37 30 2c  32 33 31 2c 31 32 30 2c  |38,4,70,231,120,|
00000340  35 36 2c 36 30 2c 37 38  2c 34 0d 01 86 22 ef 32  |56,60,78,4...".2|
00000350  33 2c 32 33 39 2c 36 32  2c 32 38 2c 38 2c 32 38  |3,239,62,28,8,28|
00000360  2c 31 32 37 2c 31 32 37  2c 38 2c 38 0d 01 90 25  |,127,127,8,8...%|
00000370  ef 32 33 2c 32 34 30 2c  33 32 2c 39 38 2c 32 33  |.23,240,32,98,23|
00000380  31 2c 33 30 2c 32 38 2c  36 30 2c 31 31 34 2c 33  |1,30,28,60,114,3|
00000390  32 0d 01 9a 29 ef 32 33  2c 32 34 31 2c 31 32 38  |2...).23,241,128|
000003a0  2c 31 32 38 2c 32 32 34  2c 32 35 34 2c 31 38 34  |,128,224,254,184|
000003b0  2c 32 35 34 2c 32 32 34  2c 30 0d 01 a4 29 ef 32  |,254,224,0...).2|
000003c0  33 2c 32 34 32 2c 31 35  2c 32 35 35 2c 32 35 35  |3,242,15,255,255|
000003d0  2c 32 35 35 2c 31 30 39  2c 32 35 35 2c 32 35 35  |,255,109,255,255|
000003e0  2c 36 30 0d 01 ae 25 ef  32 33 2c 32 34 33 2c 30  |,60...%.23,243,0|
000003f0  2c 33 2c 31 32 37 2c 32  35 35 2c 32 31 39 2c 32  |,3,127,255,219,2|
00000400  35 35 2c 31 32 37 2c 30  0d 01 b8 13 ef 32 33 3b  |55,127,0.....23;|
00000410  38 32 30 32 3b 30 3b 30  3b 30 3b 0d 01 c2 56 e6  |8202;0;0;0;...V.|
00000420  30 2c 33 3a ec 30 2c 31  30 32 34 3a ec 31 32 38  |0,3:.0,1024:.128|
00000430  30 2c 31 30 32 34 3a f0  38 35 2c 30 2c 39 32 34  |0,1024:.85,0,924|
00000440  3a f0 38 35 2c 31 32 38  30 2c 39 32 34 3a ec 30  |:.85,1280,924:.0|
00000450  2c 31 30 30 3a ec 31 32  38 30 2c 31 30 30 3a f0  |,100:.1280,100:.|
00000460  38 35 2c 30 2c 30 3a f0  38 35 2c 31 32 38 30 2c  |85,0,0:.85,1280,|
00000470  30 0d 01 cc 2c e6 30 2c  31 35 3a ec 30 2c 39 32  |0...,.0,15:.0,92|
00000480  34 3a df 31 32 38 30 2c  39 32 34 3a ec 30 2c 31  |4:.1280,924:.0,1|
00000490  30 30 3a df 31 32 38 30  2c 31 30 30 20 0d 01 d6  |00:.1280,100 ...|
000004a0  29 ec 31 30 30 2c 35 30  3a ec 31 30 30 2c 31 30  |).100,50:.100,10|
000004b0  3a f0 38 35 2c 35 30 30  2c 35 30 3a f0 38 35 2c  |:.85,500,50:.85,|
000004c0  35 30 30 2c 31 30 0d 01  e0 31 e6 30 2c 31 31 3a  |500,10...1.0,11:|
000004d0  ec 31 31 38 30 2c 31 30  3a ec 31 31 38 30 2c 35  |.1180,10:.1180,5|
000004e0  30 3a f0 38 35 2c 37 38  30 2c 31 30 3a f0 38 35  |0:.85,780,10:.85|
000004f0  2c 37 38 30 2c 35 30 0d  01 ea 1e ec 35 31 35 2c  |,780,50.....515,|
00000500  34 30 3a ef 35 3a e6 30  2c 30 3a f1 22 46 55 45  |40:.5:.0,0:."FUE|
00000510  4c 22 3a ef 34 0d 01 f4  0e f4 20 53 45 54 20 56  |L":.4..... SET V|
00000520  41 52 53 0d 01 fe 8c 73  63 25 3d 30 3a 73 63 32  |ARS....sc%=0:sc2|
00000530  25 3d 30 3a 63 25 3d 30  3a 63 32 25 3d 30 3a 74  |%=0:c%=0:c2%=0:t|
00000540  3d 35 3a 74 32 3d 31 3a  58 31 25 3d 35 35 30 3a  |=5:t2=1:X1%=550:|
00000550  58 32 25 3d 36 35 30 3a  59 32 25 3d 35 32 37 3a  |X2%=650:Y2%=527:|
00000560  59 31 25 3d 35 32 37 3a  4f 58 31 25 3d 31 34 30  |Y1%=527:OX1%=140|
00000570  30 3a 4f 58 32 25 3d 31  33 30 30 3a 4f 59 31 25  |0:OX2%=1300:OY1%|
00000580  3d 31 32 32 37 3a 4f 59  32 25 3d 31 32 32 37 3a  |=1227:OY2%=1227:|
00000590  6f 74 3d 35 3a 6f 74 32  3d 31 3a 63 6f 6c 25 3d  |ot=5:ot2=1:col%=|
000005a0  30 3a 46 31 3d 32 30 30  3a 46 32 3d 32 30 30 0d  |0:F1=200:F2=200.|
000005b0  02 08 0c f4 20 43 4c 4f  55 44 53 0d 02 12 7b 20  |.... CLOUDS...{ |
000005c0  e7 20 43 3d 31 20 8c 20  f2 43 4c 4f 55 44 28 32  |. C=1 . .CLOUD(2|
000005d0  30 30 2b b3 28 32 30 30  29 2c 33 30 30 2b b3 28  |00+.(200),300+.(|
000005e0  35 30 29 2c 31 35 30 2b  b3 28 31 35 30 29 2c 31  |50),150+.(150),1|
000005f0  30 30 2b b3 28 35 30 29  2c 33 2c 31 35 29 3a f2  |00+.(50),3,15):.|
00000600  43 4c 4f 55 44 28 38 35  30 2b b3 28 31 30 30 29  |CLOUD(850+.(100)|
00000610  2c 36 35 30 2b b3 28 35  30 29 2c 32 30 30 2b b3  |,650+.(50),200+.|
00000620  28 31 30 30 29 2c 31 30  30 2b b3 28 37 35 29 2c  |(100),100+.(75),|
00000630  33 2c 31 35 29 20 0d 02  1c 12 ef 31 39 2c 31 30  |3,15) .....19,10|
00000640  2c 30 2c 30 2c 30 2c 30  0d 02 26 11 ef 31 39 2c  |,0,0,0,0..&..19,|
00000650  33 2c 37 2c 30 2c 30 2c  30 0d 02 30 12 ef 31 39  |3,7,0,0,0..0..19|
00000660  2c 31 35 2c 34 2c 30 2c  30 2c 30 0d 02 3a 12 ef  |,15,4,0,0,0..:..|
00000670  31 39 2c 31 31 2c 30 2c  30 2c 30 2c 30 0d 02 44  |19,11,0,0,0,0..D|
00000680  42 fb 31 35 3a fb 31 33  30 3a f1 8a 31 2c 31 29  |B.15:.130:..1,1)|
00000690  3b 61 25 3b 3a f1 8a 36  2c 31 29 3b 73 63 25 3b  |;a%;:..6,1);sc%;|
000006a0  3a fb 31 31 3a f1 8a 31  37 2c 31 29 3b 61 32 25  |:.11:..17,1);a2%|
000006b0  3b 3a f1 8a 31 33 2c 31  29 3b 73 63 32 25 3b 0d  |;:..13,1);sc2%;.|
000006c0  02 4e 12 f4 20 52 45 41  44 20 49 4e 20 44 41 54  |.N.. READ IN DAT|
000006d0  41 0d 02 58 0d e3 20 57  3d 31 20 b8 20 38 0d 02  |A..X.. W=1 . 8..|
000006e0  62 0f f3 20 58 28 57 29  2c 59 28 57 29 0d 02 6c  |b.. X(W),Y(W)..l|
000006f0  07 ed 20 57 0d 02 76 0f  e3 20 42 20 3d 20 31 20  |.. W..v.. B = 1 |
00000700  b8 20 38 0d 02 80 0f f3  20 78 28 42 29 2c 79 28  |. 8..... x(B),y(|
00000710  42 29 0d 02 8a 07 ed 20  42 0d 02 94 0f e3 20 42  |B)..... B..... B|
00000720  20 3d 20 31 20 b8 20 38  0d 02 9e 11 f3 20 64 78  | = 1 . 8..... dx|
00000730  28 42 29 2c 64 79 28 42  29 0d 02 a8 07 ed 20 42  |(B),dy(B)..... B|
00000740  0d 02 b2 0b f4 20 49 4e  50 55 54 0d 02 bc 05 f5  |..... INPUT.....|
00000750  0d 02 c6 32 e7 20 a6 28  2d 39 38 29 20 8c 20 74  |...2. .(-98) . t|
00000760  32 3d 74 32 2b 54 32 3a  46 32 3d 46 32 2d 46 52  |2=t2+T2:F2=F2-FR|
00000770  32 3a e7 20 74 32 3e 38  2b 54 32 20 8c 20 74 32  |2:. t2>8+T2 . t2|
00000780  3d 31 0d 02 d0 2e e7 20  a6 28 2d 31 30 33 29 20  |=1..... .(-103) |
00000790  8c 20 74 3d 74 2b 54 3a  46 31 3d 46 31 2d 46 52  |. t=t+T:F1=F1-FR|
000007a0  31 3a e7 20 74 3e 38 2b  54 20 8c 20 74 3d 31 20  |1:. t>8+T . t=1 |
000007b0  0d 02 da 32 e7 20 a6 28  2d 36 37 29 20 8c 74 32  |...2. .(-67) .t2|
000007c0  3d 74 32 2d 54 32 3a 46  32 3d 46 32 2d 46 52 32  |=t2-T2:F2=F2-FR2|
000007d0  3a e7 20 74 32 3c 31 20  8c 20 74 32 3d 38 2b 54  |:. t2<1 . t2=8+T|
000007e0  32 20 0d 02 e4 32 e7 20  a6 28 2d 31 30 34 29 20  |2 ...2. .(-104) |
000007f0  8c 20 74 3d 74 2d 54 3a  46 31 3d 46 31 2d 46 52  |. t=t-T:F1=F1-FR|
00000800  31 3a e7 20 74 3c 31 20  8c 20 74 3d 38 2b 54 20  |1:. t<1 . t=8+T |
00000810  20 20 20 20 0d 02 ee a1  e7 20 63 25 3d 31 20 8c  |    ..... c%=1 .|
00000820  20 f2 42 4f 4d 42 20 8b  20 e7 20 a6 28 2d 38 38  | .BOMB . . .(-88|
00000830  29 20 80 20 61 25 3e 30  20 8c 20 d4 26 31 30 2c  |) . a%>0 . .&10,|
00000840  31 2c 36 2c 31 30 3a 63  6f 25 3d 30 3a 63 25 3d  |1,6,10:co%=0:c%=|
00000850  31 3a 61 25 3d 61 25 2d  31 3a 63 68 25 3d 30 3a  |1:a%=a%-1:ch%=0:|
00000860  64 78 3d 78 28 74 29 3a  64 79 3d 79 28 74 29 3a  |dx=x(t):dy=y(t):|
00000870  78 25 3d 58 31 25 2b 64  78 28 74 29 3a 79 25 3d  |x%=X1%+dx(t):y%=|
00000880  59 31 25 2b 64 79 28 74  29 3a 6f 78 25 3d 78 25  |Y1%+dy(t):ox%=x%|
00000890  3a 6f 79 25 3d 79 25 3a  f2 42 4f 4d 42 3a ef 34  |:oy%=y%:.BOMB:.4|
000008a0  3a fb 31 35 3a f1 8a 31  2c 31 29 3b 61 25 3b 22  |:.15:..1,1);a%;"|
000008b0  20 22 20 20 20 0d 02 f8  b2 e7 20 63 32 25 3d 31  | "   ..... c2%=1|
000008c0  20 8c 20 f2 42 32 20 8b  20 e7 20 a6 28 2d 36 36  | . .B2 . . .(-66|
000008d0  29 20 80 20 61 32 25 3e  30 20 8c 20 d4 26 31 30  |) . a2%>0 . .&10|
000008e0  2c 31 2c 36 2c 31 30 3a  61 32 25 3d 61 32 25 2d  |,1,6,10:a2%=a2%-|
000008f0  31 3a 63 6f 32 25 3d 30  3a 63 32 25 3d 31 3a 63  |1:co2%=0:c2%=1:c|
00000900  68 32 25 3d 30 3a 64 78  32 3d 78 28 74 32 29 3a  |h2%=0:dx2=x(t2):|
00000910  64 79 32 3d 79 28 74 32  29 3a 78 32 25 3d 58 32  |dy2=y(t2):x2%=X2|
00000920  25 2b 64 78 28 74 32 29  3a 79 32 25 3d 59 32 25  |%+dx(t2):y2%=Y2%|
00000930  2b 64 79 28 74 32 29 3a  6f 78 32 25 3d 78 32 25  |+dy(t2):ox2%=x2%|
00000940  3a 6f 79 32 25 3d 79 32  25 3a f2 42 32 3a ef 34  |:oy2%=y2%:.B2:.4|
00000950  3a fb 31 31 3a f1 8a 31  37 2c 31 29 3b 61 32 25  |:.11:..17,1);a2%|
00000960  3b 22 20 22 3b 20 20 0d  03 02 0a f2 50 4c 41 4e  |;" ";  .....PLAN|
00000970  45 0d 03 0c 0b f2 50 4c  41 4e 45 32 0d 03 16 26  |E.....PLANE2...&|
00000980  fd 20 73 63 25 3d 31 30  20 84 20 73 63 32 25 3d  |. sc%=10 . sc2%=|
00000990  31 30 20 84 20 46 31 3c  3d 30 20 84 20 46 32 3c  |10 . F1<=0 . F2<|
000009a0  3d 30 0d 03 20 09 f4 20  45 4e 44 0d 03 2a 12 20  |=0.. .. END..*. |
000009b0  d1 3d 30 3a f5 3a fd 20  91 3e 31 30 30 0d 03 34  |.=0:.:. .>100..4|
000009c0  06 eb 36 0d 03 3e 13 ef  32 33 3b 38 32 30 32 3b  |..6..>..23;8202;|
000009d0  30 3b 30 3b 30 3b 0d 03  48 0a f1 8a 30 2c 30 29  |0;0;0;..H...0,0)|
000009e0  0d 03 52 0b 2a 46 58 31  35 2c 31 0d 03 5c 24 20  |..R.*FX15,1..\$ |
000009f0  e7 20 46 32 3c 3d 30 20  80 20 46 31 3c 3d 30 20  |. F2<=0 . F1<=0 |
00000a00  8c 20 77 69 6e 3d 33 3a  20 e5 20 8d 74 4e 43 0d  |. win=3: . .tNC.|
00000a10  03 66 1b 20 e7 20 46 31  3c 3d 30 20 8c 20 77 69  |.f. . F1<=0 . wi|
00000a20  6e 3d 32 3a e5 20 8d 74  58 43 0d 03 70 1a e7 20  |n=2:. .tXC..p.. |
00000a30  46 32 3c 3d 30 20 8c 20  77 69 6e 3d 31 3a e5 20  |F2<=0 . win=1:. |
00000a40  8d 74 58 43 0d 03 7a 1c  e7 20 73 63 25 3d 73 63  |.tXC..z.. sc%=sc|
00000a50  32 25 20 8c 20 77 69 6e  3d 33 3a e5 8d 74 4e 43  |2% . win=3:..tNC|
00000a60  0d 03 84 1e e7 20 73 63  25 3e 73 63 32 25 20 8c  |..... sc%>sc2% .|
00000a70  20 77 69 6e 3d 31 20 8b  20 77 69 6e 3d 32 0d 03  | win=1 . win=2..|
00000a80  8e 25 e7 20 77 69 6e 3d  33 20 8c 20 f1 8a 38 2c  |.%. win=3 . ..8,|
00000a90  39 29 3b 22 49 74 27 73  20 61 20 64 72 61 77 21  |9);"It's a draw!|
00000aa0  21 21 22 0d 03 98 23 f1  8a 38 2c 39 29 3b 22 50  |!!"...#..8,9);"P|
00000ab0  6c 61 79 65 72 23 22 3b  77 69 6e 3b 22 20 57 69  |layer#";win;" Wi|
00000ac0  6e 73 21 21 21 22 0d 03  a2 24 f1 8a 38 2c 31 30  |ns!!!"...$..8,10|
00000ad0  29 3b 22 50 6c 61 79 65  72 23 22 3b 77 69 6e 3b  |);"Player#";win;|
00000ae0  22 20 57 69 6e 73 21 21  21 22 0d 03 ac 34 f1 8a  |" Wins!!!"...4..|
00000af0  30 2c 31 36 29 3b 22 50  72 65 73 73 20 61 6e 79  |0,16);"Press any|
00000b00  20 6b 65 79 20 74 6f 20  72 65 73 74 61 72 74 20  | key to restart |
00000b10  65 78 63 65 70 74 20 27  4e 27 2e 2e 2e 22 0d 03  |except 'N'..."..|
00000b20  b6 0b 2a 46 58 31 35 2c  31 0d 03 c0 07 47 3d a5  |..*FX15,1....G=.|
00000b30  0d 03 ca 13 e7 20 47 3d  97 22 4e 22 20 8c 20 eb  |..... G=."N" . .|
00000b40  34 3a e0 0d 03 d4 11 f7  3a f2 51 55 45 53 3a e5  |4:......:.QUES:.|
00000b50  8d 44 6e 40 0d 03 de 10  f4 20 50 52 4f 43 45 44  |.Dn@..... PROCED|
00000b60  55 52 45 53 0d 03 e8 14  f4 20 44 52 41 57 20 31  |URES..... DRAW 1|
00000b70  53 54 20 50 4c 41 4e 45  0d 03 f2 0b dd f2 50 4c  |ST PLANE......PL|
00000b80  41 4e 45 0d 03 fc 08 e6  33 2c 34 0d 04 06 1c ec  |ANE.....3,4.....|
00000b90  4f 58 31 25 2c 4f 59 31  25 3a ef 35 3a ef 32 32  |OX1%,OY1%:.5:.22|
00000ba0  33 2b 6f 74 2b 54 59 0d  04 10 06 ef 34 0d 04 1a  |3+ot+TY.....4...|
00000bb0  1c ec 58 31 25 2c 59 31  25 3a ef 35 3a ef 32 32  |..X1%,Y1%:.5:.22|
00000bc0  33 2b 74 2b 54 59 3a ef  34 0d 04 24 15 4f 58 31  |3+t+TY:.4..$.OX1|
00000bd0  25 3d 58 31 25 3a 4f 59  31 25 3d 59 31 25 0d 04  |%=X1%:OY1%=Y1%..|
00000be0  2e 08 6f 74 3d 74 0d 04  38 25 58 31 25 3d 58 31  |..ot=t..8%X1%=X1|
00000bf0  25 2b 28 58 28 74 29 2a  53 29 3a 59 31 25 3d 59  |%+(X(t)*S):Y1%=Y|
00000c00  31 25 2b 28 59 28 74 29  2a 53 29 0d 04 42 17 e7  |1%+(Y(t)*S)..B..|
00000c10  20 58 31 25 3c 2d 33 30  8c 20 58 31 25 3d 31 33  | X1%<-30. X1%=13|
00000c20  31 30 0d 04 4c 18 e7 20  58 31 25 3e 31 33 31 30  |10..L.. X1%>1310|
00000c30  20 8c 20 58 31 25 3d 2d  33 30 0d 04 56 16 e7 20  | . X1%=-30..V.. |
00000c40  59 31 25 3c 37 35 20 8c  20 59 31 25 3d 39 33 30  |Y1%<75 . Y1%=930|
00000c50  0d 04 60 17 20 e7 20 59  31 25 3e 39 33 30 20 8c  |..`. . Y1%>930 .|
00000c60  20 59 31 25 3d 37 35 0d  04 6a 0c 46 31 3d 46 31  | Y1%=75..j.F1=F1|
00000c70  2d 46 52 0d 04 74 11 e7  20 46 31 3c 30 20 8c 20  |-FR..t.. F1<0 . |
00000c80  46 31 3d 30 0d 04 7e 26  e6 30 2c 30 3a ec 31 30  |F1=0..~&.0,0:.10|
00000c90  30 2b 28 46 31 2a 32 29  2c 31 30 3a df 31 30 30  |0+(F1*2),10:.100|
00000ca0  2b 28 46 31 2a 32 29 2c  35 30 0d 04 88 05 e1 0d  |+(F1*2),50......|
00000cb0  04 92 14 f4 20 44 52 41  57 20 32 4e 44 20 50 4c  |.... DRAW 2ND PL|
00000cc0  41 4e 45 0d 04 9c 0c dd  f2 50 4c 41 4e 45 32 0d  |ANE......PLANE2.|
00000cd0  04 a6 08 e6 33 2c 31 0d  04 b0 1e ec 4f 58 32 25  |....3,1.....OX2%|
00000ce0  2c 4f 59 32 25 3a ef 35  3a ef 32 32 33 2b 6f 74  |,OY2%:.5:.223+ot|
00000cf0  32 2b 54 59 32 0d 04 ba  06 ef 34 0d 04 c4 1e ec  |2+TY2.....4.....|
00000d00  58 32 25 2c 59 32 25 3a  ef 35 3a ef 32 32 33 2b  |X2%,Y2%:.5:.223+|
00000d10  74 32 2b 54 59 32 3a ef  34 0d 04 ce 15 4f 58 32  |t2+TY2:.4....OX2|
00000d20  25 3d 58 32 25 3a 4f 59  32 25 3d 59 32 25 0d 04  |%=X2%:OY2%=Y2%..|
00000d30  d8 0a 6f 74 32 3d 74 32  0d 04 e2 29 58 32 25 3d  |..ot2=t2...)X2%=|
00000d40  58 32 25 2b 28 58 28 74  32 29 2a 53 32 29 3a 59  |X2%+(X(t2)*S2):Y|
00000d50  32 25 3d 59 32 25 2b 28  59 28 74 32 29 2a 53 32  |2%=Y2%+(Y(t2)*S2|
00000d60  29 0d 04 ec 18 e7 20 58  32 25 3c 2d 33 30 20 8c  |)..... X2%<-30 .|
00000d70  20 58 32 25 3d 31 33 31  30 0d 04 f6 18 e7 20 58  | X2%=1310..... X|
00000d80  32 25 3e 31 33 31 30 20  8c 20 58 32 25 3d 2d 33  |2%>1310 . X2%=-3|
00000d90  30 0d 05 00 16 e7 20 59  32 25 3c 37 35 20 8c 20  |0..... Y2%<75 . |
00000da0  59 32 25 3d 39 33 30 0d  05 0a 16 e7 20 59 32 25  |Y2%=930..... Y2%|
00000db0  3e 39 33 30 20 8c 20 59  32 25 3d 37 35 0d 05 14  |>930 . Y2%=75...|
00000dc0  0d 46 32 3d 46 32 2d 46  52 33 0d 05 1e 11 e7 20  |.F2=F2-FR3..... |
00000dd0  46 32 3c 30 20 8c 20 46  32 3d 30 0d 05 28 26 e6  |F2<0 . F2=0..(&.|
00000de0  30 2c 30 3a ec 37 38 30  2b 28 46 32 2a 32 29 2c  |0,0:.780+(F2*2),|
00000df0  31 30 3a df 37 38 30 2b  28 46 32 2a 32 29 2c 35  |10:.780+(F2*2),5|
00000e00  30 0d 05 32 05 e1 0d 05  3c 12 f4 20 44 52 41 57  |0..2....<.. DRAW|
00000e10  20 41 20 43 4c 4f 55 44  0d 05 46 22 dd f2 43 4c  | A CLOUD..F"..CL|
00000e20  4f 55 44 28 58 25 2c 59  25 2c 53 58 25 2c 53 59  |OUD(X%,Y%,SX%,SY|
00000e30  25 2c 43 31 25 2c 43 32  25 29 0d 05 50 0e ef 32  |%,C1%,C2%)..P..2|
00000e40  39 2c 58 25 3b 59 25 3b  0d 05 5a 0e 4c 25 3d 36  |9,X%;Y%;..Z.L%=6|
00000e50  2b b3 28 38 29 20 0d 05  64 16 ec 30 2c 30 3a ec  |+.(8) ..d..0,0:.|
00000e60  53 58 25 2b 53 58 25 2f  4c 25 2c 30 0d 05 6e 19  |SX%+SX%/L%,0..n.|
00000e70  58 33 25 3d 53 58 25 2b  53 58 25 2f 31 30 3a 59  |X3%=SX%+SX%/10:Y|
00000e80  33 25 3d 30 20 0d 05 78  15 e3 20 49 3d 30 20 b8  |3%=0 ..x.. I=0 .|
00000e90  20 36 2e 33 20 88 20 30  2e 31 0d 05 82 1f 58 25  | 6.3 . 0.1....X%|
00000ea0  3d 53 58 25 2a 9b 28 49  29 2b 53 58 25 2f 4c 25  |=SX%*.(I)+SX%/L%|
00000eb0  2a 9b 28 49 2a 4c 25 29  20 0d 05 8c 1e 59 25 3d  |*.(I*L%) ....Y%=|
00000ec0  53 59 25 2a b5 28 49 29  2b 53 59 25 2f 4c 25 2a  |SY%*.(I)+SY%/L%*|
00000ed0  b5 28 49 2a 4c 25 29 0d  05 96 0a e6 30 2c 43 31  |.(I*L%).....0,C1|
00000ee0  25 0d 05 a0 14 ec 33 32  2c 31 32 3a f0 38 35 2c  |%.....32,12:.85,|
00000ef0  58 25 2c 59 25 0d 05 aa  0c ec 58 33 25 2c 59 33  |X%,Y%.....X3%,Y3|
00000f00  25 0d 05 b4 12 e6 30 2c  43 32 25 3a df 58 25 2c  |%.....0,C2%:.X%,|
00000f10  59 25 20 0d 05 be 12 58  33 25 3d 58 25 3a 59 33  |Y% ....X3%=X%:Y3|
00000f20  25 3d 59 25 20 0d 05 c8  05 ed 0d 05 d2 0c ef 32  |%=Y% ..........2|
00000f30  39 2c 30 3b 30 3b 0d 05  d7 07 e1 20 20 0d 05 dc  |9,0;0;.....  ...|
00000f40  17 f4 20 50 4c 41 59 45  52 20 23 31 27 53 20 42  |.. PLAYER #1'S B|
00000f50  4f 4d 42 53 0d 05 e6 0a  dd f2 42 4f 4d 42 0d 05  |OMBS......BOMB..|
00000f60  f0 08 e6 33 2c 34 0d 05  fa 21 e7 20 63 68 25 3d  |...3,4...!. ch%=|
00000f70  31 20 8c 20 f0 36 39 2c  6f 78 25 2c 6f 79 25 20  |1 . .69,ox%,oy% |
00000f80  8b 20 63 68 25 3d 31 0d  06 04 0d f0 36 39 2c 78  |. ch%=1.....69,x|
00000f90  25 2c 79 25 0d 06 0e 11  6f 78 25 3d 78 25 3a 6f  |%,y%....ox%=x%:o|
00000fa0  79 25 3d 79 25 0d 06 18  15 79 25 3d 79 25 2b 64  |y%=y%....y%=y%+d|
00000fb0  79 3a 78 25 3d 78 25 2b  64 78 0d 06 22 16 e7 20  |y:x%=x%+dx..".. |
00000fc0  78 25 3c 2d 33 30 20 8c  20 78 25 3d 31 33 31 30  |x%<-30 . x%=1310|
00000fd0  0d 06 2c 16 e7 20 78 25  3e 31 33 31 30 20 8c 20  |..,.. x%>1310 . |
00000fe0  78 25 3d 2d 33 30 0d 06  36 14 e7 20 79 25 3c 37  |x%=-30..6.. y%<7|
00000ff0  35 20 8c 20 79 25 3d 39  33 30 0d 06 40 14 e7 20  |5 . y%=930..@.. |
00001000  79 25 3e 39 33 30 20 8c  20 79 25 3d 37 35 0d 06  |y%>930 . y%=75..|
00001010  4a 56 e7 20 28 78 25 3e  58 32 25 2d 31 32 20 80  |JV. (x%>X2%-12 .|
00001020  20 78 25 3c 58 32 25 2b  37 32 29 20 80 20 28 79  | x%<X2%+72) . (y|
00001030  25 3e 59 32 25 2d 34 32  20 80 20 79 25 3c 59 32  |%>Y2%-42 . y%<Y2|
00001040  25 2b 31 32 29 20 8c 20  f0 36 39 2c 6f 78 25 2c  |%+12) . .69,ox%,|
00001050  6f 79 25 3a f2 45 58 50  4c 4f 44 45 32 3a 63 25  |oy%:.EXPLODE2:c%|
00001060  3d 30 3a e1 0d 06 5e 0d  63 6f 25 3d 63 6f 25 2b  |=0:...^.co%=co%+|
00001070  31 0d 06 68 23 e7 20 63  6f 25 3e 31 32 20 8c 20  |1..h#. co%>12 . |
00001080  f0 20 36 39 2c 6f 78 25  2c 6f 79 25 3a 63 25 3d  |. 69,ox%,oy%:c%=|
00001090  30 3a e1 20 0d 06 72 05  e1 0d 06 7c 16 f4 20 50  |0:. ..r....|.. P|
000010a0  4c 41 59 45 52 20 23 32  27 53 20 42 4f 4d 42 0d  |LAYER #2'S BOMB.|
000010b0  06 86 08 dd f2 42 32 0d  06 90 08 e6 33 2c 31 0d  |.....B2.....3,1.|
000010c0  06 9a 25 e7 20 63 68 32  25 3d 31 20 8c 20 f0 36  |..%. ch2%=1 . .6|
000010d0  39 2c 6f 78 32 25 2c 6f  79 32 25 20 8b 20 63 68  |9,ox2%,oy2% . ch|
000010e0  32 25 3d 31 0d 06 a4 0f  f0 36 39 2c 78 32 25 2c  |2%=1.....69,x2%,|
000010f0  79 32 25 0d 06 ae 15 6f  78 32 25 3d 78 32 25 3a  |y2%....ox2%=x2%:|
00001100  6f 79 32 25 3d 79 32 25  0d 06 b8 1b 79 32 25 3d  |oy2%=y2%....y2%=|
00001110  79 32 25 2b 64 79 32 3a  78 32 25 3d 78 32 25 2b  |y2%+dy2:x2%=x2%+|
00001120  64 78 32 0d 06 c2 18 e7  20 78 32 25 3c 2d 33 30  |dx2..... x2%<-30|
00001130  20 8c 20 78 32 25 3d 31  33 31 30 0d 06 cc 18 e7  | . x2%=1310.....|
00001140  20 78 32 25 3e 31 33 31  30 20 8c 20 78 32 25 3d  | x2%>1310 . x2%=|
00001150  2d 33 30 0d 06 d6 16 e7  20 79 32 25 3c 37 35 20  |-30..... y2%<75 |
00001160  8c 20 79 32 25 3d 39 33  30 0d 06 e0 16 e7 20 79  |. y2%=930..... y|
00001170  32 25 3e 39 33 30 20 8c  20 79 32 25 3d 37 35 0d  |2%>930 . y2%=75.|
00001180  06 ea 5e e7 20 28 78 32  25 3e 58 31 25 2d 31 32  |..^. (x2%>X1%-12|
00001190  20 80 20 78 32 25 3c 58  31 25 2b 37 32 29 20 80  | . x2%<X1%+72) .|
000011a0  20 28 20 79 32 25 3e 59  31 25 2d 34 32 20 80 20  | ( y2%>Y1%-42 . |
000011b0  79 32 25 3c 59 31 25 2b  31 32 29 20 8c 20 f0 20  |y2%<Y1%+12) . . |
000011c0  36 39 2c 6f 78 32 25 2c  6f 79 32 25 3a f2 45 58  |69,ox2%,oy2%:.EX|
000011d0  50 4c 4f 44 45 3a 63 32  25 3d 30 3a e1 0d 06 f4  |PLODE:c2%=0:....|
000011e0  0f 63 6f 32 25 3d 63 6f  32 25 2b 31 0d 06 fe 23  |.co2%=co2%+1...#|
000011f0  e7 20 63 6f 32 25 3e 31  32 20 8c 20 f0 36 39 2c  |. co2%>12 . .69,|
00001200  6f 78 32 25 2c 6f 79 32  25 3a 63 32 25 3d 30 0d  |ox2%,oy2%:c2%=0.|
00001210  07 08 05 e1 0d 07 12 12  f4 20 50 4c 41 59 45 52  |......... PLAYER|
00001220  20 32 20 48 49 54 0d 07  1c 0e dd f2 45 58 50 4c  | 2 HIT......EXPL|
00001230  4f 44 45 32 0d 07 26 10  d4 26 31 30 2c 2d 31 30  |ODE2..&..&10,-10|
00001240  2c 36 2c 33 0d 07 30 32  20 e3 20 54 35 3d 31 b8  |,6,3..02 . T5=1.|
00001250  20 32 30 3a ef 31 39 2c  31 2c b3 28 31 36 29 2c  | 20:.19,1,.(16),|
00001260  30 2c 30 2c 30 3a ed 3a  ef 31 39 2c 31 2c 30 2c  |0,0,0:.:.19,1,0,|
00001270  30 2c 30 2c 30 20 0d 07  3a 0d 73 63 25 3d 73 63  |0,0,0 ..:.sc%=sc|
00001280  25 2b 31 0d 07 44 1a ef  34 3a fb 31 35 3a fb 31  |%+1..D..4:.15:.1|
00001290  33 30 3a f1 8a 36 2c 31  29 3b 73 63 25 0d 07 4e  |30:..6,1);sc%..N|
000012a0  05 e1 0d 07 58 12 f4 20  50 4c 41 59 45 52 20 31  |....X.. PLAYER 1|
000012b0  20 48 49 54 0d 07 62 0d  dd f2 45 58 50 4c 4f 44  | HIT..b...EXPLOD|
000012c0  45 0d 07 6c 10 d4 26 31  30 2c 2d 31 30 2c 36 2c  |E..l..&10,-10,6,|
000012d0  33 0d 07 76 30 e3 20 54  35 3d 31 b8 20 32 30 3a  |3..v0. T5=1. 20:|
000012e0  ef 31 39 2c 34 2c b3 28  31 36 29 2c 30 2c 30 2c  |.19,4,.(16),0,0,|
000012f0  30 3a ed 3a ef 31 39 2c  34 2c 34 2c 30 2c 30 2c  |0:.:.19,4,4,0,0,|
00001300  30 0d 07 80 0f 73 63 32  25 3d 73 63 32 25 2b 31  |0....sc2%=sc2%+1|
00001310  0d 07 8a 1d ef 34 3a fb  31 31 3a fb 31 33 30 3a  |.....4:.11:.130:|
00001320  f1 8a 31 33 2c 31 29 3b  73 63 32 25 3b 0d 07 94  |..13,1);sc2%;...|
00001330  05 e1 0d 07 9e 0f f4 20  51 55 45 53 54 49 4f 4e  |....... QUESTION|
00001340  53 0d 07 a8 0a dd f2 51  55 45 53 0d 07 a9 18 db  |S......QUES.....|
00001350  3a f1 8a 31 36 2c 35 29  3b 22 44 6f 67 66 69 67  |:..16,5);"Dogfig|
00001360  68 74 22 0d 07 aa 32 f1  8a 30 2c 31 30 29 3b 22  |ht"...2..0,10);"|
00001370  4a 6f 79 20 53 74 69 63  6b 20 43 6f 6e 74 72 6f  |Joy Stick Contro|
00001380  6c 73 3a 20 4c 45 46 54  20 2d 20 54 75 72 6e 20  |ls: LEFT - Turn |
00001390  4c 45 46 54 22 0d 07 ab  33 f1 8a 30 2c 31 32 29  |LEFT"...3..0,12)|
000013a0  3b 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |;"              |
000013b0  20 20 20 20 20 20 52 49  47 48 54 2d 20 54 75 72  |      RIGHT- Tur|
000013c0  6e 20 52 49 47 48 54 22  0d 07 ac 2e f1 8a 30 2c  |n RIGHT"......0,|
000013d0  31 34 29 3b 22 20 20 20  20 20 20 20 20 20 20 20  |14);"           |
000013e0  20 20 20 20 20 20 20 20  20 42 75 74 74 6f 6e 20  |         Button |
000013f0  46 49 52 45 22 20 0d 07  ad 25 f1 8a 35 2c 31 37  |FIRE" ...%..5,17|
00001400  29 3b 22 50 72 65 73 73  20 61 20 6b 65 79 20 74  |);"Press a key t|
00001410  6f 20 63 6f 6e 74 69 6e  75 65 22 0d 07 ae 0b 4b  |o continue"....K|
00001420  45 59 24 3d be 20 0d 07  b2 9a 20 db 3a f1 8a 35  |EY$=. .... .:..5|
00001430  2c 31 30 29 3b 22 50 6c  61 79 65 72 23 31 20 42  |,10);"Player#1 B|
00001440  69 2d 70 6c 61 6e 65 20  6f 72 20 4a 65 74 3f 22  |i-plane or Jet?"|
00001450  3b 3a 48 3d a5 3a e7 20  48 3c 3e 97 22 4a 22 20  |;:H=.:. H<>."J" |
00001460  80 20 48 3c 3e 97 22 42  22 20 8c 20 8d 74 72 47  |. H<>."B" . .trG|
00001470  20 8b 20 e7 20 48 3d 97  22 42 22 20 8c 20 54 3d  | . . H=."B" . T=|
00001480  2e 35 3a 53 3d 31 3a 54  59 3d 39 3a 46 52 3d 30  |.5:S=1:TY=9:FR=0|
00001490  2e 31 3a 46 52 31 3d 30  2e 32 3a 20 8b 20 54 3d  |.1:FR1=0.2: . T=|
000014a0  2e 32 35 3a 53 3d 31 2e  35 3a 54 59 3d 30 3a 46  |.25:S=1.5:TY=0:F|
000014b0  52 3d 30 2e 31 35 3a 46  52 31 3d 30 2e 32 35 20  |R=0.15:FR1=0.25 |
000014c0  0d 07 bc a1 db 3a f1 8a  35 2c 31 30 29 3b 22 50  |.....:..5,10);"P|
000014d0  6c 61 79 65 72 23 32 20  42 69 2d 70 6c 61 6e 65  |layer#2 Bi-plane|
000014e0  20 6f 72 20 4a 65 74 3f  22 3b 3a 48 3d a5 3a e7  | or Jet?";:H=.:.|
000014f0  20 48 3c 3e 97 22 4a 22  20 80 20 48 3c 3e 97 22  | H<>."J" . H<>."|
00001500  42 22 20 8c 20 8d 74 7c  47 20 8b 20 e7 20 48 3d  |B" . .t|G . . H=|
00001510  97 22 42 22 20 8c 20 54  32 3d 2e 35 3a 53 32 3d  |."B" . T2=.5:S2=|
00001520  31 3a 54 59 32 3d 39 3a  46 52 32 3d 30 2e 32 3a  |1:TY2=9:FR2=0.2:|
00001530  46 52 33 3d 30 2e 31 3a  20 8b 20 54 32 3d 2e 32  |FR3=0.1: . T2=.2|
00001540  35 3a 53 32 3d 31 2e 35  3a 46 52 32 3d 30 2e 32  |5:S2=1.5:FR2=0.2|
00001550  35 3a 54 59 32 3d 30 3a  46 52 33 3d 30 2e 31 35  |5:TY2=0:FR3=0.15|
00001560  20 0d 07 c6 59 db 3a f1  8a 37 2c 31 30 29 22 44  | ...Y.:..7,10)"D|
00001570  6f 20 79 6f 75 20 77 61  6e 74 20 63 6c 6f 75 64  |o you want cloud|
00001580  73 3f 22 3b 3a 48 3d a5  3a e7 20 48 3c 3e 97 22  |s?";:H=.:. H<>."|
00001590  59 22 20 80 20 48 3c 3e  97 22 4e 22 20 8c 20 8d  |Y" . H<>."N" . .|
000015a0  64 46 47 20 8b 20 e7 20  48 3d 97 22 59 22 20 8c  |dFG . . H=."Y" .|
000015b0  20 43 3d 31 20 8b 20 43  3d 30 0d 07 d0 77 db 3a  | C=1 . C=0...w.:|
000015c0  f1 8a 30 2c 31 30 29 22  48 6f 77 20 6d 75 63 68  |..0,10)"How much|
000015d0  20 61 6d 6d 6f 20 66 6f  72 20 70 6c 61 79 65 72  | ammo for player|
000015e0  20 23 31 28 6d 61 78 3d  39 39 29 22 3b 3a e8 61  | #1(max=99)";:.a|
000015f0  25 3a e7 61 25 3c 31 30  20 84 20 61 25 3e 39 39  |%:.a%<10 . a%>99|
00001600  20 8c 20 f1 8a 31 35 2c  31 35 29 3b 22 53 49 4c  | . ..15,15);"SIL|
00001610  4c 59 22 3b 3a d1 3d 54  3a f5 3a fd 91 3e 54 2b  |LY";:.=T:.:..>T+|
00001620  31 30 30 3a e5 8d 64 50  47 3a 20 8b 20 41 3d 61  |100:..dPG: . A=a|
00001630  25 0d 07 da 7d db 3a f1  8a 30 2c 31 30 29 22 48  |%...}.:..0,10)"H|
00001640  6f 77 20 6d 75 63 68 20  61 6d 6d 6f 20 66 6f 72  |ow much ammo for|
00001650  20 70 6c 61 79 65 72 20  23 32 28 6d 61 78 3d 39  | player #2(max=9|
00001660  39 29 22 3b 3a e8 61 32  25 3a e7 61 32 25 3c 31  |9)";:.a2%:.a2%<1|
00001670  30 20 84 20 61 32 25 3e  39 39 20 8c 20 f1 8a 31  |0 . a2%>99 . ..1|
00001680  35 2c 31 35 29 3b 22 53  49 4c 4c 59 22 3b 3a d1  |5,15);"SILLY";:.|
00001690  3d 54 3a f5 3a fd 91 3e  54 2b 31 30 30 3a e5 8d  |=T:.:..>T+100:..|
000016a0  64 5a 47 3a 20 8b 20 41  32 3d 61 32 25 20 0d 07  |dZG: . A2=a2% ..|
000016b0  e4 05 e1 0d 07 ee 18 f4  20 44 41 54 41 20 46 4f  |........ DATA FO|
000016c0  52 20 44 49 52 45 43 54  49 4f 4e 0d 07 f8 36 dc  |R DIRECTION...6.|
000016d0  31 38 2c 30 2c 31 33 2c  31 33 2c 30 2c 31 38 2c  |18,0,13,13,0,18,|
000016e0  2d 31 33 2c 31 33 2c 2d  31 38 2c 30 2c 2d 31 33  |-13,13,-18,0,-13|
000016f0  2c 2d 31 33 2c 30 2c 2d  31 38 2c 31 33 2c 2d 31  |,-13,0,-18,13,-1|
00001700  33 0d 08 02 39 dc 34 30  2c 30 2c 32 38 2c 32 38  |3...9.40,0,28,28|
00001710  2c 30 2c 34 30 2c 2d 32  38 2c 32 38 2c 2d 34 30  |,0,40,-28,28,-40|
00001720  2c 30 2c 2d 32 38 2c 2d  32 38 2c 30 2c 2d 34 30  |,0,-28,-28,0,-40|
00001730  2c 32 38 2c 2d 32 38 20  20 20 0d 08 0c 33 dc 36  |,28,-28   ...3.6|
00001740  30 2c 2d 31 36 2c 36 30  2c 30 2c 33 32 2c 30 2c  |0,-16,60,0,32,0,|
00001750  30 2c 30 2c 30 2c 2d 31  36 2c 30 2c 2d 33 30 2c  |0,0,0,-16,0,-30,|
00001760  33 32 2c 2d 33 30 2c 36  30 2c 2d 33 30 0d 08 16  |32,-30,60,-30...|
00001770  16 eb 36 3a ef 31 39 2c  30 2c 34 2c 30 2c 30 2c  |..6:.19,0,4,0,0,|
00001780  30 3a f6 0d 08 20 12 f1  22 20 61 74 20 6c 69 6e  |0:... .." at lin|
00001790  65 20 22 3b 9e 0d 08 2a  05 e0 0d ff              |e ";...*....|
0000179c
GAMES1/DOGFIGHT.m0
GAMES1/DOGFIGHT.m1
GAMES1/DOGFIGHT.m2
GAMES1/DOGFIGHT.m4
GAMES1/DOGFIGHT.m5