01-01-89/I

Home » CEEFAX disks » telesoftware11.adl » 01-01-89/I

01-01-89/I

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

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

Tape/disk:	Home » CEEFAX disks » telesoftware11.adl
Filename:	01-01-89/I
Read OK:	✔
File size:	1F03 bytes
Load address:	FFFF1A00
Exec address:	FFFF8023

File contents

   20*FX200,3
   30VDU23;8202;0;0;0;
   40HIMEM=&3A50
   50VDU28,1,25,38,18
   60VDU12
   70*LO.D 3A90
   80VDU12
   90*LO.A C00
  100VDU12
  110*LO.S 3700
  120VDU12:VDU5
  130J%=&E00:K%=&3700
  140FOR I%=0TO650:J%?I%=K%?I%:NEXT
  150t$=STRING$(32," "):B$=STRING$(32," ")
  160DIM T%(5),A$(5),i%(2,3),f%(11,1),V(5),C(5)
  170PROCW:CALL &E00:*FX15,0
  180RESTORE 420:FORI%=0TO2:FORJ%=0TO3:READ i%(I%,J%):NEXT:NEXT
  190FORI%=0TO11:FORJ%=0TO1:READ f%(I%,J%):NEXT:NEXT
  200VDU24,1020;505;1259;550;:CLG:MOVE 1100,550:@%=1:PRINTV%
  210REPEAT
  220VDU5:VDU24,5;845;1259;999;:CLG:MOVE 50,950
  230PRINT"Choose starting point":MOVE 50,900:PROCG:PROCA:UNTIL S=TRUE
  240u=c:VDU24,5;805;1259;835;:MOVE 5,835:PRINT"Home town ";t$:PROCC
  250REPEAT
  260REPEAT
  270PROCA:PROCX
  280UNTIL S=TRUE
  290IF c=u PROCQ:IF C=0 AND V%=0 PROCR:MODE7:PROCY
  300REPEAT
  310REPEAT
  320PROCZ
  330UNTIL S=TRUE
  340PROC_
  350UNTIL S=TRUE
  360PROC`:PROCC:IF F<0 MODE7:VDU23;8202;0;0;0;:PRINTTAB(1,10)"You have run out of money. Bad luck."
  370IF F<0 GOTO 370
  380VDU24,5;5;1259;99;:CLG:VDU24,5;605;1259;799;:CLG:VDU24,5;180;1259;449;:CLG:VDU24,5;505;399;549;:CLG
  390UNTILFALSE
  400END
  410DATA 331,520,460,613,471,472
  420DATA 152,559,478,399,180,444,-1,-1,315,525,-1,-1
  430DATA 315,331,1,331,1,315,544,525,616,520,17,180,17,613,218,180,503,152,578,472,472,471,614,460
  440DEFPROCa
  450I%=-1
  460REPEAT
  470I%=I%+1:?(Z+I%)=ASCMID$(t$,I%+1,1)
  480UNTIL ?(Z+I%)=&0D
  490?(Z+I%)=0
  500ENDPROC
  510DEFPROCA
  520PROCa
  530_?0=&D1:_?1=&3B:m?0=&90:m?1=&3A:`?0=&50:`?1=&3A:c=0:t?0=0:t?1=0
  540REPEAT UNTIL ?N>5:CALL &C00
  550IF ?n=1 S=TRUE ELSE S=FALSE
  560c=?t+?(t+1)*256-1
  570ENDPROC
  580DEFPROCM
  590U=(?(I+c*4)+?(I+c*4+1)*256)/100
  600G=?(I+c*4+2)+?(I+c*4+3)*256:E%=FALSE
  610IF G>30000 THEN E%=TRUE:G=(G-40000)*-1
  620IF E%=FALSE THEN L$="W" ELSE L$="E"
  630G=G/100:d=?(M+c)
  640ENDPROC
  650DEFPROCX
  660VDU24,5;845;1259;999;:CLG:@%=&20205
  670IF S=FALSE PROCH:ENDPROC
  680PROCM
  690MOVE 5,990:PRINT"Present position ";t$:PROCP(940)
  700IF (d AND 128)>0 MOVE 5,890:PRINT"Gold":PROCS
  710IF (d AND 1)>0 PROCc
  720IF (d AND 4)>0 MOVE 5,890:PRINT"Gold conversion":PROCE
  730e=c:B$=t$:o=U:i=G:D=d
  740ENDPROC
  750DEFPROCH
  760VDU7:VDU24,5;5;1259;99;:MOVE 5,90:PRINT"Town not found, enter another.":MOVE 5,45:PROCG:CLG
  770ENDPROC
  780DEFPROCZ
  790VDU24,5;605;1259;799;:CLG:@%=&20205:MOVE 5,795:PRINT"Enter destination town":PROCG:PROCF
  800ENDPROC
  810DEFPROCT
  820N%=0:J=1:VDU24,5;180;1259;449;:CLG:@%=1:Y=440
  830IF (E AND 2)>0 OR (D AND 2)>0 PROCd:IF J=0 ENDPROC
  840E%=6
  850REPEAT
  860b=2^E%
  870IF (J=2 AND E%=4) GOTO 900
  880IF ((D AND 16)>0 AND (E AND 16)>0) AND ((D AND 2)=0 AND (E AND 2)=0) GOTO 900
  890IF (D AND b)>0 AND (E AND b)>0 MOVE 5,Y:N%=N%+1:PRINTN%;" ";A$(E%-1):T%(N%-1)=E%-1:PROCB:Y=Y-50
  900E%=E%-1
  910UNTIL E%<3
  920IF ((E AND 2)>0 AND (D AND 2)=0) OR ((E AND 2)=0 AND (D AND 2)>0) GOTO 1010
  930RESTORE 410
  940FOR I%=1 TO 6
  950READ A%
  960IF e=A% OR v=A% THEN I%=100
  970NEXT
  980IF I%>99 GOTO 1010
  990MOVE 5,Y:N%=N%+1:PRINTN%;" ";A$(1):T%(N%-1)=1:PROCB:Y=Y-50:E%=E%-1
 1000MOVE 5,Y:N%=N%+1:PRINTN%;" ";A$(0):T%(N%-1)=0:PROCB:Y=Y-50
 1010ENDPROC
 1020DEFFNA(w)=ATN(TAN(w)/1.006738465)
 1030DEFPROCU(Q,K,V,f)
 1040Q=FNA(RAD(Q))
 1050K=FNA(RAD(K))
 1060V=FNA(RAD(V))
 1070f=FNA(RAD(f))
 1080q=(Q+V)/2
 1090r=1.5707963268-Q
 1100s=1.5707963268-V
 1110G=ABS(K-f)
 1120g=ACS(COS(r)*COS(s)+SIN(r)*SIN(s)*COS(G))
 1130R=A*B/SQR((A*SIN(q))^2+(B*COS(q))^2)
 1140g=0.625*R*g/1.0E3
 1150VDU24,5;505;399;549;:CLG:@%=&20204:MOVE 5,550:PRINTg;" miles":@%=&20206
 1160ENDPROC
 1170DEFPROCS
 1180SOUND 1,-15,97,2:SOUND 1,0,105,1:SOUND 1,-15,97,2
 1190VDU24,5;5;1259;99;:CLG:MOVE 5,95:PRINT"Do you want the gold(Y/N)?"
 1200*FX15,0
 1210A$=GET$:IF A$<>"Y" AND A$<>"N" VDU7:GOTO 1190
 1220IF A$="Y" AND C>20 PROCV:ENDPROC
 1230IF A$="Y" THEN C=C+2:?(M+c)=?(M+c)-128:CLG:PROCD:V%=V%-1:VDU24,1020;505;1259;550;:CLG:MOVE 1100,550:@%=1:PRINTV%
 1240VDU24,5;5;1259;99;:CLG:VDU24,5;805;1259;999;
 1250ENDPROC
 1260DEFPROCc
 1270IF C>6 AND RND(20)<10 MOVE 300,890:PRINT"Beware-Police are after you!" ELSE GOTO 1290
 1280SOUND 1,1,100,100:?&8E=10
 1290ENDPROC
 1300:
 1310DEFPROC_
 1320VDU24,5;5;1259;99;
 1330MOVE 5,90:PRINT"Select mode of travel by no. or":MOVE 5,55:PRINT"0 to reselect destination"
 1340a=FALSE
 1350REPEAT
 1360VDU24,5;180;1259;449;
 1370*FX15,0
 1380A%=GET-48
 1390IF A%=0 S=FALSE:a=TRUE:GOTO 1410
 1400IF A%<1 OR A%>N% PROCL ELSE a=TRUE
 1410UNTIL a=TRUE
 1420IF S=FALSE VDU24,5;5;1259;99;:CLG:VDU24,5;180;1259;449;:CLG:ENDPROC
 1430S%=T%(A%-1):E%=S%+1:PROCN:MOVE 40,490-50*A%:PRINT"*":IF (F-j)<10 PROCe
 1440PROCI
 1450IF (W%-B%)<60 PROCf
 1460VDU24,5;5;1259;99;:CLG:MOVE 5,95:PRINT"Press space to confirm choice or":MOVE 5,45:PRINT"N to choose again":*FX15,0
 1470A$=GET$
 1480IF A$=" " CLG:ENDPROC
 1490IF A$="N" CLG:VDU24,5;105;1259;449;:MOVE 75,490-50*A%:VDU127:GOTO 1320
 1500GOTO 1460
 1510ENDPROC
 1520DEFPROCL
 1530VDU24,5;5;1259;99;:CLG
 1540@%=10
 1550MOVE 5,95:PRINT"Enter a no. between 1 and ";N%:VDU7
 1560ENDPROC
 1570DEFPROCJ
 1580IF t$=B$ VDU7:VDU24,5;605;1259;799;:CLG:MOVE 10,795:PRINT"DESTINATION SAME AS PRESENT POSITION":MOVE 10,745:PRINT"ENTER ANOTHER":PROCG:GOTO 1580
 1590ENDPROC
 1600DEFPROCF
 1610VDU24,5;5;1259;99;:CLG:IF t$=B$ PROCJ
 1620PROCA
 1630IF S=FALSE CLG:PROCH:GOTO 1610
 1640IF t$=B$ PROCJ:GOTO 1620
 1650VDU24,5;605;1259;799;:CLG:PROCM:@%=&20205:MOVE 5,790:PRINT"Destination ";t$:PROCP(740):v=c:E=d:PROCU(o,i,U,G):PROCT:IF J=0 THEN PROCb:GOTO 1610
 1660ENDPROC
 1670DEFPROCb
 1680VDU7:VDU24,5;5;1259;99;:MOVE 5,90:PRINT"Route unobtainable, enter another":MOVE 5,45:PROCG:CLG
 1690ENDPROC
 1700DEFPROCE
 1710IF C=0 ENDPROC
 1720VDU7:VDU24,5;5;1259;99;:CLG:MOVE 5,90:PRINT"How much gold to be converted (oz.) ?":MOVE 5,45:INPUTk:IF k>C OR k <0 GOTO 1720
 1730C=C-k:F=F+k*200:CLG:PROCD:PROCC
 1740ENDPROC
 1750DEFPROCd
 1760J=0
 1770FOR I%=0 TO 11
 1780IF (e=f%(I%,0) AND c=f%(I%,1)) OR (c=f%(I%,0) AND e=f%(I%,1)) THEN J=1:I%=11
 1790NEXT
 1800IF J=1 ENDPROC
 1810FORI%=0TO2
 1820FORJ%=0TO3
 1830FORK%=0TO3
 1840IF K%=J% GOTO 1860
 1850IF(e=i%(I%,J%) AND c=i%(I%,K%)) OR (c=i%(I%,J%) AND e=i%(I%,K%)) THEN J=2:I%=2:J%=3:K%=3
 1860NEXT
 1870NEXT
 1880NEXT
 1890IF J>0 ENDPROC
 1900IF ((D AND 64)>0 AND (E AND 64)>0) OR ((D AND 32)>0 AND (E AND 32)>0) THEN J=2:ENDPROC
 1910ENDPROC
 1920DEFPROCW
 1930ENVELOPE 1,1,4,-4,4,10,20,10,127,0,0,-5,126,126
 1940@%=&20206:`=&70:m=&74:_=&76:t=&78:n=&7E
 1950N=&84:W=&85:O=&86:X=&87:P=&88:l=&89:T=&8A:L=&8B
 1960?N=20:?W=0:?O=0:?X=0:?P=0:?l=0:?T=0:?L=2:?&8E=100:?&8F=0
 1970?&A60=&20:?&A61=&9:?&A62=&20:?&A63=&20:?&A64=&7E
 1980I=&4BE9:M=&558F:Z=&3A70:F=100:V%=58:C=0:H=0
 1990A$(0)="Foot":A$(1)="Coach/bus":A$(2)="Train":A$(3)="Ferry":A$(4)="Chartered flight":A$(5)="Scheduled flight":A=6.378166005E6:B=6.356784479E6
 2000V(0)=3.5:V(1)=35:V(2)=55:V(3)=17:V(4)=600:V(5)=500::C(0)=0:C(1)=0.07:C(2)=0.1:C(3)=0.2:C(4)=0.55:C(5)=0.5
 2010ENDPROC
 2020DEFPROCB
 2030@%=&20204:PROCN:PROCO(p):MOVE 740-h,Y:PRINTp:MOVE 800,Y:PRINT" hrs. `":PROCO(j):MOVE 1150-h,Y:PRINTj:@%=1
 2040ENDPROC
 2050DEFPROCN
 2060p=g/V(E%-1):j=g*C(E%-1)
 2070ENDPROC
 2080DEFPROCD
 2090@%=&20204:VDU24,405;505;699;550;:CLG:MOVE 410,550:PRINTC;" oz.":@%=&20206
 2100ENDPROC
 2110DEFPROCC
 2120@%=&20204:VDU24,705;505;1000;550;:CLG:MOVE 710,550:PRINT"`";F:@%=&20206
 2130ENDPROC
 2140DEFPROC`
 2150?&8E=100:F=F-j:PROCI
 2160IF W%-B%<5 ?L=0:?T=0:?l=0:?P=0:?X=0:?O=0:?W=5:GOTO 2230
 2170C%=W%-B%:D%=(C%/3600) DIV100:E%=((C%/3600) DIV10)-D%*10:F%=(C%/3600)-D%*100-E%*10
 2180G%=(C%/60-(D%*100+E%*10+F%)*60) DIV10
 2190H%=INT(C%/60-(D%*100+E%*10+F%)*60)-G%*10
 2200I%=(C%-(D%*100+E%*10+F%)*3600-G%*600-H%*60) DIV10
 2210J%=(C%-(D%*100+E%*10+F%)*3600-G%*600-H%*60)-I%*10
 2220?L=D%:?T=E%:?l=F%:?P=G%:?X=H%:?O=I%:?W=J%
 2230ENDPROC
 2240DEFPROCO(a)
 2250IF a<0 h=0:ENDPROC
 2260IF a<10 h=35:ENDPROC
 2270IF a<100 h=70:ENDPROC
 2280h=105
 2290ENDPROC
 2300DEFPROCQ
 2310VDU24,5;605;1259;799;:CLG
 2320IF C>0 OR H>0:MOVE 5,790:PRINT"You are home.":GOTO 2340
 2330ENDPROC
 2340IF C>0 MOVE 5,740:PRINT"Do you want to deposit any gold?":GOTO 2360
 2350GOTO 2420
 2360*FX15,0
 2370a=0
 2380VDU7:A$=GET$:IF A$<>"Y" AND A$<>"N" GOTO 2360
 2390IF A$="Y" THEN MOVE 5,690:PRINT"How much?":INPUTa:IF a>C THEN VDU24,5;605;1259;660;:CLG:MOVE 100,650:PRINT" Too much re-enter.":VDU7:GOTO 2390
 2400IF A$="Y" AND  a<0 THEN VDU24,5;605;1259;660;:CLG:MOVE 100,650:PRINT" Too little, re-enter.":VDU7:GOTO 2390
 2410IF A$="Y" THEN C=C-a:H=H+a:PROCD:PROCK:ENDPROC
 2420VDU24,5;605;1259;745;:CLG
 2430IF H<0.01 GOTO 2480:*FX21,0
 2440IF H>0 MOVE 5,740:PRINT"Do you want to draw any gold?"
 2450VDU7:A$=GET$:IF A$<>"Y" AND A$<>"N" GOTO 2420
 2460IF A$="Y" THEN MOVE 5,690:PRINT"How much?":INPUTa:IF a>H THEN VDU24,5;605;1259;660;:CLG:MOVE 100,650:PRINT" Too much re-enter.":VDU7:GOTO 2460
 2461IF A$="Y" AND a<0.01 THEN VDU24,5;605;1259;660;:CLG:MOVE 100,650:PRINT" Too little re-enter.":VDU7:GOTO 2460
 2470IF A$="Y" THEN C=C+a:H=H-a:PROCD:PROCK
 2480ENDPROC
 2490DEFPROCK
 2500VDU24,5;105;945;170;:CLG:MOVE 5,150:PRINT;"Gold in safe ";H;" oz."
 2510ENDPROC
 2520DEFPROCV
 2530VDU24,5;5;1259;99;:CLG:VDU7:MOVE 5,90:PRINT"You are carrying too much already.":MOVE 5,40:PRINT"Take some home."
 2540ENDPROC
 2550DEFPROCG
 2560B%=&920:FOR A%=B%TO&93F:?A%=0:NEXT
 2570CALL &1018:t$="":A%=-1
 2580REPEAT
 2590A%=A%+1:t$=t$+CHR$(B%?A%)
 2600UNTIL A%>29
 2610t$=t$+CHR$(&0D)
 2620ENDPROC
 2630DEFPROCI
 2640D%=?L:E%=?T:F%=?l:G%=?P:H%=?X:I%=?O:J%=?W
 2650W%=(D%*100+E%*10+F%)*3600+(G%*10+H%)*60+(I%*10)+J%
 2660B%=INT(p*3600)
 2670ENDPROC
 2680DEFPROCe
 2690VDU24,705;505;1000;550;
 2700FOR I%=0 TO 3
 2710TIME=0
 2720REPEATUNTILTIME>30
 2730CLG:SOUND 1,-15,33,2
 2740TIME=0
 2750REPEATUNTILTIME>30
 2760PROCC
 2770NEXT
 2780ENDPROC
 2790DEFPROCf
 2800VDU24,955;105;1255;174;
 2810FOR I%=0 TO 4
 2820REPEATUNTIL?N<10
 2830CLG:SOUND 1,-15,33,2
 2840REPEATUNTIL?N>18
 2850NEXT
 2860ENDPROC
 2870DEFPROCP(T%)
 2880Q=INT(U)+(U-INT(U))*0.6:K=ABS(G):K=INT(K)+(K-INT(K))*0.6:MOVE 5,T%:PRINT"Lat. ";Q;" N";"   Long. ";K;" ";L$
 2890ENDPROC
 2900DEFPROCY
 2910PRINTTAB(12,6)"Congratulations!"'''"You have completed your task."
 2920IF H<112 PRINT:PRINT"You haven't done all that well though."''"You should try and end with at least"''"111 oz. of gold in the safe.":REPEATUNTILFALSE
 2930PRINT:PRINT"You have done very well in returning"''"with ";H;" oz. of gold in the safe.":REPEATUNTILFALSE
 2940ENDPROC
 2950DEFPROCR:TIME=0:REPEATUNTILTIME>50:ENDPROC

*FX200,3
�23;8202;0;0;0;
(�=&3A50
2�28,1,25,38,18
<�12
F*LO.D 3A90
P�12
Z
*LO.A C00
d�12
n*LO.S 3700
x
�12:�5
�J%=&E00:K%=&3700
�� I%=0�650:J%?I%=K%?I%:�
�t$=�32," "):B$=�32," ")
�,� T%(5),A$(5),i%(2,3),f%(11,1),V(5),C(5)
��W:� &E00:*FX15,0
�*� �tdA:�I%=0�2:�J%=0�3:� i%(I%,J%):�:�
�$�I%=0�11:�J%=0�1:� f%(I%,J%):�:�
�0�24,1020;505;1259;550;:�:� 1100,550:@%=1:�V%
��
�%�5:�24,5;845;1259;999;:�:� 50,950
�1�"Choose starting point":� 50,900:�G:�A:� S=�
�7u=c:�24,5;805;1259;835;:� 5,835:�"Home town ";t$:�C
��
�
	�A:�X
	� S=�
""� c=u �Q:� C=0 � V%=0 �R:�7:�Y
,�
6�
@�Z
J	� S=�
T�_
^	� S=�
hP�`:�C:� F<0 �7:�23;8202;0;0;0;:�1,10)"You have run out of money. Bad luck."
r� F<0 � �DrA
|W�24,5;5;1259;99;:�:�24,5;605;1259;799;:�:�24,5;180;1259;449;:�:�24,5;505;399;549;:�
���
��
�� 331,520,460,613,471,472
�1� 152,559,478,399,180,444,-1,-1,315,525,-1,-1
�_� 315,331,1,331,1,315,544,525,616,520,17,180,17,613,218,180,503,152,578,472,472,471,614,460
���a
�	I%=-1
��
� I%=I%+1:?(Z+I%)=��t$,I%+1,1)
�� ?(Z+I%)=&0D
�
?(Z+I%)=0
��
���A
�a
C_?0=&D1:_?1=&3B:m?0=&90:m?1=&3A:`?0=&50:`?1=&3A:c=0:t?0=0:t?1=0
� � ?N>5:� &C00
&� ?n=1 S=� � S=�
0c=?t+?(t+1)*256-1
:�
D��M
N#U=(?(I+c*4)+?(I+c*4+1)*256)/100
X$G=?(I+c*4+2)+?(I+c*4+3)*256:E%=�
b#� G>30000 � E%=�:G=(G-40000)*-1
l� E%=� � L$="W" � L$="E"
vG=G/100:d=?(M+c)
��
���X
�#�24,5;845;1259;999;:�:@%=&20205
�� S=� �H:�
��M
�+� 5,990:�"Present position ";t$:�P(940)
�$� (d � 128)>0 � 5,890:�"Gold":�S
�� (d � 1)>0 �c
�-� (d � 4)>0 � 5,890:�"Gold conversion":�E
�e=c:B$=t$:o=U:i=G:D=d
��
���H
�L�7:�24,5;5;1259;99;:� 5,90:�"Town not found, enter another.":� 5,45:�G:�
�
��Z
K�24,5;605;1259;799;:�:@%=&20205:� 5,795:�"Enter destination town":�G:�F
 �
*��T
4-N%=0:J=1:�24,5;180;1259;449;:�:@%=1:Y=440
>&� (E � 2)>0 � (D � 2)>0 �d:� J=0 �
HE%=6
R�
\
b=2^E%
f� (J=2 � E%=4) � �tDC
p@� ((D � 16)>0 � (E � 16)>0) � ((D � 2)=0 � (E � 2)=0) � �tDC
zR� (D � b)>0 � (E � b)>0 � 5,Y:N%=N%+1:�N%;" ";A$(E%-1):T%(N%-1)=E%-1:�B:Y=Y-50
�E%=E%-1
�
� E%<3
�>� ((E � 2)>0 � (D � 2)=0) � ((E � 2)=0 � (D � 2)>0) � �drC
�
� �tZA
�� I%=1 � 6
�� A%
�� e=A% � v=A% � I%=100
��
�� I%>99 � �drC
�<� 5,Y:N%=N%+1:�N%;" ";A$(1):T%(N%-1)=1:�B:Y=Y-50:E%=E%-1
�4� 5,Y:N%=N%+1:�N%;" ";A$(0):T%(N%-1)=0:�B:Y=Y-50
��
�ݤA(w)=�(�(w)/1.006738465)
��U(Q,K,V,f)
Q=�A(�(Q))
K=�A(�(K))
$V=�A(�(V))
.f=�A(�(f))
8
q=(Q+V)/2
Br=1.5707963268-Q
Ls=1.5707963268-V
VG=�(K-f)
`!g=�(�(r)*�(s)+�(r)*�(s)*�(G))
j"R=A*B/�((A*�(q))^2+(B*�(q))^2)
tg=0.625*R*g/1.0E3
~@�24,5;505;399;549;:�:@%=&20204:� 5,550:�g;" miles":@%=&20206
��
���S
�)� 1,-15,97,2:� 1,0,105,1:� 1,-15,97,2
�;�24,5;5;1259;99;:�:� 5,95:�"Do you want the gold(Y/N)?"
�*FX15,0
�&A$=�:� A$<>"Y" � A$<>"N" �7:� �tfD
�� A$="Y" � C>20 �V:�
�`� A$="Y" � C=C+2:?(M+c)=?(M+c)-128:�:�D:V%=V%-1:�24,1020;505;1259;550;:�:� 1100,550:@%=1:�V%
�*�24,5;5;1259;99;:�:�24,5;805;1259;999;
��
���c
�G� C>6 � �(20)<10 � 300,890:�"Beware-Police are after you!" � � �TJE
� 1,1,100,100:?&8E=10

�
:
��_
(�24,5;5;1259;99;
2Q� 5,90:�"Select mode of travel by no. or":� 5,55:�"0 to reselect destination"
<a=�
F�
P�24,5;180;1259;449;
Z*FX15,0
dA%=�-48
n� A%=0 S=�:a=�:� �tBE
x� A%<1 � A%>N% �L � a=�
�	� a=�
�4� S=� �24,5;5;1259;99;:�:�24,5;180;1259;449;:�:�
�<S%=T%(A%-1):E%=S%+1:�N:� 40,490-50*A%:�"*":� (F-j)<10 �e
��I
�� (W%-B%)<60 �f
�e�24,5;5;1259;99;:�:� 5,95:�"Press space to confirm choice or":� 5,45:�"N to choose again":*FX15,0
�A$=�
�� A$=" " �:�
�=� A$="N" �:�24,5;105;1259;449;:� 75,490-50*A%:�127:� �ThE
�
� �ttE
��
���L
��24,5;5;1259;99;:�
	@%=10
.� 5,95:�"Enter a no. between 1 and ";N%:�7
�
"��J
,y� t$=B$ �7:�24,5;605;1259;799;:�:� 10,795:�"DESTINATION SAME AS PRESENT POSITION":� 10,745:�"ENTER ANOTHER":�G:� �TlF
6�
@��F
J!�24,5;5;1259;99;:�:� t$=B$ �J
T�A
^� S=� �:�H:� �DJF
h� t$=B$ �J:� �DTF
rr�24,5;605;1259;799;:�:�M:@%=&20205:� 5,790:�"Destination ";t$:�P(740):v=c:E=d:�U(o,i,U,G):�T:� J=0 � �b:� �DJF
|�
���b
�O�7:�24,5;5;1259;99;:� 5,90:�"Route unobtainable, enter another":� 5,45:�G:�
��
���E
�� C=0 �
�g�7:�24,5;5;1259;99;:�:� 5,90:�"How much gold to be converted (oz.) ?":� 5,45:�k:� k>C � k <0 � �txF
�C=C-k:F=F+k*200:�:�D:�C
��
���d
�J=0
�� I%=0 � 11
�G� (e=f%(I%,0) � c=f%(I%,1)) � (c=f%(I%,0) � e=f%(I%,1)) � J=1:I%=11
��
� J=1 �
�I%=0�2
�J%=0�3
&�K%=0�3
0� K%=J% � �DDG
:S�(e=i%(I%,J%) � c=i%(I%,K%)) � (c=i%(I%,J%) � e=i%(I%,K%)) � J=2:I%=2:J%=3:K%=3
D�
N�
X�
b� J>0 �
lC� ((D � 64)>0 � (E � 64)>0) � ((D � 32)>0 � (E � 32)>0) � J=2:�
v�
���W
�,� 1,1,4,-4,4,10,20,10,127,0,0,-5,126,126
�+@%=&20206:`=&70:m=&74:_=&76:t=&78:n=&7E
�3N=&84:W=&85:O=&86:X=&87:P=&88:l=&89:T=&8A:L=&8B
�<?N=20:?W=0:?O=0:?X=0:?P=0:?l=0:?T=0:?L=2:?&8E=100:?&8F=0
�4?&A60=&20:?&A61=&9:?&A62=&20:?&A63=&20:?&A64=&7E
�/I=&4BE9:M=&558F:Z=&3A70:F=100:V%=58:C=0:H=0
ƐA$(0)="Foot":A$(1)="Coach/bus":A$(2)="Train":A$(3)="Ferry":A$(4)="Chartered flight":A$(5)="Scheduled flight":A=6.378166005E6:B=6.356784479E6
�mV(0)=3.5:V(1)=35:V(2)=55:V(3)=17:V(4)=600:V(5)=500::C(0)=0:C(1)=0.07:C(2)=0.1:C(3)=0.2:C(4)=0.55:C(5)=0.5
��
���B
�O@%=&20204:�N:�O(p):� 740-h,Y:�p:� 800,Y:�" hrs. `":�O(j):� 1150-h,Y:�j:@%=1
��
��N
p=g/V(E%-1):j=g*C(E%-1)
�
 ��D
*B@%=&20204:�24,405;505;699;550;:�:� 410,550:�C;" oz.":@%=&20206
4�
>��C
H@@%=&20204:�24,705;505;1000;550;:�:� 710,550:�"`";F:@%=&20206
R�
\��`
f?&8E=100:F=F-j:�I
p7� W%-B%<5 ?L=0:?T=0:?l=0:?P=0:?X=0:?O=0:?W=5:� �tvH
zQC%=W%-B%:D%=(C%/3600) �100:E%=((C%/3600) �10)-D%*10:F%=(C%/3600)-D%*100-E%*10
�'G%=(C%/60-(D%*100+E%*10+F%)*60) �10
�*H%=�(C%/60-(D%*100+E%*10+F%)*60)-G%*10
�3I%=(C%-(D%*100+E%*10+F%)*3600-G%*600-H%*60) �10
�5J%=(C%-(D%*100+E%*10+F%)*3600-G%*600-H%*60)-I%*10
�-?L=D%:?T=E%:?l=F%:?P=G%:?X=H%:?O=I%:?W=J%
��
�
��O(a)
�� a<0 h=0:�
�� a<10 h=35:�
�� a<100 h=70:�
�	h=105
��
���Q
	�24,5;605;1259;799;:�
	/� C>0 � H>0:� 5,790:�"You are home.":� �TdI
	�
	$<� C>0 � 5,740:�"Do you want to deposit any gold?":� �TxI
	.
� �DtI
	8*FX15,0
	Ba=0
	L&�7:A$=�:� A$<>"Y" � A$<>"N" � �TxI
	Vo� A$="Y" � � 5,690:�"How much?":�a:� a>C � �24,5;605;1259;660;:�:� 100,650:�" Too much re-enter.":�7:� �DVI
	`Y� A$="Y" �  a<0 � �24,5;605;1259;660;:�:� 100,650:�" Too little, re-enter.":�7:� �DVI
	j"� A$="Y" � C=C-a:H=H+a:�D:�K:�
	t�24,5;605;1259;745;:�
	~� H<0.01 � �tpI:*FX21,0
	�2� H>0 � 5,740:�"Do you want to draw any gold?"
	�&�7:A$=�:� A$<>"Y" � A$<>"N" � �DtI
	�o� A$="Y" � � 5,690:�"How much?":�a:� a>H � �24,5;605;1259;660;:�:� 100,650:�" Too much re-enter.":�7:� �t\I
	�Z� A$="Y" � a<0.01 � �24,5;605;1259;660;:�:� 100,650:�" Too little re-enter.":�7:� �t\I
	� � A$="Y" � C=C+a:H=H-a:�D:�K
	��
	���K
	�;�24,5;105;945;170;:�:� 5,150:�;"Gold in safe ";H;" oz."
	��
	���V
	�`�24,5;5;1259;99;:�:�7:� 5,90:�"You are carrying too much already.":� 5,40:�"Take some home."
	��
	���G
 B%=&920:� A%=B%�&93F:?A%=0:�

� &1018:t$="":A%=-1
�
A%=A%+1:t$=t$+�(B%?A%)
(� A%>29
2t$=t$+�(&0D)
<�
F��I
P-D%=?L:E%=?T:F%=?l:G%=?P:H%=?X:I%=?O:J%=?W
Z6W%=(D%*100+E%*10+F%)*3600+(G%*10+H%)*60+(I%*10)+J%
dB%=�(p*3600)
n�
x��e
��24,705;505;1000;550;
�� I%=0 � 3
��=0
�
���>30
��:� 1,-15,33,2
��=0
�
���>30
��C
��
��
���f
��24,955;105;1255;174;
�� I%=0 � 4
��?N<10
�:� 1,-15,33,2
��?N>18
"�
,�
6��P(T%)
@^Q=�(U)+(U-�(U))*0.6:K=�(G):K=�(K)+(K-�(K))*0.6:� 5,T%:�"Lat. ";Q;" N";"   Long. ";K;" ";L$
J�
T��Y
^?�12,6)"Congratulations!"'''"You have completed your task."
h�� H<112 �:�"You haven't done all that well though."''"You should try and end with at least"''"111 oz. of gold in the safe.":���
rX�:�"You have done very well in returning"''"with ";H;" oz. of gold in the safe.":���
|�
���R:�=0:���>50:�
�

00000000  0d 00 14 0c 2a 46 58 32  30 30 2c 33 0d 00 1e 13  |....*FX200,3....|
00000010  ef 32 33 3b 38 32 30 32  3b 30 3b 30 3b 30 3b 0d  |.23;8202;0;0;0;.|
00000020  00 28 0b d3 3d 26 33 41  35 30 0d 00 32 12 ef 32  |.(..=&3A50..2..2|
00000030  38 2c 31 2c 32 35 2c 33  38 2c 31 38 0d 00 3c 07  |8,1,25,38,18..<.|
00000040  ef 31 32 0d 00 46 0e 2a  4c 4f 2e 44 20 33 41 39  |.12..F.*LO.D 3A9|
00000050  30 0d 00 50 07 ef 31 32  0d 00 5a 0d 2a 4c 4f 2e  |0..P..12..Z.*LO.|
00000060  41 20 43 30 30 0d 00 64  07 ef 31 32 0d 00 6e 0e  |A C00..d..12..n.|
00000070  2a 4c 4f 2e 53 20 33 37  30 30 0d 00 78 0a ef 31  |*LO.S 3700..x..1|
00000080  32 3a ef 35 0d 00 82 14  4a 25 3d 26 45 30 30 3a  |2:.5....J%=&E00:|
00000090  4b 25 3d 26 33 37 30 30  0d 00 8c 1c e3 20 49 25  |K%=&3700..... I%|
000000a0  3d 30 b8 36 35 30 3a 4a  25 3f 49 25 3d 4b 25 3f  |=0.650:J%?I%=K%?|
000000b0  49 25 3a ed 0d 00 96 1b  74 24 3d c4 33 32 2c 22  |I%:.....t$=.32,"|
000000c0  20 22 29 3a 42 24 3d c4  33 32 2c 22 20 22 29 0d  | "):B$=.32," ").|
000000d0  00 a0 2c de 20 54 25 28  35 29 2c 41 24 28 35 29  |..,. T%(5),A$(5)|
000000e0  2c 69 25 28 32 2c 33 29  2c 66 25 28 31 31 2c 31  |,i%(2,3),f%(11,1|
000000f0  29 2c 56 28 35 29 2c 43  28 35 29 0d 00 aa 15 f2  |),V(5),C(5).....|
00000100  57 3a d6 20 26 45 30 30  3a 2a 46 58 31 35 2c 30  |W:. &E00:*FX15,0|
00000110  0d 00 b4 2a f7 20 8d 74  64 41 3a e3 49 25 3d 30  |...*. .tdA:.I%=0|
00000120  b8 32 3a e3 4a 25 3d 30  b8 33 3a f3 20 69 25 28  |.2:.J%=0.3:. i%(|
00000130  49 25 2c 4a 25 29 3a ed  3a ed 0d 00 be 24 e3 49  |I%,J%):.:....$.I|
00000140  25 3d 30 b8 31 31 3a e3  4a 25 3d 30 b8 31 3a f3  |%=0.11:.J%=0.1:.|
00000150  20 66 25 28 49 25 2c 4a  25 29 3a ed 3a ed 0d 00  | f%(I%,J%):.:...|
00000160  c8 30 ef 32 34 2c 31 30  32 30 3b 35 30 35 3b 31  |.0.24,1020;505;1|
00000170  32 35 39 3b 35 35 30 3b  3a da 3a ec 20 31 31 30  |259;550;:.:. 110|
00000180  30 2c 35 35 30 3a 40 25  3d 31 3a f1 56 25 0d 00  |0,550:@%=1:.V%..|
00000190  d2 05 f5 0d 00 dc 25 ef  35 3a ef 32 34 2c 35 3b  |......%.5:.24,5;|
000001a0  38 34 35 3b 31 32 35 39  3b 39 39 39 3b 3a da 3a  |845;1259;999;:.:|
000001b0  ec 20 35 30 2c 39 35 30  0d 00 e6 31 f1 22 43 68  |. 50,950...1."Ch|
000001c0  6f 6f 73 65 20 73 74 61  72 74 69 6e 67 20 70 6f  |oose starting po|
000001d0  69 6e 74 22 3a ec 20 35  30 2c 39 30 30 3a f2 47  |int":. 50,900:.G|
000001e0  3a f2 41 3a fd 20 53 3d  b9 0d 00 f0 37 75 3d 63  |:.A:. S=....7u=c|
000001f0  3a ef 32 34 2c 35 3b 38  30 35 3b 31 32 35 39 3b  |:.24,5;805;1259;|
00000200  38 33 35 3b 3a ec 20 35  2c 38 33 35 3a f1 22 48  |835;:. 5,835:."H|
00000210  6f 6d 65 20 74 6f 77 6e  20 22 3b 74 24 3a f2 43  |ome town ";t$:.C|
00000220  0d 00 fa 05 f5 0d 01 04  05 f5 0d 01 0e 09 f2 41  |...............A|
00000230  3a f2 58 0d 01 18 09 fd  20 53 3d b9 0d 01 22 22  |:.X..... S=...""|
00000240  e7 20 63 3d 75 20 f2 51  3a e7 20 43 3d 30 20 80  |. c=u .Q:. C=0 .|
00000250  20 56 25 3d 30 20 f2 52  3a eb 37 3a f2 59 0d 01  | V%=0 .R:.7:.Y..|
00000260  2c 05 f5 0d 01 36 05 f5  0d 01 40 06 f2 5a 0d 01  |,....6....@..Z..|
00000270  4a 09 fd 20 53 3d b9 0d  01 54 06 f2 5f 0d 01 5e  |J.. S=...T.._..^|
00000280  09 fd 20 53 3d b9 0d 01  68 50 f2 60 3a f2 43 3a  |.. S=...hP.`:.C:|
00000290  e7 20 46 3c 30 20 eb 37  3a ef 32 33 3b 38 32 30  |. F<0 .7:.23;820|
000002a0  32 3b 30 3b 30 3b 30 3b  3a f1 8a 31 2c 31 30 29  |2;0;0;0;:..1,10)|
000002b0  22 59 6f 75 20 68 61 76  65 20 72 75 6e 20 6f 75  |"You have run ou|
000002c0  74 20 6f 66 20 6d 6f 6e  65 79 2e 20 42 61 64 20  |t of money. Bad |
000002d0  6c 75 63 6b 2e 22 0d 01  72 10 e7 20 46 3c 30 20  |luck."..r.. F<0 |
000002e0  e5 20 8d 44 72 41 0d 01  7c 57 ef 32 34 2c 35 3b  |. .DrA..|W.24,5;|
000002f0  35 3b 31 32 35 39 3b 39  39 3b 3a da 3a ef 32 34  |5;1259;99;:.:.24|
00000300  2c 35 3b 36 30 35 3b 31  32 35 39 3b 37 39 39 3b  |,5;605;1259;799;|
00000310  3a da 3a ef 32 34 2c 35  3b 31 38 30 3b 31 32 35  |:.:.24,5;180;125|
00000320  39 3b 34 34 39 3b 3a da  3a ef 32 34 2c 35 3b 35  |9;449;:.:.24,5;5|
00000330  30 35 3b 33 39 39 3b 35  34 39 3b 3a da 0d 01 86  |05;399;549;:....|
00000340  06 fd a3 0d 01 90 05 e0  0d 01 9a 1d dc 20 33 33  |............. 33|
00000350  31 2c 35 32 30 2c 34 36  30 2c 36 31 33 2c 34 37  |1,520,460,613,47|
00000360  31 2c 34 37 32 0d 01 a4  31 dc 20 31 35 32 2c 35  |1,472...1. 152,5|
00000370  35 39 2c 34 37 38 2c 33  39 39 2c 31 38 30 2c 34  |59,478,399,180,4|
00000380  34 34 2c 2d 31 2c 2d 31  2c 33 31 35 2c 35 32 35  |44,-1,-1,315,525|
00000390  2c 2d 31 2c 2d 31 0d 01  ae 5f dc 20 33 31 35 2c  |,-1,-1..._. 315,|
000003a0  33 33 31 2c 31 2c 33 33  31 2c 31 2c 33 31 35 2c  |331,1,331,1,315,|
000003b0  35 34 34 2c 35 32 35 2c  36 31 36 2c 35 32 30 2c  |544,525,616,520,|
000003c0  31 37 2c 31 38 30 2c 31  37 2c 36 31 33 2c 32 31  |17,180,17,613,21|
000003d0  38 2c 31 38 30 2c 35 30  33 2c 31 35 32 2c 35 37  |8,180,503,152,57|
000003e0  38 2c 34 37 32 2c 34 37  32 2c 34 37 31 2c 36 31  |8,472,472,471,61|
000003f0  34 2c 34 36 30 0d 01 b8  07 dd f2 61 0d 01 c2 09  |4,460......a....|
00000400  49 25 3d 2d 31 0d 01 cc  05 f5 0d 01 d6 20 49 25  |I%=-1........ I%|
00000410  3d 49 25 2b 31 3a 3f 28  5a 2b 49 25 29 3d 97 c1  |=I%+1:?(Z+I%)=..|
00000420  74 24 2c 49 25 2b 31 2c  31 29 0d 01 e0 11 fd 20  |t$,I%+1,1)..... |
00000430  3f 28 5a 2b 49 25 29 3d  26 30 44 0d 01 ea 0d 3f  |?(Z+I%)=&0D....?|
00000440  28 5a 2b 49 25 29 3d 30  0d 01 f4 05 e1 0d 01 fe  |(Z+I%)=0........|
00000450  07 dd f2 41 0d 02 08 06  f2 61 0d 02 12 43 5f 3f  |...A.....a...C_?|
00000460  30 3d 26 44 31 3a 5f 3f  31 3d 26 33 42 3a 6d 3f  |0=&D1:_?1=&3B:m?|
00000470  30 3d 26 39 30 3a 6d 3f  31 3d 26 33 41 3a 60 3f  |0=&90:m?1=&3A:`?|
00000480  30 3d 26 35 30 3a 60 3f  31 3d 26 33 41 3a 63 3d  |0=&50:`?1=&3A:c=|
00000490  30 3a 74 3f 30 3d 30 3a  74 3f 31 3d 30 0d 02 1c  |0:t?0=0:t?1=0...|
000004a0  13 f5 20 fd 20 3f 4e 3e  35 3a d6 20 26 43 30 30  |.. . ?N>5:. &C00|
000004b0  0d 02 26 14 e7 20 3f 6e  3d 31 20 53 3d b9 20 8b  |..&.. ?n=1 S=. .|
000004c0  20 53 3d a3 0d 02 30 15  63 3d 3f 74 2b 3f 28 74  | S=...0.c=?t+?(t|
000004d0  2b 31 29 2a 32 35 36 2d  31 0d 02 3a 05 e1 0d 02  |+1)*256-1..:....|
000004e0  44 07 dd f2 4d 0d 02 4e  23 55 3d 28 3f 28 49 2b  |D...M..N#U=(?(I+|
000004f0  63 2a 34 29 2b 3f 28 49  2b 63 2a 34 2b 31 29 2a  |c*4)+?(I+c*4+1)*|
00000500  32 35 36 29 2f 31 30 30  0d 02 58 24 47 3d 3f 28  |256)/100..X$G=?(|
00000510  49 2b 63 2a 34 2b 32 29  2b 3f 28 49 2b 63 2a 34  |I+c*4+2)+?(I+c*4|
00000520  2b 33 29 2a 32 35 36 3a  45 25 3d a3 0d 02 62 23  |+3)*256:E%=...b#|
00000530  e7 20 47 3e 33 30 30 30  30 20 8c 20 45 25 3d b9  |. G>30000 . E%=.|
00000540  3a 47 3d 28 47 2d 34 30  30 30 30 29 2a 2d 31 0d  |:G=(G-40000)*-1.|
00000550  02 6c 1c e7 20 45 25 3d  a3 20 8c 20 4c 24 3d 22  |.l.. E%=. . L$="|
00000560  57 22 20 8b 20 4c 24 3d  22 45 22 0d 02 76 14 47  |W" . L$="E"..v.G|
00000570  3d 47 2f 31 30 30 3a 64  3d 3f 28 4d 2b 63 29 0d  |=G/100:d=?(M+c).|
00000580  02 80 05 e1 0d 02 8a 07  dd f2 58 0d 02 94 23 ef  |..........X...#.|
00000590  32 34 2c 35 3b 38 34 35  3b 31 32 35 39 3b 39 39  |24,5;845;1259;99|
000005a0  39 3b 3a da 3a 40 25 3d  26 32 30 32 30 35 0d 02  |9;:.:@%=&20205..|
000005b0  9e 0e e7 20 53 3d a3 20  f2 48 3a e1 0d 02 a8 06  |... S=. .H:.....|
000005c0  f2 4d 0d 02 b2 2b ec 20  35 2c 39 39 30 3a f1 22  |.M...+. 5,990:."|
000005d0  50 72 65 73 65 6e 74 20  70 6f 73 69 74 69 6f 6e  |Present position|
000005e0  20 22 3b 74 24 3a f2 50  28 39 34 30 29 0d 02 bc  | ";t$:.P(940)...|
000005f0  24 e7 20 28 64 20 80 20  31 32 38 29 3e 30 20 ec  |$. (d . 128)>0 .|
00000600  20 35 2c 38 39 30 3a f1  22 47 6f 6c 64 22 3a f2  | 5,890:."Gold":.|
00000610  53 0d 02 c6 12 e7 20 28  64 20 80 20 31 29 3e 30  |S..... (d . 1)>0|
00000620  20 f2 63 0d 02 d0 2d e7  20 28 64 20 80 20 34 29  | .c...-. (d . 4)|
00000630  3e 30 20 ec 20 35 2c 38  39 30 3a f1 22 47 6f 6c  |>0 . 5,890:."Gol|
00000640  64 20 63 6f 6e 76 65 72  73 69 6f 6e 22 3a f2 45  |d conversion":.E|
00000650  0d 02 da 19 65 3d 63 3a  42 24 3d 74 24 3a 6f 3d  |....e=c:B$=t$:o=|
00000660  55 3a 69 3d 47 3a 44 3d  64 0d 02 e4 05 e1 0d 02  |U:i=G:D=d.......|
00000670  ee 07 dd f2 48 0d 02 f8  4c ef 37 3a ef 32 34 2c  |....H...L.7:.24,|
00000680  35 3b 35 3b 31 32 35 39  3b 39 39 3b 3a ec 20 35  |5;5;1259;99;:. 5|
00000690  2c 39 30 3a f1 22 54 6f  77 6e 20 6e 6f 74 20 66  |,90:."Town not f|
000006a0  6f 75 6e 64 2c 20 65 6e  74 65 72 20 61 6e 6f 74  |ound, enter anot|
000006b0  68 65 72 2e 22 3a ec 20  35 2c 34 35 3a f2 47 3a  |her.":. 5,45:.G:|
000006c0  da 0d 03 02 05 e1 0d 03  0c 07 dd f2 5a 0d 03 16  |............Z...|
000006d0  4b ef 32 34 2c 35 3b 36  30 35 3b 31 32 35 39 3b  |K.24,5;605;1259;|
000006e0  37 39 39 3b 3a da 3a 40  25 3d 26 32 30 32 30 35  |799;:.:@%=&20205|
000006f0  3a ec 20 35 2c 37 39 35  3a f1 22 45 6e 74 65 72  |:. 5,795:."Enter|
00000700  20 64 65 73 74 69 6e 61  74 69 6f 6e 20 74 6f 77  | destination tow|
00000710  6e 22 3a f2 47 3a f2 46  0d 03 20 05 e1 0d 03 2a  |n":.G:.F.. ....*|
00000720  07 dd f2 54 0d 03 34 2d  4e 25 3d 30 3a 4a 3d 31  |...T..4-N%=0:J=1|
00000730  3a ef 32 34 2c 35 3b 31  38 30 3b 31 32 35 39 3b  |:.24,5;180;1259;|
00000740  34 34 39 3b 3a da 3a 40  25 3d 31 3a 59 3d 34 34  |449;:.:@%=1:Y=44|
00000750  30 0d 03 3e 26 e7 20 28  45 20 80 20 32 29 3e 30  |0..>&. (E . 2)>0|
00000760  20 84 20 28 44 20 80 20  32 29 3e 30 20 f2 64 3a  | . (D . 2)>0 .d:|
00000770  e7 20 4a 3d 30 20 e1 0d  03 48 08 45 25 3d 36 0d  |. J=0 ...H.E%=6.|
00000780  03 52 05 f5 0d 03 5c 0a  62 3d 32 5e 45 25 0d 03  |.R....\.b=2^E%..|
00000790  66 19 e7 20 28 4a 3d 32  20 80 20 45 25 3d 34 29  |f.. (J=2 . E%=4)|
000007a0  20 e5 20 8d 74 44 43 0d  03 70 40 e7 20 28 28 44  | . .tDC..p@. ((D|
000007b0  20 80 20 31 36 29 3e 30  20 80 20 28 45 20 80 20  | . 16)>0 . (E . |
000007c0  31 36 29 3e 30 29 20 80  20 28 28 44 20 80 20 32  |16)>0) . ((D . 2|
000007d0  29 3d 30 20 80 20 28 45  20 80 20 32 29 3d 30 29  |)=0 . (E . 2)=0)|
000007e0  20 e5 20 8d 74 44 43 0d  03 7a 52 e7 20 28 44 20  | . .tDC..zR. (D |
000007f0  80 20 62 29 3e 30 20 80  20 28 45 20 80 20 62 29  |. b)>0 . (E . b)|
00000800  3e 30 20 ec 20 35 2c 59  3a 4e 25 3d 4e 25 2b 31  |>0 . 5,Y:N%=N%+1|
00000810  3a f1 4e 25 3b 22 20 22  3b 41 24 28 45 25 2d 31  |:.N%;" ";A$(E%-1|
00000820  29 3a 54 25 28 4e 25 2d  31 29 3d 45 25 2d 31 3a  |):T%(N%-1)=E%-1:|
00000830  f2 42 3a 59 3d 59 2d 35  30 0d 03 84 0b 45 25 3d  |.B:Y=Y-50....E%=|
00000840  45 25 2d 31 0d 03 8e 0a  fd 20 45 25 3c 33 0d 03  |E%-1..... E%<3..|
00000850  98 3e e7 20 28 28 45 20  80 20 32 29 3e 30 20 80  |.>. ((E . 2)>0 .|
00000860  20 28 44 20 80 20 32 29  3d 30 29 20 84 20 28 28  | (D . 2)=0) . ((|
00000870  45 20 80 20 32 29 3d 30  20 80 20 28 44 20 80 20  |E . 2)=0 . (D . |
00000880  32 29 3e 30 29 20 e5 20  8d 64 72 43 0d 03 a2 0a  |2)>0) . .drC....|
00000890  f7 20 8d 74 5a 41 0d 03  ac 0e e3 20 49 25 3d 31  |. .tZA..... I%=1|
000008a0  20 b8 20 36 0d 03 b6 08  f3 20 41 25 0d 03 c0 1a  | . 6..... A%....|
000008b0  e7 20 65 3d 41 25 20 84  20 76 3d 41 25 20 8c 20  |. e=A% . v=A% . |
000008c0  49 25 3d 31 30 30 0d 03  ca 05 ed 0d 03 d4 12 e7  |I%=100..........|
000008d0  20 49 25 3e 39 39 20 e5  20 8d 64 72 43 0d 03 de  | I%>99 . .drC...|
000008e0  3c ec 20 35 2c 59 3a 4e  25 3d 4e 25 2b 31 3a f1  |<. 5,Y:N%=N%+1:.|
000008f0  4e 25 3b 22 20 22 3b 41  24 28 31 29 3a 54 25 28  |N%;" ";A$(1):T%(|
00000900  4e 25 2d 31 29 3d 31 3a  f2 42 3a 59 3d 59 2d 35  |N%-1)=1:.B:Y=Y-5|
00000910  30 3a 45 25 3d 45 25 2d  31 0d 03 e8 34 ec 20 35  |0:E%=E%-1...4. 5|
00000920  2c 59 3a 4e 25 3d 4e 25  2b 31 3a f1 4e 25 3b 22  |,Y:N%=N%+1:.N%;"|
00000930  20 22 3b 41 24 28 30 29  3a 54 25 28 4e 25 2d 31  | ";A$(0):T%(N%-1|
00000940  29 3d 30 3a f2 42 3a 59  3d 59 2d 35 30 0d 03 f2  |)=0:.B:Y=Y-50...|
00000950  05 e1 0d 03 fc 1e dd a4  41 28 77 29 3d 99 28 b7  |........A(w)=.(.|
00000960  28 77 29 2f 31 2e 30 30  36 37 33 38 34 36 35 29  |(w)/1.006738465)|
00000970  0d 04 06 10 dd f2 55 28  51 2c 4b 2c 56 2c 66 29  |......U(Q,K,V,f)|
00000980  0d 04 10 0e 51 3d a4 41  28 b2 28 51 29 29 0d 04  |....Q=.A(.(Q))..|
00000990  1a 0e 4b 3d a4 41 28 b2  28 4b 29 29 0d 04 24 0e  |..K=.A(.(K))..$.|
000009a0  56 3d a4 41 28 b2 28 56  29 29 0d 04 2e 0e 66 3d  |V=.A(.(V))....f=|
000009b0  a4 41 28 b2 28 66 29 29  0d 04 38 0d 71 3d 28 51  |.A(.(f))..8.q=(Q|
000009c0  2b 56 29 2f 32 0d 04 42  14 72 3d 31 2e 35 37 30  |+V)/2..B.r=1.570|
000009d0  37 39 36 33 32 36 38 2d  51 0d 04 4c 14 73 3d 31  |7963268-Q..L.s=1|
000009e0  2e 35 37 30 37 39 36 33  32 36 38 2d 56 0d 04 56  |.5707963268-V..V|
000009f0  0c 47 3d 94 28 4b 2d 66  29 0d 04 60 21 67 3d 95  |.G=.(K-f)..`!g=.|
00000a00  28 9b 28 72 29 2a 9b 28  73 29 2b b5 28 72 29 2a  |(.(r)*.(s)+.(r)*|
00000a10  b5 28 73 29 2a 9b 28 47  29 29 0d 04 6a 22 52 3d  |.(s)*.(G))..j"R=|
00000a20  41 2a 42 2f b6 28 28 41  2a b5 28 71 29 29 5e 32  |A*B/.((A*.(q))^2|
00000a30  2b 28 42 2a 9b 28 71 29  29 5e 32 29 0d 04 74 15  |+(B*.(q))^2)..t.|
00000a40  67 3d 30 2e 36 32 35 2a  52 2a 67 2f 31 2e 30 45  |g=0.625*R*g/1.0E|
00000a50  33 0d 04 7e 40 ef 32 34  2c 35 3b 35 30 35 3b 33  |3..~@.24,5;505;3|
00000a60  39 39 3b 35 34 39 3b 3a  da 3a 40 25 3d 26 32 30  |99;549;:.:@%=&20|
00000a70  32 30 34 3a ec 20 35 2c  35 35 30 3a f1 67 3b 22  |204:. 5,550:.g;"|
00000a80  20 6d 69 6c 65 73 22 3a  40 25 3d 26 32 30 32 30  | miles":@%=&2020|
00000a90  36 0d 04 88 05 e1 0d 04  92 07 dd f2 53 0d 04 9c  |6...........S...|
00000aa0  29 d4 20 31 2c 2d 31 35  2c 39 37 2c 32 3a d4 20  |). 1,-15,97,2:. |
00000ab0  31 2c 30 2c 31 30 35 2c  31 3a d4 20 31 2c 2d 31  |1,0,105,1:. 1,-1|
00000ac0  35 2c 39 37 2c 32 0d 04  a6 3b ef 32 34 2c 35 3b  |5,97,2...;.24,5;|
00000ad0  35 3b 31 32 35 39 3b 39  39 3b 3a da 3a ec 20 35  |5;1259;99;:.:. 5|
00000ae0  2c 39 35 3a f1 22 44 6f  20 79 6f 75 20 77 61 6e  |,95:."Do you wan|
00000af0  74 20 74 68 65 20 67 6f  6c 64 28 59 2f 4e 29 3f  |t the gold(Y/N)?|
00000b00  22 0d 04 b0 0b 2a 46 58  31 35 2c 30 0d 04 ba 26  |"....*FX15,0...&|
00000b10  41 24 3d be 3a e7 20 41  24 3c 3e 22 59 22 20 80  |A$=.:. A$<>"Y" .|
00000b20  20 41 24 3c 3e 22 4e 22  20 ef 37 3a e5 20 8d 74  | A$<>"N" .7:. .t|
00000b30  66 44 0d 04 c4 18 e7 20  41 24 3d 22 59 22 20 80  |fD..... A$="Y" .|
00000b40  20 43 3e 32 30 20 f2 56  3a e1 0d 04 ce 60 e7 20  | C>20 .V:....`. |
00000b50  41 24 3d 22 59 22 20 8c  20 43 3d 43 2b 32 3a 3f  |A$="Y" . C=C+2:?|
00000b60  28 4d 2b 63 29 3d 3f 28  4d 2b 63 29 2d 31 32 38  |(M+c)=?(M+c)-128|
00000b70  3a da 3a f2 44 3a 56 25  3d 56 25 2d 31 3a ef 32  |:.:.D:V%=V%-1:.2|
00000b80  34 2c 31 30 32 30 3b 35  30 35 3b 31 32 35 39 3b  |4,1020;505;1259;|
00000b90  35 35 30 3b 3a da 3a ec  20 31 31 30 30 2c 35 35  |550;:.:. 1100,55|
00000ba0  30 3a 40 25 3d 31 3a f1  56 25 0d 04 d8 2a ef 32  |0:@%=1:.V%...*.2|
00000bb0  34 2c 35 3b 35 3b 31 32  35 39 3b 39 39 3b 3a da  |4,5;5;1259;99;:.|
00000bc0  3a ef 32 34 2c 35 3b 38  30 35 3b 31 32 35 39 3b  |:.24,5;805;1259;|
00000bd0  39 39 39 3b 0d 04 e2 05  e1 0d 04 ec 07 dd f2 63  |999;...........c|
00000be0  0d 04 f6 47 e7 20 43 3e  36 20 80 20 b3 28 32 30  |...G. C>6 . .(20|
00000bf0  29 3c 31 30 20 ec 20 33  30 30 2c 38 39 30 3a f1  |)<10 . 300,890:.|
00000c00  22 42 65 77 61 72 65 2d  50 6f 6c 69 63 65 20 61  |"Beware-Police a|
00000c10  72 65 20 61 66 74 65 72  20 79 6f 75 21 22 20 8b  |re after you!" .|
00000c20  20 e5 20 8d 54 4a 45 0d  05 00 19 d4 20 31 2c 31  | . .TJE..... 1,1|
00000c30  2c 31 30 30 2c 31 30 30  3a 3f 26 38 45 3d 31 30  |,100,100:?&8E=10|
00000c40  0d 05 0a 05 e1 0d 05 14  05 3a 0d 05 1e 07 dd f2  |.........:......|
00000c50  5f 0d 05 28 14 ef 32 34  2c 35 3b 35 3b 31 32 35  |_..(..24,5;5;125|
00000c60  39 3b 39 39 3b 0d 05 32  51 ec 20 35 2c 39 30 3a  |9;99;..2Q. 5,90:|
00000c70  f1 22 53 65 6c 65 63 74  20 6d 6f 64 65 20 6f 66  |."Select mode of|
00000c80  20 74 72 61 76 65 6c 20  62 79 20 6e 6f 2e 20 6f  | travel by no. o|
00000c90  72 22 3a ec 20 35 2c 35  35 3a f1 22 30 20 74 6f  |r":. 5,55:."0 to|
00000ca0  20 72 65 73 65 6c 65 63  74 20 64 65 73 74 69 6e  | reselect destin|
00000cb0  61 74 69 6f 6e 22 0d 05  3c 07 61 3d a3 0d 05 46  |ation"..<.a=...F|
00000cc0  05 f5 0d 05 50 17 ef 32  34 2c 35 3b 31 38 30 3b  |....P..24,5;180;|
00000cd0  31 32 35 39 3b 34 34 39  3b 0d 05 5a 0b 2a 46 58  |1259;449;..Z.*FX|
00000ce0  31 35 2c 30 0d 05 64 0b  41 25 3d a5 2d 34 38 0d  |15,0..d.A%=.-48.|
00000cf0  05 6e 19 e7 20 41 25 3d  30 20 53 3d a3 3a 61 3d  |.n.. A%=0 S=.:a=|
00000d00  b9 3a e5 20 8d 74 42 45  0d 05 78 1b e7 20 41 25  |.:. .tBE..x.. A%|
00000d10  3c 31 20 84 20 41 25 3e  4e 25 20 f2 4c 20 8b 20  |<1 . A%>N% .L . |
00000d20  61 3d b9 0d 05 82 09 fd  20 61 3d b9 0d 05 8c 34  |a=...... a=....4|
00000d30  e7 20 53 3d a3 20 ef 32  34 2c 35 3b 35 3b 31 32  |. S=. .24,5;5;12|
00000d40  35 39 3b 39 39 3b 3a da  3a ef 32 34 2c 35 3b 31  |59;99;:.:.24,5;1|
00000d50  38 30 3b 31 32 35 39 3b  34 34 39 3b 3a da 3a e1  |80;1259;449;:.:.|
00000d60  0d 05 96 3c 53 25 3d 54  25 28 41 25 2d 31 29 3a  |...<S%=T%(A%-1):|
00000d70  45 25 3d 53 25 2b 31 3a  f2 4e 3a ec 20 34 30 2c  |E%=S%+1:.N:. 40,|
00000d80  34 39 30 2d 35 30 2a 41  25 3a f1 22 2a 22 3a e7  |490-50*A%:."*":.|
00000d90  20 28 46 2d 6a 29 3c 31  30 20 f2 65 0d 05 a0 06  | (F-j)<10 .e....|
00000da0  f2 49 0d 05 aa 13 e7 20  28 57 25 2d 42 25 29 3c  |.I..... (W%-B%)<|
00000db0  36 30 20 f2 66 0d 05 b4  65 ef 32 34 2c 35 3b 35  |60 .f...e.24,5;5|
00000dc0  3b 31 32 35 39 3b 39 39  3b 3a da 3a ec 20 35 2c  |;1259;99;:.:. 5,|
00000dd0  39 35 3a f1 22 50 72 65  73 73 20 73 70 61 63 65  |95:."Press space|
00000de0  20 74 6f 20 63 6f 6e 66  69 72 6d 20 63 68 6f 69  | to confirm choi|
00000df0  63 65 20 6f 72 22 3a ec  20 35 2c 34 35 3a f1 22  |ce or":. 5,45:."|
00000e00  4e 20 74 6f 20 63 68 6f  6f 73 65 20 61 67 61 69  |N to choose agai|
00000e10  6e 22 3a 2a 46 58 31 35  2c 30 0d 05 be 08 41 24  |n":*FX15,0....A$|
00000e20  3d be 0d 05 c8 10 e7 20  41 24 3d 22 20 22 20 da  |=...... A$=" " .|
00000e30  3a e1 0d 05 d2 3d e7 20  41 24 3d 22 4e 22 20 da  |:....=. A$="N" .|
00000e40  3a ef 32 34 2c 35 3b 31  30 35 3b 31 32 35 39 3b  |:.24,5;105;1259;|
00000e50  34 34 39 3b 3a ec 20 37  35 2c 34 39 30 2d 35 30  |449;:. 75,490-50|
00000e60  2a 41 25 3a ef 31 32 37  3a e5 20 8d 54 68 45 0d  |*A%:.127:. .ThE.|
00000e70  05 dc 0a e5 20 8d 74 74  45 0d 05 e6 05 e1 0d 05  |.... .ttE.......|
00000e80  f0 07 dd f2 4c 0d 05 fa  16 ef 32 34 2c 35 3b 35  |....L.....24,5;5|
00000e90  3b 31 32 35 39 3b 39 39  3b 3a da 0d 06 04 09 40  |;1259;99;:.....@|
00000ea0  25 3d 31 30 0d 06 0e 2e  ec 20 35 2c 39 35 3a f1  |%=10..... 5,95:.|
00000eb0  22 45 6e 74 65 72 20 61  20 6e 6f 2e 20 62 65 74  |"Enter a no. bet|
00000ec0  77 65 65 6e 20 31 20 61  6e 64 20 22 3b 4e 25 3a  |ween 1 and ";N%:|
00000ed0  ef 37 0d 06 18 05 e1 0d  06 22 07 dd f2 4a 0d 06  |.7......."...J..|
00000ee0  2c 79 e7 20 74 24 3d 42  24 20 ef 37 3a ef 32 34  |,y. t$=B$ .7:.24|
00000ef0  2c 35 3b 36 30 35 3b 31  32 35 39 3b 37 39 39 3b  |,5;605;1259;799;|
00000f00  3a da 3a ec 20 31 30 2c  37 39 35 3a f1 22 44 45  |:.:. 10,795:."DE|
00000f10  53 54 49 4e 41 54 49 4f  4e 20 53 41 4d 45 20 41  |STINATION SAME A|
00000f20  53 20 50 52 45 53 45 4e  54 20 50 4f 53 49 54 49  |S PRESENT POSITI|
00000f30  4f 4e 22 3a ec 20 31 30  2c 37 34 35 3a f1 22 45  |ON":. 10,745:."E|
00000f40  4e 54 45 52 20 41 4e 4f  54 48 45 52 22 3a f2 47  |NTER ANOTHER":.G|
00000f50  3a e5 20 8d 54 6c 46 0d  06 36 05 e1 0d 06 40 07  |:. .TlF..6....@.|
00000f60  dd f2 46 0d 06 4a 21 ef  32 34 2c 35 3b 35 3b 31  |..F..J!.24,5;5;1|
00000f70  32 35 39 3b 39 39 3b 3a  da 3a e7 20 74 24 3d 42  |259;99;:.:. t$=B|
00000f80  24 20 f2 4a 0d 06 54 06  f2 41 0d 06 5e 15 e7 20  |$ .J..T..A..^.. |
00000f90  53 3d a3 20 da 3a f2 48  3a e5 20 8d 44 4a 46 0d  |S=. .:.H:. .DJF.|
00000fa0  06 68 15 e7 20 74 24 3d  42 24 20 f2 4a 3a e5 20  |.h.. t$=B$ .J:. |
00000fb0  8d 44 54 46 0d 06 72 72  ef 32 34 2c 35 3b 36 30  |.DTF..rr.24,5;60|
00000fc0  35 3b 31 32 35 39 3b 37  39 39 3b 3a da 3a f2 4d  |5;1259;799;:.:.M|
00000fd0  3a 40 25 3d 26 32 30 32  30 35 3a ec 20 35 2c 37  |:@%=&20205:. 5,7|
00000fe0  39 30 3a f1 22 44 65 73  74 69 6e 61 74 69 6f 6e  |90:."Destination|
00000ff0  20 22 3b 74 24 3a f2 50  28 37 34 30 29 3a 76 3d  | ";t$:.P(740):v=|
00001000  63 3a 45 3d 64 3a f2 55  28 6f 2c 69 2c 55 2c 47  |c:E=d:.U(o,i,U,G|
00001010  29 3a f2 54 3a e7 20 4a  3d 30 20 8c 20 f2 62 3a  |):.T:. J=0 . .b:|
00001020  e5 20 8d 44 4a 46 0d 06  7c 05 e1 0d 06 86 07 dd  |. .DJF..|.......|
00001030  f2 62 0d 06 90 4f ef 37  3a ef 32 34 2c 35 3b 35  |.b...O.7:.24,5;5|
00001040  3b 31 32 35 39 3b 39 39  3b 3a ec 20 35 2c 39 30  |;1259;99;:. 5,90|
00001050  3a f1 22 52 6f 75 74 65  20 75 6e 6f 62 74 61 69  |:."Route unobtai|
00001060  6e 61 62 6c 65 2c 20 65  6e 74 65 72 20 61 6e 6f  |nable, enter ano|
00001070  74 68 65 72 22 3a ec 20  35 2c 34 35 3a f2 47 3a  |ther":. 5,45:.G:|
00001080  da 0d 06 9a 05 e1 0d 06  a4 07 dd f2 45 0d 06 ae  |............E...|
00001090  0b e7 20 43 3d 30 20 e1  0d 06 b8 67 ef 37 3a ef  |.. C=0 ....g.7:.|
000010a0  32 34 2c 35 3b 35 3b 31  32 35 39 3b 39 39 3b 3a  |24,5;5;1259;99;:|
000010b0  da 3a ec 20 35 2c 39 30  3a f1 22 48 6f 77 20 6d  |.:. 5,90:."How m|
000010c0  75 63 68 20 67 6f 6c 64  20 74 6f 20 62 65 20 63  |uch gold to be c|
000010d0  6f 6e 76 65 72 74 65 64  20 28 6f 7a 2e 29 20 3f  |onverted (oz.) ?|
000010e0  22 3a ec 20 35 2c 34 35  3a e8 6b 3a e7 20 6b 3e  |":. 5,45:.k:. k>|
000010f0  43 20 84 20 6b 20 3c 30  20 e5 20 8d 74 78 46 0d  |C . k <0 . .txF.|
00001100  06 c2 1b 43 3d 43 2d 6b  3a 46 3d 46 2b 6b 2a 32  |...C=C-k:F=F+k*2|
00001110  30 30 3a da 3a f2 44 3a  f2 43 0d 06 cc 05 e1 0d  |00:.:.D:.C......|
00001120  06 d6 07 dd f2 64 0d 06  e0 07 4a 3d 30 0d 06 ea  |.....d....J=0...|
00001130  0f e3 20 49 25 3d 30 20  b8 20 31 31 0d 06 f4 47  |.. I%=0 . 11...G|
00001140  e7 20 28 65 3d 66 25 28  49 25 2c 30 29 20 80 20  |. (e=f%(I%,0) . |
00001150  63 3d 66 25 28 49 25 2c  31 29 29 20 84 20 28 63  |c=f%(I%,1)) . (c|
00001160  3d 66 25 28 49 25 2c 30  29 20 80 20 65 3d 66 25  |=f%(I%,0) . e=f%|
00001170  28 49 25 2c 31 29 29 20  8c 20 4a 3d 31 3a 49 25  |(I%,1)) . J=1:I%|
00001180  3d 31 31 0d 06 fe 05 ed  0d 07 08 0b e7 20 4a 3d  |=11.......... J=|
00001190  31 20 e1 0d 07 12 0b e3  49 25 3d 30 b8 32 0d 07  |1 ......I%=0.2..|
000011a0  1c 0b e3 4a 25 3d 30 b8  33 0d 07 26 0b e3 4b 25  |...J%=0.3..&..K%|
000011b0  3d 30 b8 33 0d 07 30 12  e7 20 4b 25 3d 4a 25 20  |=0.3..0.. K%=J% |
000011c0  e5 20 8d 44 44 47 0d 07  3a 53 e7 28 65 3d 69 25  |. .DDG..:S.(e=i%|
000011d0  28 49 25 2c 4a 25 29 20  80 20 63 3d 69 25 28 49  |(I%,J%) . c=i%(I|
000011e0  25 2c 4b 25 29 29 20 84  20 28 63 3d 69 25 28 49  |%,K%)) . (c=i%(I|
000011f0  25 2c 4a 25 29 20 80 20  65 3d 69 25 28 49 25 2c  |%,J%) . e=i%(I%,|
00001200  4b 25 29 29 20 8c 20 4a  3d 32 3a 49 25 3d 32 3a  |K%)) . J=2:I%=2:|
00001210  4a 25 3d 33 3a 4b 25 3d  33 0d 07 44 05 ed 0d 07  |J%=3:K%=3..D....|
00001220  4e 05 ed 0d 07 58 05 ed  0d 07 62 0b e7 20 4a 3e  |N....X....b.. J>|
00001230  30 20 e1 0d 07 6c 43 e7  20 28 28 44 20 80 20 36  |0 ...lC. ((D . 6|
00001240  34 29 3e 30 20 80 20 28  45 20 80 20 36 34 29 3e  |4)>0 . (E . 64)>|
00001250  30 29 20 84 20 28 28 44  20 80 20 33 32 29 3e 30  |0) . ((D . 32)>0|
00001260  20 80 20 28 45 20 80 20  33 32 29 3e 30 29 20 8c  | . (E . 32)>0) .|
00001270  20 4a 3d 32 3a e1 0d 07  76 05 e1 0d 07 80 07 dd  | J=2:...v.......|
00001280  f2 57 0d 07 8a 2c e2 20  31 2c 31 2c 34 2c 2d 34  |.W...,. 1,1,4,-4|
00001290  2c 34 2c 31 30 2c 32 30  2c 31 30 2c 31 32 37 2c  |,4,10,20,10,127,|
000012a0  30 2c 30 2c 2d 35 2c 31  32 36 2c 31 32 36 0d 07  |0,0,-5,126,126..|
000012b0  94 2b 40 25 3d 26 32 30  32 30 36 3a 60 3d 26 37  |.+@%=&20206:`=&7|
000012c0  30 3a 6d 3d 26 37 34 3a  5f 3d 26 37 36 3a 74 3d  |0:m=&74:_=&76:t=|
000012d0  26 37 38 3a 6e 3d 26 37  45 0d 07 9e 33 4e 3d 26  |&78:n=&7E...3N=&|
000012e0  38 34 3a 57 3d 26 38 35  3a 4f 3d 26 38 36 3a 58  |84:W=&85:O=&86:X|
000012f0  3d 26 38 37 3a 50 3d 26  38 38 3a 6c 3d 26 38 39  |=&87:P=&88:l=&89|
00001300  3a 54 3d 26 38 41 3a 4c  3d 26 38 42 0d 07 a8 3c  |:T=&8A:L=&8B...<|
00001310  3f 4e 3d 32 30 3a 3f 57  3d 30 3a 3f 4f 3d 30 3a  |?N=20:?W=0:?O=0:|
00001320  3f 58 3d 30 3a 3f 50 3d  30 3a 3f 6c 3d 30 3a 3f  |?X=0:?P=0:?l=0:?|
00001330  54 3d 30 3a 3f 4c 3d 32  3a 3f 26 38 45 3d 31 30  |T=0:?L=2:?&8E=10|
00001340  30 3a 3f 26 38 46 3d 30  0d 07 b2 34 3f 26 41 36  |0:?&8F=0...4?&A6|
00001350  30 3d 26 32 30 3a 3f 26  41 36 31 3d 26 39 3a 3f  |0=&20:?&A61=&9:?|
00001360  26 41 36 32 3d 26 32 30  3a 3f 26 41 36 33 3d 26  |&A62=&20:?&A63=&|
00001370  32 30 3a 3f 26 41 36 34  3d 26 37 45 0d 07 bc 2f  |20:?&A64=&7E.../|
00001380  49 3d 26 34 42 45 39 3a  4d 3d 26 35 35 38 46 3a  |I=&4BE9:M=&558F:|
00001390  5a 3d 26 33 41 37 30 3a  46 3d 31 30 30 3a 56 25  |Z=&3A70:F=100:V%|
000013a0  3d 35 38 3a 43 3d 30 3a  48 3d 30 0d 07 c6 90 41  |=58:C=0:H=0....A|
000013b0  24 28 30 29 3d 22 46 6f  6f 74 22 3a 41 24 28 31  |$(0)="Foot":A$(1|
000013c0  29 3d 22 43 6f 61 63 68  2f 62 75 73 22 3a 41 24  |)="Coach/bus":A$|
000013d0  28 32 29 3d 22 54 72 61  69 6e 22 3a 41 24 28 33  |(2)="Train":A$(3|
000013e0  29 3d 22 46 65 72 72 79  22 3a 41 24 28 34 29 3d  |)="Ferry":A$(4)=|
000013f0  22 43 68 61 72 74 65 72  65 64 20 66 6c 69 67 68  |"Chartered fligh|
00001400  74 22 3a 41 24 28 35 29  3d 22 53 63 68 65 64 75  |t":A$(5)="Schedu|
00001410  6c 65 64 20 66 6c 69 67  68 74 22 3a 41 3d 36 2e  |led flight":A=6.|
00001420  33 37 38 31 36 36 30 30  35 45 36 3a 42 3d 36 2e  |378166005E6:B=6.|
00001430  33 35 36 37 38 34 34 37  39 45 36 0d 07 d0 6d 56  |356784479E6...mV|
00001440  28 30 29 3d 33 2e 35 3a  56 28 31 29 3d 33 35 3a  |(0)=3.5:V(1)=35:|
00001450  56 28 32 29 3d 35 35 3a  56 28 33 29 3d 31 37 3a  |V(2)=55:V(3)=17:|
00001460  56 28 34 29 3d 36 30 30  3a 56 28 35 29 3d 35 30  |V(4)=600:V(5)=50|
00001470  30 3a 3a 43 28 30 29 3d  30 3a 43 28 31 29 3d 30  |0::C(0)=0:C(1)=0|
00001480  2e 30 37 3a 43 28 32 29  3d 30 2e 31 3a 43 28 33  |.07:C(2)=0.1:C(3|
00001490  29 3d 30 2e 32 3a 43 28  34 29 3d 30 2e 35 35 3a  |)=0.2:C(4)=0.55:|
000014a0  43 28 35 29 3d 30 2e 35  0d 07 da 05 e1 0d 07 e4  |C(5)=0.5........|
000014b0  07 dd f2 42 0d 07 ee 4f  40 25 3d 26 32 30 32 30  |...B...O@%=&2020|
000014c0  34 3a f2 4e 3a f2 4f 28  70 29 3a ec 20 37 34 30  |4:.N:.O(p):. 740|
000014d0  2d 68 2c 59 3a f1 70 3a  ec 20 38 30 30 2c 59 3a  |-h,Y:.p:. 800,Y:|
000014e0  f1 22 20 68 72 73 2e 20  60 22 3a f2 4f 28 6a 29  |." hrs. `":.O(j)|
000014f0  3a ec 20 31 31 35 30 2d  68 2c 59 3a f1 6a 3a 40  |:. 1150-h,Y:.j:@|
00001500  25 3d 31 0d 07 f8 05 e1  0d 08 02 07 dd f2 4e 0d  |%=1...........N.|
00001510  08 0c 1b 70 3d 67 2f 56  28 45 25 2d 31 29 3a 6a  |...p=g/V(E%-1):j|
00001520  3d 67 2a 43 28 45 25 2d  31 29 0d 08 16 05 e1 0d  |=g*C(E%-1)......|
00001530  08 20 07 dd f2 44 0d 08  2a 42 40 25 3d 26 32 30  |. ...D..*B@%=&20|
00001540  32 30 34 3a ef 32 34 2c  34 30 35 3b 35 30 35 3b  |204:.24,405;505;|
00001550  36 39 39 3b 35 35 30 3b  3a da 3a ec 20 34 31 30  |699;550;:.:. 410|
00001560  2c 35 35 30 3a f1 43 3b  22 20 6f 7a 2e 22 3a 40  |,550:.C;" oz.":@|
00001570  25 3d 26 32 30 32 30 36  0d 08 34 05 e1 0d 08 3e  |%=&20206..4....>|
00001580  07 dd f2 43 0d 08 48 40  40 25 3d 26 32 30 32 30  |...C..H@@%=&2020|
00001590  34 3a ef 32 34 2c 37 30  35 3b 35 30 35 3b 31 30  |4:.24,705;505;10|
000015a0  30 30 3b 35 35 30 3b 3a  da 3a ec 20 37 31 30 2c  |00;550;:.:. 710,|
000015b0  35 35 30 3a f1 22 60 22  3b 46 3a 40 25 3d 26 32  |550:."`";F:@%=&2|
000015c0  30 32 30 36 0d 08 52 05  e1 0d 08 5c 07 dd f2 60  |0206..R....\...`|
000015d0  0d 08 66 15 3f 26 38 45  3d 31 30 30 3a 46 3d 46  |..f.?&8E=100:F=F|
000015e0  2d 6a 3a f2 49 0d 08 70  37 e7 20 57 25 2d 42 25  |-j:.I..p7. W%-B%|
000015f0  3c 35 20 3f 4c 3d 30 3a  3f 54 3d 30 3a 3f 6c 3d  |<5 ?L=0:?T=0:?l=|
00001600  30 3a 3f 50 3d 30 3a 3f  58 3d 30 3a 3f 4f 3d 30  |0:?P=0:?X=0:?O=0|
00001610  3a 3f 57 3d 35 3a e5 20  8d 74 76 48 0d 08 7a 51  |:?W=5:. .tvH..zQ|
00001620  43 25 3d 57 25 2d 42 25  3a 44 25 3d 28 43 25 2f  |C%=W%-B%:D%=(C%/|
00001630  33 36 30 30 29 20 81 31  30 30 3a 45 25 3d 28 28  |3600) .100:E%=((|
00001640  43 25 2f 33 36 30 30 29  20 81 31 30 29 2d 44 25  |C%/3600) .10)-D%|
00001650  2a 31 30 3a 46 25 3d 28  43 25 2f 33 36 30 30 29  |*10:F%=(C%/3600)|
00001660  2d 44 25 2a 31 30 30 2d  45 25 2a 31 30 0d 08 84  |-D%*100-E%*10...|
00001670  27 47 25 3d 28 43 25 2f  36 30 2d 28 44 25 2a 31  |'G%=(C%/60-(D%*1|
00001680  30 30 2b 45 25 2a 31 30  2b 46 25 29 2a 36 30 29  |00+E%*10+F%)*60)|
00001690  20 81 31 30 0d 08 8e 2a  48 25 3d a8 28 43 25 2f  | .10...*H%=.(C%/|
000016a0  36 30 2d 28 44 25 2a 31  30 30 2b 45 25 2a 31 30  |60-(D%*100+E%*10|
000016b0  2b 46 25 29 2a 36 30 29  2d 47 25 2a 31 30 0d 08  |+F%)*60)-G%*10..|
000016c0  98 33 49 25 3d 28 43 25  2d 28 44 25 2a 31 30 30  |.3I%=(C%-(D%*100|
000016d0  2b 45 25 2a 31 30 2b 46  25 29 2a 33 36 30 30 2d  |+E%*10+F%)*3600-|
000016e0  47 25 2a 36 30 30 2d 48  25 2a 36 30 29 20 81 31  |G%*600-H%*60) .1|
000016f0  30 0d 08 a2 35 4a 25 3d  28 43 25 2d 28 44 25 2a  |0...5J%=(C%-(D%*|
00001700  31 30 30 2b 45 25 2a 31  30 2b 46 25 29 2a 33 36  |100+E%*10+F%)*36|
00001710  30 30 2d 47 25 2a 36 30  30 2d 48 25 2a 36 30 29  |00-G%*600-H%*60)|
00001720  2d 49 25 2a 31 30 0d 08  ac 2d 3f 4c 3d 44 25 3a  |-I%*10...-?L=D%:|
00001730  3f 54 3d 45 25 3a 3f 6c  3d 46 25 3a 3f 50 3d 47  |?T=E%:?l=F%:?P=G|
00001740  25 3a 3f 58 3d 48 25 3a  3f 4f 3d 49 25 3a 3f 57  |%:?X=H%:?O=I%:?W|
00001750  3d 4a 25 0d 08 b6 05 e1  0d 08 c0 0a dd f2 4f 28  |=J%...........O(|
00001760  61 29 0d 08 ca 0f e7 20  61 3c 30 20 68 3d 30 3a  |a)..... a<0 h=0:|
00001770  e1 0d 08 d4 11 e7 20 61  3c 31 30 20 68 3d 33 35  |...... a<10 h=35|
00001780  3a e1 0d 08 de 12 e7 20  61 3c 31 30 30 20 68 3d  |:...... a<100 h=|
00001790  37 30 3a e1 0d 08 e8 09  68 3d 31 30 35 0d 08 f2  |70:.....h=105...|
000017a0  05 e1 0d 08 fc 07 dd f2  51 0d 09 06 19 ef 32 34  |........Q.....24|
000017b0  2c 35 3b 36 30 35 3b 31  32 35 39 3b 37 39 39 3b  |,5;605;1259;799;|
000017c0  3a da 0d 09 10 2f e7 20  43 3e 30 20 84 20 48 3e  |:..../. C>0 . H>|
000017d0  30 3a ec 20 35 2c 37 39  30 3a f1 22 59 6f 75 20  |0:. 5,790:."You |
000017e0  61 72 65 20 68 6f 6d 65  2e 22 3a e5 20 8d 54 64  |are home.":. .Td|
000017f0  49 0d 09 1a 05 e1 0d 09  24 3c e7 20 43 3e 30 20  |I.......$<. C>0 |
00001800  ec 20 35 2c 37 34 30 3a  f1 22 44 6f 20 79 6f 75  |. 5,740:."Do you|
00001810  20 77 61 6e 74 20 74 6f  20 64 65 70 6f 73 69 74  | want to deposit|
00001820  20 61 6e 79 20 67 6f 6c  64 3f 22 3a e5 20 8d 54  | any gold?":. .T|
00001830  78 49 0d 09 2e 0a e5 20  8d 44 74 49 0d 09 38 0b  |xI..... .DtI..8.|
00001840  2a 46 58 31 35 2c 30 0d  09 42 07 61 3d 30 0d 09  |*FX15,0..B.a=0..|
00001850  4c 26 ef 37 3a 41 24 3d  be 3a e7 20 41 24 3c 3e  |L&.7:A$=.:. A$<>|
00001860  22 59 22 20 80 20 41 24  3c 3e 22 4e 22 20 e5 20  |"Y" . A$<>"N" . |
00001870  8d 54 78 49 0d 09 56 6f  e7 20 41 24 3d 22 59 22  |.TxI..Vo. A$="Y"|
00001880  20 8c 20 ec 20 35 2c 36  39 30 3a f1 22 48 6f 77  | . . 5,690:."How|
00001890  20 6d 75 63 68 3f 22 3a  e8 61 3a e7 20 61 3e 43  | much?":.a:. a>C|
000018a0  20 8c 20 ef 32 34 2c 35  3b 36 30 35 3b 31 32 35  | . .24,5;605;125|
000018b0  39 3b 36 36 30 3b 3a da  3a ec 20 31 30 30 2c 36  |9;660;:.:. 100,6|
000018c0  35 30 3a f1 22 20 54 6f  6f 20 6d 75 63 68 20 72  |50:." Too much r|
000018d0  65 2d 65 6e 74 65 72 2e  22 3a ef 37 3a e5 20 8d  |e-enter.":.7:. .|
000018e0  44 56 49 0d 09 60 59 e7  20 41 24 3d 22 59 22 20  |DVI..`Y. A$="Y" |
000018f0  80 20 20 61 3c 30 20 8c  20 ef 32 34 2c 35 3b 36  |.  a<0 . .24,5;6|
00001900  30 35 3b 31 32 35 39 3b  36 36 30 3b 3a da 3a ec  |05;1259;660;:.:.|
00001910  20 31 30 30 2c 36 35 30  3a f1 22 20 54 6f 6f 20  | 100,650:." Too |
00001920  6c 69 74 74 6c 65 2c 20  72 65 2d 65 6e 74 65 72  |little, re-enter|
00001930  2e 22 3a ef 37 3a e5 20  8d 44 56 49 0d 09 6a 22  |.":.7:. .DVI..j"|
00001940  e7 20 41 24 3d 22 59 22  20 8c 20 43 3d 43 2d 61  |. A$="Y" . C=C-a|
00001950  3a 48 3d 48 2b 61 3a f2  44 3a f2 4b 3a e1 0d 09  |:H=H+a:.D:.K:...|
00001960  74 19 ef 32 34 2c 35 3b  36 30 35 3b 31 32 35 39  |t..24,5;605;1259|
00001970  3b 37 34 35 3b 3a da 0d  09 7e 1b e7 20 48 3c 30  |;745;:...~.. H<0|
00001980  2e 30 31 20 e5 20 8d 74  70 49 3a 2a 46 58 32 31  |.01 . .tpI:*FX21|
00001990  2c 30 0d 09 88 32 e7 20  48 3e 30 20 ec 20 35 2c  |,0...2. H>0 . 5,|
000019a0  37 34 30 3a f1 22 44 6f  20 79 6f 75 20 77 61 6e  |740:."Do you wan|
000019b0  74 20 74 6f 20 64 72 61  77 20 61 6e 79 20 67 6f  |t to draw any go|
000019c0  6c 64 3f 22 0d 09 92 26  ef 37 3a 41 24 3d be 3a  |ld?"...&.7:A$=.:|
000019d0  e7 20 41 24 3c 3e 22 59  22 20 80 20 41 24 3c 3e  |. A$<>"Y" . A$<>|
000019e0  22 4e 22 20 e5 20 8d 44  74 49 0d 09 9c 6f e7 20  |"N" . .DtI...o. |
000019f0  41 24 3d 22 59 22 20 8c  20 ec 20 35 2c 36 39 30  |A$="Y" . . 5,690|
00001a00  3a f1 22 48 6f 77 20 6d  75 63 68 3f 22 3a e8 61  |:."How much?":.a|
00001a10  3a e7 20 61 3e 48 20 8c  20 ef 32 34 2c 35 3b 36  |:. a>H . .24,5;6|
00001a20  30 35 3b 31 32 35 39 3b  36 36 30 3b 3a da 3a ec  |05;1259;660;:.:.|
00001a30  20 31 30 30 2c 36 35 30  3a f1 22 20 54 6f 6f 20  | 100,650:." Too |
00001a40  6d 75 63 68 20 72 65 2d  65 6e 74 65 72 2e 22 3a  |much re-enter.":|
00001a50  ef 37 3a e5 20 8d 74 5c  49 0d 09 9d 5a e7 20 41  |.7:. .t\I...Z. A|
00001a60  24 3d 22 59 22 20 80 20  61 3c 30 2e 30 31 20 8c  |$="Y" . a<0.01 .|
00001a70  20 ef 32 34 2c 35 3b 36  30 35 3b 31 32 35 39 3b  | .24,5;605;1259;|
00001a80  36 36 30 3b 3a da 3a ec  20 31 30 30 2c 36 35 30  |660;:.:. 100,650|
00001a90  3a f1 22 20 54 6f 6f 20  6c 69 74 74 6c 65 20 72  |:." Too little r|
00001aa0  65 2d 65 6e 74 65 72 2e  22 3a ef 37 3a e5 20 8d  |e-enter.":.7:. .|
00001ab0  74 5c 49 0d 09 a6 20 e7  20 41 24 3d 22 59 22 20  |t\I... . A$="Y" |
00001ac0  8c 20 43 3d 43 2b 61 3a  48 3d 48 2d 61 3a f2 44  |. C=C+a:H=H-a:.D|
00001ad0  3a f2 4b 0d 09 b0 05 e1  0d 09 ba 07 dd f2 4b 0d  |:.K...........K.|
00001ae0  09 c4 3b ef 32 34 2c 35  3b 31 30 35 3b 39 34 35  |..;.24,5;105;945|
00001af0  3b 31 37 30 3b 3a da 3a  ec 20 35 2c 31 35 30 3a  |;170;:.:. 5,150:|
00001b00  f1 3b 22 47 6f 6c 64 20  69 6e 20 73 61 66 65 20  |.;"Gold in safe |
00001b10  22 3b 48 3b 22 20 6f 7a  2e 22 0d 09 ce 05 e1 0d  |";H;" oz."......|
00001b20  09 d8 07 dd f2 56 0d 09  e2 60 ef 32 34 2c 35 3b  |.....V...`.24,5;|
00001b30  35 3b 31 32 35 39 3b 39  39 3b 3a da 3a ef 37 3a  |5;1259;99;:.:.7:|
00001b40  ec 20 35 2c 39 30 3a f1  22 59 6f 75 20 61 72 65  |. 5,90:."You are|
00001b50  20 63 61 72 72 79 69 6e  67 20 74 6f 6f 20 6d 75  | carrying too mu|
00001b60  63 68 20 61 6c 72 65 61  64 79 2e 22 3a ec 20 35  |ch already.":. 5|
00001b70  2c 34 30 3a f1 22 54 61  6b 65 20 73 6f 6d 65 20  |,40:."Take some |
00001b80  68 6f 6d 65 2e 22 0d 09  ec 05 e1 0d 09 f6 07 dd  |home."..........|
00001b90  f2 47 0d 0a 00 20 42 25  3d 26 39 32 30 3a e3 20  |.G... B%=&920:. |
00001ba0  41 25 3d 42 25 b8 26 39  33 46 3a 3f 41 25 3d 30  |A%=B%.&93F:?A%=0|
00001bb0  3a ed 0d 0a 0a 17 d6 20  26 31 30 31 38 3a 74 24  |:...... &1018:t$|
00001bc0  3d 22 22 3a 41 25 3d 2d  31 0d 0a 14 05 f5 0d 0a  |="":A%=-1.......|
00001bd0  1e 1a 41 25 3d 41 25 2b  31 3a 74 24 3d 74 24 2b  |..A%=A%+1:t$=t$+|
00001be0  bd 28 42 25 3f 41 25 29  0d 0a 28 0b fd 20 41 25  |.(B%?A%)..(.. A%|
00001bf0  3e 32 39 0d 0a 32 10 74  24 3d 74 24 2b bd 28 26  |>29..2.t$=t$+.(&|
00001c00  30 44 29 0d 0a 3c 05 e1  0d 0a 46 07 dd f2 49 0d  |0D)..<....F...I.|
00001c10  0a 50 2d 44 25 3d 3f 4c  3a 45 25 3d 3f 54 3a 46  |.P-D%=?L:E%=?T:F|
00001c20  25 3d 3f 6c 3a 47 25 3d  3f 50 3a 48 25 3d 3f 58  |%=?l:G%=?P:H%=?X|
00001c30  3a 49 25 3d 3f 4f 3a 4a  25 3d 3f 57 0d 0a 5a 36  |:I%=?O:J%=?W..Z6|
00001c40  57 25 3d 28 44 25 2a 31  30 30 2b 45 25 2a 31 30  |W%=(D%*100+E%*10|
00001c50  2b 46 25 29 2a 33 36 30  30 2b 28 47 25 2a 31 30  |+F%)*3600+(G%*10|
00001c60  2b 48 25 29 2a 36 30 2b  28 49 25 2a 31 30 29 2b  |+H%)*60+(I%*10)+|
00001c70  4a 25 0d 0a 64 10 42 25  3d a8 28 70 2a 33 36 30  |J%..d.B%=.(p*360|
00001c80  30 29 0d 0a 6e 05 e1 0d  0a 78 07 dd f2 65 0d 0a  |0)..n....x...e..|
00001c90  82 19 ef 32 34 2c 37 30  35 3b 35 30 35 3b 31 30  |...24,705;505;10|
00001ca0  30 30 3b 35 35 30 3b 0d  0a 8c 0e e3 20 49 25 3d  |00;550;..... I%=|
00001cb0  30 20 b8 20 33 0d 0a 96  07 d1 3d 30 0d 0a a0 0a  |0 . 3.....=0....|
00001cc0  f5 fd 91 3e 33 30 0d 0a  aa 12 da 3a d4 20 31 2c  |...>30.....:. 1,|
00001cd0  2d 31 35 2c 33 33 2c 32  0d 0a b4 07 d1 3d 30 0d  |-15,33,2.....=0.|
00001ce0  0a be 0a f5 fd 91 3e 33  30 0d 0a c8 06 f2 43 0d  |......>30.....C.|
00001cf0  0a d2 05 ed 0d 0a dc 05  e1 0d 0a e6 07 dd f2 66  |...............f|
00001d00  0d 0a f0 19 ef 32 34 2c  39 35 35 3b 31 30 35 3b  |.....24,955;105;|
00001d10  31 32 35 35 3b 31 37 34  3b 0d 0a fa 0e e3 20 49  |1255;174;..... I|
00001d20  25 3d 30 20 b8 20 34 0d  0b 04 0b f5 fd 3f 4e 3c  |%=0 . 4......?N<|
00001d30  31 30 0d 0b 0e 12 da 3a  d4 20 31 2c 2d 31 35 2c  |10.....:. 1,-15,|
00001d40  33 33 2c 32 0d 0b 18 0b  f5 fd 3f 4e 3e 31 38 0d  |33,2......?N>18.|
00001d50  0b 22 05 ed 0d 0b 2c 05  e1 0d 0b 36 0b dd f2 50  |."....,....6...P|
00001d60  28 54 25 29 0d 0b 40 5e  51 3d a8 28 55 29 2b 28  |(T%)..@^Q=.(U)+(|
00001d70  55 2d a8 28 55 29 29 2a  30 2e 36 3a 4b 3d 94 28  |U-.(U))*0.6:K=.(|
00001d80  47 29 3a 4b 3d a8 28 4b  29 2b 28 4b 2d a8 28 4b  |G):K=.(K)+(K-.(K|
00001d90  29 29 2a 30 2e 36 3a ec  20 35 2c 54 25 3a f1 22  |))*0.6:. 5,T%:."|
00001da0  4c 61 74 2e 20 22 3b 51  3b 22 20 4e 22 3b 22 20  |Lat. ";Q;" N";" |
00001db0  20 20 4c 6f 6e 67 2e 20  22 3b 4b 3b 22 20 22 3b  |  Long. ";K;" ";|
00001dc0  4c 24 0d 0b 4a 05 e1 0d  0b 54 07 dd f2 59 0d 0b  |L$..J....T...Y..|
00001dd0  5e 3f f1 8a 31 32 2c 36  29 22 43 6f 6e 67 72 61  |^?..12,6)"Congra|
00001de0  74 75 6c 61 74 69 6f 6e  73 21 22 27 27 27 22 59  |tulations!"'''"Y|
00001df0  6f 75 20 68 61 76 65 20  63 6f 6d 70 6c 65 74 65  |ou have complete|
00001e00  64 20 79 6f 75 72 20 74  61 73 6b 2e 22 0d 0b 68  |d your task."..h|
00001e10  83 e7 20 48 3c 31 31 32  20 f1 3a f1 22 59 6f 75  |.. H<112 .:."You|
00001e20  20 68 61 76 65 6e 27 74  20 64 6f 6e 65 20 61 6c  | haven't done al|
00001e30  6c 20 74 68 61 74 20 77  65 6c 6c 20 74 68 6f 75  |l that well thou|
00001e40  67 68 2e 22 27 27 22 59  6f 75 20 73 68 6f 75 6c  |gh."''"You shoul|
00001e50  64 20 74 72 79 20 61 6e  64 20 65 6e 64 20 77 69  |d try and end wi|
00001e60  74 68 20 61 74 20 6c 65  61 73 74 22 27 27 22 31  |th at least"''"1|
00001e70  31 31 20 6f 7a 2e 20 6f  66 20 67 6f 6c 64 20 69  |11 oz. of gold i|
00001e80  6e 20 74 68 65 20 73 61  66 65 2e 22 3a f5 fd a3  |n the safe.":...|
00001e90  0d 0b 72 58 f1 3a f1 22  59 6f 75 20 68 61 76 65  |..rX.:."You have|
00001ea0  20 64 6f 6e 65 20 76 65  72 79 20 77 65 6c 6c 20  | done very well |
00001eb0  69 6e 20 72 65 74 75 72  6e 69 6e 67 22 27 27 22  |in returning"''"|
00001ec0  77 69 74 68 20 22 3b 48  3b 22 20 6f 7a 2e 20 6f  |with ";H;" oz. o|
00001ed0  66 20 67 6f 6c 64 20 69  6e 20 74 68 65 20 73 61  |f gold in the sa|
00001ee0  66 65 2e 22 3a f5 fd a3  0d 0b 7c 05 e1 0d 0b 86  |fe.":.....|.....|
00001ef0  14 dd f2 52 3a d1 3d 30  3a f5 fd 91 3e 35 30 3a  |...R:.=0:...>50:|
00001f00  e1 0d ff                                          |...|
00001f03

01-01-89/I.m0

01-01-89/I.m1

01-01-89/I.m2

01-01-89/I.m4

01-01-89/I.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .