� >!Archery
� By Tim Jones
� March 1990
#&� � Archimedes World November 1991
(
2� � �error
<	�init
F	�mode
P�colours
Z�voices
d�mountains
n�nobuttons
x�loadscores
�
�readdata
��startscreen
��instructions
��archery
��
�
�
��init
��
�7� hitx(3),hity(3),hiscore(100),line(5,100),ring$(9)
�� ring=0 � 9
�� (ring � 2)=0 �
�� ring$(ring)
��

&ring$(ring)="outer "+ring$(ring-1)

(ring$(ring-1)="inner "+ring$(ring-1)

�

"�

,
quit=�

6
demo=�

@
save=�

Jscreen=1

Tgravity=.25

^length=30*10

holdlength=length

r
hits=0

|score=0

�arrows=0

�wind=�(1)-.5

�birdok=�

�xs=0

�ys=0

�ȟ 4096

�
ȗ � 1

��

�

�
��archery

��nobuttons

��

�ȗ x,y,b
�target
�swapscreen
	� b>0
&�nobuttons
0�
:arrows=0
D�puttarget
Narrows=3
Xscore=0
b
hits=0
loldlength=length
vaimx=(wind*length)/30
�aimy=-length/90
�
ring=0
��
��target1(length)
�� � demo �aim � �demo
�'� � quit �fire(x,y,-x/2,-y/2,speed)
�
arrows-=1
�K� score>hiscore(length � 30) � � demo hiscore(length � 30)=score:save=�
�� arrows=0 � quit
��savescores
�� � quit � hits>0 �seehits
�
demo=�
�
quit=�

save=�
wind=�(1)-.5
� �
 �
*
4
��seehits
>�
H�target1(length)
R�target
\�swapscreen
flength-=120
p� length<=30
z
length=30
��target1(length)
��target
��swapscreen
��
�
���puttarget
��nobuttons
�ȗ ȓ 0,30,0,30*100-15
�ȗ � 0,length+15
�olength=length
�8message$="Please select required distance to target"
�/� length<30*10 message$+="   (Too close !)"
��target1(length)
�
� �(-51) demo=� � demo=�
3� �(-52) � �(-2) hiscore()=0:save=�:�savescores
$ȗ x,length,b
.length-=length � 30
88message$="Please select required distance to target"
B/� length<30*10 message$+="   (Too close !)"
L5� length<>olength �target1(length):olength=length
V� b>0 message$=""
`�target
j�swapscreen
t� b>0 � demo=�
~(� demo message$="Demo" � massage$=""
��target1(length)
�� length<30*10 �
��
�length+=30*2
��target1(length)
��target
��swapscreen
�� length>=oldlength
�length=oldlength
��
��
�
��target

*SChoose Screen
� &ED,-640,-544
	�flag
(	�bird
2�
<
F��target1(length)
P� 12
Zȓ Ȑ -640,0,1280,416
d� 8
nȓ Ȑ -640,-480,1280,480
x� 6
� �plot(4,-200,-150,length+60)
��plot(4,200,-150,length+60)
��plot(85,-200,-150,0)
��plot(85,200,-150,0)
�� 8
��plot(4,-100,-150,20)
��plot(4,100,-150,20)
��plot(85,-100,-150,0)
��plot(85,100,-150,0)
�� 9
�5� fence=0 � length+60-((length+60) � 30*3) � 30*3
��plot(4,-200,-150,fence)
��plot(5,-200,-75,fence)
�plot(4,200,-150,fence)
�plot(5,200,-75,fence)
�
" �plot(4,-200,-150,length+60)
,�plot(5,-200,-75,length+60)
6�plot(4,200,-150,length+60)
@�plot(5,200,-75,length+60)
J�plot(4,-200,-110,0)
T �plot(5,-200,-110,length+60)
^�plot(5,200,-110,length+60)
h�plot(5,200,-110,0)
r�plot(4,-200,-75,0)
|�plot(5,-200,-75,length+60)
��plot(5,200,-75,length+60)
��plot(5,200,-75,0)
�� 1
�*SChoose Mountains
�� &ED,-640,0
�� 10
��plot(4,-100,-150,length)
��plot(5,-80,-150,length)
��plot(4,0,-150,length+30)
��plot(85,80,-150,length)
��plot(5,100,-150,length)
�� 11
��plot(4,-80,-150,length)
�plot(5,0,0,length)
�plot(5,80,-150,length)
�plot(4,0,0,length)
&�plot(5,0,-150,length+30)
0� radius=100 � 20 � -20
:� radius/20
D�plot(4,0,0,length)
N�plot(157,radius,0,length)
X�
b� hits>0 �
l� arrow=1 � hits
v� 10
�/�plot(4,hitx(arrow)-4,hity(arrow)+4,length)
�/�plot(5,hitx(arrow)+4,hity(arrow)-4,length)
�/�plot(4,hitx(arrow)+4,hity(arrow)+4,length)
�/�plot(5,hitx(arrow)-4,hity(arrow)-4,length)
�*�arrow(hitx(arrow),hity(arrow),length)
��
��
�� 7
��plot(4,-175,-150,20)
��plot(5,-175,-10,20)
��arrows
�	�text
��getscreen
�

��getscreen
 � -640,-544
*
� 640,480
4*SGet Screen
>�
H
R��plot(plot,xpos,ypos,zpos)
\dist=300/(1100-(1005-zpos))
f� plot,xpos*dist,ypos*dist
p�
z
�	��aim
��nobuttons
�ȗ ȓ -445,-203,890,358
�ȗ � 100,-100
�� 7
�speed=0
��
�ȗ x,y,b
�	x=x/4
�	y=y/4
�� b>0 � speed<24 speed+=4
�� b=0 � speed>0 speed-=4
��target
	�bow(x,y,-20,speed/6)
	�swapscreen
	quit=�(-17)
	$0� ((b=3 � b=5 � b=6 � b=7) � speed>0) � quit
	.�
	8
	B
��demo
	L�nobuttons
	V	x=100
	`	y=-50
	j� 7
	t�
	~x+=(aimx-x)/10
	�y+=(aimy-y)/10
	��target
	��bow(x,y,-20,0)
	��swapscreen
	�quit=�(-17)
	�8� (x>aimx-1 � x<aimx+1 � y>aimy-1 � y<aimy+1) � quit
	�� quit �
	�� speed=0 � 24 � 2
	��target
	��bow(x,y,-20,speed/6)
	��swapscreen
	��
speed=24

�

��nobuttons
(�
2ȗ xx,yy,bb
<
� bb=0
F�
P
Z��button
d�nobuttons
n�
xȗ x,y,b
�	� b>0
��nobuttons
��
�
�
��flag
�flutter=�(6)-3
�� 14
��plot(4,-175,-10,20)
�1�plot(4,-175+wind*100+flutter,-60,20+flutter)
��plot(85,-175,-40,20)
�� 10
��plot(4,-175,-150,20)
�2�plot(5,-175+wind*100+flutter,-150,20+flutter)
�

��arrows
"� arrows<=1 �
,� arrow=1 � arrows-1
6� 10
@ �plot(4,180,-150,6*arrow+10)
J �plot(5,200,-150,6*arrow+10)
T�
^� arrow=1 � arrows-1
h� 7
r �plot(4,180,-150,6*arrow+10)
|�plot(5,200,-50,6*arrow+10)
�� 15
�"�plot(4,180,-150,6*arrow+10+1)
�"�plot(4,180,-150,6*arrow+10-1)
�!�plot(85,183,-135,6*arrow+10)
�!�plot(4,200,-50,6*arrow+10+2)
�!�plot(4,200,-50,6*arrow+10-2)
� �plot(85,203,-40,6*arrow+10)
��
��
�
���swapscreen
�ș 6,112,screen
�screen=screen � 3
ș 6,113,screen
Ȗ
�
&�
0
:
��text
D� 128+13
N� 0
X�0,1);�(80);
b�0,30);�(80);
l$�40-�(message$)/2,30);message$;
v	� 128
�� 11
�C�13,0);"Archery     -     By  Tim Jones     -     March 1990";
�$� arrows>-1 num=3-arrows � num=0
�m=oldlength � 30
�4�4,31);"Distance to target ";length � 30;"m  ";
�6�31,31);"The ";m;"m hi-score is ";hiscore(m);" ";
�#�63,31);"score is ";score;" ";
�.� demo �58,31);"Demo"; � �58,31);"Your";
�� 13
�ȓ Ȑ -640,-512,4,956
�ȓ Ȑ 634,-512,4,956
��
�

��error

�#0

	�kill

 !� �=17 ș 6,138,0,13:*DeskTop

*� 0

4�

>�;" at line ";�

H�

R�

\

f
��kill

p*RmKill Fire

z*RmKill Hit

�*RmKill MemAlloc

��

�

���fire(x,y,xs,ys,zs)

�z=bowz+20-bend*3

�gs=0

�� 2,-15,0,255

�message$=�70," ")

��

��target

��arrow(x,y,z)

��swapscreen

�x+=xs/(25-speed)
y+=ys/(25-speed)-gs
z+=zs/(25-speed)
xs+=wind
$gs+=gravity
.zs=speed
8� y<=-150 speed=-1
B� speed<0 � z>length
Ladj=length/30
Vaimx+=x/adj
`aimy+=y/adj
jdist=�(�(x^2+y^2))-1
tring=dist � 10
~� ring<=9 �
�.message$="Your arrow hit the "+ring$(ring)
��
�message$=""
�&� x<-20 message$+="to the left of"
�&� x>20 message$+="to the right of"
�� message$="" �
�� y<-20 message$+="below"
�� y>20 message$+="above"
��
�"� y<-20 message$+=" and below"
�!� y>20 message$+=" and above"
��
6message$="Your arrow went "+message$+" the target"

�
� ring<=9 � z>length �
score+=10-ring
(hits+=1
2hitx(hits)=x
<hity(hits)=y
F&� 1,-((100-length/30)/90*15),0,255
P� flash=0 � 10
Z� (ring � 2)+1,255,255,255
d�target
n�swapscreen
x�colours
�Ȗ
��
��
��
�
���loadscores
�%file=�("<Archery$Dir>.Hi-Scores")
�� file=0 �
�� load=0 � 100
�hiscore(load)=�#file
��
�
�#file
��

��savescores
� save=� �
"%file=�("<Archery$Dir>.Hi-Scores")
,� file=0 �
6� load=0 � 100
@�#file,hiscore(load)
J�
T
�#file
^�
h
r
��colours
|-� 0,0,0,0 :� Back ground & Shadows & Bird
�� 0,40,80,80 :� Back ground
�� 1,180,130,0 :� Target
�� 2,200,0,0 :� Target
�� 3,0,0,200 :� Target
�� 4,0,0,0 :� Target
�� 5,200,200,200 :� Target
�� 6,100,100,100 :� Floor
�&� 7,240,240,0 :� Arrow & Flag Pole
�%� 8,50,150,0 :� Grass & Mountains
�� 9,110,90,0 :� Fence
�%� 10,80,80,80 :� String & Shadows
�9� 11,150,150,200 :� Text & Bow & Targets stand & Bird
�� 12,70,90,150 :� Sky
� 13,0,130,240 :� Border
� 14,0,200,0 :� Flag
+� 15,200,150,200 :� Arrow Heads & Tails
&� 19,0,24,40,80,80
0�
:
D��readdata
Nxsize=20
Xysize=60
bxsiz=.5
lysiz=1.9
vtotal=0
�
� �drW
�� words
�� word=1 � words
�
� letters
�center=(letters*xsize)/2+15
�� letter=1 � letters
�� lines
�� line=1 � lines
�� line(0,total)
�� line(1,total)
�� line(2,total)
�� line(3,total)
�9l0=-300*��(line(0,total)*xsiz+letter*xsize-center+90)
<l1=100*��(line(0,total)*xsiz+letter*xsize-center+90)+150
'l2=(-line(1,total)*ysiz+word*ysize)
9l3=-300*��(line(2,total)*xsiz+letter*xsize-center+90)
 <l4=100*��(line(2,total)*xsiz+letter*xsize-center+90)+150
*'l5=(-line(3,total)*ysiz+word*ysize)
4line(0,total)=l0
>line(1,total)=l1
Hline(2,total)=l2
Rline(3,total)=l3
\line(4,total)=l4
fline(5,total)=l5
ptotal+=1
z�
��
��
�total-=1
��
�
���startscreen
�ȑ 640,544
�,message$="Press a mouse button to start"
��target1(length)
��bow(85,-35,-20,2)
�
�abtj(90)
��getscreen
��
�

��abtj(back)
$� 7
.� line=0 � total
88�plot(4,line(0,line),line(1,line),line(2,line)+back)
B8�plot(5,line(3,line),line(4,line),line(5,line)+back)
L�
V�
`
j��mountains
t�swapscreen
~� 12
�ȓ Ȑ 0,0,1280,80
�
� m=0 � 4
�h=40
�� x=0 � 1280 � 4
�� 8
�
� x,0,x,h
�� 6
�
Ȓ x,h
�h+=�(�(�(40+80-h))-40)*4
��
��
�	� 0,0

� 1280,80

*SGet Mountains
�
�
(
2
��bird
<� birdok �
Fflap=6*��(bird)
P)birdy+=�(�(�(100+150*2-birdy))-100)*2
Zp1=�birdx-30,birdy)
dp2=�birdx+30,birdy)
n%� (p1<1 � p1>5) � (p2<1 � p2>5) �
x� 11
�� birdx-20,birdy+flap+flap
�� birdx,birdy
�� birdx+20,birdy+flap+flap
��
�bird+=30
�birdx+=birdstep
�%� birdx<-640 � birdx>640 birdok=�
��
�birdx=(�(2)-1)*1280-640
�birdy=�(300)+50
�birdstep=-birdx/50
�
bird=0
�birdok=(�(100)<=2)
�
�

"!��arrow(arrowx,arrowy,arrowz)
,� arrowz � 30<30 �
6� 7
@!�plot(4,arrowx,arrowy,arrowz)
J*�plot(5,arrowx-xs,arrowy-ys,arrowz-30)
T� 10
^�plot(4,arrowx,-150,arrowz)
h%�plot(5,arrowx-xs,-150,arrowz-30)
r�
|� 7
�"�plot(69,arrowx,arrowy,arrowz)
�� 10
� �plot(69,arrowx,-150,arrowz)
��
�� arrowz � 30<15 �
�� 15
�0�plot(4,arrowx-xs*.8,arrowy-ys*.8,arrowz-20)
�,�plot(4,arrowx-xs,arrowy+2-ys,arrowz-30)
�-�plot(85,arrowx-xs,arrowy-2-ys,arrowz-30)
�!�plot(4,arrowx,arrowy,arrowz)
�%�plot(4,arrowx,arrowy+4,arrowz-4)
�&�plot(85,arrowx,arrowy-4,arrowz-4)
��
�

��bow(bowx,bowy,bowz,bend)
&� 11
0+�plot(4,bowx,bowy+50-bend,bowz-10-bend)
:'�plot(5,bowx,bowy+25,bowz-2-bend/2)
D�plot(5,bowx,bowy,bowz)
N'�plot(5,bowx,bowy-25,bowz-2-bend/2)
X+�plot(5,bowx,bowy-50+bend,bowz-10-bend)
b� 10
l+�plot(4,bowx,bowy-50+bend,bowz-10-bend)
v%�plot(5,bowx,bowy,bowz-10-bend*3)
�+�plot(5,bowx,bowy+50-bend,bowz-10-bend)
�$�arrow(bowx,bowy,bowz+20-bend*3)
��
� 
�
��mode
�	� 140
��swapscreen
��
�
���instructions
�
� �T\[
�� 11
��
� inst$
�
� inst$="Stop" �
 inst$=""
*�swapscreen
4�button
>�
H� inst$<>"End" �
R�40-�(inst$)/2);inst$;
\�
f� inst$="End"
p�
z
���voices
�Ƞ 2
�ȡ 1,"Hit"
�ȡ 2,"Fire"
��
�
�� "bullseye"
�� "red ring"
�� "blue ring"
�� "black ring"
�� "white ring"
�� 4
�� 7
� 3
� 0,0,10,20
� 10,20,20,0
$� 5,10,15,10
.� 5
8� 0,0,0,20
B� 0,20,20,20
L� 20,20,20,10
V� 20,10,0,10
`� 10,10,20,0
j� 3
t� 20,0,0,0
~� 0,0,0,20
�� 0,20,20,20
�� 3
�� 0,0,0,20
�� 20,0,20,20
�� 0,10,20,10
�� 4
�� 0,0,20,0
�� 0,10,10,10
�� 0,20,20,20
�� 0,0,0,20
�� 5
�� 0,0,0,20
� 0,20,20,20

� 20,20,20,10
� 20,10,0,10
� 10,10,20,0
(� 2
2� 0,0,20,20
<� 0,20,10,10
F� 2
P� 6
Z� 0,0,0,20
d� 0,20,15,20
n� 15,20,15,10
x� 0,10,20,10
�� 20,10,20,0
�� 0,0,20,0
�� 2
�� 0,0,20,20
�� 0,20,10,10
�� 3
�� 2
�� 10,0,10,20
�� 0,20,20,20
�� 1
�� 10,0,10,20
�� 4
�� 0,0,0,20
� 0,20,10,10
� 10,10,20,20
� 20,20,20,0
"� 5
,� 3
6� 0,20,20,20
@� 10,0,10,20
J� 10,0,0,0
T� 4
^� 0,0,20,0
h� 20,0,20,20
r� 20,20,0,20
|� 0,20,0,0
�� 3
�� 0,0,0,20
�� 0,20,20,0
�� 20,0,20,20
�� 4
�� 0,0,0,20
�� 0,0,20,0
�� 0,10,10,10
�� 0,20,20,20
�� 5
�� 0,0,20,0
�� 20,0,20,10
�� 20,10,0,10
� 0,10,0,20
� 0,20,20,20
� "Archery Instructions"
&%� "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
0� ""
:� ""
DI� "At the start of the game the screen shows the target, the bow and"
NE� "arrow and a flag that shows you the wind speed and direction."
X� ""
bU� "When you start each game you have to move the target to the required distance"
lH� "and then press a mouse button to start or press D to see a demo."
v9� "You can put the target 10m to 100m away from you."
�� ""
�N� "The further below the target you put the bow the higher the arrow will"
�U� "be fired and the further above the target you put the bow the lower the arrow"
�O� "will be fired. This is the same with shooting the arrow left and right."
�T� "","To fire an arrow you have to press a mouse button to pull the string back"
�Q� "and when you are ready to fire, press another mouse button as well as the"
�0� "one you pressed to pull the string back."
�� ""
�3� "The high scores are saved after every game."
�� ""
�8� "Press 'Ctrl' and 'R' to reset all the hi-scores."
�� ""
�� ""
� ""
� ""
� ""
 (� "Press a mouse button to continue"
*� ""
4#� "Archery - By Tim Jones 1990"
>� "Stop"
H� "Archery Instructions"
R%� "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
\� ""
f� ""
pK� "Each ring on the target has an inner and outer part. These all have"
z)� "different scores from one to ten."
�� ""
�� "The scores are :-"
�� ""
� � "Outer white ring 1 point"
�!� "Inner white ring 2 points"
�!� "Outer black ring 3 points"
�!� "Inner black ring 4 points"
� � "Outer blue ring 5 points"
� � "Inner blue ring 6 points"
�� "Outer red ring 7 points"
�� "Inner red ring 8 points"
�� "Outer bullseye 9 points"
� � "Inner bullseye 10 points"
� ""
K� "At the bottom of the screen it tells you how far the target is away"
U� "from you, the hi-score and your score. After each shot you will be told which"
$T� "ring your arrow hit or if it went above below to the left or to the right of"
.� "the target."
8� ""
B� ""
L� ""
V(� "Press a mouse button to continue"
`� ""
j#� "Archery - By Tim Jones 1990"
t� "Stop","End"
�

00000000  0d 00 0a 0f f4 20 3e 21  41 72 63 68 65 72 79 0d  |..... >!Archery.|
00000010  00 14 12 f4 20 42 79 20  54 69 6d 20 4a 6f 6e 65  |.... By Tim Jone|
00000020  73 0d 00 1e 10 f4 20 4d  61 72 63 68 20 31 39 39  |s..... March 199|
00000030  30 0d 00 23 26 f4 20 a9  20 41 72 63 68 69 6d 65  |0..#&. . Archime|
00000040  64 65 73 20 57 6f 72 6c  64 20 4e 6f 76 65 6d 62  |des World Novemb|
00000050  65 72 20 31 39 39 31 0d  00 28 04 0d 00 32 0e ee  |er 1991..(...2..|
00000060  20 85 20 f2 65 72 72 6f  72 0d 00 3c 09 f2 69 6e  | . .error..<..in|
00000070  69 74 0d 00 46 09 f2 6d  6f 64 65 0d 00 50 0c f2  |it..F..mode..P..|
00000080  63 6f 6c 6f 75 72 73 0d  00 5a 0b f2 76 6f 69 63  |colours..Z..voic|
00000090  65 73 0d 00 64 0e f2 6d  6f 75 6e 74 61 69 6e 73  |es..d..mountains|
000000a0  0d 00 6e 0e f2 6e 6f 62  75 74 74 6f 6e 73 0d 00  |..n..nobuttons..|
000000b0  78 0f f2 6c 6f 61 64 73  63 6f 72 65 73 0d 00 82  |x..loadscores...|
000000c0  0d f2 72 65 61 64 64 61  74 61 0d 00 8c 10 f2 73  |..readdata.....s|
000000d0  74 61 72 74 73 63 72 65  65 6e 0d 00 96 11 f2 69  |tartscreen.....i|
000000e0  6e 73 74 72 75 63 74 69  6f 6e 73 0d 00 a0 0c f2  |nstructions.....|
000000f0  61 72 63 68 65 72 79 0d  00 aa 05 e0 0d 00 b4 04  |archery.........|
00000100  0d 00 be 0a dd f2 69 6e  69 74 0d 00 c8 05 87 0d  |......init......|
00000110  00 d2 37 de 20 68 69 74  78 28 33 29 2c 68 69 74  |..7. hitx(3),hit|
00000120  79 28 33 29 2c 68 69 73  63 6f 72 65 28 31 30 30  |y(3),hiscore(100|
00000130  29 2c 6c 69 6e 65 28 35  2c 31 30 30 29 2c 72 69  |),line(5,100),ri|
00000140  6e 67 24 28 39 29 0d 00  dc 10 e3 20 72 69 6e 67  |ng$(9)..... ring|
00000150  3d 30 20 b8 20 39 0d 00  e6 14 e7 20 28 72 69 6e  |=0 . 9..... (rin|
00000160  67 20 83 20 32 29 3d 30  20 8c 0d 00 f0 11 f3 20  |g . 2)=0 ...... |
00000170  72 69 6e 67 24 28 72 69  6e 67 29 0d 00 fa 05 cc  |ring$(ring).....|
00000180  0d 01 04 26 72 69 6e 67  24 28 72 69 6e 67 29 3d  |...&ring$(ring)=|
00000190  22 6f 75 74 65 72 20 22  2b 72 69 6e 67 24 28 72  |"outer "+ring$(r|
000001a0  69 6e 67 2d 31 29 0d 01  0e 28 72 69 6e 67 24 28  |ing-1)...(ring$(|
000001b0  72 69 6e 67 2d 31 29 3d  22 69 6e 6e 65 72 20 22  |ring-1)="inner "|
000001c0  2b 72 69 6e 67 24 28 72  69 6e 67 2d 31 29 0d 01  |+ring$(ring-1)..|
000001d0  18 05 cd 0d 01 22 05 ed  0d 01 2c 0a 71 75 69 74  |....."....,.quit|
000001e0  3d a3 0d 01 36 0a 64 65  6d 6f 3d a3 0d 01 40 0a  |=...6.demo=...@.|
000001f0  73 61 76 65 3d a3 0d 01  4a 0c 73 63 72 65 65 6e  |save=...J.screen|
00000200  3d 31 0d 01 54 0f 67 72  61 76 69 74 79 3d 2e 32  |=1..T.gravity=.2|
00000210  35 0d 01 5e 10 6c 65 6e  67 74 68 3d 33 30 2a 31  |5..^.length=30*1|
00000220  30 0d 01 68 14 6f 6c 64  6c 65 6e 67 74 68 3d 6c  |0..h.oldlength=l|
00000230  65 6e 67 74 68 0d 01 72  0a 68 69 74 73 3d 30 0d  |ength..r.hits=0.|
00000240  01 7c 0b 73 63 6f 72 65  3d 30 0d 01 86 0c 61 72  |.|.score=0....ar|
00000250  72 6f 77 73 3d 30 0d 01  90 10 77 69 6e 64 3d b3  |rows=0....wind=.|
00000260  28 31 29 2d 2e 35 0d 01  9a 0c 62 69 72 64 6f 6b  |(1)-.5....birdok|
00000270  3d a3 0d 01 a4 08 78 73  3d 30 0d 01 ae 08 79 73  |=.....xs=0....ys|
00000280  3d 30 0d 01 b8 0b c8 9f  20 34 30 39 36 0d 01 c2  |=0...... 4096...|
00000290  0a c8 97 20 88 20 31 0d  01 cc 05 e1 0d 01 d6 04  |... . 1.........|
000002a0  0d 01 e0 0d dd f2 61 72  63 68 65 72 79 0d 01 ea  |......archery...|
000002b0  0e f2 6e 6f 62 75 74 74  6f 6e 73 0d 01 f4 05 f5  |..nobuttons.....|
000002c0  0d 01 fe 0c c8 97 20 78  2c 79 2c 62 0d 02 08 0b  |...... x,y,b....|
000002d0  f2 74 61 72 67 65 74 0d  02 12 0f f2 73 77 61 70  |.target.....swap|
000002e0  73 63 72 65 65 6e 0d 02  1c 09 fd 20 62 3e 30 0d  |screen..... b>0.|
000002f0  02 26 0e f2 6e 6f 62 75  74 74 6f 6e 73 0d 02 30  |.&..nobuttons..0|
00000300  05 f5 0d 02 3a 0c 61 72  72 6f 77 73 3d 30 0d 02  |....:.arrows=0..|
00000310  44 0e f2 70 75 74 74 61  72 67 65 74 0d 02 4e 0c  |D..puttarget..N.|
00000320  61 72 72 6f 77 73 3d 33  0d 02 58 0b 73 63 6f 72  |arrows=3..X.scor|
00000330  65 3d 30 0d 02 62 0a 68  69 74 73 3d 30 0d 02 6c  |e=0..b.hits=0..l|
00000340  14 6f 6c 64 6c 65 6e 67  74 68 3d 6c 65 6e 67 74  |.oldlength=lengt|
00000350  68 0d 02 76 19 61 69 6d  78 3d 28 77 69 6e 64 2a  |h..v.aimx=(wind*|
00000360  6c 65 6e 67 74 68 29 2f  33 30 0d 02 80 13 61 69  |length)/30....ai|
00000370  6d 79 3d 2d 6c 65 6e 67  74 68 2f 39 30 0d 02 8a  |my=-length/90...|
00000380  0a 72 69 6e 67 3d 30 0d  02 94 05 f5 0d 02 9e 14  |.ring=0.........|
00000390  f2 74 61 72 67 65 74 31  28 6c 65 6e 67 74 68 29  |.target1(length)|
000003a0  0d 02 a8 19 e7 20 ac 20  64 65 6d 6f 20 f2 61 69  |..... . demo .ai|
000003b0  6d 20 8b 20 f2 64 65 6d  6f 0d 02 b2 27 e7 20 ac  |m . .demo...'. .|
000003c0  20 71 75 69 74 20 f2 66  69 72 65 28 78 2c 79 2c  | quit .fire(x,y,|
000003d0  2d 78 2f 32 2c 2d 79 2f  32 2c 73 70 65 65 64 29  |-x/2,-y/2,speed)|
000003e0  0d 02 bc 0d 61 72 72 6f  77 73 2d 3d 31 0d 02 c6  |....arrows-=1...|
000003f0  4b e7 20 73 63 6f 72 65  3e 68 69 73 63 6f 72 65  |K. score>hiscore|
00000400  28 6c 65 6e 67 74 68 20  81 20 33 30 29 20 80 20  |(length . 30) . |
00000410  ac 20 64 65 6d 6f 20 68  69 73 63 6f 72 65 28 6c  |. demo hiscore(l|
00000420  65 6e 67 74 68 20 81 20  33 30 29 3d 73 63 6f 72  |ength . 30)=scor|
00000430  65 3a 73 61 76 65 3d b9  0d 02 d0 15 fd 20 61 72  |e:save=...... ar|
00000440  72 6f 77 73 3d 30 20 84  20 71 75 69 74 0d 02 da  |rows=0 . quit...|
00000450  0f f2 73 61 76 65 73 63  6f 72 65 73 0d 02 e4 1e  |..savescores....|
00000460  e7 20 ac 20 71 75 69 74  20 80 20 68 69 74 73 3e  |. . quit . hits>|
00000470  30 20 f2 73 65 65 68 69  74 73 0d 02 ee 0a 64 65  |0 .seehits....de|
00000480  6d 6f 3d a3 0d 02 f8 0a  71 75 69 74 3d a3 0d 03  |mo=.....quit=...|
00000490  02 0a 73 61 76 65 3d a3  0d 03 0c 10 77 69 6e 64  |..save=.....wind|
000004a0  3d b3 28 31 29 2d 2e 35  0d 03 16 07 fd 20 a3 0d  |=.(1)-.5..... ..|
000004b0  03 20 05 e1 0d 03 2a 04  0d 03 34 0d dd f2 73 65  |. ....*...4...se|
000004c0  65 68 69 74 73 0d 03 3e  05 f5 0d 03 48 14 f2 74  |ehits..>....H..t|
000004d0  61 72 67 65 74 31 28 6c  65 6e 67 74 68 29 0d 03  |arget1(length)..|
000004e0  52 0b f2 74 61 72 67 65  74 0d 03 5c 0f f2 73 77  |R..target..\..sw|
000004f0  61 70 73 63 72 65 65 6e  0d 03 66 0f 6c 65 6e 67  |apscreen..f.leng|
00000500  74 68 2d 3d 31 32 30 0d  03 70 10 fd 20 6c 65 6e  |th-=120..p.. len|
00000510  67 74 68 3c 3d 33 30 0d  03 7a 0d 6c 65 6e 67 74  |gth<=30..z.lengt|
00000520  68 3d 33 30 0d 03 84 14  f2 74 61 72 67 65 74 31  |h=30.....target1|
00000530  28 6c 65 6e 67 74 68 29  0d 03 8e 0b f2 74 61 72  |(length).....tar|
00000540  67 65 74 0d 03 98 0f f2  73 77 61 70 73 63 72 65  |get.....swapscre|
00000550  65 6e 0d 03 a2 05 e1 0d  03 ac 04 0d 03 b6 0f dd  |en..............|
00000560  f2 70 75 74 74 61 72 67  65 74 0d 03 c0 0e f2 6e  |.puttarget.....n|
00000570  6f 62 75 74 74 6f 6e 73  0d 03 ca 1a c8 97 20 c8  |obuttons...... .|
00000580  93 20 30 2c 33 30 2c 30  2c 33 30 2a 31 30 30 2d  |. 0,30,0,30*100-|
00000590  31 35 0d 03 d4 14 c8 97  20 b8 20 30 2c 6c 65 6e  |15...... . 0,len|
000005a0  67 74 68 2b 31 35 0d 03  de 12 6f 6c 65 6e 67 74  |gth+15....olengt|
000005b0  68 3d 6c 65 6e 67 74 68  0d 03 e8 38 6d 65 73 73  |h=length...8mess|
000005c0  61 67 65 24 3d 22 50 6c  65 61 73 65 20 73 65 6c  |age$="Please sel|
000005d0  65 63 74 20 72 65 71 75  69 72 65 64 20 64 69 73  |ect required dis|
000005e0  74 61 6e 63 65 20 74 6f  20 74 61 72 67 65 74 22  |tance to target"|
000005f0  0d 03 f2 2f e7 20 6c 65  6e 67 74 68 3c 33 30 2a  |.../. length<30*|
00000600  31 30 20 6d 65 73 73 61  67 65 24 2b 3d 22 20 20  |10 message$+="  |
00000610  20 28 54 6f 6f 20 63 6c  6f 73 65 20 21 29 22 0d  | (Too close !)".|
00000620  03 fc 14 f2 74 61 72 67  65 74 31 28 6c 65 6e 67  |....target1(leng|
00000630  74 68 29 0d 04 06 05 f5  0d 04 10 1c e7 20 a6 28  |th).......... .(|
00000640  2d 35 31 29 20 64 65 6d  6f 3d b9 20 8b 20 64 65  |-51) demo=. . de|
00000650  6d 6f 3d a3 0d 04 1a 33  e7 20 a6 28 2d 35 32 29  |mo=....3. .(-52)|
00000660  20 80 20 a6 28 2d 32 29  20 68 69 73 63 6f 72 65  | . .(-2) hiscore|
00000670  28 29 3d 30 3a 73 61 76  65 3d b9 3a f2 73 61 76  |()=0:save=.:.sav|
00000680  65 73 63 6f 72 65 73 0d  04 24 11 c8 97 20 78 2c  |escores..$... x,|
00000690  6c 65 6e 67 74 68 2c 62  0d 04 2e 17 6c 65 6e 67  |length,b....leng|
000006a0  74 68 2d 3d 6c 65 6e 67  74 68 20 83 20 33 30 0d  |th-=length . 30.|
000006b0  04 38 38 6d 65 73 73 61  67 65 24 3d 22 50 6c 65  |.88message$="Ple|
000006c0  61 73 65 20 73 65 6c 65  63 74 20 72 65 71 75 69  |ase select requi|
000006d0  72 65 64 20 64 69 73 74  61 6e 63 65 20 74 6f 20  |red distance to |
000006e0  74 61 72 67 65 74 22 0d  04 42 2f e7 20 6c 65 6e  |target"..B/. len|
000006f0  67 74 68 3c 33 30 2a 31  30 20 6d 65 73 73 61 67  |gth<30*10 messag|
00000700  65 24 2b 3d 22 20 20 20  28 54 6f 6f 20 63 6c 6f  |e$+="   (Too clo|
00000710  73 65 20 21 29 22 0d 04  4c 35 e7 20 6c 65 6e 67  |se !)"..L5. leng|
00000720  74 68 3c 3e 6f 6c 65 6e  67 74 68 20 f2 74 61 72  |th<>olength .tar|
00000730  67 65 74 31 28 6c 65 6e  67 74 68 29 3a 6f 6c 65  |get1(length):ole|
00000740  6e 67 74 68 3d 6c 65 6e  67 74 68 0d 04 56 15 e7  |ngth=length..V..|
00000750  20 62 3e 30 20 6d 65 73  73 61 67 65 24 3d 22 22  | b>0 message$=""|
00000760  0d 04 60 0b f2 74 61 72  67 65 74 0d 04 6a 0f f2  |..`..target..j..|
00000770  73 77 61 70 73 63 72 65  65 6e 0d 04 74 12 fd 20  |swapscreen..t.. |
00000780  62 3e 30 20 84 20 64 65  6d 6f 3d b9 0d 04 7e 28  |b>0 . demo=...~(|
00000790  e7 20 64 65 6d 6f 20 6d  65 73 73 61 67 65 24 3d  |. demo message$=|
000007a0  22 44 65 6d 6f 22 20 8b  20 6d 61 73 73 61 67 65  |"Demo" . massage|
000007b0  24 3d 22 22 0d 04 88 14  f2 74 61 72 67 65 74 31  |$="".....target1|
000007c0  28 6c 65 6e 67 74 68 29  0d 04 92 14 e7 20 6c 65  |(length)..... le|
000007d0  6e 67 74 68 3c 33 30 2a  31 30 20 8c 0d 04 9c 05  |ngth<30*10 .....|
000007e0  f5 0d 04 a6 10 6c 65 6e  67 74 68 2b 3d 33 30 2a  |.....length+=30*|
000007f0  32 0d 04 b0 14 f2 74 61  72 67 65 74 31 28 6c 65  |2.....target1(le|
00000800  6e 67 74 68 29 0d 04 ba  0b f2 74 61 72 67 65 74  |ngth).....target|
00000810  0d 04 c4 0f f2 73 77 61  70 73 63 72 65 65 6e 0d  |.....swapscreen.|
00000820  04 ce 17 fd 20 6c 65 6e  67 74 68 3e 3d 6f 6c 64  |.... length>=old|
00000830  6c 65 6e 67 74 68 0d 04  d8 14 6c 65 6e 67 74 68  |length....length|
00000840  3d 6f 6c 64 6c 65 6e 67  74 68 0d 04 e2 05 cd 0d  |=oldlength......|
00000850  04 ec 05 e1 0d 04 f6 04  0d 05 00 0c dd f2 74 61  |..............ta|
00000860  72 67 65 74 0d 05 0a 13  2a 53 43 68 6f 6f 73 65  |rget....*SChoose|
00000870  20 53 63 72 65 65 6e 0d  05 14 13 f0 20 26 45 44  | Screen..... &ED|
00000880  2c 2d 36 34 30 2c 2d 35  34 34 0d 05 1e 09 f2 66  |,-640,-544.....f|
00000890  6c 61 67 0d 05 28 09 f2  62 69 72 64 0d 05 32 05  |lag..(..bird..2.|
000008a0  e1 0d 05 3c 04 0d 05 46  15 dd f2 74 61 72 67 65  |...<...F...targe|
000008b0  74 31 28 6c 65 6e 67 74  68 29 0d 05 50 08 e6 20  |t1(length)..P.. |
000008c0  31 32 0d 05 5a 19 c8 93  20 c8 90 20 2d 36 34 30  |12..Z... .. -640|
000008d0  2c 30 2c 31 32 38 30 2c  34 31 36 0d 05 64 07 e6  |,0,1280,416..d..|
000008e0  20 38 0d 05 6e 1c c8 93  20 c8 90 20 2d 36 34 30  | 8..n... .. -640|
000008f0  2c 2d 34 38 30 2c 31 32  38 30 2c 34 38 30 0d 05  |,-480,1280,480..|
00000900  78 07 e6 20 36 0d 05 82  20 f2 70 6c 6f 74 28 34  |x.. 6... .plot(4|
00000910  2c 2d 32 30 30 2c 2d 31  35 30 2c 6c 65 6e 67 74  |,-200,-150,lengt|
00000920  68 2b 36 30 29 0d 05 8c  1f f2 70 6c 6f 74 28 34  |h+60).....plot(4|
00000930  2c 32 30 30 2c 2d 31 35  30 2c 6c 65 6e 67 74 68  |,200,-150,length|
00000940  2b 36 30 29 0d 05 96 19  f2 70 6c 6f 74 28 38 35  |+60).....plot(85|
00000950  2c 2d 32 30 30 2c 2d 31  35 30 2c 30 29 0d 05 a0  |,-200,-150,0)...|
00000960  18 f2 70 6c 6f 74 28 38  35 2c 32 30 30 2c 2d 31  |..plot(85,200,-1|
00000970  35 30 2c 30 29 0d 05 aa  07 e6 20 38 0d 05 b4 19  |50,0)..... 8....|
00000980  f2 70 6c 6f 74 28 34 2c  2d 31 30 30 2c 2d 31 35  |.plot(4,-100,-15|
00000990  30 2c 32 30 29 0d 05 be  18 f2 70 6c 6f 74 28 34  |0,20).....plot(4|
000009a0  2c 31 30 30 2c 2d 31 35  30 2c 32 30 29 0d 05 c8  |,100,-150,20)...|
000009b0  19 f2 70 6c 6f 74 28 38  35 2c 2d 31 30 30 2c 2d  |..plot(85,-100,-|
000009c0  31 35 30 2c 30 29 0d 05  d2 18 f2 70 6c 6f 74 28  |150,0).....plot(|
000009d0  38 35 2c 31 30 30 2c 2d  31 35 30 2c 30 29 0d 05  |85,100,-150,0)..|
000009e0  dc 07 e6 20 39 0d 05 e6  35 e3 20 66 65 6e 63 65  |... 9...5. fence|
000009f0  3d 30 20 b8 20 6c 65 6e  67 74 68 2b 36 30 2d 28  |=0 . length+60-(|
00000a00  28 6c 65 6e 67 74 68 2b  36 30 29 20 83 20 33 30  |(length+60) . 30|
00000a10  2a 33 29 20 88 20 33 30  2a 33 0d 05 f0 1c f2 70  |*3) . 30*3.....p|
00000a20  6c 6f 74 28 34 2c 2d 32  30 30 2c 2d 31 35 30 2c  |lot(4,-200,-150,|
00000a30  66 65 6e 63 65 29 0d 05  fa 1b f2 70 6c 6f 74 28  |fence).....plot(|
00000a40  35 2c 2d 32 30 30 2c 2d  37 35 2c 66 65 6e 63 65  |5,-200,-75,fence|
00000a50  29 0d 06 04 1b f2 70 6c  6f 74 28 34 2c 32 30 30  |).....plot(4,200|
00000a60  2c 2d 31 35 30 2c 66 65  6e 63 65 29 0d 06 0e 1a  |,-150,fence)....|
00000a70  f2 70 6c 6f 74 28 35 2c  32 30 30 2c 2d 37 35 2c  |.plot(5,200,-75,|
00000a80  66 65 6e 63 65 29 0d 06  18 05 ed 0d 06 22 20 f2  |fence)......." .|
00000a90  70 6c 6f 74 28 34 2c 2d  32 30 30 2c 2d 31 35 30  |plot(4,-200,-150|
00000aa0  2c 6c 65 6e 67 74 68 2b  36 30 29 0d 06 2c 1f f2  |,length+60)..,..|
00000ab0  70 6c 6f 74 28 35 2c 2d  32 30 30 2c 2d 37 35 2c  |plot(5,-200,-75,|
00000ac0  6c 65 6e 67 74 68 2b 36  30 29 0d 06 36 1f f2 70  |length+60)..6..p|
00000ad0  6c 6f 74 28 34 2c 32 30  30 2c 2d 31 35 30 2c 6c  |lot(4,200,-150,l|
00000ae0  65 6e 67 74 68 2b 36 30  29 0d 06 40 1e f2 70 6c  |ength+60)..@..pl|
00000af0  6f 74 28 35 2c 32 30 30  2c 2d 37 35 2c 6c 65 6e  |ot(5,200,-75,len|
00000b00  67 74 68 2b 36 30 29 0d  06 4a 18 f2 70 6c 6f 74  |gth+60)..J..plot|
00000b10  28 34 2c 2d 32 30 30 2c  2d 31 31 30 2c 30 29 0d  |(4,-200,-110,0).|
00000b20  06 54 20 f2 70 6c 6f 74  28 35 2c 2d 32 30 30 2c  |.T .plot(5,-200,|
00000b30  2d 31 31 30 2c 6c 65 6e  67 74 68 2b 36 30 29 0d  |-110,length+60).|
00000b40  06 5e 1f f2 70 6c 6f 74  28 35 2c 32 30 30 2c 2d  |.^..plot(5,200,-|
00000b50  31 31 30 2c 6c 65 6e 67  74 68 2b 36 30 29 0d 06  |110,length+60)..|
00000b60  68 17 f2 70 6c 6f 74 28  35 2c 32 30 30 2c 2d 31  |h..plot(5,200,-1|
00000b70  31 30 2c 30 29 0d 06 72  17 f2 70 6c 6f 74 28 34  |10,0)..r..plot(4|
00000b80  2c 2d 32 30 30 2c 2d 37  35 2c 30 29 0d 06 7c 1f  |,-200,-75,0)..|.|
00000b90  f2 70 6c 6f 74 28 35 2c  2d 32 30 30 2c 2d 37 35  |.plot(5,-200,-75|
00000ba0  2c 6c 65 6e 67 74 68 2b  36 30 29 0d 06 86 1e f2  |,length+60).....|
00000bb0  70 6c 6f 74 28 35 2c 32  30 30 2c 2d 37 35 2c 6c  |plot(5,200,-75,l|
00000bc0  65 6e 67 74 68 2b 36 30  29 0d 06 90 16 f2 70 6c  |ength+60).....pl|
00000bd0  6f 74 28 35 2c 32 30 30  2c 2d 37 35 2c 30 29 0d  |ot(5,200,-75,0).|
00000be0  06 9a 07 e6 20 31 0d 06  a4 16 2a 53 43 68 6f 6f  |.... 1....*SChoo|
00000bf0  73 65 20 4d 6f 75 6e 74  61 69 6e 73 0d 06 ae 10  |se Mountains....|
00000c00  f0 20 26 45 44 2c 2d 36  34 30 2c 30 0d 06 b8 08  |. &ED,-640,0....|
00000c10  e6 20 31 30 0d 06 c2 1d  f2 70 6c 6f 74 28 34 2c  |. 10.....plot(4,|
00000c20  2d 31 30 30 2c 2d 31 35  30 2c 6c 65 6e 67 74 68  |-100,-150,length|
00000c30  29 0d 06 cc 1c f2 70 6c  6f 74 28 35 2c 2d 38 30  |).....plot(5,-80|
00000c40  2c 2d 31 35 30 2c 6c 65  6e 67 74 68 29 0d 06 d6  |,-150,length)...|
00000c50  1d f2 70 6c 6f 74 28 34  2c 30 2c 2d 31 35 30 2c  |..plot(4,0,-150,|
00000c60  6c 65 6e 67 74 68 2b 33  30 29 0d 06 e0 1c f2 70  |length+30).....p|
00000c70  6c 6f 74 28 38 35 2c 38  30 2c 2d 31 35 30 2c 6c  |lot(85,80,-150,l|
00000c80  65 6e 67 74 68 29 0d 06  ea 1c f2 70 6c 6f 74 28  |ength).....plot(|
00000c90  35 2c 31 30 30 2c 2d 31  35 30 2c 6c 65 6e 67 74  |5,100,-150,lengt|
00000ca0  68 29 0d 06 f4 08 e6 20  31 31 0d 06 fe 1c f2 70  |h)..... 11.....p|
00000cb0  6c 6f 74 28 34 2c 2d 38  30 2c 2d 31 35 30 2c 6c  |lot(4,-80,-150,l|
00000cc0  65 6e 67 74 68 29 0d 07  08 17 f2 70 6c 6f 74 28  |ength).....plot(|
00000cd0  35 2c 30 2c 30 2c 6c 65  6e 67 74 68 29 0d 07 12  |5,0,0,length)...|
00000ce0  1b f2 70 6c 6f 74 28 35  2c 38 30 2c 2d 31 35 30  |..plot(5,80,-150|
00000cf0  2c 6c 65 6e 67 74 68 29  0d 07 1c 17 f2 70 6c 6f  |,length).....plo|
00000d00  74 28 34 2c 30 2c 30 2c  6c 65 6e 67 74 68 29 0d  |t(4,0,0,length).|
00000d10  07 26 1d f2 70 6c 6f 74  28 35 2c 30 2c 2d 31 35  |.&..plot(5,0,-15|
00000d20  30 2c 6c 65 6e 67 74 68  2b 33 30 29 0d 07 30 1b  |0,length+30)..0.|
00000d30  e3 20 72 61 64 69 75 73  3d 31 30 30 20 b8 20 32  |. radius=100 . 2|
00000d40  30 20 88 20 2d 32 30 0d  07 3a 0f e6 20 72 61 64  |0 . -20..:.. rad|
00000d50  69 75 73 2f 32 30 0d 07  44 17 f2 70 6c 6f 74 28  |ius/20..D..plot(|
00000d60  34 2c 30 2c 30 2c 6c 65  6e 67 74 68 29 0d 07 4e  |4,0,0,length)..N|
00000d70  1e f2 70 6c 6f 74 28 31  35 37 2c 72 61 64 69 75  |..plot(157,radiu|
00000d80  73 2c 30 2c 6c 65 6e 67  74 68 29 0d 07 58 05 ed  |s,0,length)..X..|
00000d90  0d 07 62 0e e7 20 68 69  74 73 3e 30 20 8c 0d 07  |..b.. hits>0 ...|
00000da0  6c 14 e3 20 61 72 72 6f  77 3d 31 20 b8 20 68 69  |l.. arrow=1 . hi|
00000db0  74 73 0d 07 76 08 e6 20  31 30 0d 07 80 2f f2 70  |ts..v.. 10.../.p|
00000dc0  6c 6f 74 28 34 2c 68 69  74 78 28 61 72 72 6f 77  |lot(4,hitx(arrow|
00000dd0  29 2d 34 2c 68 69 74 79  28 61 72 72 6f 77 29 2b  |)-4,hity(arrow)+|
00000de0  34 2c 6c 65 6e 67 74 68  29 0d 07 8a 2f f2 70 6c  |4,length).../.pl|
00000df0  6f 74 28 35 2c 68 69 74  78 28 61 72 72 6f 77 29  |ot(5,hitx(arrow)|
00000e00  2b 34 2c 68 69 74 79 28  61 72 72 6f 77 29 2d 34  |+4,hity(arrow)-4|
00000e10  2c 6c 65 6e 67 74 68 29  0d 07 94 2f f2 70 6c 6f  |,length).../.plo|
00000e20  74 28 34 2c 68 69 74 78  28 61 72 72 6f 77 29 2b  |t(4,hitx(arrow)+|
00000e30  34 2c 68 69 74 79 28 61  72 72 6f 77 29 2b 34 2c  |4,hity(arrow)+4,|
00000e40  6c 65 6e 67 74 68 29 0d  07 9e 2f f2 70 6c 6f 74  |length).../.plot|
00000e50  28 35 2c 68 69 74 78 28  61 72 72 6f 77 29 2d 34  |(5,hitx(arrow)-4|
00000e60  2c 68 69 74 79 28 61 72  72 6f 77 29 2d 34 2c 6c  |,hity(arrow)-4,l|
00000e70  65 6e 67 74 68 29 0d 07  a8 2a f2 61 72 72 6f 77  |ength)...*.arrow|
00000e80  28 68 69 74 78 28 61 72  72 6f 77 29 2c 68 69 74  |(hitx(arrow),hit|
00000e90  79 28 61 72 72 6f 77 29  2c 6c 65 6e 67 74 68 29  |y(arrow),length)|
00000ea0  0d 07 b2 05 ed 0d 07 bc  05 cd 0d 07 c6 07 e6 20  |............... |
00000eb0  37 0d 07 d0 19 f2 70 6c  6f 74 28 34 2c 2d 31 37  |7.....plot(4,-17|
00000ec0  35 2c 2d 31 35 30 2c 32  30 29 0d 07 da 18 f2 70  |5,-150,20).....p|
00000ed0  6c 6f 74 28 35 2c 2d 31  37 35 2c 2d 31 30 2c 32  |lot(5,-175,-10,2|
00000ee0  30 29 0d 07 e4 0b f2 61  72 72 6f 77 73 0d 07 ee  |0).....arrows...|
00000ef0  09 f2 74 65 78 74 0d 07  f8 0e f2 67 65 74 73 63  |..text.....getsc|
00000f00  72 65 65 6e 0d 08 02 05  e1 0d 08 0c 04 0d 08 16  |reen............|
00000f10  0f dd f2 67 65 74 73 63  72 65 65 6e 0d 08 20 0f  |...getscreen.. .|
00000f20  ec 20 2d 36 34 30 2c 2d  35 34 34 0d 08 2a 0d ec  |. -640,-544..*..|
00000f30  20 36 34 30 2c 34 38 30  0d 08 34 10 2a 53 47 65  | 640,480..4.*SGe|
00000f40  74 20 53 63 72 65 65 6e  0d 08 3e 05 e1 0d 08 48  |t Screen..>....H|
00000f50  04 0d 08 52 1f dd f2 70  6c 6f 74 28 70 6c 6f 74  |...R...plot(plot|
00000f60  2c 78 70 6f 73 2c 79 70  6f 73 2c 7a 70 6f 73 29  |,xpos,ypos,zpos)|
00000f70  0d 08 5c 1f 64 69 73 74  3d 33 30 30 2f 28 31 31  |..\.dist=300/(11|
00000f80  30 30 2d 28 31 30 30 35  2d 7a 70 6f 73 29 29 0d  |00-(1005-zpos)).|
00000f90  08 66 1e f0 20 70 6c 6f  74 2c 78 70 6f 73 2a 64  |.f.. plot,xpos*d|
00000fa0  69 73 74 2c 79 70 6f 73  2a 64 69 73 74 0d 08 70  |ist,ypos*dist..p|
00000fb0  05 e1 0d 08 7a 04 0d 08  84 09 dd f2 61 69 6d 0d  |....z.......aim.|
00000fc0  08 8e 0e f2 6e 6f 62 75  74 74 6f 6e 73 0d 08 98  |....nobuttons...|
00000fd0  1b c8 97 20 c8 93 20 2d  34 34 35 2c 2d 32 30 33  |... .. -445,-203|
00000fe0  2c 38 39 30 2c 33 35 38  0d 08 a2 11 c8 97 20 b8  |,890,358...... .|
00000ff0  20 31 30 30 2c 2d 31 30  30 0d 08 ac 07 e6 20 37  | 100,-100..... 7|
00001000  0d 08 b6 0b 73 70 65 65  64 3d 30 0d 08 c0 05 f5  |....speed=0.....|
00001010  0d 08 ca 0c c8 97 20 78  2c 79 2c 62 0d 08 d4 09  |...... x,y,b....|
00001020  78 3d 78 2f 34 0d 08 de  09 79 3d 79 2f 34 0d 08  |x=x/4....y=y/4..|
00001030  e8 1d e7 20 62 3e 30 20  80 20 73 70 65 65 64 3c  |... b>0 . speed<|
00001040  32 34 20 73 70 65 65 64  2b 3d 34 0d 08 f2 1c e7  |24 speed+=4.....|
00001050  20 62 3d 30 20 80 20 73  70 65 65 64 3e 30 20 73  | b=0 . speed>0 s|
00001060  70 65 65 64 2d 3d 34 0d  08 fc 0b f2 74 61 72 67  |peed-=4.....targ|
00001070  65 74 0d 09 06 19 f2 62  6f 77 28 78 2c 79 2c 2d  |et.....bow(x,y,-|
00001080  32 30 2c 73 70 65 65 64  2f 36 29 0d 09 10 0f f2  |20,speed/6).....|
00001090  73 77 61 70 73 63 72 65  65 6e 0d 09 1a 0f 71 75  |swapscreen....qu|
000010a0  69 74 3d a6 28 2d 31 37  29 0d 09 24 30 fd 20 28  |it=.(-17)..$0. (|
000010b0  28 62 3d 33 20 84 20 62  3d 35 20 84 20 62 3d 36  |(b=3 . b=5 . b=6|
000010c0  20 84 20 62 3d 37 29 20  80 20 73 70 65 65 64 3e  | . b=7) . speed>|
000010d0  30 29 20 84 20 71 75 69  74 0d 09 2e 05 e1 0d 09  |0) . quit.......|
000010e0  38 04 0d 09 42 0a dd f2  64 65 6d 6f 0d 09 4c 0e  |8...B...demo..L.|
000010f0  f2 6e 6f 62 75 74 74 6f  6e 73 0d 09 56 09 78 3d  |.nobuttons..V.x=|
00001100  31 30 30 0d 09 60 09 79  3d 2d 35 30 0d 09 6a 07  |100..`.y=-50..j.|
00001110  e6 20 37 0d 09 74 05 f5  0d 09 7e 12 78 2b 3d 28  |. 7..t....~.x+=(|
00001120  61 69 6d 78 2d 78 29 2f  31 30 0d 09 88 12 79 2b  |aimx-x)/10....y+|
00001130  3d 28 61 69 6d 79 2d 79  29 2f 31 30 0d 09 92 0b  |=(aimy-y)/10....|
00001140  f2 74 61 72 67 65 74 0d  09 9c 13 f2 62 6f 77 28  |.target.....bow(|
00001150  78 2c 79 2c 2d 32 30 2c  30 29 0d 09 a6 0f f2 73  |x,y,-20,0).....s|
00001160  77 61 70 73 63 72 65 65  6e 0d 09 b0 0f 71 75 69  |wapscreen....qui|
00001170  74 3d a6 28 2d 31 37 29  0d 09 ba 38 fd 20 28 78  |t=.(-17)...8. (x|
00001180  3e 61 69 6d 78 2d 31 20  80 20 78 3c 61 69 6d 78  |>aimx-1 . x<aimx|
00001190  2b 31 20 80 20 79 3e 61  69 6d 79 2d 31 20 80 20  |+1 . y>aimy-1 . |
000011a0  79 3c 61 69 6d 79 2b 31  29 20 84 20 71 75 69 74  |y<aimy+1) . quit|
000011b0  0d 09 c4 0c e7 20 71 75  69 74 20 e1 0d 09 ce 16  |..... quit .....|
000011c0  e3 20 73 70 65 65 64 3d  30 20 b8 20 32 34 20 88  |. speed=0 . 24 .|
000011d0  20 32 0d 09 d8 0b f2 74  61 72 67 65 74 0d 09 e2  | 2.....target...|
000011e0  19 f2 62 6f 77 28 78 2c  79 2c 2d 32 30 2c 73 70  |..bow(x,y,-20,sp|
000011f0  65 65 64 2f 36 29 0d 09  ec 0f f2 73 77 61 70 73  |eed/6).....swaps|
00001200  63 72 65 65 6e 0d 09 f6  05 ed 0d 0a 00 0c 73 70  |creen.........sp|
00001210  65 65 64 3d 32 34 0d 0a  0a 05 e1 0d 0a 14 04 0d  |eed=24..........|
00001220  0a 1e 0f dd f2 6e 6f 62  75 74 74 6f 6e 73 0d 0a  |.....nobuttons..|
00001230  28 05 f5 0d 0a 32 0f c8  97 20 78 78 2c 79 79 2c  |(....2... xx,yy,|
00001240  62 62 0d 0a 3c 0a fd 20  62 62 3d 30 0d 0a 46 05  |bb..<.. bb=0..F.|
00001250  e1 0d 0a 50 04 0d 0a 5a  0c dd f2 62 75 74 74 6f  |...P...Z...butto|
00001260  6e 0d 0a 64 0e f2 6e 6f  62 75 74 74 6f 6e 73 0d  |n..d..nobuttons.|
00001270  0a 6e 05 f5 0d 0a 78 0c  c8 97 20 78 2c 79 2c 62  |.n....x... x,y,b|
00001280  0d 0a 82 09 fd 20 62 3e  30 0d 0a 8c 0e f2 6e 6f  |..... b>0.....no|
00001290  62 75 74 74 6f 6e 73 0d  0a 96 05 e1 0d 0a a0 04  |buttons.........|
000012a0  0d 0a aa 0a dd f2 66 6c  61 67 0d 0a b4 12 66 6c  |......flag....fl|
000012b0  75 74 74 65 72 3d b3 28  36 29 2d 33 0d 0a be 08  |utter=.(6)-3....|
000012c0  e6 20 31 34 0d 0a c8 18  f2 70 6c 6f 74 28 34 2c  |. 14.....plot(4,|
000012d0  2d 31 37 35 2c 2d 31 30  2c 32 30 29 0d 0a d2 31  |-175,-10,20)...1|
000012e0  f2 70 6c 6f 74 28 34 2c  2d 31 37 35 2b 77 69 6e  |.plot(4,-175+win|
000012f0  64 2a 31 30 30 2b 66 6c  75 74 74 65 72 2c 2d 36  |d*100+flutter,-6|
00001300  30 2c 32 30 2b 66 6c 75  74 74 65 72 29 0d 0a dc  |0,20+flutter)...|
00001310  19 f2 70 6c 6f 74 28 38  35 2c 2d 31 37 35 2c 2d  |..plot(85,-175,-|
00001320  34 30 2c 32 30 29 0d 0a  e6 08 e6 20 31 30 0d 0a  |40,20)..... 10..|
00001330  f0 19 f2 70 6c 6f 74 28  34 2c 2d 31 37 35 2c 2d  |...plot(4,-175,-|
00001340  31 35 30 2c 32 30 29 0d  0a fa 32 f2 70 6c 6f 74  |150,20)...2.plot|
00001350  28 35 2c 2d 31 37 35 2b  77 69 6e 64 2a 31 30 30  |(5,-175+wind*100|
00001360  2b 66 6c 75 74 74 65 72  2c 2d 31 35 30 2c 32 30  |+flutter,-150,20|
00001370  2b 66 6c 75 74 74 65 72  29 0d 0b 04 05 e1 0d 0b  |+flutter).......|
00001380  0e 04 0d 0b 18 0c dd f2  61 72 72 6f 77 73 0d 0b  |........arrows..|
00001390  22 11 e7 20 61 72 72 6f  77 73 3c 3d 31 20 e1 0d  |".. arrows<=1 ..|
000013a0  0b 2c 18 e3 20 61 72 72  6f 77 3d 31 20 b8 20 61  |.,.. arrow=1 . a|
000013b0  72 72 6f 77 73 2d 31 0d  0b 36 08 e6 20 31 30 0d  |rrows-1..6.. 10.|
000013c0  0b 40 20 f2 70 6c 6f 74  28 34 2c 31 38 30 2c 2d  |.@ .plot(4,180,-|
000013d0  31 35 30 2c 36 2a 61 72  72 6f 77 2b 31 30 29 0d  |150,6*arrow+10).|
000013e0  0b 4a 20 f2 70 6c 6f 74  28 35 2c 32 30 30 2c 2d  |.J .plot(5,200,-|
000013f0  31 35 30 2c 36 2a 61 72  72 6f 77 2b 31 30 29 0d  |150,6*arrow+10).|
00001400  0b 54 05 ed 0d 0b 5e 18  e3 20 61 72 72 6f 77 3d  |.T....^.. arrow=|
00001410  31 20 b8 20 61 72 72 6f  77 73 2d 31 0d 0b 68 07  |1 . arrows-1..h.|
00001420  e6 20 37 0d 0b 72 20 f2  70 6c 6f 74 28 34 2c 31  |. 7..r .plot(4,1|
00001430  38 30 2c 2d 31 35 30 2c  36 2a 61 72 72 6f 77 2b  |80,-150,6*arrow+|
00001440  31 30 29 0d 0b 7c 1f f2  70 6c 6f 74 28 35 2c 32  |10)..|..plot(5,2|
00001450  30 30 2c 2d 35 30 2c 36  2a 61 72 72 6f 77 2b 31  |00,-50,6*arrow+1|
00001460  30 29 0d 0b 86 08 e6 20  31 35 0d 0b 90 22 f2 70  |0)..... 15...".p|
00001470  6c 6f 74 28 34 2c 31 38  30 2c 2d 31 35 30 2c 36  |lot(4,180,-150,6|
00001480  2a 61 72 72 6f 77 2b 31  30 2b 31 29 0d 0b 9a 22  |*arrow+10+1)..."|
00001490  f2 70 6c 6f 74 28 34 2c  31 38 30 2c 2d 31 35 30  |.plot(4,180,-150|
000014a0  2c 36 2a 61 72 72 6f 77  2b 31 30 2d 31 29 0d 0b  |,6*arrow+10-1)..|
000014b0  a4 21 f2 70 6c 6f 74 28  38 35 2c 31 38 33 2c 2d  |.!.plot(85,183,-|
000014c0  31 33 35 2c 36 2a 61 72  72 6f 77 2b 31 30 29 0d  |135,6*arrow+10).|
000014d0  0b ae 21 f2 70 6c 6f 74  28 34 2c 32 30 30 2c 2d  |..!.plot(4,200,-|
000014e0  35 30 2c 36 2a 61 72 72  6f 77 2b 31 30 2b 32 29  |50,6*arrow+10+2)|
000014f0  0d 0b b8 21 f2 70 6c 6f  74 28 34 2c 32 30 30 2c  |...!.plot(4,200,|
00001500  2d 35 30 2c 36 2a 61 72  72 6f 77 2b 31 30 2d 32  |-50,6*arrow+10-2|
00001510  29 0d 0b c2 20 f2 70 6c  6f 74 28 38 35 2c 32 30  |)... .plot(85,20|
00001520  33 2c 2d 34 30 2c 36 2a  61 72 72 6f 77 2b 31 30  |3,-40,6*arrow+10|
00001530  29 0d 0b cc 05 ed 0d 0b  d6 05 e1 0d 0b e0 04 0d  |)...............|
00001540  0b ea 10 dd f2 73 77 61  70 73 63 72 65 65 6e 0d  |.....swapscreen.|
00001550  0b f4 13 c8 99 20 36 2c  31 31 32 2c 73 63 72 65  |..... 6,112,scre|
00001560  65 6e 0d 0b fe 15 73 63  72 65 65 6e 3d 73 63 72  |en....screen=scr|
00001570  65 65 6e 20 82 20 33 0d  0c 08 13 c8 99 20 36 2c  |een . 3...... 6,|
00001580  31 31 33 2c 73 63 72 65  65 6e 0d 0c 12 06 c8 96  |113,screen......|
00001590  0d 0c 1c 05 db 0d 0c 26  05 e1 0d 0c 30 04 0d 0c  |.......&....0...|
000015a0  3a 0a dd f2 74 65 78 74  0d 0c 44 0c fb 20 31 32  |:...text..D.. 12|
000015b0  38 2b 31 33 0d 0c 4e 07  fb 20 30 0d 0c 58 11 f1  |8+13..N.. 0..X..|
000015c0  8a 30 2c 31 29 3b 89 28  38 30 29 3b 0d 0c 62 12  |.0,1);.(80);..b.|
000015d0  f1 8a 30 2c 33 30 29 3b  89 28 38 30 29 3b 0d 0c  |..0,30);.(80);..|
000015e0  6c 24 f1 8a 34 30 2d a9  28 6d 65 73 73 61 67 65  |l$..40-.(message|
000015f0  24 29 2f 32 2c 33 30 29  3b 6d 65 73 73 61 67 65  |$)/2,30);message|
00001600  24 3b 0d 0c 76 09 fb 20  31 32 38 0d 0c 80 08 fb  |$;..v.. 128.....|
00001610  20 31 31 0d 0c 8a 43 f1  8a 31 33 2c 30 29 3b 22  | 11...C..13,0);"|
00001620  41 72 63 68 65 72 79 20  20 20 20 20 2d 20 20 20  |Archery     -   |
00001630  20 20 42 79 20 20 54 69  6d 20 4a 6f 6e 65 73 20  |  By  Tim Jones |
00001640  20 20 20 20 2d 20 20 20  20 20 4d 61 72 63 68 20  |    -     March |
00001650  31 39 39 30 22 3b 0d 0c  94 24 e7 20 61 72 72 6f  |1990";...$. arro|
00001660  77 73 3e 2d 31 20 6e 75  6d 3d 33 2d 61 72 72 6f  |ws>-1 num=3-arro|
00001670  77 73 20 8b 20 6e 75 6d  3d 30 0d 0c 9e 14 6d 3d  |ws . num=0....m=|
00001680  6f 6c 64 6c 65 6e 67 74  68 20 81 20 33 30 0d 0c  |oldlength . 30..|
00001690  a8 34 f1 8a 34 2c 33 31  29 3b 22 44 69 73 74 61  |.4..4,31);"Dista|
000016a0  6e 63 65 20 74 6f 20 74  61 72 67 65 74 20 22 3b  |nce to target ";|
000016b0  6c 65 6e 67 74 68 20 81  20 33 30 3b 22 6d 20 20  |length . 30;"m  |
000016c0  22 3b 0d 0c b2 36 f1 8a  33 31 2c 33 31 29 3b 22  |";...6..31,31);"|
000016d0  54 68 65 20 22 3b 6d 3b  22 6d 20 68 69 2d 73 63  |The ";m;"m hi-sc|
000016e0  6f 72 65 20 69 73 20 22  3b 68 69 73 63 6f 72 65  |ore is ";hiscore|
000016f0  28 6d 29 3b 22 20 22 3b  0d 0c bc 23 f1 8a 36 33  |(m);" ";...#..63|
00001700  2c 33 31 29 3b 22 73 63  6f 72 65 20 69 73 20 22  |,31);"score is "|
00001710  3b 73 63 6f 72 65 3b 22  20 22 3b 0d 0c c6 2e e7  |;score;" ";.....|
00001720  20 64 65 6d 6f 20 f1 8a  35 38 2c 33 31 29 3b 22  | demo ..58,31);"|
00001730  44 65 6d 6f 22 3b 20 8b  20 f1 8a 35 38 2c 33 31  |Demo"; . ..58,31|
00001740  29 3b 22 59 6f 75 72 22  3b 0d 0c d0 08 e6 20 31  |);"Your";..... 1|
00001750  33 0d 0c da 19 c8 93 20  c8 90 20 2d 36 34 30 2c  |3...... .. -640,|
00001760  2d 35 31 32 2c 34 2c 39  35 36 0d 0c e4 18 c8 93  |-512,4,956......|
00001770  20 c8 90 20 36 33 34 2c  2d 35 31 32 2c 34 2c 39  | .. 634,-512,4,9|
00001780  35 36 0d 0c ee 05 e1 0d  0c f8 04 0d 0d 02 0b dd  |56..............|
00001790  f2 65 72 72 6f 72 0d 0d  0c 07 d9 23 30 0d 0d 16  |.error.....#0...|
000017a0  09 f2 6b 69 6c 6c 0d 0d  20 21 e7 20 9f 3d 31 37  |..kill.. !. .=17|
000017b0  20 c8 99 20 36 2c 31 33  38 2c 30 2c 31 33 3a 2a  | .. 6,138,0,13:*|
000017c0  44 65 73 6b 54 6f 70 0d  0d 2a 07 eb 20 30 0d 0d  |DeskTop..*.. 0..|
000017d0  34 05 f6 0d 0d 3e 13 f1  3b 22 20 61 74 20 6c 69  |4....>..;" at li|
000017e0  6e 65 20 22 3b 9e 0d 0d  48 05 e0 0d 0d 52 05 e1  |ne ";...H....R..|
000017f0  0d 0d 5c 04 0d 0d 66 0a  dd f2 6b 69 6c 6c 0d 0d  |..\...f...kill..|
00001800  70 10 2a 52 6d 4b 69 6c  6c 20 46 69 72 65 0d 0d  |p.*RmKill Fire..|
00001810  7a 0f 2a 52 6d 4b 69 6c  6c 20 48 69 74 0d 0d 84  |z.*RmKill Hit...|
00001820  14 2a 52 6d 4b 69 6c 6c  20 4d 65 6d 41 6c 6c 6f  |.*RmKill MemAllo|
00001830  63 0d 0d 8e 05 e1 0d 0d  98 04 0d 0d a2 18 dd f2  |c...............|
00001840  66 69 72 65 28 78 2c 79  2c 78 73 2c 79 73 2c 7a  |fire(x,y,xs,ys,z|
00001850  73 29 0d 0d ac 14 7a 3d  62 6f 77 7a 2b 32 30 2d  |s)....z=bowz+20-|
00001860  62 65 6e 64 2a 33 0d 0d  b6 08 67 73 3d 30 0d 0d  |bend*3....gs=0..|
00001870  c0 11 d4 20 32 2c 2d 31  35 2c 30 2c 32 35 35 0d  |... 2,-15,0,255.|
00001880  0d ca 15 6d 65 73 73 61  67 65 24 3d c4 37 30 2c  |...message$=.70,|
00001890  22 20 22 29 0d 0d d4 05  f5 0d 0d de 0b f2 74 61  |" ")..........ta|
000018a0  72 67 65 74 0d 0d e8 11  f2 61 72 72 6f 77 28 78  |rget.....arrow(x|
000018b0  2c 79 2c 7a 29 0d 0d f2  0f f2 73 77 61 70 73 63  |,y,z).....swapsc|
000018c0  72 65 65 6e 0d 0d fc 14  78 2b 3d 78 73 2f 28 32  |reen....x+=xs/(2|
000018d0  35 2d 73 70 65 65 64 29  0d 0e 06 17 79 2b 3d 79  |5-speed)....y+=y|
000018e0  73 2f 28 32 35 2d 73 70  65 65 64 29 2d 67 73 0d  |s/(25-speed)-gs.|
000018f0  0e 10 14 7a 2b 3d 7a 73  2f 28 32 35 2d 73 70 65  |...z+=zs/(25-spe|
00001900  65 64 29 0d 0e 1a 0c 78  73 2b 3d 77 69 6e 64 0d  |ed)....xs+=wind.|
00001910  0e 24 0f 67 73 2b 3d 67  72 61 76 69 74 79 0d 0e  |.$.gs+=gravity..|
00001920  2e 0c 7a 73 3d 73 70 65  65 64 0d 0e 38 16 e7 20  |..zs=speed..8.. |
00001930  79 3c 3d 2d 31 35 30 20  73 70 65 65 64 3d 2d 31  |y<=-150 speed=-1|
00001940  0d 0e 42 18 fd 20 73 70  65 65 64 3c 30 20 84 20  |..B.. speed<0 . |
00001950  7a 3e 6c 65 6e 67 74 68  0d 0e 4c 11 61 64 6a 3d  |z>length..L.adj=|
00001960  6c 65 6e 67 74 68 2f 33  30 0d 0e 56 0f 61 69 6d  |length/30..V.aim|
00001970  78 2b 3d 78 2f 61 64 6a  0d 0e 60 0f 61 69 6d 79  |x+=x/adj..`.aimy|
00001980  2b 3d 79 2f 61 64 6a 0d  0e 6a 18 64 69 73 74 3d  |+=y/adj..j.dist=|
00001990  a8 28 b6 28 78 5e 32 2b  79 5e 32 29 29 2d 31 0d  |.(.(x^2+y^2))-1.|
000019a0  0e 74 12 72 69 6e 67 3d  64 69 73 74 20 81 20 31  |.t.ring=dist . 1|
000019b0  30 0d 0e 7e 0f e7 20 72  69 6e 67 3c 3d 39 20 8c  |0..~.. ring<=9 .|
000019c0  0d 0e 88 2e 6d 65 73 73  61 67 65 24 3d 22 59 6f  |....message$="Yo|
000019d0  75 72 20 61 72 72 6f 77  20 68 69 74 20 74 68 65  |ur arrow hit the|
000019e0  20 22 2b 72 69 6e 67 24  28 72 69 6e 67 29 0d 0e  | "+ring$(ring)..|
000019f0  92 05 cc 0d 0e 9c 0f 6d  65 73 73 61 67 65 24 3d  |.......message$=|
00001a00  22 22 0d 0e a6 26 e7 20  78 3c 2d 32 30 20 6d 65  |""...&. x<-20 me|
00001a10  73 73 61 67 65 24 2b 3d  22 74 6f 20 74 68 65 20  |ssage$+="to the |
00001a20  6c 65 66 74 20 6f 66 22  0d 0e b0 26 e7 20 78 3e  |left of"...&. x>|
00001a30  32 30 20 6d 65 73 73 61  67 65 24 2b 3d 22 74 6f  |20 message$+="to|
00001a40  20 74 68 65 20 72 69 67  68 74 20 6f 66 22 0d 0e  | the right of"..|
00001a50  ba 13 e7 20 6d 65 73 73  61 67 65 24 3d 22 22 20  |... message$="" |
00001a60  8c 0d 0e c4 1d e7 20 79  3c 2d 32 30 20 6d 65 73  |...... y<-20 mes|
00001a70  73 61 67 65 24 2b 3d 22  62 65 6c 6f 77 22 0d 0e  |sage$+="below"..|
00001a80  ce 1c e7 20 79 3e 32 30  20 6d 65 73 73 61 67 65  |... y>20 message|
00001a90  24 2b 3d 22 61 62 6f 76  65 22 0d 0e d8 05 cc 0d  |$+="above"......|
00001aa0  0e e2 22 e7 20 79 3c 2d  32 30 20 6d 65 73 73 61  |..". y<-20 messa|
00001ab0  67 65 24 2b 3d 22 20 61  6e 64 20 62 65 6c 6f 77  |ge$+=" and below|
00001ac0  22 0d 0e ec 21 e7 20 79  3e 32 30 20 6d 65 73 73  |"...!. y>20 mess|
00001ad0  61 67 65 24 2b 3d 22 20  61 6e 64 20 61 62 6f 76  |age$+=" and abov|
00001ae0  65 22 0d 0e f6 05 cd 0d  0f 00 36 6d 65 73 73 61  |e"........6messa|
00001af0  67 65 24 3d 22 59 6f 75  72 20 61 72 72 6f 77 20  |ge$="Your arrow |
00001b00  77 65 6e 74 20 22 2b 6d  65 73 73 61 67 65 24 2b  |went "+message$+|
00001b10  22 20 74 68 65 20 74 61  72 67 65 74 22 0d 0f 0a  |" the target"...|
00001b20  05 cd 0d 0f 14 1a e7 20  72 69 6e 67 3c 3d 39 20  |....... ring<=9 |
00001b30  80 20 7a 3e 6c 65 6e 67  74 68 20 8c 0d 0f 1e 12  |. z>length .....|
00001b40  73 63 6f 72 65 2b 3d 31  30 2d 72 69 6e 67 0d 0f  |score+=10-ring..|
00001b50  28 0b 68 69 74 73 2b 3d  31 0d 0f 32 10 68 69 74  |(.hits+=1..2.hit|
00001b60  78 28 68 69 74 73 29 3d  78 0d 0f 3c 10 68 69 74  |x(hits)=x..<.hit|
00001b70  79 28 68 69 74 73 29 3d  79 0d 0f 46 26 d4 20 31  |y(hits)=y..F&. 1|
00001b80  2c 2d 28 28 31 30 30 2d  6c 65 6e 67 74 68 2f 33  |,-((100-length/3|
00001b90  30 29 2f 39 30 2a 31 35  29 2c 30 2c 32 35 35 0d  |0)/90*15),0,255.|
00001ba0  0f 50 12 e3 20 66 6c 61  73 68 3d 30 20 b8 20 31  |.P.. flash=0 . 1|
00001bb0  30 0d 0f 5a 1e fb 20 28  72 69 6e 67 20 81 20 32  |0..Z.. (ring . 2|
00001bc0  29 2b 31 2c 32 35 35 2c  32 35 35 2c 32 35 35 0d  |)+1,255,255,255.|
00001bd0  0f 64 0b f2 74 61 72 67  65 74 0d 0f 6e 0f f2 73  |.d..target..n..s|
00001be0  77 61 70 73 63 72 65 65  6e 0d 0f 78 0c f2 63 6f  |wapscreen..x..co|
00001bf0  6c 6f 75 72 73 0d 0f 82  06 c8 96 0d 0f 8c 05 ed  |lours...........|
00001c00  0d 0f 96 05 cd 0d 0f a0  05 e1 0d 0f aa 04 0d 0f  |................|
00001c10  b4 10 dd f2 6c 6f 61 64  73 63 6f 72 65 73 0d 0f  |....loadscores..|
00001c20  be 25 66 69 6c 65 3d 8e  28 22 3c 41 72 63 68 65  |.%file=.("<Arche|
00001c30  72 79 24 44 69 72 3e 2e  48 69 2d 53 63 6f 72 65  |ry$Dir>.Hi-Score|
00001c40  73 22 29 0d 0f c8 0e e7  20 66 69 6c 65 3d 30 20  |s")..... file=0 |
00001c50  e1 0d 0f d2 12 e3 20 6c  6f 61 64 3d 30 20 b8 20  |...... load=0 . |
00001c60  31 30 30 0d 0f dc 18 68  69 73 63 6f 72 65 28 6c  |100....hiscore(l|
00001c70  6f 61 64 29 3d 9a 23 66  69 6c 65 0d 0f e6 05 ed  |oad)=.#file.....|
00001c80  0d 0f f0 0a d9 23 66 69  6c 65 0d 0f fa 05 e1 0d  |.....#file......|
00001c90  10 04 04 0d 10 0e 10 dd  f2 73 61 76 65 73 63 6f  |.........savesco|
00001ca0  72 65 73 0d 10 18 0e e7  20 73 61 76 65 3d a3 20  |res..... save=. |
00001cb0  e1 0d 10 22 25 66 69 6c  65 3d ae 28 22 3c 41 72  |..."%file=.("<Ar|
00001cc0  63 68 65 72 79 24 44 69  72 3e 2e 48 69 2d 53 63  |chery$Dir>.Hi-Sc|
00001cd0  6f 72 65 73 22 29 0d 10  2c 0e e7 20 66 69 6c 65  |ores")..,.. file|
00001ce0  3d 30 20 e1 0d 10 36 12  e3 20 6c 6f 61 64 3d 30  |=0 ...6.. load=0|
00001cf0  20 b8 20 31 30 30 0d 10  40 18 d5 23 66 69 6c 65  | . 100..@..#file|
00001d00  2c 68 69 73 63 6f 72 65  28 6c 6f 61 64 29 0d 10  |,hiscore(load)..|
00001d10  4a 05 ed 0d 10 54 0a d9  23 66 69 6c 65 0d 10 5e  |J....T..#file..^|
00001d20  05 e1 0d 10 68 04 0d 10  72 0d dd f2 63 6f 6c 6f  |....h...r...colo|
00001d30  75 72 73 0d 10 7c 2d fb  20 30 2c 30 2c 30 2c 30  |urs..|-. 0,0,0,0|
00001d40  20 3a f4 20 42 61 63 6b  20 67 72 6f 75 6e 64 20  | :. Back ground |
00001d50  26 20 53 68 61 64 6f 77  73 20 26 20 42 69 72 64  |& Shadows & Bird|
00001d60  0d 10 86 1f fb 20 30 2c  34 30 2c 38 30 2c 38 30  |..... 0,40,80,80|
00001d70  20 3a f4 20 42 61 63 6b  20 67 72 6f 75 6e 64 0d  | :. Back ground.|
00001d80  10 90 1b fb 20 31 2c 31  38 30 2c 31 33 30 2c 30  |.... 1,180,130,0|
00001d90  20 3a f4 20 54 61 72 67  65 74 0d 10 9a 19 fb 20  | :. Target..... |
00001da0  32 2c 32 30 30 2c 30 2c  30 20 3a f4 20 54 61 72  |2,200,0,0 :. Tar|
00001db0  67 65 74 0d 10 a4 19 fb  20 33 2c 30 2c 30 2c 32  |get..... 3,0,0,2|
00001dc0  30 30 20 3a f4 20 54 61  72 67 65 74 0d 10 ae 17  |00 :. Target....|
00001dd0  fb 20 34 2c 30 2c 30 2c  30 20 3a f4 20 54 61 72  |. 4,0,0,0 :. Tar|
00001de0  67 65 74 0d 10 b8 1d fb  20 35 2c 32 30 30 2c 32  |get..... 5,200,2|
00001df0  30 30 2c 32 30 30 20 3a  f4 20 54 61 72 67 65 74  |00,200 :. Target|
00001e00  0d 10 c2 1c fb 20 36 2c  31 30 30 2c 31 30 30 2c  |..... 6,100,100,|
00001e10  31 30 30 20 3a f4 20 46  6c 6f 6f 72 0d 10 cc 26  |100 :. Floor...&|
00001e20  fb 20 37 2c 32 34 30 2c  32 34 30 2c 30 20 3a f4  |. 7,240,240,0 :.|
00001e30  20 41 72 72 6f 77 20 26  20 46 6c 61 67 20 50 6f  | Arrow & Flag Po|
00001e40  6c 65 0d 10 d6 25 fb 20  38 2c 35 30 2c 31 35 30  |le...%. 8,50,150|
00001e50  2c 30 20 3a f4 20 47 72  61 73 73 20 26 20 4d 6f  |,0 :. Grass & Mo|
00001e60  75 6e 74 61 69 6e 73 0d  10 e0 19 fb 20 39 2c 31  |untains..... 9,1|
00001e70  31 30 2c 39 30 2c 30 20  3a f4 20 46 65 6e 63 65  |10,90,0 :. Fence|
00001e80  0d 10 ea 25 fb 20 31 30  2c 38 30 2c 38 30 2c 38  |...%. 10,80,80,8|
00001e90  30 20 3a f4 20 53 74 72  69 6e 67 20 26 20 53 68  |0 :. String & Sh|
00001ea0  61 64 6f 77 73 0d 10 f4  39 fb 20 31 31 2c 31 35  |adows...9. 11,15|
00001eb0  30 2c 31 35 30 2c 32 30  30 20 3a f4 20 54 65 78  |0,150,200 :. Tex|
00001ec0  74 20 26 20 42 6f 77 20  26 20 54 61 72 67 65 74  |t & Bow & Target|
00001ed0  73 20 73 74 61 6e 64 20  26 20 42 69 72 64 0d 10  |s stand & Bird..|
00001ee0  fe 19 fb 20 31 32 2c 37  30 2c 39 30 2c 31 35 30  |... 12,70,90,150|
00001ef0  20 3a f4 20 53 6b 79 0d  11 08 1c fb 20 31 33 2c  | :. Sky..... 13,|
00001f00  30 2c 31 33 30 2c 32 34  30 20 3a f4 20 42 6f 72  |0,130,240 :. Bor|
00001f10  64 65 72 0d 11 12 18 fb  20 31 34 2c 30 2c 32 30  |der..... 14,0,20|
00001f20  30 2c 30 20 3a f4 20 46  6c 61 67 0d 11 1c 2b fb  |0,0 :. Flag...+.|
00001f30  20 31 35 2c 32 30 30 2c  31 35 30 2c 32 30 30 20  | 15,200,150,200 |
00001f40  3a f4 20 41 72 72 6f 77  20 48 65 61 64 73 20 26  |:. Arrow Heads &|
00001f50  20 54 61 69 6c 73 0d 11  26 16 ef 20 31 39 2c 30  | Tails..&.. 19,0|
00001f60  2c 32 34 2c 34 30 2c 38  30 2c 38 30 0d 11 30 05  |,24,40,80,80..0.|
00001f70  e1 0d 11 3a 04 0d 11 44  0e dd f2 72 65 61 64 64  |...:...D...readd|
00001f80  61 74 61 0d 11 4e 0c 78  73 69 7a 65 3d 32 30 0d  |ata..N.xsize=20.|
00001f90  11 58 0c 79 73 69 7a 65  3d 36 30 0d 11 62 0b 78  |.X.ysize=60..b.x|
00001fa0  73 69 7a 3d 2e 35 0d 11  6c 0c 79 73 69 7a 3d 31  |siz=.5..l.ysiz=1|
00001fb0  2e 39 0d 11 76 0b 74 6f  74 61 6c 3d 30 0d 11 80  |.9..v.total=0...|
00001fc0  0a f7 20 8d 64 72 57 0d  11 8a 0b f3 20 77 6f 72  |.. .drW..... wor|
00001fd0  64 73 0d 11 94 14 e3 20  77 6f 72 64 3d 31 20 b8  |ds..... word=1 .|
00001fe0  20 77 6f 72 64 73 0d 11  9e 0d f3 20 6c 65 74 74  | words..... lett|
00001ff0  65 72 73 0d 11 a8 1f 63  65 6e 74 65 72 3d 28 6c  |ers....center=(l|
00002000  65 74 74 65 72 73 2a 78  73 69 7a 65 29 2f 32 2b  |etters*xsize)/2+|
00002010  31 35 0d 11 b2 18 e3 20  6c 65 74 74 65 72 3d 31  |15..... letter=1|
00002020  20 b8 20 6c 65 74 74 65  72 73 0d 11 bc 0b f3 20  | . letters..... |
00002030  6c 69 6e 65 73 0d 11 c6  14 e3 20 6c 69 6e 65 3d  |lines..... line=|
00002040  31 20 b8 20 6c 69 6e 65  73 0d 11 d0 13 f3 20 6c  |1 . lines..... l|
00002050  69 6e 65 28 30 2c 74 6f  74 61 6c 29 0d 11 da 13  |ine(0,total)....|
00002060  f3 20 6c 69 6e 65 28 31  2c 74 6f 74 61 6c 29 0d  |. line(1,total).|
00002070  11 e4 13 f3 20 6c 69 6e  65 28 32 2c 74 6f 74 61  |.... line(2,tota|
00002080  6c 29 0d 11 ee 13 f3 20  6c 69 6e 65 28 33 2c 74  |l)..... line(3,t|
00002090  6f 74 61 6c 29 0d 11 f8  39 6c 30 3d 2d 33 30 30  |otal)...9l0=-300|
000020a0  2a 9b b2 28 6c 69 6e 65  28 30 2c 74 6f 74 61 6c  |*..(line(0,total|
000020b0  29 2a 78 73 69 7a 2b 6c  65 74 74 65 72 2a 78 73  |)*xsiz+letter*xs|
000020c0  69 7a 65 2d 63 65 6e 74  65 72 2b 39 30 29 0d 12  |ize-center+90)..|
000020d0  02 3c 6c 31 3d 31 30 30  2a b5 b2 28 6c 69 6e 65  |.<l1=100*..(line|
000020e0  28 30 2c 74 6f 74 61 6c  29 2a 78 73 69 7a 2b 6c  |(0,total)*xsiz+l|
000020f0  65 74 74 65 72 2a 78 73  69 7a 65 2d 63 65 6e 74  |etter*xsize-cent|
00002100  65 72 2b 39 30 29 2b 31  35 30 0d 12 0c 27 6c 32  |er+90)+150...'l2|
00002110  3d 28 2d 6c 69 6e 65 28  31 2c 74 6f 74 61 6c 29  |=(-line(1,total)|
00002120  2a 79 73 69 7a 2b 77 6f  72 64 2a 79 73 69 7a 65  |*ysiz+word*ysize|
00002130  29 0d 12 16 39 6c 33 3d  2d 33 30 30 2a 9b b2 28  |)...9l3=-300*..(|
00002140  6c 69 6e 65 28 32 2c 74  6f 74 61 6c 29 2a 78 73  |line(2,total)*xs|
00002150  69 7a 2b 6c 65 74 74 65  72 2a 78 73 69 7a 65 2d  |iz+letter*xsize-|
00002160  63 65 6e 74 65 72 2b 39  30 29 0d 12 20 3c 6c 34  |center+90).. <l4|
00002170  3d 31 30 30 2a b5 b2 28  6c 69 6e 65 28 32 2c 74  |=100*..(line(2,t|
00002180  6f 74 61 6c 29 2a 78 73  69 7a 2b 6c 65 74 74 65  |otal)*xsiz+lette|
00002190  72 2a 78 73 69 7a 65 2d  63 65 6e 74 65 72 2b 39  |r*xsize-center+9|
000021a0  30 29 2b 31 35 30 0d 12  2a 27 6c 35 3d 28 2d 6c  |0)+150..*'l5=(-l|
000021b0  69 6e 65 28 33 2c 74 6f  74 61 6c 29 2a 79 73 69  |ine(3,total)*ysi|
000021c0  7a 2b 77 6f 72 64 2a 79  73 69 7a 65 29 0d 12 34  |z+word*ysize)..4|
000021d0  14 6c 69 6e 65 28 30 2c  74 6f 74 61 6c 29 3d 6c  |.line(0,total)=l|
000021e0  30 0d 12 3e 14 6c 69 6e  65 28 31 2c 74 6f 74 61  |0..>.line(1,tota|
000021f0  6c 29 3d 6c 31 0d 12 48  14 6c 69 6e 65 28 32 2c  |l)=l1..H.line(2,|
00002200  74 6f 74 61 6c 29 3d 6c  32 0d 12 52 14 6c 69 6e  |total)=l2..R.lin|
00002210  65 28 33 2c 74 6f 74 61  6c 29 3d 6c 33 0d 12 5c  |e(3,total)=l3..\|
00002220  14 6c 69 6e 65 28 34 2c  74 6f 74 61 6c 29 3d 6c  |.line(4,total)=l|
00002230  34 0d 12 66 14 6c 69 6e  65 28 35 2c 74 6f 74 61  |4..f.line(5,tota|
00002240  6c 29 3d 6c 35 0d 12 70  0c 74 6f 74 61 6c 2b 3d  |l)=l5..p.total+=|
00002250  31 0d 12 7a 05 ed 0d 12  84 05 ed 0d 12 8e 05 ed  |1..z............|
00002260  0d 12 98 0c 74 6f 74 61  6c 2d 3d 31 0d 12 a2 05  |....total-=1....|
00002270  e1 0d 12 ac 04 0d 12 b6  11 dd f2 73 74 61 72 74  |...........start|
00002280  73 63 72 65 65 6e 0d 12  c0 0e c8 91 20 36 34 30  |screen...... 640|
00002290  2c 35 34 34 0d 12 ca 2c  6d 65 73 73 61 67 65 24  |,544...,message$|
000022a0  3d 22 50 72 65 73 73 20  61 20 6d 6f 75 73 65 20  |="Press a mouse |
000022b0  62 75 74 74 6f 6e 20 74  6f 20 73 74 61 72 74 22  |button to start"|
000022c0  0d 12 d4 14 f2 74 61 72  67 65 74 31 28 6c 65 6e  |.....target1(len|
000022d0  67 74 68 29 0d 12 de 16  f2 62 6f 77 28 38 35 2c  |gth).....bow(85,|
000022e0  2d 33 35 2c 2d 32 30 2c  32 29 0d 12 e8 0d f2 61  |-35,-20,2).....a|
000022f0  62 74 6a 28 39 30 29 0d  12 f2 0e f2 67 65 74 73  |btj(90).....gets|
00002300  63 72 65 65 6e 0d 12 fc  05 db 0d 13 06 05 e1 0d  |creen...........|
00002310  13 10 04 0d 13 1a 10 dd  f2 61 62 74 6a 28 62 61  |.........abtj(ba|
00002320  63 6b 29 0d 13 24 07 e6  20 37 0d 13 2e 14 e3 20  |ck)..$.. 7..... |
00002330  6c 69 6e 65 3d 30 20 b8  20 74 6f 74 61 6c 0d 13  |line=0 . total..|
00002340  38 38 f2 70 6c 6f 74 28  34 2c 6c 69 6e 65 28 30  |88.plot(4,line(0|
00002350  2c 6c 69 6e 65 29 2c 6c  69 6e 65 28 31 2c 6c 69  |,line),line(1,li|
00002360  6e 65 29 2c 6c 69 6e 65  28 32 2c 6c 69 6e 65 29  |ne),line(2,line)|
00002370  2b 62 61 63 6b 29 0d 13  42 38 f2 70 6c 6f 74 28  |+back)..B8.plot(|
00002380  35 2c 6c 69 6e 65 28 33  2c 6c 69 6e 65 29 2c 6c  |5,line(3,line),l|
00002390  69 6e 65 28 34 2c 6c 69  6e 65 29 2c 6c 69 6e 65  |ine(4,line),line|
000023a0  28 35 2c 6c 69 6e 65 29  2b 62 61 63 6b 29 0d 13  |(5,line)+back)..|
000023b0  4c 05 ed 0d 13 56 05 e1  0d 13 60 04 0d 13 6a 0f  |L....V....`...j.|
000023c0  dd f2 6d 6f 75 6e 74 61  69 6e 73 0d 13 74 0f f2  |..mountains..t..|
000023d0  73 77 61 70 73 63 72 65  65 6e 0d 13 7e 08 e6 20  |swapscreen..~.. |
000023e0  31 32 0d 13 88 15 c8 93  20 c8 90 20 30 2c 30 2c  |12...... .. 0,0,|
000023f0  31 32 38 30 2c 38 30 0d  13 92 0d e3 20 6d 3d 30  |1280,80..... m=0|
00002400  20 b8 20 34 0d 13 9c 08  68 3d 34 30 0d 13 a6 14  | . 4....h=40....|
00002410  e3 20 78 3d 30 20 b8 20  31 32 38 30 20 88 20 34  |. x=0 . 1280 . 4|
00002420  0d 13 b0 07 e6 20 38 0d  13 ba 0d 86 20 78 2c 30  |..... 8..... x,0|
00002430  2c 78 2c 68 0d 13 c4 07  e6 20 36 0d 13 ce 0a c8  |,x,h..... 6.....|
00002440  92 20 78 2c 68 0d 13 d8  1c 68 2b 3d b4 28 b3 28  |. x,h....h+=.(.(|
00002450  94 28 34 30 2b 38 30 2d  68 29 29 2d 34 30 29 2a  |.(40+80-h))-40)*|
00002460  34 0d 13 e2 05 ed 0d 13  ec 05 ed 0d 13 f6 09 ec  |4...............|
00002470  20 30 2c 30 0d 14 00 0d  ec 20 31 32 38 30 2c 38  | 0,0..... 1280,8|
00002480  30 0d 14 0a 13 2a 53 47  65 74 20 4d 6f 75 6e 74  |0....*SGet Mount|
00002490  61 69 6e 73 0d 14 14 05  db 0d 14 1e 05 e1 0d 14  |ains............|
000024a0  28 04 0d 14 32 0a dd f2  62 69 72 64 0d 14 3c 0e  |(...2...bird..<.|
000024b0  e7 20 62 69 72 64 6f 6b  20 8c 0d 14 46 13 66 6c  |. birdok ...F.fl|
000024c0  61 70 3d 36 2a 9b b2 28  62 69 72 64 29 0d 14 50  |ap=6*..(bird)..P|
000024d0  29 62 69 72 64 79 2b 3d  b4 28 b3 28 94 28 31 30  |)birdy+=.(.(.(10|
000024e0  30 2b 31 35 30 2a 32 2d  62 69 72 64 79 29 29 2d  |0+150*2-birdy))-|
000024f0  31 30 30 29 2a 32 0d 14  5a 17 70 31 3d b0 62 69  |100)*2..Z.p1=.bi|
00002500  72 64 78 2d 33 30 2c 62  69 72 64 79 29 0d 14 64  |rdx-30,birdy)..d|
00002510  17 70 32 3d b0 62 69 72  64 78 2b 33 30 2c 62 69  |.p2=.birdx+30,bi|
00002520  72 64 79 29 0d 14 6e 25  e7 20 28 70 31 3c 31 20  |rdy)..n%. (p1<1 |
00002530  84 20 70 31 3e 35 29 20  80 20 28 70 32 3c 31 20  |. p1>5) . (p2<1 |
00002540  84 20 70 32 3e 35 29 20  8c 0d 14 78 08 e6 20 31  |. p2>5) ...x.. 1|
00002550  31 0d 14 82 1e ec 20 62  69 72 64 78 2d 32 30 2c  |1..... birdx-20,|
00002560  62 69 72 64 79 2b 66 6c  61 70 2b 66 6c 61 70 0d  |birdy+flap+flap.|
00002570  14 8c 11 df 20 62 69 72  64 78 2c 62 69 72 64 79  |.... birdx,birdy|
00002580  0d 14 96 1e df 20 62 69  72 64 78 2b 32 30 2c 62  |..... birdx+20,b|
00002590  69 72 64 79 2b 66 6c 61  70 2b 66 6c 61 70 0d 14  |irdy+flap+flap..|
000025a0  a0 05 cd 0d 14 aa 0c 62  69 72 64 2b 3d 33 30 0d  |.......bird+=30.|
000025b0  14 b4 13 62 69 72 64 78  2b 3d 62 69 72 64 73 74  |...birdx+=birdst|
000025c0  65 70 0d 14 be 25 e7 20  62 69 72 64 78 3c 2d 36  |ep...%. birdx<-6|
000025d0  34 30 20 84 20 62 69 72  64 78 3e 36 34 30 20 62  |40 . birdx>640 b|
000025e0  69 72 64 6f 6b 3d a3 0d  14 c8 05 cc 0d 14 d2 1b  |irdok=..........|
000025f0  62 69 72 64 78 3d 28 b3  28 32 29 2d 31 29 2a 31  |birdx=(.(2)-1)*1|
00002600  32 38 30 2d 36 34 30 0d  14 dc 13 62 69 72 64 79  |280-640....birdy|
00002610  3d b3 28 33 30 30 29 2b  35 30 0d 14 e6 16 62 69  |=.(300)+50....bi|
00002620  72 64 73 74 65 70 3d 2d  62 69 72 64 78 2f 35 30  |rdstep=-birdx/50|
00002630  0d 14 f0 0a 62 69 72 64  3d 30 0d 14 fa 16 62 69  |....bird=0....bi|
00002640  72 64 6f 6b 3d 28 b3 28  31 30 30 29 3c 3d 32 29  |rdok=(.(100)<=2)|
00002650  0d 15 04 05 cd 0d 15 0e  05 e1 0d 15 18 04 0d 15  |................|
00002660  22 21 dd f2 61 72 72 6f  77 28 61 72 72 6f 77 78  |"!..arrow(arrowx|
00002670  2c 61 72 72 6f 77 79 2c  61 72 72 6f 77 7a 29 0d  |,arrowy,arrowz).|
00002680  15 2c 16 e7 20 61 72 72  6f 77 7a 20 81 20 33 30  |.,.. arrowz . 30|
00002690  3c 33 30 20 8c 0d 15 36  07 e6 20 37 0d 15 40 21  |<30 ...6.. 7..@!|
000026a0  f2 70 6c 6f 74 28 34 2c  61 72 72 6f 77 78 2c 61  |.plot(4,arrowx,a|
000026b0  72 72 6f 77 79 2c 61 72  72 6f 77 7a 29 0d 15 4a  |rrowy,arrowz)..J|
000026c0  2a f2 70 6c 6f 74 28 35  2c 61 72 72 6f 77 78 2d  |*.plot(5,arrowx-|
000026d0  78 73 2c 61 72 72 6f 77  79 2d 79 73 2c 61 72 72  |xs,arrowy-ys,arr|
000026e0  6f 77 7a 2d 33 30 29 0d  15 54 08 e6 20 31 30 0d  |owz-30)..T.. 10.|
000026f0  15 5e 1f f2 70 6c 6f 74  28 34 2c 61 72 72 6f 77  |.^..plot(4,arrow|
00002700  78 2c 2d 31 35 30 2c 61  72 72 6f 77 7a 29 0d 15  |x,-150,arrowz)..|
00002710  68 25 f2 70 6c 6f 74 28  35 2c 61 72 72 6f 77 78  |h%.plot(5,arrowx|
00002720  2d 78 73 2c 2d 31 35 30  2c 61 72 72 6f 77 7a 2d  |-xs,-150,arrowz-|
00002730  33 30 29 0d 15 72 05 cc  0d 15 7c 07 e6 20 37 0d  |30)..r....|.. 7.|
00002740  15 86 22 f2 70 6c 6f 74  28 36 39 2c 61 72 72 6f  |..".plot(69,arro|
00002750  77 78 2c 61 72 72 6f 77  79 2c 61 72 72 6f 77 7a  |wx,arrowy,arrowz|
00002760  29 0d 15 90 08 e6 20 31  30 0d 15 9a 20 f2 70 6c  |)..... 10... .pl|
00002770  6f 74 28 36 39 2c 61 72  72 6f 77 78 2c 2d 31 35  |ot(69,arrowx,-15|
00002780  30 2c 61 72 72 6f 77 7a  29 0d 15 a4 05 cd 0d 15  |0,arrowz).......|
00002790  ae 16 e7 20 61 72 72 6f  77 7a 20 81 20 33 30 3c  |... arrowz . 30<|
000027a0  31 35 20 8c 0d 15 b8 08  e6 20 31 35 0d 15 c2 30  |15 ...... 15...0|
000027b0  f2 70 6c 6f 74 28 34 2c  61 72 72 6f 77 78 2d 78  |.plot(4,arrowx-x|
000027c0  73 2a 2e 38 2c 61 72 72  6f 77 79 2d 79 73 2a 2e  |s*.8,arrowy-ys*.|
000027d0  38 2c 61 72 72 6f 77 7a  2d 32 30 29 0d 15 cc 2c  |8,arrowz-20)...,|
000027e0  f2 70 6c 6f 74 28 34 2c  61 72 72 6f 77 78 2d 78  |.plot(4,arrowx-x|
000027f0  73 2c 61 72 72 6f 77 79  2b 32 2d 79 73 2c 61 72  |s,arrowy+2-ys,ar|
00002800  72 6f 77 7a 2d 33 30 29  0d 15 d6 2d f2 70 6c 6f  |rowz-30)...-.plo|
00002810  74 28 38 35 2c 61 72 72  6f 77 78 2d 78 73 2c 61  |t(85,arrowx-xs,a|
00002820  72 72 6f 77 79 2d 32 2d  79 73 2c 61 72 72 6f 77  |rrowy-2-ys,arrow|
00002830  7a 2d 33 30 29 0d 15 e0  21 f2 70 6c 6f 74 28 34  |z-30)...!.plot(4|
00002840  2c 61 72 72 6f 77 78 2c  61 72 72 6f 77 79 2c 61  |,arrowx,arrowy,a|
00002850  72 72 6f 77 7a 29 0d 15  ea 25 f2 70 6c 6f 74 28  |rrowz)...%.plot(|
00002860  34 2c 61 72 72 6f 77 78  2c 61 72 72 6f 77 79 2b  |4,arrowx,arrowy+|
00002870  34 2c 61 72 72 6f 77 7a  2d 34 29 0d 15 f4 26 f2  |4,arrowz-4)...&.|
00002880  70 6c 6f 74 28 38 35 2c  61 72 72 6f 77 78 2c 61  |plot(85,arrowx,a|
00002890  72 72 6f 77 79 2d 34 2c  61 72 72 6f 77 7a 2d 34  |rrowy-4,arrowz-4|
000028a0  29 0d 15 fe 05 cd 0d 16  08 05 e1 0d 16 12 04 0d  |)...............|
000028b0  16 1c 1e dd f2 62 6f 77  28 62 6f 77 78 2c 62 6f  |.....bow(bowx,bo|
000028c0  77 79 2c 62 6f 77 7a 2c  62 65 6e 64 29 0d 16 26  |wy,bowz,bend)..&|
000028d0  08 e6 20 31 31 0d 16 30  2b f2 70 6c 6f 74 28 34  |.. 11..0+.plot(4|
000028e0  2c 62 6f 77 78 2c 62 6f  77 79 2b 35 30 2d 62 65  |,bowx,bowy+50-be|
000028f0  6e 64 2c 62 6f 77 7a 2d  31 30 2d 62 65 6e 64 29  |nd,bowz-10-bend)|
00002900  0d 16 3a 27 f2 70 6c 6f  74 28 35 2c 62 6f 77 78  |..:'.plot(5,bowx|
00002910  2c 62 6f 77 79 2b 32 35  2c 62 6f 77 7a 2d 32 2d  |,bowy+25,bowz-2-|
00002920  62 65 6e 64 2f 32 29 0d  16 44 1b f2 70 6c 6f 74  |bend/2)..D..plot|
00002930  28 35 2c 62 6f 77 78 2c  62 6f 77 79 2c 62 6f 77  |(5,bowx,bowy,bow|
00002940  7a 29 0d 16 4e 27 f2 70  6c 6f 74 28 35 2c 62 6f  |z)..N'.plot(5,bo|
00002950  77 78 2c 62 6f 77 79 2d  32 35 2c 62 6f 77 7a 2d  |wx,bowy-25,bowz-|
00002960  32 2d 62 65 6e 64 2f 32  29 0d 16 58 2b f2 70 6c  |2-bend/2)..X+.pl|
00002970  6f 74 28 35 2c 62 6f 77  78 2c 62 6f 77 79 2d 35  |ot(5,bowx,bowy-5|
00002980  30 2b 62 65 6e 64 2c 62  6f 77 7a 2d 31 30 2d 62  |0+bend,bowz-10-b|
00002990  65 6e 64 29 0d 16 62 08  e6 20 31 30 0d 16 6c 2b  |end)..b.. 10..l+|
000029a0  f2 70 6c 6f 74 28 34 2c  62 6f 77 78 2c 62 6f 77  |.plot(4,bowx,bow|
000029b0  79 2d 35 30 2b 62 65 6e  64 2c 62 6f 77 7a 2d 31  |y-50+bend,bowz-1|
000029c0  30 2d 62 65 6e 64 29 0d  16 76 25 f2 70 6c 6f 74  |0-bend)..v%.plot|
000029d0  28 35 2c 62 6f 77 78 2c  62 6f 77 79 2c 62 6f 77  |(5,bowx,bowy,bow|
000029e0  7a 2d 31 30 2d 62 65 6e  64 2a 33 29 0d 16 80 2b  |z-10-bend*3)...+|
000029f0  f2 70 6c 6f 74 28 35 2c  62 6f 77 78 2c 62 6f 77  |.plot(5,bowx,bow|
00002a00  79 2b 35 30 2d 62 65 6e  64 2c 62 6f 77 7a 2d 31  |y+50-bend,bowz-1|
00002a10  30 2d 62 65 6e 64 29 0d  16 8a 24 f2 61 72 72 6f  |0-bend)...$.arro|
00002a20  77 28 62 6f 77 78 2c 62  6f 77 79 2c 62 6f 77 7a  |w(bowx,bowy,bowz|
00002a30  2b 32 30 2d 62 65 6e 64  2a 33 29 0d 16 94 05 e1  |+20-bend*3).....|
00002a40  0d 16 9e 05 20 0d 16 a8  0a dd f2 6d 6f 64 65 0d  |.... ......mode.|
00002a50  16 b2 09 eb 20 31 34 30  0d 16 bc 0f f2 73 77 61  |.... 140.....swa|
00002a60  70 73 63 72 65 65 6e 0d  16 c6 05 e1 0d 16 d0 04  |pscreen.........|
00002a70  0d 16 da 12 dd f2 69 6e  73 74 72 75 63 74 69 6f  |......instructio|
00002a80  6e 73 0d 16 e4 0a f7 20  8d 54 5c 5b 0d 16 ee 08  |ns..... .T\[....|
00002a90  fb 20 31 31 0d 16 f8 05  f5 0d 17 02 0b f3 20 69  |. 11.......... i|
00002aa0  6e 73 74 24 0d 17 0c 05  f1 0d 17 16 14 e7 20 69  |nst$.......... i|
00002ab0  6e 73 74 24 3d 22 53 74  6f 70 22 20 8c 0d 17 20  |nst$="Stop" ... |
00002ac0  0c 69 6e 73 74 24 3d 22  22 0d 17 2a 0f f2 73 77  |.inst$=""..*..sw|
00002ad0  61 70 73 63 72 65 65 6e  0d 17 34 0b f2 62 75 74  |apscreen..4..but|
00002ae0  74 6f 6e 0d 17 3e 05 cd  0d 17 48 14 e7 20 69 6e  |ton..>....H.. in|
00002af0  73 74 24 3c 3e 22 45 6e  64 22 20 8c 0d 17 52 1b  |st$<>"End" ...R.|
00002b00  f1 8a 34 30 2d a9 28 69  6e 73 74 24 29 2f 32 29  |..40-.(inst$)/2)|
00002b10  3b 69 6e 73 74 24 3b 0d  17 5c 05 cd 0d 17 66 11  |;inst$;..\....f.|
00002b20  fd 20 69 6e 73 74 24 3d  22 45 6e 64 22 0d 17 70  |. inst$="End"..p|
00002b30  05 e1 0d 17 7a 04 0d 17  84 0c dd f2 76 6f 69 63  |....z.......voic|
00002b40  65 73 0d 17 8e 08 c8 a0  20 32 0d 17 98 0e c8 a1  |es...... 2......|
00002b50  20 31 2c 22 48 69 74 22  0d 17 a2 0f c8 a1 20 32  | 1,"Hit"...... 2|
00002b60  2c 22 46 69 72 65 22 0d  17 ac 05 e1 0d 17 b6 04  |,"Fire".........|
00002b70  0d 17 c0 10 dc 20 22 62  75 6c 6c 73 65 79 65 22  |..... "bullseye"|
00002b80  0d 17 ca 10 dc 20 22 72  65 64 20 72 69 6e 67 22  |..... "red ring"|
00002b90  0d 17 d4 11 dc 20 22 62  6c 75 65 20 72 69 6e 67  |..... "blue ring|
00002ba0  22 0d 17 de 12 dc 20 22  62 6c 61 63 6b 20 72 69  |"..... "black ri|
00002bb0  6e 67 22 0d 17 e8 12 dc  20 22 77 68 69 74 65 20  |ng"..... "white |
00002bc0  72 69 6e 67 22 0d 17 f2  07 dc 20 34 0d 17 fc 07  |ring"..... 4....|
00002bd0  dc 20 37 0d 18 06 07 dc  20 33 0d 18 10 0f dc 20  |. 7..... 3..... |
00002be0  30 2c 30 2c 31 30 2c 32  30 0d 18 1a 10 dc 20 31  |0,0,10,20..... 1|
00002bf0  30 2c 32 30 2c 32 30 2c  30 0d 18 24 10 dc 20 35  |0,20,20,0..$.. 5|
00002c00  2c 31 30 2c 31 35 2c 31  30 0d 18 2e 07 dc 20 35  |,10,15,10..... 5|
00002c10  0d 18 38 0e dc 20 30 2c  30 2c 30 2c 32 30 0d 18  |..8.. 0,0,0,20..|
00002c20  42 10 dc 20 30 2c 32 30  2c 32 30 2c 32 30 0d 18  |B.. 0,20,20,20..|
00002c30  4c 11 dc 20 32 30 2c 32  30 2c 32 30 2c 31 30 0d  |L.. 20,20,20,10.|
00002c40  18 56 10 dc 20 32 30 2c  31 30 2c 30 2c 31 30 0d  |.V.. 20,10,0,10.|
00002c50  18 60 10 dc 20 31 30 2c  31 30 2c 32 30 2c 30 0d  |.`.. 10,10,20,0.|
00002c60  18 6a 07 dc 20 33 0d 18  74 0e dc 20 32 30 2c 30  |.j.. 3..t.. 20,0|
00002c70  2c 30 2c 30 0d 18 7e 0e  dc 20 30 2c 30 2c 30 2c  |,0,0..~.. 0,0,0,|
00002c80  32 30 0d 18 88 10 dc 20  30 2c 32 30 2c 32 30 2c  |20..... 0,20,20,|
00002c90  32 30 0d 18 92 07 dc 20  33 0d 18 9c 0e dc 20 30  |20..... 3..... 0|
00002ca0  2c 30 2c 30 2c 32 30 0d  18 a6 10 dc 20 32 30 2c  |,0,0,20..... 20,|
00002cb0  30 2c 32 30 2c 32 30 0d  18 b0 10 dc 20 30 2c 31  |0,20,20..... 0,1|
00002cc0  30 2c 32 30 2c 31 30 0d  18 ba 07 dc 20 34 0d 18  |0,20,10..... 4..|
00002cd0  c4 0e dc 20 30 2c 30 2c  32 30 2c 30 0d 18 ce 10  |... 0,0,20,0....|
00002ce0  dc 20 30 2c 31 30 2c 31  30 2c 31 30 0d 18 d8 10  |. 0,10,10,10....|
00002cf0  dc 20 30 2c 32 30 2c 32  30 2c 32 30 0d 18 e2 0e  |. 0,20,20,20....|
00002d00  dc 20 30 2c 30 2c 30 2c  32 30 0d 18 ec 07 dc 20  |. 0,0,0,20..... |
00002d10  35 0d 18 f6 0e dc 20 30  2c 30 2c 30 2c 32 30 0d  |5..... 0,0,0,20.|
00002d20  19 00 10 dc 20 30 2c 32  30 2c 32 30 2c 32 30 0d  |.... 0,20,20,20.|
00002d30  19 0a 11 dc 20 32 30 2c  32 30 2c 32 30 2c 31 30  |.... 20,20,20,10|
00002d40  0d 19 14 10 dc 20 32 30  2c 31 30 2c 30 2c 31 30  |..... 20,10,0,10|
00002d50  0d 19 1e 10 dc 20 31 30  2c 31 30 2c 32 30 2c 30  |..... 10,10,20,0|
00002d60  0d 19 28 07 dc 20 32 0d  19 32 0f dc 20 30 2c 30  |..(.. 2..2.. 0,0|
00002d70  2c 32 30 2c 32 30 0d 19  3c 10 dc 20 30 2c 32 30  |,20,20..<.. 0,20|
00002d80  2c 31 30 2c 31 30 0d 19  46 07 dc 20 32 0d 19 50  |,10,10..F.. 2..P|
00002d90  07 dc 20 36 0d 19 5a 0e  dc 20 30 2c 30 2c 30 2c  |.. 6..Z.. 0,0,0,|
00002da0  32 30 0d 19 64 10 dc 20  30 2c 32 30 2c 31 35 2c  |20..d.. 0,20,15,|
00002db0  32 30 0d 19 6e 11 dc 20  31 35 2c 32 30 2c 31 35  |20..n.. 15,20,15|
00002dc0  2c 31 30 0d 19 78 10 dc  20 30 2c 31 30 2c 32 30  |,10..x.. 0,10,20|
00002dd0  2c 31 30 0d 19 82 10 dc  20 32 30 2c 31 30 2c 32  |,10..... 20,10,2|
00002de0  30 2c 30 0d 19 8c 0e dc  20 30 2c 30 2c 32 30 2c  |0,0..... 0,0,20,|
00002df0  30 0d 19 96 07 dc 20 32  0d 19 a0 0f dc 20 30 2c  |0..... 2..... 0,|
00002e00  30 2c 32 30 2c 32 30 0d  19 aa 10 dc 20 30 2c 32  |0,20,20..... 0,2|
00002e10  30 2c 31 30 2c 31 30 0d  19 b4 07 dc 20 33 0d 19  |0,10,10..... 3..|
00002e20  be 07 dc 20 32 0d 19 c8  10 dc 20 31 30 2c 30 2c  |... 2..... 10,0,|
00002e30  31 30 2c 32 30 0d 19 d2  10 dc 20 30 2c 32 30 2c  |10,20..... 0,20,|
00002e40  32 30 2c 32 30 0d 19 dc  07 dc 20 31 0d 19 e6 10  |20,20..... 1....|
00002e50  dc 20 31 30 2c 30 2c 31  30 2c 32 30 0d 19 f0 07  |. 10,0,10,20....|
00002e60  dc 20 34 0d 19 fa 0e dc  20 30 2c 30 2c 30 2c 32  |. 4..... 0,0,0,2|
00002e70  30 0d 1a 04 10 dc 20 30  2c 32 30 2c 31 30 2c 31  |0..... 0,20,10,1|
00002e80  30 0d 1a 0e 11 dc 20 31  30 2c 31 30 2c 32 30 2c  |0..... 10,10,20,|
00002e90  32 30 0d 1a 18 10 dc 20  32 30 2c 32 30 2c 32 30  |20..... 20,20,20|
00002ea0  2c 30 0d 1a 22 07 dc 20  35 0d 1a 2c 07 dc 20 33  |,0..".. 5..,.. 3|
00002eb0  0d 1a 36 10 dc 20 30 2c  32 30 2c 32 30 2c 32 30  |..6.. 0,20,20,20|
00002ec0  0d 1a 40 10 dc 20 31 30  2c 30 2c 31 30 2c 32 30  |..@.. 10,0,10,20|
00002ed0  0d 1a 4a 0e dc 20 31 30  2c 30 2c 30 2c 30 0d 1a  |..J.. 10,0,0,0..|
00002ee0  54 07 dc 20 34 0d 1a 5e  0e dc 20 30 2c 30 2c 32  |T.. 4..^.. 0,0,2|
00002ef0  30 2c 30 0d 1a 68 10 dc  20 32 30 2c 30 2c 32 30  |0,0..h.. 20,0,20|
00002f00  2c 32 30 0d 1a 72 10 dc  20 32 30 2c 32 30 2c 30  |,20..r.. 20,20,0|
00002f10  2c 32 30 0d 1a 7c 0e dc  20 30 2c 32 30 2c 30 2c  |,20..|.. 0,20,0,|
00002f20  30 0d 1a 86 07 dc 20 33  0d 1a 90 0e dc 20 30 2c  |0..... 3..... 0,|
00002f30  30 2c 30 2c 32 30 0d 1a  9a 0f dc 20 30 2c 32 30  |0,0,20..... 0,20|
00002f40  2c 32 30 2c 30 0d 1a a4  10 dc 20 32 30 2c 30 2c  |,20,0..... 20,0,|
00002f50  32 30 2c 32 30 0d 1a ae  07 dc 20 34 0d 1a b8 0e  |20,20..... 4....|
00002f60  dc 20 30 2c 30 2c 30 2c  32 30 0d 1a c2 0e dc 20  |. 0,0,0,20..... |
00002f70  30 2c 30 2c 32 30 2c 30  0d 1a cc 10 dc 20 30 2c  |0,0,20,0..... 0,|
00002f80  31 30 2c 31 30 2c 31 30  0d 1a d6 10 dc 20 30 2c  |10,10,10..... 0,|
00002f90  32 30 2c 32 30 2c 32 30  0d 1a e0 07 dc 20 35 0d  |20,20,20..... 5.|
00002fa0  1a ea 0e dc 20 30 2c 30  2c 32 30 2c 30 0d 1a f4  |.... 0,0,20,0...|
00002fb0  10 dc 20 32 30 2c 30 2c  32 30 2c 31 30 0d 1a fe  |.. 20,0,20,10...|
00002fc0  10 dc 20 32 30 2c 31 30  2c 30 2c 31 30 0d 1b 08  |.. 20,10,0,10...|
00002fd0  0f dc 20 30 2c 31 30 2c  30 2c 32 30 0d 1b 12 10  |.. 0,10,0,20....|
00002fe0  dc 20 30 2c 32 30 2c 32  30 2c 32 30 0d 1b 1c 1c  |. 0,20,20,20....|
00002ff0  dc 20 22 41 72 63 68 65  72 79 20 49 6e 73 74 72  |. "Archery Instr|
00003000  75 63 74 69 6f 6e 73 22  0d 1b 26 25 dc 20 22 7e  |uctions"..&%. "~|
00003010  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 7e 7e 7e 7e 7e 7e  |~~~~~~~~~~~~~~~~|
00003020  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 7e 7e 22 0d 1b 30  |~~~~~~~~~~~~"..0|
00003030  08 dc 20 22 22 0d 1b 3a  08 dc 20 22 22 0d 1b 44  |.. ""..:.. ""..D|
00003040  49 dc 20 22 41 74 20 74  68 65 20 73 74 61 72 74  |I. "At the start|
00003050  20 6f 66 20 74 68 65 20  67 61 6d 65 20 74 68 65  | of the game the|
00003060  20 73 63 72 65 65 6e 20  73 68 6f 77 73 20 74 68  | screen shows th|
00003070  65 20 74 61 72 67 65 74  2c 20 74 68 65 20 62 6f  |e target, the bo|
00003080  77 20 61 6e 64 22 0d 1b  4e 45 dc 20 22 61 72 72  |w and"..NE. "arr|
00003090  6f 77 20 61 6e 64 20 61  20 66 6c 61 67 20 74 68  |ow and a flag th|
000030a0  61 74 20 73 68 6f 77 73  20 79 6f 75 20 74 68 65  |at shows you the|
000030b0  20 77 69 6e 64 20 73 70  65 65 64 20 61 6e 64 20  | wind speed and |
000030c0  64 69 72 65 63 74 69 6f  6e 2e 22 0d 1b 58 08 dc  |direction."..X..|
000030d0  20 22 22 0d 1b 62 55 dc  20 22 57 68 65 6e 20 79  | ""..bU. "When y|
000030e0  6f 75 20 73 74 61 72 74  20 65 61 63 68 20 67 61  |ou start each ga|
000030f0  6d 65 20 79 6f 75 20 68  61 76 65 20 74 6f 20 6d  |me you have to m|
00003100  6f 76 65 20 74 68 65 20  74 61 72 67 65 74 20 74  |ove the target t|
00003110  6f 20 74 68 65 20 72 65  71 75 69 72 65 64 20 64  |o the required d|
00003120  69 73 74 61 6e 63 65 22  0d 1b 6c 48 dc 20 22 61  |istance"..lH. "a|
00003130  6e 64 20 74 68 65 6e 20  70 72 65 73 73 20 61 20  |nd then press a |
00003140  6d 6f 75 73 65 20 62 75  74 74 6f 6e 20 74 6f 20  |mouse button to |
00003150  73 74 61 72 74 20 6f 72  20 70 72 65 73 73 20 44  |start or press D|
00003160  20 74 6f 20 73 65 65 20  61 20 64 65 6d 6f 2e 22  | to see a demo."|
00003170  0d 1b 76 39 dc 20 22 59  6f 75 20 63 61 6e 20 70  |..v9. "You can p|
00003180  75 74 20 74 68 65 20 74  61 72 67 65 74 20 31 30  |ut the target 10|
00003190  6d 20 74 6f 20 31 30 30  6d 20 61 77 61 79 20 66  |m to 100m away f|
000031a0  72 6f 6d 20 79 6f 75 2e  22 0d 1b 80 08 dc 20 22  |rom you."..... "|
000031b0  22 0d 1b 8a 4e dc 20 22  54 68 65 20 66 75 72 74  |"...N. "The furt|
000031c0  68 65 72 20 62 65 6c 6f  77 20 74 68 65 20 74 61  |her below the ta|
000031d0  72 67 65 74 20 79 6f 75  20 70 75 74 20 74 68 65  |rget you put the|
000031e0  20 62 6f 77 20 74 68 65  20 68 69 67 68 65 72 20  | bow the higher |
000031f0  74 68 65 20 61 72 72 6f  77 20 77 69 6c 6c 22 0d  |the arrow will".|
00003200  1b 94 55 dc 20 22 62 65  20 66 69 72 65 64 20 61  |..U. "be fired a|
00003210  6e 64 20 74 68 65 20 66  75 72 74 68 65 72 20 61  |nd the further a|
00003220  62 6f 76 65 20 74 68 65  20 74 61 72 67 65 74 20  |bove the target |
00003230  79 6f 75 20 70 75 74 20  74 68 65 20 62 6f 77 20  |you put the bow |
00003240  74 68 65 20 6c 6f 77 65  72 20 74 68 65 20 61 72  |the lower the ar|
00003250  72 6f 77 22 0d 1b 9e 4f  dc 20 22 77 69 6c 6c 20  |row"...O. "will |
00003260  62 65 20 66 69 72 65 64  2e 20 54 68 69 73 20 69  |be fired. This i|
00003270  73 20 74 68 65 20 73 61  6d 65 20 77 69 74 68 20  |s the same with |
00003280  73 68 6f 6f 74 69 6e 67  20 74 68 65 20 61 72 72  |shooting the arr|
00003290  6f 77 20 6c 65 66 74 20  61 6e 64 20 72 69 67 68  |ow left and righ|
000032a0  74 2e 22 0d 1b a8 54 dc  20 22 22 2c 22 54 6f 20  |t."...T. "","To |
000032b0  66 69 72 65 20 61 6e 20  61 72 72 6f 77 20 79 6f  |fire an arrow yo|
000032c0  75 20 68 61 76 65 20 74  6f 20 70 72 65 73 73 20  |u have to press |
000032d0  61 20 6d 6f 75 73 65 20  62 75 74 74 6f 6e 20 74  |a mouse button t|
000032e0  6f 20 70 75 6c 6c 20 74  68 65 20 73 74 72 69 6e  |o pull the strin|
000032f0  67 20 62 61 63 6b 22 0d  1b b2 51 dc 20 22 61 6e  |g back"...Q. "an|
00003300  64 20 77 68 65 6e 20 79  6f 75 20 61 72 65 20 72  |d when you are r|
00003310  65 61 64 79 20 74 6f 20  66 69 72 65 2c 20 70 72  |eady to fire, pr|
00003320  65 73 73 20 61 6e 6f 74  68 65 72 20 6d 6f 75 73  |ess another mous|
00003330  65 20 62 75 74 74 6f 6e  20 61 73 20 77 65 6c 6c  |e button as well|
00003340  20 61 73 20 74 68 65 22  0d 1b bc 30 dc 20 22 6f  | as the"...0. "o|
00003350  6e 65 20 79 6f 75 20 70  72 65 73 73 65 64 20 74  |ne you pressed t|
00003360  6f 20 70 75 6c 6c 20 74  68 65 20 73 74 72 69 6e  |o pull the strin|
00003370  67 20 62 61 63 6b 2e 22  0d 1b c6 08 dc 20 22 22  |g back."..... ""|
00003380  0d 1b d0 33 dc 20 22 54  68 65 20 68 69 67 68 20  |...3. "The high |
00003390  73 63 6f 72 65 73 20 61  72 65 20 73 61 76 65 64  |scores are saved|
000033a0  20 61 66 74 65 72 20 65  76 65 72 79 20 67 61 6d  | after every gam|
000033b0  65 2e 22 0d 1b da 08 dc  20 22 22 0d 1b e4 38 dc  |e."..... ""...8.|
000033c0  20 22 50 72 65 73 73 20  27 43 74 72 6c 27 20 61  | "Press 'Ctrl' a|
000033d0  6e 64 20 27 52 27 20 74  6f 20 72 65 73 65 74 20  |nd 'R' to reset |
000033e0  61 6c 6c 20 74 68 65 20  68 69 2d 73 63 6f 72 65  |all the hi-score|
000033f0  73 2e 22 0d 1b ee 08 dc  20 22 22 0d 1b f8 08 dc  |s."..... "".....|
00003400  20 22 22 0d 1c 02 08 dc  20 22 22 0d 1c 0c 08 dc  | ""..... "".....|
00003410  20 22 22 0d 1c 16 08 dc  20 22 22 0d 1c 20 28 dc  | ""..... "".. (.|
00003420  20 22 50 72 65 73 73 20  61 20 6d 6f 75 73 65 20  | "Press a mouse |
00003430  62 75 74 74 6f 6e 20 74  6f 20 63 6f 6e 74 69 6e  |button to contin|
00003440  75 65 22 0d 1c 2a 08 dc  20 22 22 0d 1c 34 23 dc  |ue"..*.. ""..4#.|
00003450  20 22 41 72 63 68 65 72  79 20 2d 20 42 79 20 54  | "Archery - By T|
00003460  69 6d 20 4a 6f 6e 65 73  20 31 39 39 30 22 0d 1c  |im Jones 1990"..|
00003470  3e 0c dc 20 22 53 74 6f  70 22 0d 1c 48 1c dc 20  |>.. "Stop"..H.. |
00003480  22 41 72 63 68 65 72 79  20 49 6e 73 74 72 75 63  |"Archery Instruc|
00003490  74 69 6f 6e 73 22 0d 1c  52 25 dc 20 22 7e 7e 7e  |tions"..R%. "~~~|
000034a0  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 7e 7e 7e 7e 7e 7e  |~~~~~~~~~~~~~~~~|
000034b0  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 22 0d 1c 5c 08 dc  |~~~~~~~~~~"..\..|
000034c0  20 22 22 0d 1c 66 08 dc  20 22 22 0d 1c 70 4b dc  | ""..f.. ""..pK.|
000034d0  20 22 45 61 63 68 20 72  69 6e 67 20 6f 6e 20 74  | "Each ring on t|
000034e0  68 65 20 74 61 72 67 65  74 20 68 61 73 20 61 6e  |he target has an|
000034f0  20 69 6e 6e 65 72 20 61  6e 64 20 6f 75 74 65 72  | inner and outer|
00003500  20 70 61 72 74 2e 20 54  68 65 73 65 20 61 6c 6c  | part. These all|
00003510  20 68 61 76 65 22 0d 1c  7a 29 dc 20 22 64 69 66  | have"..z). "dif|
00003520  66 65 72 65 6e 74 20 73  63 6f 72 65 73 20 66 72  |ferent scores fr|
00003530  6f 6d 20 6f 6e 65 20 74  6f 20 74 65 6e 2e 22 0d  |om one to ten.".|
00003540  1c 84 08 dc 20 22 22 0d  1c 8e 19 dc 20 22 54 68  |.... ""..... "Th|
00003550  65 20 73 63 6f 72 65 73  20 61 72 65 20 3a 2d 22  |e scores are :-"|
00003560  0d 1c 98 08 dc 20 22 22  0d 1c a2 20 dc 20 22 4f  |..... ""... . "O|
00003570  75 74 65 72 20 77 68 69  74 65 20 72 69 6e 67 20  |uter white ring |
00003580  31 20 70 6f 69 6e 74 22  0d 1c ac 21 dc 20 22 49  |1 point"...!. "I|
00003590  6e 6e 65 72 20 77 68 69  74 65 20 72 69 6e 67 20  |nner white ring |
000035a0  32 20 70 6f 69 6e 74 73  22 0d 1c b6 21 dc 20 22  |2 points"...!. "|
000035b0  4f 75 74 65 72 20 62 6c  61 63 6b 20 72 69 6e 67  |Outer black ring|
000035c0  20 33 20 70 6f 69 6e 74  73 22 0d 1c c0 21 dc 20  | 3 points"...!. |
000035d0  22 49 6e 6e 65 72 20 62  6c 61 63 6b 20 72 69 6e  |"Inner black rin|
000035e0  67 20 34 20 70 6f 69 6e  74 73 22 0d 1c ca 20 dc  |g 4 points"... .|
000035f0  20 22 4f 75 74 65 72 20  62 6c 75 65 20 72 69 6e  | "Outer blue rin|
00003600  67 20 35 20 70 6f 69 6e  74 73 22 0d 1c d4 20 dc  |g 5 points"... .|
00003610  20 22 49 6e 6e 65 72 20  62 6c 75 65 20 72 69 6e  | "Inner blue rin|
00003620  67 20 36 20 70 6f 69 6e  74 73 22 0d 1c de 1f dc  |g 6 points".....|
00003630  20 22 4f 75 74 65 72 20  72 65 64 20 72 69 6e 67  | "Outer red ring|
00003640  20 37 20 70 6f 69 6e 74  73 22 0d 1c e8 1f dc 20  | 7 points"..... |
00003650  22 49 6e 6e 65 72 20 72  65 64 20 72 69 6e 67 20  |"Inner red ring |
00003660  38 20 70 6f 69 6e 74 73  22 0d 1c f2 1f dc 20 22  |8 points"..... "|
00003670  4f 75 74 65 72 20 62 75  6c 6c 73 65 79 65 20 39  |Outer bullseye 9|
00003680  20 70 6f 69 6e 74 73 22  0d 1c fc 20 dc 20 22 49  | points"... . "I|
00003690  6e 6e 65 72 20 62 75 6c  6c 73 65 79 65 20 31 30  |nner bullseye 10|
000036a0  20 70 6f 69 6e 74 73 22  0d 1d 06 08 dc 20 22 22  | points"..... ""|
000036b0  0d 1d 10 4b dc 20 22 41  74 20 74 68 65 20 62 6f  |...K. "At the bo|
000036c0  74 74 6f 6d 20 6f 66 20  74 68 65 20 73 63 72 65  |ttom of the scre|
000036d0  65 6e 20 69 74 20 74 65  6c 6c 73 20 79 6f 75 20  |en it tells you |
000036e0  68 6f 77 20 66 61 72 20  74 68 65 20 74 61 72 67  |how far the targ|
000036f0  65 74 20 69 73 20 61 77  61 79 22 0d 1d 1a 55 dc  |et is away"...U.|
00003700  20 22 66 72 6f 6d 20 79  6f 75 2c 20 74 68 65 20  | "from you, the |
00003710  68 69 2d 73 63 6f 72 65  20 61 6e 64 20 79 6f 75  |hi-score and you|
00003720  72 20 73 63 6f 72 65 2e  20 41 66 74 65 72 20 65  |r score. After e|
00003730  61 63 68 20 73 68 6f 74  20 79 6f 75 20 77 69 6c  |ach shot you wil|
00003740  6c 20 62 65 20 74 6f 6c  64 20 77 68 69 63 68 22  |l be told which"|
00003750  0d 1d 24 54 dc 20 22 72  69 6e 67 20 79 6f 75 72  |..$T. "ring your|
00003760  20 61 72 72 6f 77 20 68  69 74 20 6f 72 20 69 66  | arrow hit or if|
00003770  20 69 74 20 77 65 6e 74  20 61 62 6f 76 65 20 62  | it went above b|
00003780  65 6c 6f 77 20 74 6f 20  74 68 65 20 6c 65 66 74  |elow to the left|
00003790  20 6f 72 20 74 6f 20 74  68 65 20 72 69 67 68 74  | or to the right|
000037a0  20 6f 66 22 0d 1d 2e 13  dc 20 22 74 68 65 20 74  | of"..... "the t|
000037b0  61 72 67 65 74 2e 22 0d  1d 38 08 dc 20 22 22 0d  |arget."..8.. "".|
000037c0  1d 42 08 dc 20 22 22 0d  1d 4c 08 dc 20 22 22 0d  |.B.. ""..L.. "".|
000037d0  1d 56 28 dc 20 22 50 72  65 73 73 20 61 20 6d 6f  |.V(. "Press a mo|
000037e0  75 73 65 20 62 75 74 74  6f 6e 20 74 6f 20 63 6f  |use button to co|
000037f0  6e 74 69 6e 75 65 22 0d  1d 60 08 dc 20 22 22 0d  |ntinue"..`.. "".|
00003800  1d 6a 23 dc 20 22 41 72  63 68 65 72 79 20 2d 20  |.j#. "Archery - |
00003810  42 79 20 54 69 6d 20 4a  6f 6e 65 73 20 31 39 39  |By Tim Jones 199|
00003820  30 22 0d 1d 74 12 dc 20  22 53 74 6f 70 22 2c 22  |0"..t.. "Stop","|
00003830  45 6e 64 22 0d ff                                 |End"..|
00003836