n�4:�INIT
x�
�
�DRAWHILL
��
�"PLAYER=3-PLAYER:�GETARGS:�FIRE
�
� �HIT
�
�SCORE
�$�0,2)"Another game? (Y/N)":A$=�
�� � (A$="Y" � A$="y")
�� 6:�FINALSCORES
��
�
��INIT
�X=�(-�):�fnf(1500)
�� NAME$(2),SCORES(2)

$�23,240,3,6,12,24,56,252,254,254

&�23,241,192,96,48,24,28,63,127,127

"%�15,29);"ARTILLERY":� 0,-15,4,50

,�15,30);"========="

6�l=0�33:�:�lo=0�200:�,

@�0,-15,5,5

J�x=0 � 3

T � 7:�y=0 � 500:�,

^�

h�

r�

|�

��

��

��

��'"What are your names?"'

�� �"Left Player: ";NAME$(1)

�� NAME$(1)<>""

� � �"Right Player: ";NAME$(2)

�� NAME$(2)<>""

�� NAME$(1)<>NAME$(2)

�'SCORES(1)=0:SCORES(2)=0:PLAYER=�(2)

��19,1,2,0,0,0

��
��DRAWHILL

 g=0:c=0:diff=0

 ste=�(25)
� T:X1=�(1):X2=�(1)
� X1>X2 � T=X2:X2=X1:X1=T
!& ans=200*(�(T)+�(T*3)/3)+400+ste*g
0�:�0,1:rnd=�F(X1)
:�0,0:�0,rnd
D�85,128,0:�85,128,rnd
N�X=132 � 1148 � 4
X'�X,0:�X,�F((X-128)/1024*(X2-X1)+X1)
b�
l�1152,0:�1152,ans
v�85,1280,0:�85,1280,ans
�,�BOTLINE:�28,0,5,39,0:�0,1:WIND=�(61)-31
��0,1:�32,rnd+32:�5,240
��1216,ans+32:�241,4
��
�ݤF(X):�T1
� oa=ans
�T1=X*4*�:ste=ste+�(5)-3
�& � ste>10 � ste<-10 � ste=�(20)-10
�-� ans=200*(SIN(T1)+SIN(T1*3)/3)+400+ste*g
� ans=oa+ste
� � ans>750 � ste=ste-5
� � ans<200 � ste=ste+5
� g=g+1:fnf(g)=ans
� � g<100 � c=0
�	 =ans
�
��BOTLINE
�'�1,31)�NAME$(1),13)": ";SCORES(1);
�&�" ; "�NAME$(2),13)": ";SCORES(2);
�3:�128
�
 
��GETARGS
*WIND=WIND+�(7)-4
4"� �(WIND)>50 � WIND=50*�(WIND)
><�30:�'NAME$(PLAYER)'"The wind is ";�(WIND);" from the ";
H%� WIND<0 � �;"right." � �;"left."
R�
\2�0,5)�(39)�0,3)"How many pounds of powder? ";
f�27,3)POUNDS
p<� POUNDS<5 � �0,5)"Not enough to fire the shot.";:�WAIT
z<� POUNDS>15 � �0,5)"That would destroy the gun.";:�WAIT
�� POUNDS>=5 � POUNDS<=15
��
�&�0,5)�(39)�0,4)"At what angle? ";
��15,4);ANGLE
�A� ANGLE<0 � �0,5)"The gun will not depress that far.";:�WAIT
�B� ANGLE>90 � �0,5)"The gun will not elevate that far.";:�WAIT
�� ANGLE>=0 � ANGLE<=90
�ANGLE=�(ANGLE):�
��
���FIRE:�LANDED
�� 0,-15,4,3
�YVEL=POUNDS*�(ANGLE)
g� PLAYER=1 � XPOS=68:YPOS=rnd+40:XVEL=POUNDS*�(ANGLE) � XPOS=1211:YPOS=ans+40:XVEL=-POUNDS*�(ANGLE)
�4,0:�PLOT
�
$�PLOT:�MOVE:LANDED=�LAND
.� � LANDED � �PLOT
8� LANDED
L	�LAND
V�0,1
`�
j
��PLOT
t�I=-4 � 4 � 4:�J=-4�4�4
~ �69,XPOS+I,YPOS+J
� �,
��
�
��MOVE
�$XVEL=XVEL+WIND/500:YVEL=YVEL-1/3
�%XPOS=XPOS+XVEL*4:YPOS=YPOS+YVEL*4
��
�� �LAND:�TEMP
�0� XPOS<4 � XPOS>1275 � =� � � YPOS>1000 � =�
�
TEMP=�
��I=XPOS-4 � XPOS+4 � 4
�J=YPOS-4 � YPOS+4 � 4

� �I,J)<>0 � TEMP=�
�
�
(	=TEMP
<
��LAND
F�XPOS<4 � XPOS>1275 � �
P�0,0:�0,-15,5,5
Z�XPOS-8,YPOS:�XPOS,YPOS-8
d#�85,XPOS,YPOS+8:�85,XPOS+8,YPOS
n�
�� �HIT:�XT
��XPOS<100 � XT=X1 � XT=X2
�V=(XPOS>23 � XPOS<72 � YPOS>fnf(XT)-32) � (XPOS>1207 � XPOS<1256 � YPOS>fnf(XT)-32)
���SCORE
��P:�:� XPOS<100 � P=2 � P=1
�r� PLAYER=1 � P=2 � PLAYER=2 � P=1 � �"You idiot,you've hit yourself!" � �"Well done,you've hit your opponent."
�SCORES(P)=SCORES(P)+1
�� 26:�BOTLINE:�WAIT
��
���FINALSCORES:�DIFF
�)�0,11)NAME$(1)": ";SCORES(1);" ;  ";
#�NAME$(2);": ";SCORES(2);�0,3);
;� SCORES(1)=SCORES(2) � �"The game was a draw."�0,15):�
�"The Winner was ";
"1� SCORES(1)>SCORES(2) � �NAME$(1) � �NAME$(2)
,DIFF=�(SCORES(1)-SCORES(2))
68� DIFF=1 � �"by one point." � �"by ";DIFF;" points."
@�0,15)
J�
^
��WAIT
hT=�:���-T>250
r�
�

00000000  0d 00 6e 0c eb 34 3a f2  49 4e 49 54 0d 00 78 05  |..n..4:.INIT..x.|
00000010  f5 0d 00 82 0d f2 44 52  41 57 48 49 4c 4c 0d 00  |......DRAWHILL..|
00000020  8c 05 f5 0d 00 96 22 50  4c 41 59 45 52 3d 33 2d  |......"PLAYER=3-|
00000030  50 4c 41 59 45 52 3a f2  47 45 54 41 52 47 53 3a  |PLAYER:.GETARGS:|
00000040  f2 46 49 52 45 0d 00 a0  0a fd 20 a4 48 49 54 0d  |.FIRE..... .HIT.|
00000050  00 aa 0a f2 53 43 4f 52  45 0d 00 b4 24 f1 8a 30  |....SCORE...$..0|
00000060  2c 32 29 22 41 6e 6f 74  68 65 72 20 67 61 6d 65  |,2)"Another game|
00000070  3f 20 28 59 2f 4e 29 22  3a 41 24 3d be 0d 00 be  |? (Y/N)":A$=....|
00000080  19 fd 20 ac 20 28 41 24  3d 22 59 22 20 84 20 41  |.. . (A$="Y" . A|
00000090  24 3d 22 79 22 29 0d 00  c8 14 eb 20 36 3a f2 46  |$="y")..... 6:.F|
000000a0  49 4e 41 4c 53 43 4f 52  45 53 0d 00 d2 05 e0 0d  |INALSCORES......|
000000b0  00 e6 0a dd f2 49 4e 49  54 0d 00 f0 16 58 3d b3  |.....INIT....X=.|
000000c0  28 2d 91 29 3a de 66 6e  66 28 31 35 30 30 29 0d  |(-.):.fnf(1500).|
000000d0  00 fa 18 de 20 4e 41 4d  45 24 28 32 29 2c 53 43  |.... NAME$(2),SC|
000000e0  4f 52 45 53 28 32 29 0d  01 04 24 ef 32 33 2c 32  |ORES(2)...$.23,2|
000000f0  34 30 2c 33 2c 36 2c 31  32 2c 32 34 2c 35 36 2c  |40,3,6,12,24,56,|
00000100  32 35 32 2c 32 35 34 2c  32 35 34 0d 01 0e 26 ef  |252,254,254...&.|
00000110  32 33 2c 32 34 31 2c 31  39 32 2c 39 36 2c 34 38  |23,241,192,96,48|
00000120  2c 32 34 2c 32 38 2c 36  33 2c 31 32 37 2c 31 32  |,24,28,63,127,12|
00000130  37 0d 01 22 25 f1 8a 31  35 2c 32 39 29 3b 22 41  |7.."%..15,29);"A|
00000140  52 54 49 4c 4c 45 52 59  22 3a d4 20 30 2c 2d 31  |RTILLERY":. 0,-1|
00000150  35 2c 34 2c 35 30 0d 01  2c 18 f1 8a 31 35 2c 33  |5,4,50..,...15,3|
00000160  30 29 3b 22 3d 3d 3d 3d  3d 3d 3d 3d 3d 22 0d 01  |0);"========="..|
00000170  36 1a e3 6c 3d 30 b8 33  33 3a f1 3a e3 6c 6f 3d  |6..l=0.33:.:.lo=|
00000180  30 b8 32 30 30 3a ed 2c  0d 01 40 0e d4 30 2c 2d  |0.200:.,..@..0,-|
00000190  31 35 2c 35 2c 35 0d 01  4a 0c e3 78 3d 30 20 b8  |15,5,5..J..x=0 .|
000001a0  20 33 0d 01 54 16 20 ef  20 37 3a e3 79 3d 30 20  | 3..T. . 7:.y=0 |
000001b0  b8 20 35 30 30 3a ed 2c  0d 01 5e 05 f1 0d 01 68  |. 500:.,..^....h|
000001c0  05 f1 0d 01 72 05 f1 0d  01 7c 05 f1 0d 01 86 05  |....r....|......|
000001d0  f1 0d 01 90 05 f1 0d 01  9a 05 f5 0d 01 a4 1d f1  |................|
000001e0  27 22 57 68 61 74 20 61  72 65 20 79 6f 75 72 20  |'"What are your |
000001f0  6e 61 6d 65 73 3f 22 27  0d 01 ae 1f f5 20 e8 22  |names?"'..... ."|
00000200  4c 65 66 74 20 50 6c 61  79 65 72 3a 20 22 3b 4e  |Left Player: ";N|
00000210  41 4d 45 24 28 31 29 0d  01 b8 12 fd 20 4e 41 4d  |AME$(1)..... NAM|
00000220  45 24 28 31 29 3c 3e 22  22 0d 01 c2 20 f5 20 e8  |E$(1)<>""... . .|
00000230  22 52 69 67 68 74 20 50  6c 61 79 65 72 3a 20 22  |"Right Player: "|
00000240  3b 4e 41 4d 45 24 28 32  29 0d 01 cc 12 fd 20 4e  |;NAME$(2)..... N|
00000250  41 4d 45 24 28 32 29 3c  3e 22 22 0d 01 e0 18 fd  |AME$(2)<>"".....|
00000260  20 4e 41 4d 45 24 28 31  29 3c 3e 4e 41 4d 45 24  | NAME$(1)<>NAME$|
00000270  28 32 29 0d 01 ea 27 53  43 4f 52 45 53 28 31 29  |(2)...'SCORES(1)|
00000280  3d 30 3a 53 43 4f 52 45  53 28 32 29 3d 30 3a 50  |=0:SCORES(2)=0:P|
00000290  4c 41 59 45 52 3d b3 28  32 29 0d 01 ef 11 ef 31  |LAYER=.(2).....1|
000002a0  39 2c 31 2c 32 2c 30 2c  30 2c 30 0d 01 f4 05 e1  |9,1,2,0,0,0.....|
000002b0  0d 02 08 0e dd f2 44 52  41 57 48 49 4c 4c 0d 02  |......DRAWHILL..|
000002c0  0a 13 20 67 3d 30 3a 63  3d 30 3a 64 69 66 66 3d  |.. g=0:c=0:diff=|
000002d0  30 0d 02 0d 0e 20 73 74  65 3d b3 28 32 35 29 0d  |0.... ste=.(25).|
000002e0  02 12 17 ea 20 54 3a 58  31 3d b3 28 31 29 3a 58  |.... T:X1=.(1):X|
000002f0  32 3d b3 28 31 29 0d 02  1c 1d e7 20 58 31 3e 58  |2=.(1)..... X1>X|
00000300  32 20 8c 20 54 3d 58 32  3a 58 32 3d 58 31 3a 58  |2 . T=X2:X2=X1:X|
00000310  31 3d 54 0d 02 21 26 20  61 6e 73 3d 32 30 30 2a  |1=T..!& ans=200*|
00000320  28 b5 28 54 29 2b b5 28  54 2a 33 29 2f 33 29 2b  |(.(T)+.(T*3)/3)+|
00000330  34 30 30 2b 73 74 65 2a  67 0d 02 30 15 db 3a e6  |400+ste*g..0..:.|
00000340  30 2c 31 3a 72 6e 64 3d  a4 46 28 58 31 29 0d 02  |0,1:rnd=.F(X1)..|
00000350  3a 0f ec 30 2c 30 3a ec  30 2c 72 6e 64 0d 02 44  |:..0,0:.0,rnd..D|
00000360  19 f0 38 35 2c 31 32 38  2c 30 3a f0 38 35 2c 31  |..85,128,0:.85,1|
00000370  32 38 2c 72 6e 64 0d 02  4e 15 e3 58 3d 31 33 32  |28,rnd..N..X=132|
00000380  20 b8 20 31 31 34 38 20  88 20 34 0d 02 58 27 ec  | . 1148 . 4..X'.|
00000390  58 2c 30 3a df 58 2c a4  46 28 28 58 2d 31 32 38  |X,0:.X,.F((X-128|
000003a0  29 2f 31 30 32 34 2a 28  58 32 2d 58 31 29 2b 58  |)/1024*(X2-X1)+X|
000003b0  31 29 0d 02 62 05 ed 0d  02 6c 15 ec 31 31 35 32  |1)..b....l..1152|
000003c0  2c 30 3a ec 31 31 35 32  2c 61 6e 73 0d 02 76 1b  |,0:.1152,ans..v.|
000003d0  f0 38 35 2c 31 32 38 30  2c 30 3a f0 38 35 2c 31  |.85,1280,0:.85,1|
000003e0  32 38 30 2c 61 6e 73 0d  02 80 2c f2 42 4f 54 4c  |280,ans...,.BOTL|
000003f0  49 4e 45 3a ef 32 38 2c  30 2c 35 2c 33 39 2c 30  |INE:.28,0,5,39,0|
00000400  3a e6 30 2c 31 3a 57 49  4e 44 3d b3 28 36 31 29  |:.0,1:WIND=.(61)|
00000410  2d 33 31 0d 02 8a 1a e6  30 2c 31 3a ec 33 32 2c  |-31.....0,1:.32,|
00000420  72 6e 64 2b 33 32 3a ef  35 2c 32 34 30 0d 02 94  |rnd+32:.5,240...|
00000430  17 ec 31 32 31 36 2c 61  6e 73 2b 33 32 3a ef 32  |..1216,ans+32:.2|
00000440  34 31 2c 34 0d 02 9e 05  e1 0d 02 b2 0e dd a4 46  |41,4...........F|
00000450  28 58 29 3a ea 54 31 0d  02 b7 0b 20 6f 61 3d 61  |(X):.T1.... oa=a|
00000460  6e 73 0d 02 bc 1b 54 31  3d 58 2a 34 2a af 3a 73  |ns....T1=X*4*.:s|
00000470  74 65 3d 73 74 65 2b b3  28 35 29 2d 33 0d 02 c1  |te=ste+.(5)-3...|
00000480  26 20 e7 20 73 74 65 3e  31 30 20 84 20 73 74 65  |& . ste>10 . ste|
00000490  3c 2d 31 30 20 8c 20 73  74 65 3d b3 28 32 30 29  |<-10 . ste=.(20)|
000004a0  2d 31 30 0d 02 c6 2d f4  20 61 6e 73 3d 32 30 30  |-10...-. ans=200|
000004b0  2a 28 53 49 4e 28 54 31  29 2b 53 49 4e 28 54 31  |*(SIN(T1)+SIN(T1|
000004c0  2a 33 29 2f 33 29 2b 34  30 30 2b 73 74 65 2a 67  |*3)/3)+400+ste*g|
000004d0  0d 02 c7 0f 20 61 6e 73  3d 6f 61 2b 73 74 65 0d  |.... ans=oa+ste.|
000004e0  02 c9 1a 20 e7 20 61 6e  73 3e 37 35 30 20 8c 20  |... . ans>750 . |
000004f0  73 74 65 3d 73 74 65 2d  35 0d 02 cb 1a 20 e7 20  |ste=ste-5.... . |
00000500  61 6e 73 3c 32 30 30 20  8c 20 73 74 65 3d 73 74  |ans<200 . ste=st|
00000510  65 2b 35 0d 02 cc 15 20  67 3d 67 2b 31 3a 66 6e  |e+5.... g=g+1:fn|
00000520  66 28 67 29 3d 61 6e 73  0d 02 cd 12 20 e7 20 67  |f(g)=ans.... . g|
00000530  3c 31 30 30 20 8c 20 63  3d 30 0d 02 cf 09 20 3d  |<100 . c=0.... =|
00000540  61 6e 73 0d 02 da 0d dd  f2 42 4f 54 4c 49 4e 45  |ans......BOTLINE|
00000550  0d 02 ee 27 f1 8a 31 2c  33 31 29 c0 4e 41 4d 45  |...'..1,31).NAME|
00000560  24 28 31 29 2c 31 33 29  22 3a 20 22 3b 53 43 4f  |$(1),13)": ";SCO|
00000570  52 45 53 28 31 29 3b 0d  02 f8 26 f1 22 20 3b 20  |RES(1);...&." ; |
00000580  22 c0 4e 41 4d 45 24 28  32 29 2c 31 33 29 22 3a  |".NAME$(2),13)":|
00000590  20 22 3b 53 43 4f 52 45  53 28 32 29 3b 0d 03 02  | ";SCORES(2);...|
000005a0  0b fb 33 3a fb 31 32 38  0d 03 0c 05 e1 0d 03 20  |..3:.128....... |
000005b0  0d dd f2 47 45 54 41 52  47 53 0d 03 2a 14 57 49  |...GETARGS..*.WI|
000005c0  4e 44 3d 57 49 4e 44 2b  b3 28 37 29 2d 34 0d 03  |ND=WIND+.(7)-4..|
000005d0  34 22 e7 20 94 28 57 49  4e 44 29 3e 35 30 20 8c  |4". .(WIND)>50 .|
000005e0  20 57 49 4e 44 3d 35 30  2a b4 28 57 49 4e 44 29  | WIND=50*.(WIND)|
000005f0  0d 03 3e 3c ef 33 30 3a  f1 27 4e 41 4d 45 24 28  |..><.30:.'NAME$(|
00000600  50 4c 41 59 45 52 29 27  22 54 68 65 20 77 69 6e  |PLAYER)'"The win|
00000610  64 20 69 73 20 22 3b 94  28 57 49 4e 44 29 3b 22  |d is ";.(WIND);"|
00000620  20 66 72 6f 6d 20 74 68  65 20 22 3b 0d 03 48 25  | from the ";..H%|
00000630  e7 20 57 49 4e 44 3c 30  20 8c 20 f1 3b 22 72 69  |. WIND<0 . .;"ri|
00000640  67 68 74 2e 22 20 8b 20  f1 3b 22 6c 65 66 74 2e  |ght." . .;"left.|
00000650  22 0d 03 52 05 f5 0d 03  5c 32 f1 8a 30 2c 35 29  |"..R....\2..0,5)|
00000660  89 28 33 39 29 8a 30 2c  33 29 22 48 6f 77 20 6d  |.(39).0,3)"How m|
00000670  61 6e 79 20 70 6f 75 6e  64 73 20 6f 66 20 70 6f  |any pounds of po|
00000680  77 64 65 72 3f 20 22 3b  0d 03 66 11 e8 8a 32 37  |wder? ";..f...27|
00000690  2c 33 29 50 4f 55 4e 44  53 0d 03 70 3c e7 20 50  |,3)POUNDS..p<. P|
000006a0  4f 55 4e 44 53 3c 35 20  8c 20 f1 8a 30 2c 35 29  |OUNDS<5 . ..0,5)|
000006b0  22 4e 6f 74 20 65 6e 6f  75 67 68 20 74 6f 20 66  |"Not enough to f|
000006c0  69 72 65 20 74 68 65 20  73 68 6f 74 2e 22 3b 3a  |ire the shot.";:|
000006d0  f2 57 41 49 54 0d 03 7a  3c e7 20 50 4f 55 4e 44  |.WAIT..z<. POUND|
000006e0  53 3e 31 35 20 8c 20 f1  8a 30 2c 35 29 22 54 68  |S>15 . ..0,5)"Th|
000006f0  61 74 20 77 6f 75 6c 64  20 64 65 73 74 72 6f 79  |at would destroy|
00000700  20 74 68 65 20 67 75 6e  2e 22 3b 3a f2 57 41 49  | the gun.";:.WAI|
00000710  54 0d 03 84 1c fd 20 50  4f 55 4e 44 53 3e 3d 35  |T..... POUNDS>=5|
00000720  20 80 20 50 4f 55 4e 44  53 3c 3d 31 35 0d 03 8e  | . POUNDS<=15...|
00000730  05 f5 0d 03 98 26 f1 8a  30 2c 35 29 89 28 33 39  |.....&..0,5).(39|
00000740  29 8a 30 2c 34 29 22 41  74 20 77 68 61 74 20 61  |).0,4)"At what a|
00000750  6e 67 6c 65 3f 20 22 3b  0d 03 a2 11 e8 8a 31 35  |ngle? ";......15|
00000760  2c 34 29 3b 41 4e 47 4c  45 0d 03 ac 41 e7 20 41  |,4);ANGLE...A. A|
00000770  4e 47 4c 45 3c 30 20 8c  20 f1 8a 30 2c 35 29 22  |NGLE<0 . ..0,5)"|
00000780  54 68 65 20 67 75 6e 20  77 69 6c 6c 20 6e 6f 74  |The gun will not|
00000790  20 64 65 70 72 65 73 73  20 74 68 61 74 20 66 61  | depress that fa|
000007a0  72 2e 22 3b 3a f2 57 41  49 54 0d 03 b6 42 e7 20  |r.";:.WAIT...B. |
000007b0  41 4e 47 4c 45 3e 39 30  20 8c 20 f1 8a 30 2c 35  |ANGLE>90 . ..0,5|
000007c0  29 22 54 68 65 20 67 75  6e 20 77 69 6c 6c 20 6e  |)"The gun will n|
000007d0  6f 74 20 65 6c 65 76 61  74 65 20 74 68 61 74 20  |ot elevate that |
000007e0  66 61 72 2e 22 3b 3a f2  57 41 49 54 0d 03 c0 1a  |far.";:.WAIT....|
000007f0  fd 20 41 4e 47 4c 45 3e  3d 30 20 80 20 41 4e 47  |. ANGLE>=0 . ANG|
00000800  4c 45 3c 3d 39 30 0d 03  ca 14 41 4e 47 4c 45 3d  |LE<=90....ANGLE=|
00000810  b2 28 41 4e 47 4c 45 29  3a db 0d 03 d4 05 e1 0d  |.(ANGLE):.......|
00000820  03 e8 12 dd f2 46 49 52  45 3a ea 4c 41 4e 44 45  |.....FIRE:.LANDE|
00000830  44 0d 03 f2 0f d4 20 30  2c 2d 31 35 2c 34 2c 33  |D..... 0,-15,4,3|
00000840  0d 03 fc 18 59 56 45 4c  3d 50 4f 55 4e 44 53 2a  |....YVEL=POUNDS*|
00000850  b5 28 41 4e 47 4c 45 29  0d 04 06 67 e7 20 50 4c  |.(ANGLE)...g. PL|
00000860  41 59 45 52 3d 31 20 8c  20 58 50 4f 53 3d 36 38  |AYER=1 . XPOS=68|
00000870  3a 59 50 4f 53 3d 72 6e  64 2b 34 30 3a 58 56 45  |:YPOS=rnd+40:XVE|
00000880  4c 3d 50 4f 55 4e 44 53  2a 9b 28 41 4e 47 4c 45  |L=POUNDS*.(ANGLE|
00000890  29 20 8b 20 58 50 4f 53  3d 31 32 31 31 3a 59 50  |) . XPOS=1211:YP|
000008a0  4f 53 3d 61 6e 73 2b 34  30 3a 58 56 45 4c 3d 2d  |OS=ans+40:XVEL=-|
000008b0  50 4f 55 4e 44 53 2a 9b  28 41 4e 47 4c 45 29 0d  |POUNDS*.(ANGLE).|
000008c0  04 10 0e e6 34 2c 30 3a  f2 50 4c 4f 54 0d 04 1a  |....4,0:.PLOT...|
000008d0  05 f5 0d 04 24 1c f2 50  4c 4f 54 3a f2 4d 4f 56  |....$..PLOT:.MOV|
000008e0  45 3a 4c 41 4e 44 45 44  3d a4 4c 41 4e 44 0d 04  |E:LANDED=.LAND..|
000008f0  2e 16 e7 20 ac 20 4c 41  4e 44 45 44 20 8c 20 f2  |... . LANDED . .|
00000900  50 4c 4f 54 0d 04 38 0c  fd 20 4c 41 4e 44 45 44  |PLOT..8.. LANDED|
00000910  0d 04 4c 09 f2 4c 41 4e  44 0d 04 56 08 e6 30 2c  |..L..LAND..V..0,|
00000920  31 0d 04 60 05 e1 0d 04  6a 0a dd f2 50 4c 4f 54  |1..`....j...PLOT|
00000930  0d 04 74 1b e3 49 3d 2d  34 20 b8 20 34 20 88 20  |..t..I=-4 . 4 . |
00000940  34 3a e3 4a 3d 2d 34 b8  34 88 34 0d 04 7e 16 20  |4:.J=-4.4.4..~. |
00000950  f0 36 39 2c 58 50 4f 53  2b 49 2c 59 50 4f 53 2b  |.69,XPOS+I,YPOS+|
00000960  4a 0d 04 88 07 20 ed 2c  0d 04 92 05 e1 0d 04 a6  |J.... .,........|
00000970  0a dd f2 4d 4f 56 45 0d  04 b0 24 58 56 45 4c 3d  |...MOVE...$XVEL=|
00000980  58 56 45 4c 2b 57 49 4e  44 2f 35 30 30 3a 59 56  |XVEL+WIND/500:YV|
00000990  45 4c 3d 59 56 45 4c 2d  31 2f 33 0d 04 ba 25 58  |EL=YVEL-1/3...%X|
000009a0  50 4f 53 3d 58 50 4f 53  2b 58 56 45 4c 2a 34 3a  |POS=XPOS+XVEL*4:|
000009b0  59 50 4f 53 3d 59 50 4f  53 2b 59 56 45 4c 2a 34  |YPOS=YPOS+YVEL*4|
000009c0  0d 04 c4 05 e1 0d 04 d8  11 dd 20 a4 4c 41 4e 44  |.......... .LAND|
000009d0  3a ea 54 45 4d 50 0d 04  e2 30 e7 20 58 50 4f 53  |:.TEMP...0. XPOS|
000009e0  3c 34 20 84 20 58 50 4f  53 3e 31 32 37 35 20 8c  |<4 . XPOS>1275 .|
000009f0  20 3d b9 20 8b 20 e7 20  59 50 4f 53 3e 31 30 30  | =. . . YPOS>100|
00000a00  30 20 8c 20 3d a3 0d 04  ec 0a 54 45 4d 50 3d a3  |0 . =.....TEMP=.|
00000a10  0d 04 f6 1a e3 49 3d 58  50 4f 53 2d 34 20 b8 20  |.....I=XPOS-4 . |
00000a20  58 50 4f 53 2b 34 20 88  20 34 0d 05 00 1a e3 4a  |XPOS+4 . 4.....J|
00000a30  3d 59 50 4f 53 2d 34 20  b8 20 59 50 4f 53 2b 34  |=YPOS-4 . YPOS+4|
00000a40  20 88 20 34 0d 05 0a 17  e7 20 b0 49 2c 4a 29 3c  | . 4..... .I,J)<|
00000a50  3e 30 20 8c 20 54 45 4d  50 3d b9 0d 05 14 05 ed  |>0 . TEMP=......|
00000a60  0d 05 1e 05 ed 0d 05 28  09 3d 54 45 4d 50 0d 05  |.......(.=TEMP..|
00000a70  3c 0a dd f2 4c 41 4e 44  0d 05 46 1b e7 58 50 4f  |<...LAND..F..XPO|
00000a80  53 3c 34 20 84 20 58 50  4f 53 3e 31 32 37 35 20  |S<4 . XPOS>1275 |
00000a90  8c 20 e1 0d 05 50 13 e6  30 2c 30 3a d4 30 2c 2d  |. ...P..0,0:.0,-|
00000aa0  31 35 2c 35 2c 35 0d 05  5a 1d ec 58 50 4f 53 2d  |15,5,5..Z..XPOS-|
00000ab0  38 2c 59 50 4f 53 3a ec  58 50 4f 53 2c 59 50 4f  |8,YPOS:.XPOS,YPO|
00000ac0  53 2d 38 0d 05 64 23 f0  38 35 2c 58 50 4f 53 2c  |S-8..d#.85,XPOS,|
00000ad0  59 50 4f 53 2b 38 3a f0  38 35 2c 58 50 4f 53 2b  |YPOS+8:.85,XPOS+|
00000ae0  38 2c 59 50 4f 53 0d 05  6e 05 e1 0d 05 82 0e dd  |8,YPOS..n.......|
00000af0  20 a4 48 49 54 3a ea 58  54 0d 05 8c 1d e7 58 50  | .HIT:.XT.....XP|
00000b00  4f 53 3c 31 30 30 20 8c  20 58 54 3d 58 31 20 8b  |OS<100 . XT=X1 .|
00000b10  20 58 54 3d 58 32 0d 05  96 56 3d 28 58 50 4f 53  | XT=X2...V=(XPOS|
00000b20  3e 32 33 20 80 20 58 50  4f 53 3c 37 32 20 80 20  |>23 . XPOS<72 . |
00000b30  59 50 4f 53 3e 66 6e 66  28 58 54 29 2d 33 32 29  |YPOS>fnf(XT)-32)|
00000b40  20 84 20 28 58 50 4f 53  3e 31 32 30 37 20 80 20  | . (XPOS>1207 . |
00000b50  58 50 4f 53 3c 31 32 35  36 20 80 20 59 50 4f 53  |XPOS<1256 . YPOS|
00000b60  3e 66 6e 66 28 58 54 29  2d 33 32 29 0d 05 aa 0b  |>fnf(XT)-32)....|
00000b70  dd f2 53 43 4f 52 45 0d  05 b4 1f ea 50 3a db 3a  |..SCORE.....P:.:|
00000b80  e7 20 58 50 4f 53 3c 31  30 30 20 8c 20 50 3d 32  |. XPOS<100 . P=2|
00000b90  20 8b 20 50 3d 31 0d 05  be 72 e7 20 50 4c 41 59  | . P=1...r. PLAY|
00000ba0  45 52 3d 31 20 80 20 50  3d 32 20 84 20 50 4c 41  |ER=1 . P=2 . PLA|
00000bb0  59 45 52 3d 32 20 80 20  50 3d 31 20 8c 20 f1 22  |YER=2 . P=1 . ."|
00000bc0  59 6f 75 20 69 64 69 6f  74 2c 79 6f 75 27 76 65  |You idiot,you've|
00000bd0  20 68 69 74 20 79 6f 75  72 73 65 6c 66 21 22 20  | hit yourself!" |
00000be0  8b 20 f1 22 57 65 6c 6c  20 64 6f 6e 65 2c 79 6f  |. ."Well done,yo|
00000bf0  75 27 76 65 20 68 69 74  20 79 6f 75 72 20 6f 70  |u've hit your op|
00000c00  70 6f 6e 65 6e 74 2e 22  0d 05 c8 19 53 43 4f 52  |ponent."....SCOR|
00000c10  45 53 28 50 29 3d 53 43  4f 52 45 53 28 50 29 2b  |ES(P)=SCORES(P)+|
00000c20  31 0d 05 d2 17 ef 20 32  36 3a f2 42 4f 54 4c 49  |1..... 26:.BOTLI|
00000c30  4e 45 3a f2 57 41 49 54  0d 05 dc 05 e1 0d 05 f0  |NE:.WAIT........|
00000c40  17 dd f2 46 49 4e 41 4c  53 43 4f 52 45 53 3a ea  |...FINALSCORES:.|
00000c50  44 49 46 46 0d 05 fa 29  f1 8a 30 2c 31 31 29 4e  |DIFF...)..0,11)N|
00000c60  41 4d 45 24 28 31 29 22  3a 20 22 3b 53 43 4f 52  |AME$(1)": ";SCOR|
00000c70  45 53 28 31 29 3b 22 20  3b 20 20 22 3b 0d 06 04  |ES(1);" ;  ";...|
00000c80  23 f1 4e 41 4d 45 24 28  32 29 3b 22 3a 20 22 3b  |#.NAME$(2);": ";|
00000c90  53 43 4f 52 45 53 28 32  29 3b 8a 30 2c 33 29 3b  |SCORES(2);.0,3);|
00000ca0  0d 06 0e 3b e7 20 53 43  4f 52 45 53 28 31 29 3d  |...;. SCORES(1)=|
00000cb0  53 43 4f 52 45 53 28 32  29 20 8c 20 f1 22 54 68  |SCORES(2) . ."Th|
00000cc0  65 20 67 61 6d 65 20 77  61 73 20 61 20 64 72 61  |e game was a dra|
00000cd0  77 2e 22 8a 30 2c 31 35  29 3a e1 0d 06 18 17 f1  |w.".0,15):......|
00000ce0  22 54 68 65 20 57 69 6e  6e 65 72 20 77 61 73 20  |"The Winner was |
00000cf0  22 3b 0d 06 22 31 e7 20  53 43 4f 52 45 53 28 31  |";.."1. SCORES(1|
00000d00  29 3e 53 43 4f 52 45 53  28 32 29 20 8c 20 f1 4e  |)>SCORES(2) . .N|
00000d10  41 4d 45 24 28 31 29 20  8b 20 f1 4e 41 4d 45 24  |AME$(1) . .NAME$|
00000d20  28 32 29 0d 06 2c 1f 44  49 46 46 3d 94 28 53 43  |(2)..,.DIFF=.(SC|
00000d30  4f 52 45 53 28 31 29 2d  53 43 4f 52 45 53 28 32  |ORES(1)-SCORES(2|
00000d40  29 29 0d 06 36 38 e7 20  44 49 46 46 3d 31 20 8c  |))..68. DIFF=1 .|
00000d50  20 f1 22 62 79 20 6f 6e  65 20 70 6f 69 6e 74 2e  | ."by one point.|
00000d60  22 20 8b 20 f1 22 62 79  20 22 3b 44 49 46 46 3b  |" . ."by ";DIFF;|
00000d70  22 20 70 6f 69 6e 74 73  2e 22 0d 06 40 0b f1 8a  |" points."..@...|
00000d80  30 2c 31 35 29 0d 06 4a  05 e1 0d 06 5e 0a dd f2  |0,15)..J....^...|
00000d90  57 41 49 54 0d 06 68 11  54 3d 91 3a f5 fd 91 2d  |WAIT..h.T=.:...-|
00000da0  54 3e 32 35 30 0d 06 72  05 e1 0d ff              |T>250..r....|
00000dac