Home » Archimedes archive » Micro User » MU 1991-05.adf » 8BitStuff » DANGER2

DANGER2

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 » Archimedes archive » Micro User » MU 1991-05.adf » 8BitStuff
Filename: DANGER2
Read OK: ✔
File size: 16FD bytes
Load address: 0000
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10REM > <BasicSave$dir>.Danger2
   20REM Danger Dog Listing II
   30REM by Matthew Eastmond
   40REM (c) The Micro User
   60ON ERROR GOTO 1900
   70DIM b%24,A$(3),J%(10),X%(3),Y%(3),A%(3),Z%(3)
   80PROCstart:REPEAT
   90PROCvars:SOUND1,2,101,6
  100PROCscreen:TT%=TIME:REPEAT:*FX21
  110REPEATUNTILTIME>TT%:TT%=TIME+10:PROCsprt
  120IFINKEY-74IF F%=0PROCset
  130IFINKEY-17PROCq(33,27):*FX210,1
  140IFINKEY-82PROCc(33,27,&9B):*FX210
  150Z%=Z%+1:IF Z%=4Z%=0:IF s%>19PROCg
  160IF F% PROCfire
  170PROCg:IFX%>37ANDC%=&A0 ORX%<1ANDC%>&A0 ORY%=23ORY%=6PROCnew
  180UNTIL W%<176 OR X%=6AND Y%=19AND s%=1AND p%=100
  190IF W%<176 PROCdie ELSE PROCend
  200UNTIL FALSE
  210:
  220DEFPROCstart:q%=32
  230red%=&111:grn%=&211:cyn%=&311
  240A$(0)=CHR$17+CHR$1+CHR$176+CHR$177
  250A$(1)=CHR$17+CHR$1+CHR$176+CHR$177+CHR$10+CHR$8+CHR$8+CHR$176+CHR$177
  260A$(2)=CHR$17+CHR$2+CHR$178+CHR$179+CHR$10+CHR$8+CHR$8+CHR$178+CHR$179
  270A$(3)=CHR$17+CHR$1+CHR$181+CHR$182+CHR$10+CHR$8+CHR$8+CHR$183+CHR$184
  280hp%=0:ENDPROC
  290
  300DEFPROCvars
  310FORT=0TO3:Z%(T)=0:NEXT:GCOL0,1
  320FORW%=192 TO1088STEP16:SOUND0,15,4,1
  330MOVEW%,916:DRAWW%,940:IF W%>300 GCOL0,2
  340NEXT:PRINTTAB(0,30)SPC39;
  350S%=9:Z%=0:s%=1:X%=8:Y%=11
  360J%=0:C%=&A0:p%=0:x%=7
  370VDUcyn%;31x%30&B4:RESTORE1920
  380FORT=0TO9:READ J%(T):NEXT
  390FORT=1TO21:b%?T=1:NEXT:PROCextra
  400COLOUR3:PROCtyp("PRESS  SPACE",14,14)
  410REPEATUNTILGET=32:ENDPROC
  420
  430DEFPROCextra:LOCALA:FORT=6TO18STEP4:PROCq(T,27)
  440IF Z%(A)=1 PRINTTAB(T,27)A$(A)
  450A=A+1:NEXT:PROCw:COLOUR2:ENDPROC
  460
  470DEFPROCtyp(A$,x%,y%)LOCALA%,K%,N%,X%,Y%:X%=L%:Y%=0:K%=&9F:A%=10:FORN%=1TOLENA$:?L%=ASCMID$(A$,N%):CALL&FFF1:VDU23&9F,0L%?1L%?3L%?4L%?5L%?7L%?8,0,31x%+N%-1y%&9F:NEXT:ENDPROC
  480
  490DEFPROCscreen
  500VDU19,2,2;0;19,3,6;0;19,1,1;0;28,0,24,39,6,12,26
  510IF s%>14 VDU19,1,5;0;19,3,4;0;
  520RESTORE 1930:IF s%>1 FORT=1TO s%-1:READ A$:NEXT
  530READ A$:D%=ASCMID$(A$,1)-46:c%=ASCMID$(A$,2)-46:c1%=ASCMID$(A$,3)-46:IF b%?s%=1VDU31c%c1%grn%;&AD,10,8&AE&AF
  540FORP%=4 TO LENA$STEP4
  550X=ASCMID$(A$,P%)-46:Y=ASCMID$(A$,P%+1)-46
  560X1=ASCMID$(A$,P%+2)-46:K=ASCMID$(A$,P%+3)-46
  570IFK=1VDUgrn%;:FORA%=X TO X1 STEP4:VDU31A%Y&A9&AA&AB&AC:NEXT
  580IFK=2PROCa(X,&93,3)
  590IFK=3VDUred%;:FORA%=X TO X1 STEP2:PROCc(A%,Y,&89):NEXT
  600IFK=4PROCa(Y,&89,1)
  610IFK=5FORA%=X TO X1 STEP3:VDUred%;31A%Y&8D&8E,10,8,8,grn%;&8F&90:NEXT
  620IFK=6VDU31,X,Y,cyn%;&91,9&91,10,8,8,8&92,9&92
  630IFK=7PROCa(X,&97,3)
  640IFK=8PRINTTAB(X,Y)A$(X1)
  650NEXT
  660IF s%=1 COLOUR2:PROCtyp("TELEPORT",3,17)
  670F%=0:FORT=0TO3:X%(T)=99:NEXT:IF D%>0 RESTORE 700:FORT=1TO D%:READ X%(T-1),Y%(T-1):NEXT
  680ENDPROC
  690
  700DATA 18,14,30,10,20,13,22,10
  710
  720DEFPROCsprt:A%=X%:B%=Y%
  730IFJ%(J%)>0PROCs:ELSEIFJ%(J%)<0PROCu
  740IFS%=2IFJ%(J%)IFRND(2)=1J%=J%-1
  750J%=J%+1:IFJ%=10J%=0:PROCchek
  760IFINKEY-98PROCr:ELSEIFINKEY-67PROCl
  770COLOUR3:PROCq(A%,B%):PROCc(X%,Y%,C%)
  780IFINKEY-122IFF%=0IFx%<16VDU31,x%,30,32:x%=x%+4:PROCw:ENDPROC
  790IFINKEY-26IFF%=0IFx%>10VDU31,x%,30,32:x%=x%-4:PROCw
  800ENDPROC
  810
  820DEFPROCr:VDU31X%-1Y%:CALLE%:VDU10:IF?L%<>q%PROCd:ENDPROC
  830CALLE%:IF?L%<>q%PROCd:ENDPROC
  840X%=X%-1:C%=&A4:ENDPROC
  850
  860DEFPROCu:VDU31X%Y%-1:CALLE%:VDU9:IF?L%<>q%J%=6:PROCd:ENDPROC
  870CALLE%:IF ?L%<>q% J%=6:PROCd:ENDPROC
  880Y%=Y%-1:ENDPROC
  890
  900DEFPROCs:VDU31X%Y%+2:CALLE%:VDU9:IF?L%<>q%J%=0:SOUND0,13,3,1:PROCd:ENDPROC
  910CALLE%:IF?L%<>q%J%=0:SOUND0,13,3,1:PROCd:ENDPROC
  920Y%=Y%+1:ENDPROC
  930
  940DEFPROCl:VDU31X%+2Y%:CALLE%:VDU10:IF?L%<>q%PROCd:ENDPROC
  950CALLE%:IF?L%<>q%PROCd:ENDPROC
  960X%=X%+1:C%=&A0:ENDPROC
  970
  980DEFPROCd:IF?L%>184AND?L%<189OR?L%>222AND?L%<227OR?L%=191OR?L%>&8C AND?L%<&91OR?L%>&92 AND?L%<&97SOUND0,4,4,1:PROClife
  990IF?L%>172IF?L%<176PROCq(c%,c1%):COLOUR2:SOUND3,3,200,1:PROCp:b%?s%=0
 1000IF?L%<176ELSEIF?L%>177ELSEIFs%>1PROCt(1)ELSEPROCt(0)
 1010IF?L%>177IF?L%<180PROCt(2)ELSEIF?L%>180IF?L%<185PROCt(3)
 1020ENDPROC
 1030
 1040DEFPROCt(Q%):IF Z%(Q%)ENDPROC:ELSEZ%(Q%)=1:SOUND1,3,100,1:PROCextra:PROCp:ENDPROC
 1050
 1060DEFPROCchek:J%=0:VDU31X%Y%+2:CALLE%:VDU9:IF ?L%<>q% SOUND0,13,3,1:PROCd:ENDPROC
 1070CALLE%:IF ?L%<>q% SOUND0,13,3,1:PROCd:ENDPROC
 1080J%=6:ENDPROC
 1090
 1100DEFPROCg:IFX%(Z%)=99ENDPROC
 1110I%=X%(Z%):K%=Y%(Z%):U%=I%:V%=K%
 1120IF X%(Z%)<X% PROCgr:ELSEIF X%(Z%)>X% PROCgl
 1130IF Y%(Z%)>Y% PROCgu:ELSEIF Y%(Z%)<Y% PROCgd
 1140PROCq(I%,K%):COLOUR2:IFI%>U%PROCc(U%,V%,&B9)ELSEPROCc(U%,V%,&80)
 1150X%(Z%)=U%:Y%(Z%)=V%:ENDPROC
 1160
 1170DEFPROCgl:VDU31U%-1V%:CALLE%:IF ?L%<>q% ENDPROC
 1180VDU10:CALLE%:IF ?L%=q% U%=U%-1
 1190ENDPROC
 1200
 1210DEFPROCgr:VDU31U%+2V%:CALLE%:VDU10:IF ?L%<>q% ENDPROC
 1220CALLE%:IF ?L%=q% U%=U%+1
 1230ENDPROC
 1240
 1250DEFPROCgu:VDU31U%V%-1:CALLE%:VDU9:IF ?L%<>q% ENDPROC
 1260CALLE%:IF ?L%=q% V%=V%-1
 1270ENDPROC
 1280
 1290DEFPROCgd:VDU31U%V%+2:CALLE%:VDU9:IF ?L%<>q% ENDPROC
 1300CALLE%:IF ?L%=q% V%=V%+1
 1310ENDPROC
 1320
 1330DEFPROCw:VDUcyn%;31x%30&B4:S%=9:IF Z%((x%+1)/4-2)=0 ENDPROC
 1340S%=(x%+1)/4-2:SOUND2,1,200,1:ENDPROC
 1350
 1360DEFPROCfire
 1370VDU31F%H%q%:IFS%=1VDU10,8q%
 1380VDU31F%+G%,H%:CALLE%
 1390IF ?L%<>q% PROCex:ENDPROC
 1400IF S%=1 VDU10:CALLE%:IF ?L%<>q% PROCex:ENDPROC
 1410F%=F%+G%:VDUgrn%;31F%H%:IF S%=4 VDU&BD ELSE VDU&A8
 1420IF S%=1 VDU10,8&A8
 1430IF F%>37ORF%<2VDU31F%H%q%:F%=0:IF S%=1 VDU10,8q%
 1440ENDPROC
 1450
 1460DEFPROCex:F%=F%+G%
 1470FORT=0TO3:IF X%(T)<>99 IF F%>X%(T)-2 IF F%<X%(T)+3 IF H%=Y%(T) OR H%=Y%(T)+1 PROCb
 1480NEXT:F%=0:ENDPROC
 1490
 1500DEFPROCset:IF X%>35 IF C%=&A0 ENDPROC
 1510IF S%=3 IF Z%(3)<9 FORT=0TO3:PROCb:NEXT:Z%(3)=9:PROCextra
 1520IF S%>1 ENDPROC
 1530H%=Y%:IF C%=&A0 G%=2:F%=X%+2 ELSE G%=-2:F%=X%-1
 1540VDU31F%H%:CALLE%:VDU10:IF?L%<>q%PROCex:ENDPROC
 1550IFS%=1CALLE%:IF?L%<>q%PROCex:ENDPROC
 1560IFS%=0SOUND2,14,110,1ELSE SOUND2,14,200,1
 1570ENDPROC
 1580
 1590DEFPROCb:IF X%(T)=99 ENDPROC
 1600SOUND0,4,6,1:COLOUR1:PROCc(X%(T),Y%(T),&84):PROCq(X%(T),Y%(T)):IF s%<19 X%(T)=99:ENDPROC
 1610
 1620DEFPROClife:GCOL0,0:MOVE W%,916:DRAW W%,940:W%=W%-16:ENDPROC
 1630
 1640DEFPROCp:p%=p%+4:PROCtyp(STR$p%+"%",33,30):ENDPROC
 1650
 1660DEFPROCnew:IF X%=38 s%=s%+1:X%=1:ELSEIF X%=0 s%=s%-1:X%=37
 1670IF Y%=6 s%=s%-7:Y%=22:ELSEIF Y%=23 s%=s%+7:Y%=7:J%=6
 1680PROCscreen:ENDPROC
 1690
 1700DEFPROCend:SOUND0,2,4,9
 1710FORY=0TO7:VDUcyn%;:PROCc(6,19,&A0):PROCwait(10-Y)
 1720PROCwait(10-Y):VDUred%;:PROCc(6,19,&A4):NEXT
 1730PROCq(6,19):VDU28,0,24,39,6,12,26:SOUND1,4,200,1
 1740PROCtyp("YOU HAVE ESCAPED",12,13):hp%=100:ENDPROC
 1750
 1760DEFPROCa(I%,B%,K%)VDU17K%:FORA%=I%TO X1 STEP2:IFI%=X VDU31A%Y ELSEVDU31X,A%
 1770VDUB%,B%+1,10,8,8,B%+2,B%+3:NEXT:ENDPROC
 1780
 1790DEFPROCc(X%,Y%,B%)VDU31X%Y%B%B%+1,10,8,8B%+2B%+3:ENDPROC
 1800
 1810DEFPROCq(X%,Y%)VDU31X%Y%q%q%10,8,8q%q%:ENDPROC
 1820
 1830DEFPROCwait(T%)T%=TIME+T%:REPEATUNTILTIME>T%:ENDPROC
 1840
 1850DEFPROCdie
 1860FORT=-1TO-15STEP-1:SOUND0,T,6,1:NEXT:COLOUR1:PROCc(X%,Y%,&84):SOUND0,4,6,1:PROCtyp("GAME  OVER",15,13)
 1870VDU28,0,24,39,6,12,26:PROCtyp("BEST %AGE:"+STR$(hp%),14,11):PROCtyp("YOUR %AGE:"+STR$(p%),14,9):IF p%>hp% hp%=p%
 1880ENDPROC
 1890
 1900MODE7:REPORT:PRINT" at line ";ERL:END
 1910
 1920DATA -2,-1,-1,-1,0,0,1,1,1,2
 1930DATA .9;.CH1.EU10=?1CAH1.<61L=S1.4U1G@G3D6U1:6.4.5C22:.6,2F<.EU12>F1.6U1.4U1D8@2N@U1IC.3M>.32>@2:<>0,04>.E416FU/.@41>DU3A@A1L@U1.6U17D06TBT1,20D.FU/.@D2.4U1A6.4
 1940DATA 0HC.F6/6EU1DAE2F?C2R?C2LCL3.4U1,2PC.EU12EQ/.?C28CL3.4U1T?E2A6.4,2R=.?61.E61.4U1T5E2B?R1.?E2H=N0,229.4U1.5E20EU10CU3N?P1D;F12;<1
 1950 DATA 2@6.4U1.CU1B682D<C2F<L1@8@1>A>3FAJ0,2F9.C61.EB1.4U1HEU1B?C2D?J1D;U1F6F43A63,259.E<1.4U1.;8185;2<CB1BAH1H?P1P=U1J=N0B?E38C/6,2B=.=81.?81.4U1B?B1J=U1J?U1A6.4
 1960DATA 2C=.=E22EU12EU/0=E2.4U1F5=2>?F1,.R:.EU1.4618:<0T4D264>28<>18>>1@CS1BAS0R<R1,01C.5C2.EU54CH34;C2:?C2.4U5CAC2,11C.445.E4546<54C<5<8B5<AB5D:U5D?U56A16
 1970DATA 1N=.?U5.:@5B482.4B1H482H4U1J:U5D=D0,2F;.EU5.DU/.4U5.?C2.6:2B6.4:=>5B=F50BF3
 1980DATA 2BB.DU52@P56>L56>L/7<<3,16@.DU5.4U56BU5>@U5F>U5N<U5A6.4@>D0,2F@1BQ30DP/R6D2.<D2.ES5.4S50<81H>R1


� > <BasicSave$dir>.Danger2
� Danger Dog Listing II
� by Matthew Eastmond
(� (c) The Micro User
<� � � �DlG
F/� b%24,A$(3),J%(10),X%(3),Y%(3),A%(3),Z%(3)
P�start:�
Z�vars:�1,2,101,6
d�screen:TT%=�:�:*FX21
n���>TT%:TT%=�+10:�sprt
x�-74� F%=0�set
��-17�q(33,27):*FX210,1
��-82�c(33,27,&9B):*FX210
� Z%=Z%+1:� Z%=4Z%=0:� s%>19�g
�� F% �fire
�1�g:�X%>37�C%=&A0 �X%<1�C%>&A0 �Y%=23�Y%=6�new
�(� W%<176 � X%=6� Y%=19� s%=1� p%=100
�� W%<176 �die � �end
�� �
�:
���start:q%=32
�!red%=&111:grn%=&211:cyn%=&311
�A$(0)=�17+�1+�176+�177
�.A$(1)=�17+�1+�176+�177+�10+�8+�8+�176+�177
.A$(2)=�17+�2+�178+�179+�10+�8+�8+�178+�179
.A$(3)=�17+�1+�181+�182+�10+�8+�8+�183+�184
hp%=0:�
"
,
��vars
6�T=0�3:Z%(T)=0:�:�0,1
@�W%=192 �1088�16:�0,15,4,1
J!�W%,916:�W%,940:� W%>300 �0,2
T�:�0,30)�39;
^S%=9:Z%=0:s%=1:X%=8:Y%=11
hJ%=0:C%=&A0:p%=0:x%=7
r�cyn%;31x%30&B4:��t@G
|�T=0�9:� J%(T):�
��T=1�21:b%?T=1:�:�extra
�!�3:�typ("PRESS  SPACE",14,14)
����=32:�
�
�!��extra:�A:�T=6�18�4:�q(T,27)
�� Z%(A)=1 �T,27)A$(A)
�A=A+1:�:�w:�2:�
�
֎��typ(A$,x%,y%)�A%,K%,N%,X%,Y%:X%=L%:Y%=0:K%=&9F:A%=10:�N%=1��A$:?L%=��A$,N%):�&FFF1:�23&9F,0L%?1L%?3L%?4L%?5L%?7L%?8,0,31x%+N%-1y%&9F:�:�
�
���screen
�2�19,2,2;0;19,3,6;0;19,1,1;0;28,0,24,39,6,12,26
�� s%>14 �19,1,5;0;19,3,4;0;
#� �tJG:� s%>1 �T=1� s%-1:� A$:�
X� A$:D%=��A$,1)-46:c%=��A$,2)-46:c1%=��A$,3)-46:� b%?s%=1�31c%c1%grn%;&AD,10,8&AE&AF
�P%=4 � �A$�4
&!X=��A$,P%)-46:Y=��A$,P%+1)-46
0$X1=��A$,P%+2)-46:K=��A$,P%+3)-46
:1�K=1�grn%;:�A%=X � X1 �4:�31A%Y&A9&AA&AB&AC:�
D�K=2�a(X,&93,3)
N+�K=3�red%;:�A%=X � X1 �2:�c(A%,Y,&89):�
X�K=4�a(Y,&89,1)
b<�K=5�A%=X � X1 �3:�red%;31A%Y&8D&8E,10,8,8,grn%;&8F&90:�
l.�K=6�31,X,Y,cyn%;&91,9&91,10,8,8,8&92,9&92
v�K=7�a(X,&97,3)
��K=8�X,Y)A$(X1)
��
�#� s%=1 �2:�typ("TELEPORT",3,17)
�EF%=0:�T=0�3:X%(T)=99:�:� D%>0 � �t|B:�T=1� D%:� X%(T-1),Y%(T-1):�
��
�
�� 18,14,30,10,20,13,22,10
�
���sprt:A%=X%:B%=Y%
��J%(J%)>0�s:��J%(J%)<0�u
��S%=2�J%(J%)�(2)=1J%=J%-1
�J%=J%+1:�J%=10J%=0:�chek
��-98�r:��-67�l
�3:�q(A%,B%):�c(X%,Y%,C%)
.�-122�F%=0�x%<16�31,x%,30,32:x%=x%+4:�w:�
+�-26�F%=0�x%>10�31,x%,30,32:x%=x%-4:�w
 �
*
4&��r:�31X%-1Y%:�E%:�10:�?L%<>q%�d:�
>�E%:�?L%<>q%�d:�
HX%=X%-1:C%=&A4:�
R
\*��u:�31X%Y%-1:�E%:�9:�?L%<>q%J%=6:�d:�
f�E%:� ?L%<>q% J%=6:�d:�
p
Y%=Y%-1:�
z
�4��s:�31X%Y%+2:�E%:�9:�?L%<>q%J%=0:�0,13,3,1:�d:�
�#�E%:�?L%<>q%J%=0:�0,13,3,1:�d:�
�
Y%=Y%+1:�
�
�&��l:�31X%+2Y%:�E%:�10:�?L%<>q%�d:�
��E%:�?L%<>q%�d:�
�X%=X%+1:C%=&A0:�
�
�`��d:�?L%>184�?L%<189�?L%>222�?L%<227�?L%=191�?L%>&8C �?L%<&91�?L%>&92 �?L%<&97�0,4,4,1:�life
�7�?L%>172�?L%<176�q(c%,c1%):�2:�3,3,200,1:�p:b%?s%=0
�&�?L%<176��?L%>177��s%>1�t(1)��t(0)
�/�?L%>177�?L%<180�t(2)��?L%>180�?L%<185�t(3)
��

6��t(Q%):� Z%(Q%)�:�Z%(Q%)=1:�1,3,100,1:�extra:�p:�

$9��chek:J%=0:�31X%Y%+2:�E%:�9:� ?L%<>q% �0,13,3,1:�d:�
. �E%:� ?L%<>q% �0,13,3,1:�d:�
8
J%=6:�
B
L��g:�X%(Z%)=99�
V#I%=X%(Z%):K%=Y%(Z%):U%=I%:V%=K%
`$� X%(Z%)<X% �gr:�� X%(Z%)>X% �gl
j$� Y%(Z%)>Y% �gu:�� Y%(Z%)<Y% �gd
t2�q(I%,K%):�2:�I%>U%�c(U%,V%,&B9)��c(U%,V%,&80)
~X%(Z%)=U%:Y%(Z%)=V%:�
�
�"��gl:�31U%-1V%:�E%:� ?L%<>q% �
��10:�E%:� ?L%=q% U%=U%-1
��
�
�&��gr:�31U%+2V%:�E%:�10:� ?L%<>q% �
��E%:� ?L%=q% U%=U%+1
��
�
�%��gu:�31U%V%-1:�E%:�9:� ?L%<>q% �
��E%:� ?L%=q% V%=V%-1
��


%��gd:�31U%V%+2:�E%:�9:� ?L%<>q% �
�E%:� ?L%=q% V%=V%+1
�
(
21��w:�cyn%;31x%30&B4:S%=9:� Z%((x%+1)/4-2)=0 �
<S%=(x%+1)/4-2:�2,1,200,1:�
F
P
��fire
Z�31F%H%q%:�S%=1�10,8q%
d�31F%+G%,H%:�E%
n� ?L%<>q% �ex:�
x"� S%=1 �10:�E%:� ?L%<>q% �ex:�
�,F%=F%+G%:�grn%;31F%H%:� S%=4 �&BD � �&A8
�� S%=1 �10,8&A8
�-� F%>37�F%<2�31F%H%q%:F%=0:� S%=1 �10,8q%
��
�
���ex:F%=F%+G%
�K�T=0�3:� X%(T)<>99 � F%>X%(T)-2 � F%<X%(T)+3 � H%=Y%(T) � H%=Y%(T)+1 �b
��:F%=0:�
�
���set:� X%>35 � C%=&A0 �
�/� S%=3 � Z%(3)<9 �T=0�3:�b:�:Z%(3)=9:�extra
�� S%>1 �
�/H%=Y%:� C%=&A0 G%=2:F%=X%+2 � G%=-2:F%=X%-1
!�31F%H%:�E%:�10:�?L%<>q%�ex:�
�S%=1�E%:�?L%<>q%�ex:�
!�S%=0�2,14,110,1� �2,14,200,1
"�
,
6��b:� X%(T)=99 �
@F�0,4,6,1:�1:�c(X%(T),Y%(T),&84):�q(X%(T),Y%(T)):� s%<19 X%(T)=99:�
J
T,��life:�0,0:� W%,916:� W%,940:W%=W%-16:�
^
h%��p:p%=p%+4:�typ(�p%+"%",33,30):�
r
|4��new:� X%=38 s%=s%+1:X%=1:�� X%=0 s%=s%-1:X%=37
�3� Y%=6 s%=s%-7:Y%=22:�� Y%=23 s%=s%+7:Y%=7:J%=6
�
�screen:�
�
���end:�0,2,4,9
�*�Y=0�7:�cyn%;:�c(6,19,&A0):�wait(10-Y)
�%�wait(10-Y):�red%;:�c(6,19,&A4):�
�+�q(6,19):�28,0,24,39,6,12,26:�1,4,200,1
�,�typ("YOU HAVE ESCAPED",12,13):hp%=100:�
�
�:��a(I%,B%,K%)�17K%:�A%=I%� X1 �2:�I%=X �31A%Y ��31X,A%
�!�B%,B%+1,10,8,8,B%+2,B%+3:�:�
�
�/��c(X%,Y%,B%)�31X%Y%B%B%+1,10,8,8B%+2B%+3:�

%��q(X%,Y%)�31X%Y%q%q%10,8,8q%q%:�

&��wait(T%)T%=�+T%:���>T%:�
0
:	��die
DN�T=-1�-15�-1:�0,T,6,1:�:�1:�c(X%,Y%,&84):�0,4,6,1:�typ("GAME  OVER",15,13)
Ne�28,0,24,39,6,12,26:�typ("BEST %AGE:"+�(hp%),14,11):�typ("YOUR %AGE:"+�(p%),14,9):� p%>hp% hp%=p%
X�
b
l�7:�:�" at line ";�:�
v
�� -2,-1,-1,-1,0,0,1,1,1,2
��� .9;.CH1.EU10=?1CAH1.<61L=S1.4U1G@G3D6U1:6.4.5C22:.6,2F<.EU12>F1.6U1.4U1D8@2N@U1IC.3M>.32>@2:<>0,04>.E416FU/.@41>DU3A@A1L@U1.6U17D06TBT1,20D.FU/.@D2.4U1A6.4
��� 0HC.F6/6EU1DAE2F?C2R?C2LCL3.4U1,2PC.EU12EQ/.?C28CL3.4U1T?E2A6.4,2R=.?61.E61.4U1T5E2B?R1.?E2H=N0,229.4U1.5E20EU10CU3N?P1D;F12;<1
�� � 2@6.4U1.CU1B682D<C2F<L1@8@1>A>3FAJ0,2F9.C61.EB1.4U1HEU1B?C2D?J1D;U1F6F43A63,259.E<1.4U1.;8185;2<CB1BAH1H?P1P=U1J=N0B?E38C/6,2B=.=81.?81.4U1B?B1J=U1J?U1A6.4
��� 2C=.=E22EU12EU/0=E2.4U1F5=2>?F1,.R:.EU1.4618:<0T4D264>28<>18>>1@CS1BAS0R<R1,01C.5C2.EU54CH34;C2:?C2.4U5CAC2,11C.445.E4546<54C<5<8B5<AB5D:U5D?U56A16
�Q� 1N=.?U5.:@5B482.4B1H482H4U1J:U5D=D0,2F;.EU5.DU/.4U5.?C2.6:2B6.4:=>5B=F50BF3
�e� 2BB.DU52@P56>L56>L/7<<3,16@.DU5.4U56BU5>@U5F>U5N<U5A6.4@>D0,2F@1BQ30DP/R6D2.<D2.ES5.4S50<81H>R1
�
00000000  0d 00 0a 1f f4 20 3e 20  3c 42 61 73 69 63 53 61  |..... > <BasicSa|
00000010  76 65 24 64 69 72 3e 2e  44 61 6e 67 65 72 32 0d  |ve$dir>.Danger2.|
00000020  00 14 1b f4 20 44 61 6e  67 65 72 20 44 6f 67 20  |.... Danger Dog |
00000030  4c 69 73 74 69 6e 67 20  49 49 0d 00 1e 19 f4 20  |Listing II..... |
00000040  62 79 20 4d 61 74 74 68  65 77 20 45 61 73 74 6d  |by Matthew Eastm|
00000050  6f 6e 64 0d 00 28 18 f4  20 28 63 29 20 54 68 65  |ond..(.. (c) The|
00000060  20 4d 69 63 72 6f 20 55  73 65 72 0d 00 3c 0e ee  | Micro User..<..|
00000070  20 85 20 e5 20 8d 44 6c  47 0d 00 46 2f de 20 62  | . . .DlG..F/. b|
00000080  25 32 34 2c 41 24 28 33  29 2c 4a 25 28 31 30 29  |%24,A$(3),J%(10)|
00000090  2c 58 25 28 33 29 2c 59  25 28 33 29 2c 41 25 28  |,X%(3),Y%(3),A%(|
000000a0  33 29 2c 5a 25 28 33 29  0d 00 50 0c f2 73 74 61  |3),Z%(3)..P..sta|
000000b0  72 74 3a f5 0d 00 5a 14  f2 76 61 72 73 3a d4 31  |rt:...Z..vars:.1|
000000c0  2c 32 2c 31 30 31 2c 36  0d 00 64 19 f2 73 63 72  |,2,101,6..d..scr|
000000d0  65 65 6e 3a 54 54 25 3d  91 3a f5 3a 2a 46 58 32  |een:TT%=.:.:*FX2|
000000e0  31 0d 00 6e 1a f5 fd 91  3e 54 54 25 3a 54 54 25  |1..n....>TT%:TT%|
000000f0  3d 91 2b 31 30 3a f2 73  70 72 74 0d 00 78 13 e7  |=.+10:.sprt..x..|
00000100  a6 2d 37 34 e7 20 46 25  3d 30 f2 73 65 74 0d 00  |.-74. F%=0.set..|
00000110  82 1b e7 a6 2d 31 37 f2  71 28 33 33 2c 32 37 29  |....-17.q(33,27)|
00000120  3a 2a 46 58 32 31 30 2c  31 0d 00 8c 1d e7 a6 2d  |:*FX210,1......-|
00000130  38 32 f2 63 28 33 33 2c  32 37 2c 26 39 42 29 3a  |82.c(33,27,&9B):|
00000140  2a 46 58 32 31 30 0d 00  96 20 5a 25 3d 5a 25 2b  |*FX210... Z%=Z%+|
00000150  31 3a e7 20 5a 25 3d 34  5a 25 3d 30 3a e7 20 73  |1:. Z%=4Z%=0:. s|
00000160  25 3e 31 39 f2 67 0d 00  a0 0e e7 20 46 25 20 f2  |%>19.g..... F% .|
00000170  66 69 72 65 0d 00 aa 31  f2 67 3a e7 58 25 3e 33  |fire...1.g:.X%>3|
00000180  37 80 43 25 3d 26 41 30  20 84 58 25 3c 31 80 43  |7.C%=&A0 .X%<1.C|
00000190  25 3e 26 41 30 20 84 59  25 3d 32 33 84 59 25 3d  |%>&A0 .Y%=23.Y%=|
000001a0  36 f2 6e 65 77 0d 00 b4  28 fd 20 57 25 3c 31 37  |6.new...(. W%<17|
000001b0  36 20 84 20 58 25 3d 36  80 20 59 25 3d 31 39 80  |6 . X%=6. Y%=19.|
000001c0  20 73 25 3d 31 80 20 70  25 3d 31 30 30 0d 00 be  | s%=1. p%=100...|
000001d0  18 e7 20 57 25 3c 31 37  36 20 f2 64 69 65 20 8b  |.. W%<176 .die .|
000001e0  20 f2 65 6e 64 0d 00 c8  07 fd 20 a3 0d 00 d2 05  | .end..... .....|
000001f0  3a 0d 00 dc 11 dd f2 73  74 61 72 74 3a 71 25 3d  |:......start:q%=|
00000200  33 32 0d 00 e6 21 72 65  64 25 3d 26 31 31 31 3a  |32...!red%=&111:|
00000210  67 72 6e 25 3d 26 32 31  31 3a 63 79 6e 25 3d 26  |grn%=&211:cyn%=&|
00000220  33 31 31 0d 00 f0 1a 41  24 28 30 29 3d bd 31 37  |311....A$(0)=.17|
00000230  2b bd 31 2b bd 31 37 36  2b bd 31 37 37 0d 00 fa  |+.1+.176+.177...|
00000240  2e 41 24 28 31 29 3d bd  31 37 2b bd 31 2b bd 31  |.A$(1)=.17+.1+.1|
00000250  37 36 2b bd 31 37 37 2b  bd 31 30 2b bd 38 2b bd  |76+.177+.10+.8+.|
00000260  38 2b bd 31 37 36 2b bd  31 37 37 0d 01 04 2e 41  |8+.176+.177....A|
00000270  24 28 32 29 3d bd 31 37  2b bd 32 2b bd 31 37 38  |$(2)=.17+.2+.178|
00000280  2b bd 31 37 39 2b bd 31  30 2b bd 38 2b bd 38 2b  |+.179+.10+.8+.8+|
00000290  bd 31 37 38 2b bd 31 37  39 0d 01 0e 2e 41 24 28  |.178+.179....A$(|
000002a0  33 29 3d bd 31 37 2b bd  31 2b bd 31 38 31 2b bd  |3)=.17+.1+.181+.|
000002b0  31 38 32 2b bd 31 30 2b  bd 38 2b bd 38 2b bd 31  |182+.10+.8+.8+.1|
000002c0  38 33 2b bd 31 38 34 0d  01 18 0b 68 70 25 3d 30  |83+.184....hp%=0|
000002d0  3a e1 0d 01 22 04 0d 01  2c 0a dd f2 76 61 72 73  |:..."...,...vars|
000002e0  0d 01 36 19 e3 54 3d 30  b8 33 3a 5a 25 28 54 29  |..6..T=0.3:Z%(T)|
000002f0  3d 30 3a ed 3a e6 30 2c  31 0d 01 40 1e e3 57 25  |=0:.:.0,1..@..W%|
00000300  3d 31 39 32 20 b8 31 30  38 38 88 31 36 3a d4 30  |=192 .1088.16:.0|
00000310  2c 31 35 2c 34 2c 31 0d  01 4a 21 ec 57 25 2c 39  |,15,4,1..J!.W%,9|
00000320  31 36 3a df 57 25 2c 39  34 30 3a e7 20 57 25 3e  |16:.W%,940:. W%>|
00000330  33 30 30 20 e6 30 2c 32  0d 01 54 11 ed 3a f1 8a  |300 .0,2..T..:..|
00000340  30 2c 33 30 29 89 33 39  3b 0d 01 5e 1d 53 25 3d  |0,30).39;..^.S%=|
00000350  39 3a 5a 25 3d 30 3a 73  25 3d 31 3a 58 25 3d 38  |9:Z%=0:s%=1:X%=8|
00000360  3a 59 25 3d 31 31 0d 01  68 19 4a 25 3d 30 3a 43  |:Y%=11..h.J%=0:C|
00000370  25 3d 26 41 30 3a 70 25  3d 30 3a 78 25 3d 37 0d  |%=&A0:p%=0:x%=7.|
00000380  01 72 19 ef 63 79 6e 25  3b 33 31 78 25 33 30 26  |.r..cyn%;31x%30&|
00000390  42 34 3a f7 8d 74 40 47  0d 01 7c 14 e3 54 3d 30  |B4:..t@G..|..T=0|
000003a0  b8 39 3a f3 20 4a 25 28  54 29 3a ed 0d 01 86 1b  |.9:. J%(T):.....|
000003b0  e3 54 3d 31 b8 32 31 3a  62 25 3f 54 3d 31 3a ed  |.T=1.21:b%?T=1:.|
000003c0  3a f2 65 78 74 72 61 0d  01 90 21 fb 33 3a f2 74  |:.extra...!.3:.t|
000003d0  79 70 28 22 50 52 45 53  53 20 20 53 50 41 43 45  |yp("PRESS  SPACE|
000003e0  22 2c 31 34 2c 31 34 29  0d 01 9a 0c f5 fd a5 3d  |",14,14).......=|
000003f0  33 32 3a e1 0d 01 a4 04  0d 01 ae 21 dd f2 65 78  |32:........!..ex|
00000400  74 72 61 3a ea 41 3a e3  54 3d 36 b8 31 38 88 34  |tra:.A:.T=6.18.4|
00000410  3a f2 71 28 54 2c 32 37  29 0d 01 b8 1a e7 20 5a  |:.q(T,27)..... Z|
00000420  25 28 41 29 3d 31 20 f1  8a 54 2c 32 37 29 41 24  |%(A)=1 ..T,27)A$|
00000430  28 41 29 0d 01 c2 13 41  3d 41 2b 31 3a ed 3a f2  |(A)....A=A+1:.:.|
00000440  77 3a fb 32 3a e1 0d 01  cc 04 0d 01 d6 8e dd f2  |w:.2:...........|
00000450  74 79 70 28 41 24 2c 78  25 2c 79 25 29 ea 41 25  |typ(A$,x%,y%).A%|
00000460  2c 4b 25 2c 4e 25 2c 58  25 2c 59 25 3a 58 25 3d  |,K%,N%,X%,Y%:X%=|
00000470  4c 25 3a 59 25 3d 30 3a  4b 25 3d 26 39 46 3a 41  |L%:Y%=0:K%=&9F:A|
00000480  25 3d 31 30 3a e3 4e 25  3d 31 b8 a9 41 24 3a 3f  |%=10:.N%=1..A$:?|
00000490  4c 25 3d 97 c1 41 24 2c  4e 25 29 3a d6 26 46 46  |L%=..A$,N%):.&FF|
000004a0  46 31 3a ef 32 33 26 39  46 2c 30 4c 25 3f 31 4c  |F1:.23&9F,0L%?1L|
000004b0  25 3f 33 4c 25 3f 34 4c  25 3f 35 4c 25 3f 37 4c  |%?3L%?4L%?5L%?7L|
000004c0  25 3f 38 2c 30 2c 33 31  78 25 2b 4e 25 2d 31 79  |%?8,0,31x%+N%-1y|
000004d0  25 26 39 46 3a ed 3a e1  0d 01 e0 04 0d 01 ea 0c  |%&9F:.:.........|
000004e0  dd f2 73 63 72 65 65 6e  0d 01 f4 32 ef 31 39 2c  |..screen...2.19,|
000004f0  32 2c 32 3b 30 3b 31 39  2c 33 2c 36 3b 30 3b 31  |2,2;0;19,3,6;0;1|
00000500  39 2c 31 2c 31 3b 30 3b  32 38 2c 30 2c 32 34 2c  |9,1,1;0;28,0,24,|
00000510  33 39 2c 36 2c 31 32 2c  32 36 0d 01 fe 1f e7 20  |39,6,12,26..... |
00000520  73 25 3e 31 34 20 ef 31  39 2c 31 2c 35 3b 30 3b  |s%>14 .19,1,5;0;|
00000530  31 39 2c 33 2c 34 3b 30  3b 0d 02 08 23 f7 20 8d  |19,3,4;0;...#. .|
00000540  74 4a 47 3a e7 20 73 25  3e 31 20 e3 54 3d 31 b8  |tJG:. s%>1 .T=1.|
00000550  20 73 25 2d 31 3a f3 20  41 24 3a ed 0d 02 12 58  | s%-1:. A$:....X|
00000560  f3 20 41 24 3a 44 25 3d  97 c1 41 24 2c 31 29 2d  |. A$:D%=..A$,1)-|
00000570  34 36 3a 63 25 3d 97 c1  41 24 2c 32 29 2d 34 36  |46:c%=..A$,2)-46|
00000580  3a 63 31 25 3d 97 c1 41  24 2c 33 29 2d 34 36 3a  |:c1%=..A$,3)-46:|
00000590  e7 20 62 25 3f 73 25 3d  31 ef 33 31 63 25 63 31  |. b%?s%=1.31c%c1|
000005a0  25 67 72 6e 25 3b 26 41  44 2c 31 30 2c 38 26 41  |%grn%;&AD,10,8&A|
000005b0  45 26 41 46 0d 02 1c 11  e3 50 25 3d 34 20 b8 20  |E&AF.....P%=4 . |
000005c0  a9 41 24 88 34 0d 02 26  21 58 3d 97 c1 41 24 2c  |.A$.4..&!X=..A$,|
000005d0  50 25 29 2d 34 36 3a 59  3d 97 c1 41 24 2c 50 25  |P%)-46:Y=..A$,P%|
000005e0  2b 31 29 2d 34 36 0d 02  30 24 58 31 3d 97 c1 41  |+1)-46..0$X1=..A|
000005f0  24 2c 50 25 2b 32 29 2d  34 36 3a 4b 3d 97 c1 41  |$,P%+2)-46:K=..A|
00000600  24 2c 50 25 2b 33 29 2d  34 36 0d 02 3a 31 e7 4b  |$,P%+3)-46..:1.K|
00000610  3d 31 ef 67 72 6e 25 3b  3a e3 41 25 3d 58 20 b8  |=1.grn%;:.A%=X .|
00000620  20 58 31 20 88 34 3a ef  33 31 41 25 59 26 41 39  | X1 .4:.31A%Y&A9|
00000630  26 41 41 26 41 42 26 41  43 3a ed 0d 02 44 13 e7  |&AA&AB&AC:...D..|
00000640  4b 3d 32 f2 61 28 58 2c  26 39 33 2c 33 29 0d 02  |K=2.a(X,&93,3)..|
00000650  4e 2b e7 4b 3d 33 ef 72  65 64 25 3b 3a e3 41 25  |N+.K=3.red%;:.A%|
00000660  3d 58 20 b8 20 58 31 20  88 32 3a f2 63 28 41 25  |=X . X1 .2:.c(A%|
00000670  2c 59 2c 26 38 39 29 3a  ed 0d 02 58 13 e7 4b 3d  |,Y,&89):...X..K=|
00000680  34 f2 61 28 59 2c 26 38  39 2c 31 29 0d 02 62 3c  |4.a(Y,&89,1)..b<|
00000690  e7 4b 3d 35 e3 41 25 3d  58 20 b8 20 58 31 20 88  |.K=5.A%=X . X1 .|
000006a0  33 3a ef 72 65 64 25 3b  33 31 41 25 59 26 38 44  |3:.red%;31A%Y&8D|
000006b0  26 38 45 2c 31 30 2c 38  2c 38 2c 67 72 6e 25 3b  |&8E,10,8,8,grn%;|
000006c0  26 38 46 26 39 30 3a ed  0d 02 6c 2e e7 4b 3d 36  |&8F&90:...l..K=6|
000006d0  ef 33 31 2c 58 2c 59 2c  63 79 6e 25 3b 26 39 31  |.31,X,Y,cyn%;&91|
000006e0  2c 39 26 39 31 2c 31 30  2c 38 2c 38 2c 38 26 39  |,9&91,10,8,8,8&9|
000006f0  32 2c 39 26 39 32 0d 02  76 13 e7 4b 3d 37 f2 61  |2,9&92..v..K=7.a|
00000700  28 58 2c 26 39 37 2c 33  29 0d 02 80 14 e7 4b 3d  |(X,&97,3).....K=|
00000710  38 f1 8a 58 2c 59 29 41  24 28 58 31 29 0d 02 8a  |8..X,Y)A$(X1)...|
00000720  05 ed 0d 02 94 23 e7 20  73 25 3d 31 20 fb 32 3a  |.....#. s%=1 .2:|
00000730  f2 74 79 70 28 22 54 45  4c 45 50 4f 52 54 22 2c  |.typ("TELEPORT",|
00000740  33 2c 31 37 29 0d 02 9e  45 46 25 3d 30 3a e3 54  |3,17)...EF%=0:.T|
00000750  3d 30 b8 33 3a 58 25 28  54 29 3d 39 39 3a ed 3a  |=0.3:X%(T)=99:.:|
00000760  e7 20 44 25 3e 30 20 f7  20 8d 74 7c 42 3a e3 54  |. D%>0 . .t|B:.T|
00000770  3d 31 b8 20 44 25 3a f3  20 58 25 28 54 2d 31 29  |=1. D%:. X%(T-1)|
00000780  2c 59 25 28 54 2d 31 29  3a ed 0d 02 a8 05 e1 0d  |,Y%(T-1):.......|
00000790  02 b2 04 0d 02 bc 1d dc  20 31 38 2c 31 34 2c 33  |........ 18,14,3|
000007a0  30 2c 31 30 2c 32 30 2c  31 33 2c 32 32 2c 31 30  |0,10,20,13,22,10|
000007b0  0d 02 c6 04 0d 02 d0 16  dd f2 73 70 72 74 3a 41  |..........sprt:A|
000007c0  25 3d 58 25 3a 42 25 3d  59 25 0d 02 da 1c e7 4a  |%=X%:B%=Y%.....J|
000007d0  25 28 4a 25 29 3e 30 f2  73 3a 8b e7 4a 25 28 4a  |%(J%)>0.s:..J%(J|
000007e0  25 29 3c 30 f2 75 0d 02  e4 1e e7 53 25 3d 32 e7  |%)<0.u.....S%=2.|
000007f0  4a 25 28 4a 25 29 e7 b3  28 32 29 3d 31 4a 25 3d  |J%(J%)..(2)=1J%=|
00000800  4a 25 2d 31 0d 02 ee 1c  4a 25 3d 4a 25 2b 31 3a  |J%-1....J%=J%+1:|
00000810  e7 4a 25 3d 31 30 4a 25  3d 30 3a f2 63 68 65 6b  |.J%=10J%=0:.chek|
00000820  0d 02 f8 14 e7 a6 2d 39  38 f2 72 3a 8b e7 a6 2d  |......-98.r:...-|
00000830  36 37 f2 6c 0d 03 02 1d  fb 33 3a f2 71 28 41 25  |67.l.....3:.q(A%|
00000840  2c 42 25 29 3a f2 63 28  58 25 2c 59 25 2c 43 25  |,B%):.c(X%,Y%,C%|
00000850  29 0d 03 0c 2e e7 a6 2d  31 32 32 e7 46 25 3d 30  |)......-122.F%=0|
00000860  e7 78 25 3c 31 36 ef 33  31 2c 78 25 2c 33 30 2c  |.x%<16.31,x%,30,|
00000870  33 32 3a 78 25 3d 78 25  2b 34 3a f2 77 3a e1 0d  |32:x%=x%+4:.w:..|
00000880  03 16 2b e7 a6 2d 32 36  e7 46 25 3d 30 e7 78 25  |..+..-26.F%=0.x%|
00000890  3e 31 30 ef 33 31 2c 78  25 2c 33 30 2c 33 32 3a  |>10.31,x%,30,32:|
000008a0  78 25 3d 78 25 2d 34 3a  f2 77 0d 03 20 05 e1 0d  |x%=x%-4:.w.. ...|
000008b0  03 2a 04 0d 03 34 26 dd  f2 72 3a ef 33 31 58 25  |.*...4&..r:.31X%|
000008c0  2d 31 59 25 3a d6 45 25  3a ef 31 30 3a e7 3f 4c  |-1Y%:.E%:.10:.?L|
000008d0  25 3c 3e 71 25 f2 64 3a  e1 0d 03 3e 14 d6 45 25  |%<>q%.d:...>..E%|
000008e0  3a e7 3f 4c 25 3c 3e 71  25 f2 64 3a e1 0d 03 48  |:.?L%<>q%.d:...H|
000008f0  14 58 25 3d 58 25 2d 31  3a 43 25 3d 26 41 34 3a  |.X%=X%-1:C%=&A4:|
00000900  e1 0d 03 52 04 0d 03 5c  2a dd f2 75 3a ef 33 31  |...R...\*..u:.31|
00000910  58 25 59 25 2d 31 3a d6  45 25 3a ef 39 3a e7 3f  |X%Y%-1:.E%:.9:.?|
00000920  4c 25 3c 3e 71 25 4a 25  3d 36 3a f2 64 3a e1 0d  |L%<>q%J%=6:.d:..|
00000930  03 66 1b d6 45 25 3a e7  20 3f 4c 25 3c 3e 71 25  |.f..E%:. ?L%<>q%|
00000940  20 4a 25 3d 36 3a f2 64  3a e1 0d 03 70 0d 59 25  | J%=6:.d:...p.Y%|
00000950  3d 59 25 2d 31 3a e1 0d  03 7a 04 0d 03 84 34 dd  |=Y%-1:...z....4.|
00000960  f2 73 3a ef 33 31 58 25  59 25 2b 32 3a d6 45 25  |.s:.31X%Y%+2:.E%|
00000970  3a ef 39 3a e7 3f 4c 25  3c 3e 71 25 4a 25 3d 30  |:.9:.?L%<>q%J%=0|
00000980  3a d4 30 2c 31 33 2c 33  2c 31 3a f2 64 3a e1 0d  |:.0,13,3,1:.d:..|
00000990  03 8e 23 d6 45 25 3a e7  3f 4c 25 3c 3e 71 25 4a  |..#.E%:.?L%<>q%J|
000009a0  25 3d 30 3a d4 30 2c 31  33 2c 33 2c 31 3a f2 64  |%=0:.0,13,3,1:.d|
000009b0  3a e1 0d 03 98 0d 59 25  3d 59 25 2b 31 3a e1 0d  |:.....Y%=Y%+1:..|
000009c0  03 a2 04 0d 03 ac 26 dd  f2 6c 3a ef 33 31 58 25  |......&..l:.31X%|
000009d0  2b 32 59 25 3a d6 45 25  3a ef 31 30 3a e7 3f 4c  |+2Y%:.E%:.10:.?L|
000009e0  25 3c 3e 71 25 f2 64 3a  e1 0d 03 b6 14 d6 45 25  |%<>q%.d:......E%|
000009f0  3a e7 3f 4c 25 3c 3e 71  25 f2 64 3a e1 0d 03 c0  |:.?L%<>q%.d:....|
00000a00  14 58 25 3d 58 25 2b 31  3a 43 25 3d 26 41 30 3a  |.X%=X%+1:C%=&A0:|
00000a10  e1 0d 03 ca 04 0d 03 d4  60 dd f2 64 3a e7 3f 4c  |........`..d:.?L|
00000a20  25 3e 31 38 34 80 3f 4c  25 3c 31 38 39 84 3f 4c  |%>184.?L%<189.?L|
00000a30  25 3e 32 32 32 80 3f 4c  25 3c 32 32 37 84 3f 4c  |%>222.?L%<227.?L|
00000a40  25 3d 31 39 31 84 3f 4c  25 3e 26 38 43 20 80 3f  |%=191.?L%>&8C .?|
00000a50  4c 25 3c 26 39 31 84 3f  4c 25 3e 26 39 32 20 80  |L%<&91.?L%>&92 .|
00000a60  3f 4c 25 3c 26 39 37 d4  30 2c 34 2c 34 2c 31 3a  |?L%<&97.0,4,4,1:|
00000a70  f2 6c 69 66 65 0d 03 de  37 e7 3f 4c 25 3e 31 37  |.life...7.?L%>17|
00000a80  32 e7 3f 4c 25 3c 31 37  36 f2 71 28 63 25 2c 63  |2.?L%<176.q(c%,c|
00000a90  31 25 29 3a fb 32 3a d4  33 2c 33 2c 32 30 30 2c  |1%):.2:.3,3,200,|
00000aa0  31 3a f2 70 3a 62 25 3f  73 25 3d 30 0d 03 e8 26  |1:.p:b%?s%=0...&|
00000ab0  e7 3f 4c 25 3c 31 37 36  8b e7 3f 4c 25 3e 31 37  |.?L%<176..?L%>17|
00000ac0  37 8b e7 73 25 3e 31 f2  74 28 31 29 8b f2 74 28  |7..s%>1.t(1)..t(|
00000ad0  30 29 0d 03 f2 2f e7 3f  4c 25 3e 31 37 37 e7 3f  |0).../.?L%>177.?|
00000ae0  4c 25 3c 31 38 30 f2 74  28 32 29 8b e7 3f 4c 25  |L%<180.t(2)..?L%|
00000af0  3e 31 38 30 e7 3f 4c 25  3c 31 38 35 f2 74 28 33  |>180.?L%<185.t(3|
00000b00  29 0d 03 fc 05 e1 0d 04  06 04 0d 04 10 36 dd f2  |)............6..|
00000b10  74 28 51 25 29 3a e7 20  5a 25 28 51 25 29 e1 3a  |t(Q%):. Z%(Q%).:|
00000b20  8b 5a 25 28 51 25 29 3d  31 3a d4 31 2c 33 2c 31  |.Z%(Q%)=1:.1,3,1|
00000b30  30 30 2c 31 3a f2 65 78  74 72 61 3a f2 70 3a e1  |00,1:.extra:.p:.|
00000b40  0d 04 1a 04 0d 04 24 39  dd f2 63 68 65 6b 3a 4a  |......$9..chek:J|
00000b50  25 3d 30 3a ef 33 31 58  25 59 25 2b 32 3a d6 45  |%=0:.31X%Y%+2:.E|
00000b60  25 3a ef 39 3a e7 20 3f  4c 25 3c 3e 71 25 20 d4  |%:.9:. ?L%<>q% .|
00000b70  30 2c 31 33 2c 33 2c 31  3a f2 64 3a e1 0d 04 2e  |0,13,3,1:.d:....|
00000b80  20 d6 45 25 3a e7 20 3f  4c 25 3c 3e 71 25 20 d4  | .E%:. ?L%<>q% .|
00000b90  30 2c 31 33 2c 33 2c 31  3a f2 64 3a e1 0d 04 38  |0,13,3,1:.d:...8|
00000ba0  0a 4a 25 3d 36 3a e1 0d  04 42 04 0d 04 4c 13 dd  |.J%=6:...B...L..|
00000bb0  f2 67 3a e7 58 25 28 5a  25 29 3d 39 39 e1 0d 04  |.g:.X%(Z%)=99...|
00000bc0  56 23 49 25 3d 58 25 28  5a 25 29 3a 4b 25 3d 59  |V#I%=X%(Z%):K%=Y|
00000bd0  25 28 5a 25 29 3a 55 25  3d 49 25 3a 56 25 3d 4b  |%(Z%):U%=I%:V%=K|
00000be0  25 0d 04 60 24 e7 20 58  25 28 5a 25 29 3c 58 25  |%..`$. X%(Z%)<X%|
00000bf0  20 f2 67 72 3a 8b e7 20  58 25 28 5a 25 29 3e 58  | .gr:.. X%(Z%)>X|
00000c00  25 20 f2 67 6c 0d 04 6a  24 e7 20 59 25 28 5a 25  |% .gl..j$. Y%(Z%|
00000c10  29 3e 59 25 20 f2 67 75  3a 8b e7 20 59 25 28 5a  |)>Y% .gu:.. Y%(Z|
00000c20  25 29 3c 59 25 20 f2 67  64 0d 04 74 32 f2 71 28  |%)<Y% .gd..t2.q(|
00000c30  49 25 2c 4b 25 29 3a fb  32 3a e7 49 25 3e 55 25  |I%,K%):.2:.I%>U%|
00000c40  f2 63 28 55 25 2c 56 25  2c 26 42 39 29 8b f2 63  |.c(U%,V%,&B9)..c|
00000c50  28 55 25 2c 56 25 2c 26  38 30 29 0d 04 7e 19 58  |(U%,V%,&80)..~.X|
00000c60  25 28 5a 25 29 3d 55 25  3a 59 25 28 5a 25 29 3d  |%(Z%)=U%:Y%(Z%)=|
00000c70  56 25 3a e1 0d 04 88 04  0d 04 92 22 dd f2 67 6c  |V%:........"..gl|
00000c80  3a ef 33 31 55 25 2d 31  56 25 3a d6 45 25 3a e7  |:.31U%-1V%:.E%:.|
00000c90  20 3f 4c 25 3c 3e 71 25  20 e1 0d 04 9c 1c ef 31  | ?L%<>q% ......1|
00000ca0  30 3a d6 45 25 3a e7 20  3f 4c 25 3d 71 25 20 55  |0:.E%:. ?L%=q% U|
00000cb0  25 3d 55 25 2d 31 0d 04  a6 05 e1 0d 04 b0 04 0d  |%=U%-1..........|
00000cc0  04 ba 26 dd f2 67 72 3a  ef 33 31 55 25 2b 32 56  |..&..gr:.31U%+2V|
00000cd0  25 3a d6 45 25 3a ef 31  30 3a e7 20 3f 4c 25 3c  |%:.E%:.10:. ?L%<|
00000ce0  3e 71 25 20 e1 0d 04 c4  18 d6 45 25 3a e7 20 3f  |>q% ......E%:. ?|
00000cf0  4c 25 3d 71 25 20 55 25  3d 55 25 2b 31 0d 04 ce  |L%=q% U%=U%+1...|
00000d00  05 e1 0d 04 d8 04 0d 04  e2 25 dd f2 67 75 3a ef  |.........%..gu:.|
00000d10  33 31 55 25 56 25 2d 31  3a d6 45 25 3a ef 39 3a  |31U%V%-1:.E%:.9:|
00000d20  e7 20 3f 4c 25 3c 3e 71  25 20 e1 0d 04 ec 18 d6  |. ?L%<>q% ......|
00000d30  45 25 3a e7 20 3f 4c 25  3d 71 25 20 56 25 3d 56  |E%:. ?L%=q% V%=V|
00000d40  25 2d 31 0d 04 f6 05 e1  0d 05 00 04 0d 05 0a 25  |%-1............%|
00000d50  dd f2 67 64 3a ef 33 31  55 25 56 25 2b 32 3a d6  |..gd:.31U%V%+2:.|
00000d60  45 25 3a ef 39 3a e7 20  3f 4c 25 3c 3e 71 25 20  |E%:.9:. ?L%<>q% |
00000d70  e1 0d 05 14 18 d6 45 25  3a e7 20 3f 4c 25 3d 71  |......E%:. ?L%=q|
00000d80  25 20 56 25 3d 56 25 2b  31 0d 05 1e 05 e1 0d 05  |% V%=V%+1.......|
00000d90  28 04 0d 05 32 31 dd f2  77 3a ef 63 79 6e 25 3b  |(...21..w:.cyn%;|
00000da0  33 31 78 25 33 30 26 42  34 3a 53 25 3d 39 3a e7  |31x%30&B4:S%=9:.|
00000db0  20 5a 25 28 28 78 25 2b  31 29 2f 34 2d 32 29 3d  | Z%((x%+1)/4-2)=|
00000dc0  30 20 e1 0d 05 3c 1e 53  25 3d 28 78 25 2b 31 29  |0 ...<.S%=(x%+1)|
00000dd0  2f 34 2d 32 3a d4 32 2c  31 2c 32 30 30 2c 31 3a  |/4-2:.2,1,200,1:|
00000de0  e1 0d 05 46 04 0d 05 50  0a dd f2 66 69 72 65 0d  |...F...P...fire.|
00000df0  05 5a 1a ef 33 31 46 25  48 25 71 25 3a e7 53 25  |.Z..31F%H%q%:.S%|
00000e00  3d 31 ef 31 30 2c 38 71  25 0d 05 64 13 ef 33 31  |=1.10,8q%..d..31|
00000e10  46 25 2b 47 25 2c 48 25  3a d6 45 25 0d 05 6e 13  |F%+G%,H%:.E%..n.|
00000e20  e7 20 3f 4c 25 3c 3e 71  25 20 f2 65 78 3a e1 0d  |. ?L%<>q% .ex:..|
00000e30  05 78 22 e7 20 53 25 3d  31 20 ef 31 30 3a d6 45  |.x". S%=1 .10:.E|
00000e40  25 3a e7 20 3f 4c 25 3c  3e 71 25 20 f2 65 78 3a  |%:. ?L%<>q% .ex:|
00000e50  e1 0d 05 82 2c 46 25 3d  46 25 2b 47 25 3a ef 67  |....,F%=F%+G%:.g|
00000e60  72 6e 25 3b 33 31 46 25  48 25 3a e7 20 53 25 3d  |rn%;31F%H%:. S%=|
00000e70  34 20 ef 26 42 44 20 8b  20 ef 26 41 38 0d 05 8c  |4 .&BD . .&A8...|
00000e80  13 e7 20 53 25 3d 31 20  ef 31 30 2c 38 26 41 38  |.. S%=1 .10,8&A8|
00000e90  0d 05 96 2d e7 20 46 25  3e 33 37 84 46 25 3c 32  |...-. F%>37.F%<2|
00000ea0  ef 33 31 46 25 48 25 71  25 3a 46 25 3d 30 3a e7  |.31F%H%q%:F%=0:.|
00000eb0  20 53 25 3d 31 20 ef 31  30 2c 38 71 25 0d 05 a0  | S%=1 .10,8q%...|
00000ec0  05 e1 0d 05 aa 04 0d 05  b4 11 dd f2 65 78 3a 46  |............ex:F|
00000ed0  25 3d 46 25 2b 47 25 0d  05 be 4b e3 54 3d 30 b8  |%=F%+G%...K.T=0.|
00000ee0  33 3a e7 20 58 25 28 54  29 3c 3e 39 39 20 e7 20  |3:. X%(T)<>99 . |
00000ef0  46 25 3e 58 25 28 54 29  2d 32 20 e7 20 46 25 3c  |F%>X%(T)-2 . F%<|
00000f00  58 25 28 54 29 2b 33 20  e7 20 48 25 3d 59 25 28  |X%(T)+3 . H%=Y%(|
00000f10  54 29 20 84 20 48 25 3d  59 25 28 54 29 2b 31 20  |T) . H%=Y%(T)+1 |
00000f20  f2 62 0d 05 c8 0c ed 3a  46 25 3d 30 3a e1 0d 05  |.b.....:F%=0:...|
00000f30  d2 04 0d 05 dc 1c dd f2  73 65 74 3a e7 20 58 25  |........set:. X%|
00000f40  3e 33 35 20 e7 20 43 25  3d 26 41 30 20 e1 0d 05  |>35 . C%=&A0 ...|
00000f50  e6 2f e7 20 53 25 3d 33  20 e7 20 5a 25 28 33 29  |./. S%=3 . Z%(3)|
00000f60  3c 39 20 e3 54 3d 30 b8  33 3a f2 62 3a ed 3a 5a  |<9 .T=0.3:.b:.:Z|
00000f70  25 28 33 29 3d 39 3a f2  65 78 74 72 61 0d 05 f0  |%(3)=9:.extra...|
00000f80  0c e7 20 53 25 3e 31 20  e1 0d 05 fa 2f 48 25 3d  |.. S%>1 ..../H%=|
00000f90  59 25 3a e7 20 43 25 3d  26 41 30 20 47 25 3d 32  |Y%:. C%=&A0 G%=2|
00000fa0  3a 46 25 3d 58 25 2b 32  20 8b 20 47 25 3d 2d 32  |:F%=X%+2 . G%=-2|
00000fb0  3a 46 25 3d 58 25 2d 31  0d 06 04 21 ef 33 31 46  |:F%=X%-1...!.31F|
00000fc0  25 48 25 3a d6 45 25 3a  ef 31 30 3a e7 3f 4c 25  |%H%:.E%:.10:.?L%|
00000fd0  3c 3e 71 25 f2 65 78 3a  e1 0d 06 0e 1a e7 53 25  |<>q%.ex:......S%|
00000fe0  3d 31 d6 45 25 3a e7 3f  4c 25 3c 3e 71 25 f2 65  |=1.E%:.?L%<>q%.e|
00000ff0  78 3a e1 0d 06 18 21 e7  53 25 3d 30 d4 32 2c 31  |x:....!.S%=0.2,1|
00001000  34 2c 31 31 30 2c 31 8b  20 d4 32 2c 31 34 2c 32  |4,110,1. .2,14,2|
00001010  30 30 2c 31 0d 06 22 05  e1 0d 06 2c 04 0d 06 36  |00,1.."....,...6|
00001020  14 dd f2 62 3a e7 20 58  25 28 54 29 3d 39 39 20  |...b:. X%(T)=99 |
00001030  e1 0d 06 40 46 d4 30 2c  34 2c 36 2c 31 3a fb 31  |...@F.0,4,6,1:.1|
00001040  3a f2 63 28 58 25 28 54  29 2c 59 25 28 54 29 2c  |:.c(X%(T),Y%(T),|
00001050  26 38 34 29 3a f2 71 28  58 25 28 54 29 2c 59 25  |&84):.q(X%(T),Y%|
00001060  28 54 29 29 3a e7 20 73  25 3c 31 39 20 58 25 28  |(T)):. s%<19 X%(|
00001070  54 29 3d 39 39 3a e1 0d  06 4a 04 0d 06 54 2c dd  |T)=99:...J...T,.|
00001080  f2 6c 69 66 65 3a e6 30  2c 30 3a ec 20 57 25 2c  |.life:.0,0:. W%,|
00001090  39 31 36 3a df 20 57 25  2c 39 34 30 3a 57 25 3d  |916:. W%,940:W%=|
000010a0  57 25 2d 31 36 3a e1 0d  06 5e 04 0d 06 68 25 dd  |W%-16:...^...h%.|
000010b0  f2 70 3a 70 25 3d 70 25  2b 34 3a f2 74 79 70 28  |.p:p%=p%+4:.typ(|
000010c0  c3 70 25 2b 22 25 22 2c  33 33 2c 33 30 29 3a e1  |.p%+"%",33,30):.|
000010d0  0d 06 72 04 0d 06 7c 34  dd f2 6e 65 77 3a e7 20  |..r...|4..new:. |
000010e0  58 25 3d 33 38 20 73 25  3d 73 25 2b 31 3a 58 25  |X%=38 s%=s%+1:X%|
000010f0  3d 31 3a 8b e7 20 58 25  3d 30 20 73 25 3d 73 25  |=1:.. X%=0 s%=s%|
00001100  2d 31 3a 58 25 3d 33 37  0d 06 86 33 e7 20 59 25  |-1:X%=37...3. Y%|
00001110  3d 36 20 73 25 3d 73 25  2d 37 3a 59 25 3d 32 32  |=6 s%=s%-7:Y%=22|
00001120  3a 8b e7 20 59 25 3d 32  33 20 73 25 3d 73 25 2b  |:.. Y%=23 s%=s%+|
00001130  37 3a 59 25 3d 37 3a 4a  25 3d 36 0d 06 90 0d f2  |7:Y%=7:J%=6.....|
00001140  73 63 72 65 65 6e 3a e1  0d 06 9a 04 0d 06 a4 12  |screen:.........|
00001150  dd f2 65 6e 64 3a d4 30  2c 32 2c 34 2c 39 0d 06  |..end:.0,2,4,9..|
00001160  ae 2a e3 59 3d 30 b8 37  3a ef 63 79 6e 25 3b 3a  |.*.Y=0.7:.cyn%;:|
00001170  f2 63 28 36 2c 31 39 2c  26 41 30 29 3a f2 77 61  |.c(6,19,&A0):.wa|
00001180  69 74 28 31 30 2d 59 29  0d 06 b8 25 f2 77 61 69  |it(10-Y)...%.wai|
00001190  74 28 31 30 2d 59 29 3a  ef 72 65 64 25 3b 3a f2  |t(10-Y):.red%;:.|
000011a0  63 28 36 2c 31 39 2c 26  41 34 29 3a ed 0d 06 c2  |c(6,19,&A4):....|
000011b0  2b f2 71 28 36 2c 31 39  29 3a ef 32 38 2c 30 2c  |+.q(6,19):.28,0,|
000011c0  32 34 2c 33 39 2c 36 2c  31 32 2c 32 36 3a d4 31  |24,39,6,12,26:.1|
000011d0  2c 34 2c 32 30 30 2c 31  0d 06 cc 2c f2 74 79 70  |,4,200,1...,.typ|
000011e0  28 22 59 4f 55 20 48 41  56 45 20 45 53 43 41 50  |("YOU HAVE ESCAP|
000011f0  45 44 22 2c 31 32 2c 31  33 29 3a 68 70 25 3d 31  |ED",12,13):hp%=1|
00001200  30 30 3a e1 0d 06 d6 04  0d 06 e0 3a dd f2 61 28  |00:........:..a(|
00001210  49 25 2c 42 25 2c 4b 25  29 ef 31 37 4b 25 3a e3  |I%,B%,K%).17K%:.|
00001220  41 25 3d 49 25 b8 20 58  31 20 88 32 3a e7 49 25  |A%=I%. X1 .2:.I%|
00001230  3d 58 20 ef 33 31 41 25  59 20 8b ef 33 31 58 2c  |=X .31A%Y ..31X,|
00001240  41 25 0d 06 ea 21 ef 42  25 2c 42 25 2b 31 2c 31  |A%...!.B%,B%+1,1|
00001250  30 2c 38 2c 38 2c 42 25  2b 32 2c 42 25 2b 33 3a  |0,8,8,B%+2,B%+3:|
00001260  ed 3a e1 0d 06 f4 04 0d  06 fe 2f dd f2 63 28 58  |.:......../..c(X|
00001270  25 2c 59 25 2c 42 25 29  ef 33 31 58 25 59 25 42  |%,Y%,B%).31X%Y%B|
00001280  25 42 25 2b 31 2c 31 30  2c 38 2c 38 42 25 2b 32  |%B%+1,10,8,8B%+2|
00001290  42 25 2b 33 3a e1 0d 07  08 04 0d 07 12 25 dd f2  |B%+3:........%..|
000012a0  71 28 58 25 2c 59 25 29  ef 33 31 58 25 59 25 71  |q(X%,Y%).31X%Y%q|
000012b0  25 71 25 31 30 2c 38 2c  38 71 25 71 25 3a e1 0d  |%q%10,8,8q%q%:..|
000012c0  07 1c 04 0d 07 26 1e dd  f2 77 61 69 74 28 54 25  |.....&...wait(T%|
000012d0  29 54 25 3d 91 2b 54 25  3a f5 fd 91 3e 54 25 3a  |)T%=.+T%:...>T%:|
000012e0  e1 0d 07 30 04 0d 07 3a  09 dd f2 64 69 65 0d 07  |...0...:...die..|
000012f0  44 4e e3 54 3d 2d 31 b8  2d 31 35 88 2d 31 3a d4  |DN.T=-1.-15.-1:.|
00001300  30 2c 54 2c 36 2c 31 3a  ed 3a fb 31 3a f2 63 28  |0,T,6,1:.:.1:.c(|
00001310  58 25 2c 59 25 2c 26 38  34 29 3a d4 30 2c 34 2c  |X%,Y%,&84):.0,4,|
00001320  36 2c 31 3a f2 74 79 70  28 22 47 41 4d 45 20 20  |6,1:.typ("GAME  |
00001330  4f 56 45 52 22 2c 31 35  2c 31 33 29 0d 07 4e 65  |OVER",15,13)..Ne|
00001340  ef 32 38 2c 30 2c 32 34  2c 33 39 2c 36 2c 31 32  |.28,0,24,39,6,12|
00001350  2c 32 36 3a f2 74 79 70  28 22 42 45 53 54 20 25  |,26:.typ("BEST %|
00001360  41 47 45 3a 22 2b c3 28  68 70 25 29 2c 31 34 2c  |AGE:"+.(hp%),14,|
00001370  31 31 29 3a f2 74 79 70  28 22 59 4f 55 52 20 25  |11):.typ("YOUR %|
00001380  41 47 45 3a 22 2b c3 28  70 25 29 2c 31 34 2c 39  |AGE:"+.(p%),14,9|
00001390  29 3a e7 20 70 25 3e 68  70 25 20 68 70 25 3d 70  |):. p%>hp% hp%=p|
000013a0  25 0d 07 58 05 e1 0d 07  62 04 0d 07 6c 19 eb 37  |%..X....b...l..7|
000013b0  3a f6 3a f1 22 20 61 74  20 6c 69 6e 65 20 22 3b  |:.:." at line ";|
000013c0  9e 3a e0 0d 07 76 04 0d  07 80 1d dc 20 2d 32 2c  |.:...v...... -2,|
000013d0  2d 31 2c 2d 31 2c 2d 31  2c 30 2c 30 2c 31 2c 31  |-1,-1,-1,0,0,1,1|
000013e0  2c 31 2c 32 0d 07 8a a1  dc 20 2e 39 3b 2e 43 48  |,1,2..... .9;.CH|
000013f0  31 2e 45 55 31 30 3d 3f  31 43 41 48 31 2e 3c 36  |1.EU10=?1CAH1.<6|
00001400  31 4c 3d 53 31 2e 34 55  31 47 40 47 33 44 36 55  |1L=S1.4U1G@G3D6U|
00001410  31 3a 36 2e 34 2e 35 43  32 32 3a 2e 36 2c 32 46  |1:6.4.5C22:.6,2F|
00001420  3c 2e 45 55 31 32 3e 46  31 2e 36 55 31 2e 34 55  |<.EU12>F1.6U1.4U|
00001430  31 44 38 40 32 4e 40 55  31 49 43 2e 33 4d 3e 2e  |1D8@2N@U1IC.3M>.|
00001440  33 32 3e 40 32 3a 3c 3e  30 2c 30 34 3e 2e 45 34  |32>@2:<>0,04>.E4|
00001450  31 36 46 55 2f 2e 40 34  31 3e 44 55 33 41 40 41  |16FU/.@41>DU3A@A|
00001460  31 4c 40 55 31 2e 36 55  31 37 44 30 36 54 42 54  |1L@U1.6U17D06TBT|
00001470  31 2c 32 30 44 2e 46 55  2f 2e 40 44 32 2e 34 55  |1,20D.FU/.@D2.4U|
00001480  31 41 36 2e 34 0d 07 94  85 dc 20 30 48 43 2e 46  |1A6.4..... 0HC.F|
00001490  36 2f 36 45 55 31 44 41  45 32 46 3f 43 32 52 3f  |6/6EU1DAE2F?C2R?|
000014a0  43 32 4c 43 4c 33 2e 34  55 31 2c 32 50 43 2e 45  |C2LCL3.4U1,2PC.E|
000014b0  55 31 32 45 51 2f 2e 3f  43 32 38 43 4c 33 2e 34  |U12EQ/.?C28CL3.4|
000014c0  55 31 54 3f 45 32 41 36  2e 34 2c 32 52 3d 2e 3f  |U1T?E2A6.4,2R=.?|
000014d0  36 31 2e 45 36 31 2e 34  55 31 54 35 45 32 42 3f  |61.E61.4U1T5E2B?|
000014e0  52 31 2e 3f 45 32 48 3d  4e 30 2c 32 32 39 2e 34  |R1.?E2H=N0,229.4|
000014f0  55 31 2e 35 45 32 30 45  55 31 30 43 55 33 4e 3f  |U1.5E20EU10CU3N?|
00001500  50 31 44 3b 46 31 32 3b  3c 31 0d 07 9e a2 20 dc  |P1D;F12;<1.... .|
00001510  20 32 40 36 2e 34 55 31  2e 43 55 31 42 36 38 32  | 2@6.4U1.CU1B682|
00001520  44 3c 43 32 46 3c 4c 31  40 38 40 31 3e 41 3e 33  |D<C2F<L1@8@1>A>3|
00001530  46 41 4a 30 2c 32 46 39  2e 43 36 31 2e 45 42 31  |FAJ0,2F9.C61.EB1|
00001540  2e 34 55 31 48 45 55 31  42 3f 43 32 44 3f 4a 31  |.4U1HEU1B?C2D?J1|
00001550  44 3b 55 31 46 36 46 34  33 41 36 33 2c 32 35 39  |D;U1F6F43A63,259|
00001560  2e 45 3c 31 2e 34 55 31  2e 3b 38 31 38 35 3b 32  |.E<1.4U1.;8185;2|
00001570  3c 43 42 31 42 41 48 31  48 3f 50 31 50 3d 55 31  |<CB1BAH1H?P1P=U1|
00001580  4a 3d 4e 30 42 3f 45 33  38 43 2f 36 2c 32 42 3d  |J=N0B?E38C/6,2B=|
00001590  2e 3d 38 31 2e 3f 38 31  2e 34 55 31 42 3f 42 31  |.=81.?81.4U1B?B1|
000015a0  4a 3d 55 31 4a 3f 55 31  41 36 2e 34 0d 07 a8 99  |J=U1J?U1A6.4....|
000015b0  dc 20 32 43 3d 2e 3d 45  32 32 45 55 31 32 45 55  |. 2C=.=E22EU12EU|
000015c0  2f 30 3d 45 32 2e 34 55  31 46 35 3d 32 3e 3f 46  |/0=E2.4U1F5=2>?F|
000015d0  31 2c 2e 52 3a 2e 45 55  31 2e 34 36 31 38 3a 3c  |1,.R:.EU1.4618:<|
000015e0  30 54 34 44 32 36 34 3e  32 38 3c 3e 31 38 3e 3e  |0T4D264>28<>18>>|
000015f0  31 40 43 53 31 42 41 53  30 52 3c 52 31 2c 30 31  |1@CS1BAS0R<R1,01|
00001600  43 2e 35 43 32 2e 45 55  35 34 43 48 33 34 3b 43  |C.5C2.EU54CH34;C|
00001610  32 3a 3f 43 32 2e 34 55  35 43 41 43 32 2c 31 31  |2:?C2.4U5CAC2,11|
00001620  43 2e 34 34 35 2e 45 34  35 34 36 3c 35 34 43 3c  |C.445.E4546<54C<|
00001630  35 3c 38 42 35 3c 41 42  35 44 3a 55 35 44 3f 55  |5<8B5<AB5D:U5D?U|
00001640  35 36 41 31 36 0d 07 b2  51 dc 20 31 4e 3d 2e 3f  |56A16...Q. 1N=.?|
00001650  55 35 2e 3a 40 35 42 34  38 32 2e 34 42 31 48 34  |U5.:@5B482.4B1H4|
00001660  38 32 48 34 55 31 4a 3a  55 35 44 3d 44 30 2c 32  |82H4U1J:U5D=D0,2|
00001670  46 3b 2e 45 55 35 2e 44  55 2f 2e 34 55 35 2e 3f  |F;.EU5.DU/.4U5.?|
00001680  43 32 2e 36 3a 32 42 36  2e 34 3a 3d 3e 35 42 3d  |C2.6:2B6.4:=>5B=|
00001690  46 35 30 42 46 33 0d 07  bc 65 dc 20 32 42 42 2e  |F50BF3...e. 2BB.|
000016a0  44 55 35 32 40 50 35 36  3e 4c 35 36 3e 4c 2f 37  |DU52@P56>L56>L/7|
000016b0  3c 3c 33 2c 31 36 40 2e  44 55 35 2e 34 55 35 36  |<<3,16@.DU5.4U56|
000016c0  42 55 35 3e 40 55 35 46  3e 55 35 4e 3c 55 35 41  |BU5>@U5F>U5N<U5A|
000016d0  36 2e 34 40 3e 44 30 2c  32 46 40 31 42 51 33 30  |6.4@>D0,2F@1BQ30|
000016e0  44 50 2f 52 36 44 32 2e  3c 44 32 2e 45 53 35 2e  |DP/R6D2.<D2.ES5.|
000016f0  34 53 35 30 3c 38 31 48  3e 52 31 0d ff           |4S50<81H>R1..|
000016fd

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .