Home » Recent acquisitions » Commodore_16 » tape009b_c16_commodore_16_games_pack_1.wav » penetrator

penetrator

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 » Recent acquisitions » Commodore_16 » tape009b_c16_commodore_16_games_pack_1.wav
Filename: penetrator
Read OK: ✔
File size: 0BE3 bytes
Load address: 1001
Exec address: 0000
File contents
    10 REM PENETRATOR
    20 COLOR4,6,3
    30 B$="<cursor left>":D$="<cursor down>":S$="╱🮂╲"+D$+B$+B$+B$+"▎ 🮇"+D$+B$+B$+B$+"╲▂╱"
    40 T$="    "+D$+B$+B$+B$+B$+"    "+D$+B$+B$+B$+B$+"    " :BE=3072:GOSUB570
    50 GOSUB450:G$="<reverse on>  <rev off>":M$="○"+D$+B$+"┼"
    60 V$=" "+D$+B$+" "
    70 FORI=1TO40:CC$=CC$+"<cursor right>":NEXT:FORI=1TO25:RR$=RR$+"<cursor down>":NEXT:POKE208,12:Q=208
    80 C(1)=0:C(2)=12:C(3)=24
    90 C1(1)=8:C1(2)=20:C1(3)=32
   100 C=C(1):R=3:POKE202,C:POKE205,R:PRINT" ";S$;:C1=C1(1):E=0:LV=LV-.1
   110 FORI=4032TO4032+39:POKEI,160:NEXT
   120 PRINT"<home>";LEFT$(CC$,2);LEFT$(RR$,22);M$;
   130 FORI=1TO2STEP0
   140 A=PEEK(Q):IFA=62THENGOSUB330
   150 IFA=12THENGOSUB350:ELSEIFA=60THENGOSUB430
   160 IFETHENGOTO190
   170 GOSUB380:SOUND2,4,4
   180 Q=198:NEXT
   190 C=C(2):C1=C1(2):E=0:CN=0:R=3
   200 PRINT"<home>";LEFT$(CC$,14);LEFT$(RR$,22);M$;:POKE4004,77:Q=208
   210 FORI=1TO2STEP0:A=PEEK(Q):IFA=62THENGOSUB330
   220 POKE4004,77
   230 IFA=12THENGOSUB350:ELSEIFA=60THENGOSUB430
   240 Q=198:IFETHEN260                  
   250 GOSUB380:SOUND2,4,4:NEXT
   260 C=C(3):C1=C1(3):E=0:CN=0:R=3:Q=208
   270 PRINT"<home>";LEFT$(CC$,26);LEFT$(RR$,22);M$;
   280 FORI=1TO2STEP0:A=PEEK(Q):IFA=62THENGOSUB330
   290 IFA=12THENGOSUB350:ELSEIFA=60THENGOSUB430
   300 IFETHEN100
   310 Q=198:GOSUB380:SOUND2,4,4:NEXT
   320 STOP
   330 IFR=1THENRETURN
   340 POKE202,C:POKE205,R:PRINTT$;:R=R-1:POKE205,R:POKE202,C:PRINT" "S$;:RETURN
   350 IFR=18THENIFCN<=5THENGOSUB610
   360 IFR=18THENRETURN
   370 POKE202,C:POKE205,R:PRINTT$;:R=R+1:POKE205,R:POKE202,C:PRINT" ";S$;:RETURN
   380 N=5+INT(RND(1)*LV*10):IFN<5THEN380
   390 IFN>18THENRETURN
   400 PO=BE+(N*40)+C1:IFPEEK(PO)=32THENPOKEPO,81:CN=CN+1:GOSUB420:SOUND1,5,5:RETURN
   410 RETURN
   420 POKE205,0:POKE202,0:PRINT" ";:PRINTUSING"<reverse on>##<rev off>";CN;:RETURN
   430 PE=BE+(R*40)+C1:IFPEEK(PE)=81THENPOKEPE,32:CN=CN-1:RETURN
   440 RETURN
   450 PRINT"<clr>";
   460 PRINT"              <reverse on>PENETRATOR<rev off>   <reverse on>SCORE<rev off>       "
   470 PRINT:PRINT:PRINT
   480 PRINT
   490 FORHU=1TO13:PRINT"      ▎    ▎      ▎    ▎      ▎    ▎":NEXT
   500 PRINT"     ╱     ╲     ╱     ╲     ╱     ╲"
   510 PRINT"     <reverse on>       <rev off>     <reverse on>       <rev off>     <reverse on>       <rev off>"
   520 PRINT"     <reverse on>       <rev off>     <reverse on>       <rev off>     <reverse on>       <rev off>"
   530 PRINT"     <reverse on>       <rev off>     <reverse on>       <rev off>     <reverse on>       <rev off>"
   540 PRINT"     <reverse on>       <rev off>     <reverse on>       <rev off>     <reverse on>       <rev off>"
   550 PRINT"    ╱       ╲   ╱       ╲   ╱       ╲"
   560 RETURN
   570 SCNCLR:PRINT"DIFFICULTY LEVEL 1-HARDEST 9-EASIEST";
   580 GETWE$:IFWE$=""THEN580
   590 IFWE$<"1"ORWE$>"9"THEN580
   600 LV=VAL(WE$):RETURN
   610 REM
   620 IFC1=8THENPRINT"<home>";LEFT$(CC$,2);LEFT$(RR$,22);V$;
   630 IFC1=20THENPOKE3966,32:POKE4006,32
   640 IFC1=32THENPRINT"<home>";LEFT$(CC$,26);LEFT$(RR$,22);V$;
   650 PRINT"<home>";LEFT$(CC$,10);LEFT$(RR$,2);"PILOT RESCUED";
   660 FORHJ=1TO999:NEXT
   670 PRINT"<home>";LEFT$(CC$,10);LEFT$(RR$,2);"             ";
   680 SC=SC+100
   690 PRINT"<home>";LEFT$(CC$,33);LEFT$(RR$,0);"<reverse on>";:PRINTUSING"####";SC;:PRINT"<rev off>";
   700 VE=1:FORI=1TO3
   710 PRINT"<home>";LEFT$(CC$,VE);LEFT$(RR$,R);T$;:CN=0:E=1:VE=VE+12
   720 NEXT
   730 FORBV=5TO18:DF=BE+(BV*40)+C1:POKEDF,32:NEXT
   740 RETURN
 62000 T=     PEEK(62)*256+PEEK(61)+1:FORI=1TO10:SP$=SP$+CHR$(254):NEXT
 62005 INPUT "FROM LINE ";FROM
 62010 INPUT"TO PRINTER (Y/N)";Q$
 62011 IF Q$<>"Y"THEN62020
 62015 CLOSE4:OPEN4,4:CMD4
 62020 LINK=PEEK(44)*256+PEEK(43):E=740
 62120 T=LINK
 62130 LINK=PEEK(T+1)*256+PEEK(T)
 62135 LN=PEEK(T+3)*256+PEEK(T+2):IFLN<FROMTHEN62120
 62136 IFLN>ETHENGOSUB62550:PRINT#4:CLOSE4:END
 62137 S$=STR$(LN):L=LEN(S$)-1:D$=MID$(S$,2,L)+MID$(SP$,1,6-L)
 62140 CS=0:N=0:C=0
 62150 FORP=T+4TOLINK-2:PK=PEEK(P)
 62160 IFPK=143THENP=LINK-2:GOTO62190
 62165 IFPK=34THENC=(C=0)
 62170 IFC=0ANDPK=32THEN62190
 62180 IFPK=137THENN=N+1:CS=CS+(203ORN):PK=164
 62185 N=N+1:CS=CS+(PKORN)
 62190 NEXT:CH=CH+CS
 62192 H$=STR$(CS):Y=LEN(H$):H$=MID$(H$,2,Y):H$=MID$(SP$,1,5-(Y-1))+H$
 62194 D$=D$+"="+CHR$(254)+H$:GOSUB62500:D$="":GOTO62120
 62196 REM
 62500 GT=49152
 62505 PRINTCHR$(27);"K";
 62507 JK=LEN(D$)*8:PRINTCHR$(JK);CHR$(0);
 62510 FORI=1TOLEN(D$)
 62520 C=ASC(MID$(D$,I,1)):P=GT+(C*8)
 62530 FORJ=PTOP+7:PRINTCHR$(PEEK(J));:NEXT
 62540 NEXT:PRINTCHR$(10):RETURN
 62550 D$="TOTAL"+CHR$(254)+"="+CHR$(254)+MID$(STR$(CH),2,9):GOSUB62500:RETURN



� PENETRATOR�4,6,3\B$�"�":D$�"":S$�"η�"�D$�B$�B$�B$�"� �"�D$�B$�B$�B$�"ͯ�"�(T$�"    "�D$�B$�B$�B$�B$�"    "�D$�B$�B$�B$�B$�"    " :BE�3072:�570�2�450:G$�"  �":M$�"�"�D$�B$�"�"�<V$�" "�D$�B$�" "F�I�1�40:CC$�CC$�"":�:�I�1�25:RR$�RR$�"":�:�208,12:Q�2086PC(1)�0:C(2)�12:C(3)�24TZC1(1)�8:C1(2)�20:C1(3)�32�dC�C(1):R�3:�202,C:�205,R:�" ";S$;:C1�C1(1):E�0:LV�LV�.1�n�I�4032�4032�39:�I,160:��x�"";�(CC$,2);�(RR$,22);M$;���I�1�2�0��A��(Q):�A�62��330��A�12��350:ՋA�60��430��E��190'��380:�2,4,43�Q�198:�T�C�C(2):C1�C1(2):E�0:CN�0:R�3���"";�(CC$,14);�(RR$,22);M$;:�4004,77:Q�208���I�1�2�0:A��(Q):�A�62��330���4004,77���A�12��350:ՋA�60��430��Q�198:�E�260                  ��380:�2,4,4:�'C�C(3):C1�C1(3):E�0:CN�0:R�3:Q�208H�"";�(CC$,26);�(RR$,22);M$;g�I�1�2�0:A��(Q):�A�62��330�"�A�12��350:ՋA�60��430�,�E�100�6Q�198:�380:�2,4,4:��@��J�R�1���T�202,C:�205,R:�T$;:R�R�1:�205,R:�202,C:�" "S$;:�^�R�18��CN��5��610
h�R�18��Cr�202,C:�205,R:�T$;:R�R�1:�205,R:�202,C:�" ";S$;:�b|N�5��(�(1)�LV�10):�N�5�380n��N�18����PO�BE�(N�40)�C1:��(PO)�32��PO,81:CN�CN�1:�420:�1,5,5:�������205,0:�202,0:�" ";:��"##�";CN;:��PE�BE�(R�40)�C1:��(PE)�81��PE,32:CN�CN�1:�����"�";H��"              PENETRATOR�   SCORE�       "R��:�:�X�����HU�1�13:�"      �    �      �    �      �    �":����"     �     �     �     �     �     �"���"            �            �            �"�"            �            �            �"Q�"            �            �            �"��"            �            �            �"�&�"    �       �   �       �   �       �"�0��:�:�"DIFFICULTY LEVEL 1-HARDEST 9-EASIEST";�D�WE$:�WE$�""�580N�WE$�"1"�WE$�"9"�580#XLV��(WE$):�)b�Ol�C1�8��"";�(CC$,2);�(RR$,22);V$;lv�C1�20��3966,32:�4006,32���C1�32��"";�(CC$,26);�(RR$,22);V$;���"";�(CC$,10);�(RR$,2);"PILOT RESCUED";���HJ�1�999:����"";�(CC$,10);�(RR$,2);"             ";�SC�SC�100@��"";�(CC$,33);�(RR$,0);"";:��"####";SC;:�"�";P�VE�1:�I�1�3���"";�(CC$,VE);�(RR$,R);T$;:CN�0:E�1:VE�VE�12������BV�5�18:DF�BE�(BV�40)�C1:�DF,32:�����0�T�     �(62)�256��(61)�1:�I�1�10:SP$�SP$��(254):�5� "FROM LINE ";FROM:�"TO PRINTER (Y/N)";Q$2;� Q$��"Y"�62020A?�4:�4,4:�4`D�LINK��(44)�256��(43):E�740k��T�LINK���LINK��(T�1)�256��(T)���LN��(T�3)�256��(T�2):�LN�FROM�62120���LN�E��62550:�4:�4:����S$��(LN):L��(S$)�1:D$��(S$,2,L)��(SP$,1,6�L)��CS�0:N�0:C�0!��P�T�4�LINK�2:PK��(P)=��PK�143�P�LINK�2:�62190P��PK�34�C�(C�0)e��C�0�PK�32�62190���PK�137�N�N�1:CS�CS�(203�N):PK�164���N�N�1:CS�CS�(PK�N)���:CH�CH�CS���H$��(CS):Y��(H$):H$��(H$,2,Y):H$��(SP$,1,5�(Y�1))�H$��D$�D$�"="��(254)�H$:�62500:D$�"":�62120��*$�GT�49152:)��(27);"K";V+�JK��(D$)�8:��(JK);�(0);e.�I�1��(D$)�8�C��(�(D$,I,1)):P�GT�(C�8)�B�J�P�P�7:��(�(J));:��L�:��(10):��V�D$�"TOTAL"��(254)�"="��(254)��(�(CH),2,9):�62500:�
RPJ@. penetrator@]PT@.4,6,3@£P.@b$.".":d$."Q":s$."...".d$.b$.b$.b$.". .".d$.b$.b$.b$."..."@.P(@t$."    ".d$.b$.b$.b$.b$."    ".d$.b$.b$.b$.b$."    " :be.3072:.570@.P2@.450:g$."R  .":m$.".".d$.b$."."@.P<@v$." ".d$.b$." "@[Qf@.i.1.40:cc$.cc$."]":.:.i.1.25:rr$.rr$."Q":.:.208,12:q.208@6Qp@c(1).0:c(2).12:c(3).24@tQz@c1(1).8:c1(2).20:c1(3).32@.QD@c.c(1):r.3:.202,c:.205,r:." ";s$;:c1.c1(1):e.0:lv.lv..1@.QN@.i.4032.4032.39:.i,160:.@.QX@."S";.(cc$,2);.(rr$,22);m$;@.Q.@.i.1.2.0@.Q.@a..(q):.a.62..330@KR.@.a.12..350:..a.60..430@WR.@.e..190@'R.@.380:.2,4,4@3R.@q.198:.@tR.@c.c(2):c1.c1(2):e.0:cn.0:r.3@.R.@."S";.(cc$,14);.(rr$,22);m$;:.4004,77:q.208@.R.@.i.1.2.0:a..(q):.a.62..330@.R.@.4004,77@.R.@.a.12..350:..a.60..430@.R.@q.198:.e.260                  @@S.@.380:.2,4,4:.@'SDAc.c(3):c1.c1(3):e.0:cn.0:r.3:q.208@hSNA."S";.(cc$,26);.(rr$,22);m$;@GSXA.i.1.2.0:a..(q):.a.62..330@.S"A.a.12..350:..a.60..430@.S,A.e.100@.S6Aq.198:.380:.2,4,4:.@.S@A.@.SjA.r.1..@.StA.202,c:.205,r:.t$;:r.r.1:.205,r:.202,c:." "s$;:.@AT.A.r.18..cn..5..610@MTHA.r.18..@cTRA.202,c:.205,r:.t$;:r.r.1:.205,r:.202,c:." ";s$;:.@BT.An.5..(.(1).lv.10):.n.5.380@NT.A.n.18..@.T.Apo.be.(n.40).c1:..(po).32..po,81:cn.cn.1:.420:.1,5,5:.@.T.A.@.T.A.205,0:.202,0:." ";:.."R##.";cn;:.@EU.Ape.be.(r.40).c1:..(pe).81..pe,32:cn.cn.1:.@KU.A.@UU.A.".";@hU.A."              Rpenetrator.   Rscore.       "@rU.A.:.:.@xU.A.@.U.A.hu.1.13:."      .    .      .    .      .    .":.@.U.A."     .     .     .     .     .     ."@.U.A."     R       .     R       .     R       ."@.VHB."     R       .     R       .     R       ."@qVRB."     R       .     R       .     R       ."@.V£B."     R       .     R       .     R       ."@.V&B."    .       .   .       .   .       ."@.V0B.@.V:B.:."difficulty level 1-hardest 9-easiest";@.VdB.we$:.we$."".580@SWnB.we$."1".we$."9".580@#WxBlv..(we$):.@)WBB.@oWLB.c1.8.."S";.(cc$,2);.(rr$,22);v$;@LWVB.c1.20..3966,32:.4006,32@.W.B.c1.32.."S";.(cc$,26);.(rr$,22);v$;@.W.B."S";.(cc$,10);.(rr$,2);"pilot rescued";@.W.B.hj.1.999:.@.W.B."S";.(cc$,10);.(rr$,2);"             ";@LX.Bsc.sc.100@@X.B."S";.(cc$,33);.(rr$,0);"R";:.."####";sc;:.".";@pX.Bve.1:.i.1.3@.X.B."S";.(cc$,ve);.(rr$,r);t$;:cn.0:e.1:ve.ve.12@.X.B.@.X.B.bv.5.18:df.be.(bv.40).c1:.df,32:.@.X.B.@.X0.t.     .(62).256..(61).1:.i.1.10:sp$.sp$..(254):.@CY5.. "from line ";from@.Y:.."to printer (y/n)";q$@2Y;.. q$.."y".62020@aY?..4:.4,4:.4@.Yd.link..(44).256..(43):e.740@KY..t.link@.Y..link..(t.1).256..(t)@.Y..ln..(t.3).256..(t.2):.ln.from.62120@.Y...ln.e..62550:.4:.4:.@.Y..s$..(ln):l..(s$).1:d$..(s$,2,l)..(sp$,1,6.l)@GZ..cs.0:n.0:c.0@!Z...p.t.4.link.2:pk..(p)@=Z...pk.143.p.link.2:.62190@pZ...pk.34.c.(c.0)@EZ...c.0.pk.32.62190@.Z...pk.137.n.n.1:cs.cs.(203.n):pk.164@.Z..n.n.1:cs.cs.(pk.n)@.Z...:ch.ch.cs@.Z..h$..(cs):y..(h$):h$..(h$,2,y):h$..(sp$,1,5.(y.1)).h$@W[..d$.d$."="..(254).h$:.62500:d$."":.62120@][...@*[$.gt.49152@:[)...(27);"k";@v[+.jk..(d$).8:..(jk);.(0);@E[...i.1..(d$)@.[8.c..(.(d$,i,1)):p.gt.(c.8)@.[b..j.p.p.7:..(.(j));:.@.[l..:..(10):.@.[v.d$."total"..(254)."="..(254)..(.(ch),2,9):.62500:.@@@
00000000  12 10 0a 00 8f 20 50 45  4e 45 54 52 41 54 4f 52  |..... PENETRATOR|
00000010  00 1d 10 14 00 e7 34 2c  36 2c 33 00 5c 10 1e 00  |......4,6,3.\...|
00000020  42 24 b2 22 9d 22 3a 44  24 b2 22 11 22 3a 53 24  |B$.".":D$.".":S$|
00000030  b2 22 ce b7 cd 22 aa 44  24 aa 42 24 aa 42 24 aa  |."...".D$.B$.B$.|
00000040  42 24 aa 22 b4 20 aa 22  aa 44 24 aa 42 24 aa 42  |B$.". .".D$.B$.B|
00000050  24 aa 42 24 aa 22 cd af  ce 22 00 a4 10 28 00 54  |$.B$."..."...(.T|
00000060  24 b2 22 20 20 20 20 22  aa 44 24 aa 42 24 aa 42  |$."    ".D$.B$.B|
00000070  24 aa 42 24 aa 42 24 aa  22 20 20 20 20 22 aa 44  |$.B$.B$."    ".D|
00000080  24 aa 42 24 aa 42 24 aa  42 24 aa 42 24 aa 22 20  |$.B$.B$.B$.B$." |
00000090  20 20 20 22 20 3a 42 45  b2 33 30 37 32 3a 8d 35  |   " :BE.3072:.5|
000000a0  37 30 00 c8 10 32 00 8d  34 35 30 3a 47 24 b2 22  |70...2..450:G$."|
000000b0  12 20 20 92 22 3a 4d 24  b2 22 d7 22 aa 44 24 aa  |.  .":M$.".".D$.|
000000c0  42 24 aa 22 db 22 00 dd  10 3c 00 56 24 b2 22 20  |B$."."...<.V$." |
000000d0  22 aa 44 24 aa 42 24 aa  22 20 22 00 1b 11 46 00  |".D$.B$." "...F.|
000000e0  81 49 b2 31 a4 34 30 3a  43 43 24 b2 43 43 24 aa  |.I.1.40:CC$.CC$.|
000000f0  22 1d 22 3a 82 3a 81 49  b2 31 a4 32 35 3a 52 52  |".":.:.I.1.25:RR|
00000100  24 b2 52 52 24 aa 22 11  22 3a 82 3a 97 32 30 38  |$.RR$.".":.:.208|
00000110  2c 31 32 3a 51 b2 32 30  38 00 36 11 50 00 43 28  |,12:Q.208.6.P.C(|
00000120  31 29 b2 30 3a 43 28 32  29 b2 31 32 3a 43 28 33  |1).0:C(2).12:C(3|
00000130  29 b2 32 34 00 54 11 5a  00 43 31 28 31 29 b2 38  |).24.T.Z.C1(1).8|
00000140  3a 43 31 28 32 29 b2 32  30 3a 43 31 28 33 29 b2  |:C1(2).20:C1(3).|
00000150  33 32 00 90 11 64 00 43  b2 43 28 31 29 3a 52 b2  |32...d.C.C(1):R.|
00000160  33 3a 97 32 30 32 2c 43  3a 97 32 30 35 2c 52 3a  |3:.202,C:.205,R:|
00000170  99 22 20 22 3b 53 24 3b  3a 43 31 b2 43 31 28 31  |." ";S$;:C1.C1(1|
00000180  29 3a 45 b2 30 3a 4c 56  b2 4c 56 ab 2e 31 00 ad  |):E.0:LV.LV..1..|
00000190  11 6e 00 81 49 b2 34 30  33 32 a4 34 30 33 32 aa  |.n..I.4032.4032.|
000001a0  33 39 3a 97 49 2c 31 36  30 3a 82 00 cd 11 78 00  |39:.I,160:....x.|
000001b0  99 22 13 22 3b c8 28 43  43 24 2c 32 29 3b c8 28  |.".";.(CC$,2);.(|
000001c0  52 52 24 2c 32 32 29 3b  4d 24 3b 00 da 11 82 00  |RR$,22);M$;.....|
000001d0  81 49 b2 31 a4 32 a9 30  00 f0 11 8c 00 41 b2 c2  |.I.1.2.0.....A..|
000001e0  28 51 29 3a 8b 41 b2 36  32 a7 8d 33 33 30 00 0b  |(Q):.A.62..330..|
000001f0  12 96 00 8b 41 b2 31 32  a7 8d 33 35 30 3a d5 8b  |....A.12..350:..|
00000200  41 b2 36 30 a7 8d 34 33  30 00 17 12 a0 00 8b 45  |A.60..430......E|
00000210  a7 89 31 39 30 00 27 12  aa 00 8d 33 38 30 3a da  |..190.'....380:.|
00000220  32 2c 34 2c 34 00 33 12  b4 00 51 b2 31 39 38 3a  |2,4,4.3...Q.198:|
00000230  82 00 54 12 be 00 43 b2  43 28 32 29 3a 43 31 b2  |..T...C.C(2):C1.|
00000240  43 31 28 32 29 3a 45 b2  30 3a 43 4e b2 30 3a 52  |C1(2):E.0:CN.0:R|
00000250  b2 33 00 84 12 c8 00 99  22 13 22 3b c8 28 43 43  |.3......".";.(CC|
00000260  24 2c 31 34 29 3b c8 28  52 52 24 2c 32 32 29 3b  |$,14);.(RR$,22);|
00000270  4d 24 3b 3a 97 34 30 30  34 2c 37 37 3a 51 b2 32  |M$;:.4004,77:Q.2|
00000280  30 38 00 a3 12 d2 00 81  49 b2 31 a4 32 a9 30 3a  |08......I.1.2.0:|
00000290  41 b2 c2 28 51 29 3a 8b  41 b2 36 32 a7 8d 33 33  |A..(Q):.A.62..33|
000002a0  30 00 b0 12 dc 00 97 34  30 30 34 2c 37 37 00 cb  |0......4004,77..|
000002b0  12 e6 00 8b 41 b2 31 32  a7 8d 33 35 30 3a d5 8b  |....A.12..350:..|
000002c0  41 b2 36 30 a7 8d 34 33  30 00 ee 12 f0 00 51 b2  |A.60..430.....Q.|
000002d0  31 39 38 3a 8b 45 a7 32  36 30 20 20 20 20 20 20  |198:.E.260      |
000002e0  20 20 20 20 20 20 20 20  20 20 20 20 00 00 13 fa  |            ....|
000002f0  00 8d 33 38 30 3a da 32  2c 34 2c 34 3a 82 00 27  |..380:.2,4,4:..'|
00000300  13 04 01 43 b2 43 28 33  29 3a 43 31 b2 43 31 28  |...C.C(3):C1.C1(|
00000310  33 29 3a 45 b2 30 3a 43  4e b2 30 3a 52 b2 33 3a  |3):E.0:CN.0:R.3:|
00000320  51 b2 32 30 38 00 48 13  0e 01 99 22 13 22 3b c8  |Q.208.H....".";.|
00000330  28 43 43 24 2c 32 36 29  3b c8 28 52 52 24 2c 32  |(CC$,26);.(RR$,2|
00000340  32 29 3b 4d 24 3b 00 67  13 18 01 81 49 b2 31 a4  |2);M$;.g....I.1.|
00000350  32 a9 30 3a 41 b2 c2 28  51 29 3a 8b 41 b2 36 32  |2.0:A..(Q):.A.62|
00000360  a7 8d 33 33 30 00 82 13  22 01 8b 41 b2 31 32 a7  |..330..."..A.12.|
00000370  8d 33 35 30 3a d5 8b 41  b2 36 30 a7 8d 34 33 30  |.350:..A.60..430|
00000380  00 8d 13 2c 01 8b 45 a7  31 30 30 00 a5 13 36 01  |...,..E.100...6.|
00000390  51 b2 31 39 38 3a 8d 33  38 30 3a da 32 2c 34 2c  |Q.198:.380:.2,4,|
000003a0  34 3a 82 00 ab 13 40 01  90 00 b6 13 4a 01 8b 52  |4:....@.....J..R|
000003b0  b2 31 a7 8e 00 eb 13 54  01 97 32 30 32 2c 43 3a  |.1.....T..202,C:|
000003c0  97 32 30 35 2c 52 3a 99  54 24 3b 3a 52 b2 52 ab  |.205,R:.T$;:R.R.|
000003d0  31 3a 97 32 30 35 2c 52  3a 97 32 30 32 2c 43 3a  |1:.205,R:.202,C:|
000003e0  99 22 20 22 53 24 3b 3a  8e 00 01 14 5e 01 8b 52  |." "S$;:....^..R|
000003f0  b2 31 38 a7 8b 43 4e b3  b2 35 a7 8d 36 31 30 00  |.18..CN..5..610.|
00000400  0d 14 68 01 8b 52 b2 31  38 a7 8e 00 43 14 72 01  |..h..R.18...C.r.|
00000410  97 32 30 32 2c 43 3a 97  32 30 35 2c 52 3a 99 54  |.202,C:.205,R:.T|
00000420  24 3b 3a 52 b2 52 aa 31  3a 97 32 30 35 2c 52 3a  |$;:R.R.1:.205,R:|
00000430  97 32 30 32 2c 43 3a 99  22 20 22 3b 53 24 3b 3a  |.202,C:." ";S$;:|
00000440  8e 00 62 14 7c 01 4e b2  35 aa b5 28 bb 28 31 29  |..b.|.N.5..(.(1)|
00000450  ac 4c 56 ac 31 30 29 3a  8b 4e b3 35 a7 33 38 30  |.LV.10):.N.5.380|
00000460  00 6e 14 86 01 8b 4e b1  31 38 a7 8e 00 a9 14 90  |.n....N.18......|
00000470  01 50 4f b2 42 45 aa 28  4e ac 34 30 29 aa 43 31  |.PO.BE.(N.40).C1|
00000480  3a 8b c2 28 50 4f 29 b2  33 32 a7 97 50 4f 2c 38  |:..(PO).32..PO,8|
00000490  31 3a 43 4e b2 43 4e aa  31 3a 8d 34 32 30 3a da  |1:CN.CN.1:.420:.|
000004a0  31 2c 35 2c 35 3a 8e 00  af 14 9a 01 8e 00 d6 14  |1,5,5:..........|
000004b0  a4 01 97 32 30 35 2c 30  3a 97 32 30 32 2c 30 3a  |...205,0:.202,0:|
000004c0  99 22 20 22 3b 3a 99 fb  22 12 23 23 92 22 3b 43  |." ";:..".##.";C|
000004d0  4e 3b 3a 8e 00 05 15 ae  01 50 45 b2 42 45 aa 28  |N;:......PE.BE.(|
000004e0  52 ac 34 30 29 aa 43 31  3a 8b c2 28 50 45 29 b2  |R.40).C1:..(PE).|
000004f0  38 31 a7 97 50 45 2c 33  32 3a 43 4e b2 43 4e ab  |81..PE,32:CN.CN.|
00000500  31 3a 8e 00 0b 15 b8 01  8e 00 15 15 c2 01 99 22  |1:............."|
00000510  93 22 3b 00 48 15 cc 01  99 22 20 20 20 20 20 20  |.";.H...."      |
00000520  20 20 20 20 20 20 20 20  12 50 45 4e 45 54 52 41  |        .PENETRA|
00000530  54 4f 52 92 20 20 20 12  53 43 4f 52 45 92 20 20  |TOR.   .SCORE.  |
00000540  20 20 20 20 20 22 00 52  15 d6 01 99 3a 99 3a 99  |     ".R....:.:.|
00000550  00 58 15 e0 01 99 00 8f  15 ea 01 81 48 55 b2 31  |.X..........HU.1|
00000560  a4 31 33 3a 99 22 20 20  20 20 20 20 b4 20 20 20  |.13:."      .   |
00000570  20 b4 20 20 20 20 20 20  b4 20 20 20 20 b4 20 20  | .      .    .  |
00000580  20 20 20 20 b4 20 20 20  20 b4 22 3a 82 00 bb 15  |    .    .":....|
00000590  f4 01 99 22 20 20 20 20  20 ce 20 20 20 20 20 cd  |..."     .     .|
000005a0  20 20 20 20 20 ce 20 20  20 20 20 cd 20 20 20 20  |     .     .    |
000005b0  20 ce 20 20 20 20 20 cd  22 00 ed 15 fe 01 99 22  | .     ."......"|
000005c0  20 20 20 20 20 12 20 20  20 20 20 20 20 92 20 20  |     .       .  |
000005d0  20 20 20 12 20 20 20 20  20 20 20 92 20 20 20 20  |   .       .    |
000005e0  20 12 20 20 20 20 20 20  20 92 22 00 1f 16 08 02  | .       .".....|
000005f0  99 22 20 20 20 20 20 12  20 20 20 20 20 20 20 92  |."     .       .|
00000600  20 20 20 20 20 12 20 20  20 20 20 20 20 92 20 20  |     .       .  |
00000610  20 20 20 12 20 20 20 20  20 20 20 92 22 00 51 16  |   .       .".Q.|
00000620  12 02 99 22 20 20 20 20  20 12 20 20 20 20 20 20  |..."     .      |
00000630  20 92 20 20 20 20 20 12  20 20 20 20 20 20 20 92  | .     .       .|
00000640  20 20 20 20 20 12 20 20  20 20 20 20 20 92 22 00  |     .       .".|
00000650  83 16 1c 02 99 22 20 20  20 20 20 12 20 20 20 20  |....."     .    |
00000660  20 20 20 92 20 20 20 20  20 12 20 20 20 20 20 20  |   .     .      |
00000670  20 92 20 20 20 20 20 12  20 20 20 20 20 20 20 92  | .     .       .|
00000680  22 00 b0 16 26 02 99 22  20 20 20 20 ce 20 20 20  |"...&.."    .   |
00000690  20 20 20 20 cd 20 20 20  ce 20 20 20 20 20 20 20  |    .   .       |
000006a0  cd 20 20 20 ce 20 20 20  20 20 20 20 cd 22 00 b6  |.   .       ."..|
000006b0  16 30 02 8e 00 e5 16 3a  02 e8 3a 99 22 44 49 46  |.0.....:..:."DIF|
000006c0  46 49 43 55 4c 54 59 20  4c 45 56 45 4c 20 31 2d  |FICULTY LEVEL 1-|
000006d0  48 41 52 44 45 53 54 20  39 2d 45 41 53 49 45 53  |HARDEST 9-EASIES|
000006e0  54 22 3b 00 fa 16 44 02  a1 57 45 24 3a 8b 57 45  |T";...D..WE$:.WE|
000006f0  24 b2 22 22 a7 35 38 30  00 13 17 4e 02 8b 57 45  |$."".580...N..WE|
00000700  24 b3 22 31 22 b0 57 45  24 b1 22 39 22 a7 35 38  |$."1".WE$."9".58|
00000710  30 00 23 17 58 02 4c 56  b2 c5 28 57 45 24 29 3a  |0.#.X.LV..(WE$):|
00000720  8e 00 29 17 62 02 8f 00  4f 17 6c 02 8b 43 31 b2  |..).b...O.l..C1.|
00000730  38 a7 99 22 13 22 3b c8  28 43 43 24 2c 32 29 3b  |8..".";.(CC$,2);|
00000740  c8 28 52 52 24 2c 32 32  29 3b 56 24 3b 00 6c 17  |.(RR$,22);V$;.l.|
00000750  76 02 8b 43 31 b2 32 30  a7 97 33 39 36 36 2c 33  |v..C1.20..3966,3|
00000760  32 3a 97 34 30 30 36 2c  33 32 00 94 17 80 02 8b  |2:.4006,32......|
00000770  43 31 b2 33 32 a7 99 22  13 22 3b c8 28 43 43 24  |C1.32..".";.(CC$|
00000780  2c 32 36 29 3b c8 28 52  52 24 2c 32 32 29 3b 56  |,26);.(RR$,22);V|
00000790  24 3b 00 c1 17 8a 02 99  22 13 22 3b c8 28 43 43  |$;......".";.(CC|
000007a0  24 2c 31 30 29 3b c8 28  52 52 24 2c 32 29 3b 22  |$,10);.(RR$,2);"|
000007b0  50 49 4c 4f 54 20 52 45  53 43 55 45 44 22 3b 00  |PILOT RESCUED";.|
000007c0  d1 17 94 02 81 48 4a b2  31 a4 39 39 39 3a 82 00  |.....HJ.1.999:..|
000007d0  fe 17 9e 02 99 22 13 22  3b c8 28 43 43 24 2c 31  |.....".";.(CC$,1|
000007e0  30 29 3b c8 28 52 52 24  2c 32 29 3b 22 20 20 20  |0);.(RR$,2);"   |
000007f0  20 20 20 20 20 20 20 20  20 20 22 3b 00 0c 18 a8  |          ";....|
00000800  02 53 43 b2 53 43 aa 31  30 30 00 40 18 b2 02 99  |.SC.SC.100.@....|
00000810  22 13 22 3b c8 28 43 43  24 2c 33 33 29 3b c8 28  |".";.(CC$,33);.(|
00000820  52 52 24 2c 30 29 3b 22  12 22 3b 3a 99 fb 22 23  |RR$,0);".";:.."#|
00000830  23 23 23 22 3b 53 43 3b  3a 99 22 92 22 3b 00 50  |###";SC;:.".";.P|
00000840  18 bc 02 56 45 b2 31 3a  81 49 b2 31 a4 33 00 82  |...VE.1:.I.1.3..|
00000850  18 c6 02 99 22 13 22 3b  c8 28 43 43 24 2c 56 45  |....".";.(CC$,VE|
00000860  29 3b c8 28 52 52 24 2c  52 29 3b 54 24 3b 3a 43  |);.(RR$,R);T$;:C|
00000870  4e b2 30 3a 45 b2 31 3a  56 45 b2 56 45 aa 31 32  |N.0:E.1:VE.VE.12|
00000880  00 88 18 d0 02 82 00 af  18 da 02 81 42 56 b2 35  |............BV.5|
00000890  a4 31 38 3a 44 46 b2 42  45 aa 28 42 56 ac 34 30  |.18:DF.BE.(BV.40|
000008a0  29 aa 43 31 3a 97 44 46  2c 33 32 3a 82 00 b5 18  |).C1:.DF,32:....|
000008b0  e4 02 8e 00 eb 18 30 f2  54 b2 20 20 20 20 20 c2  |......0.T.     .|
000008c0  28 36 32 29 ac 32 35 36  aa c2 28 36 31 29 aa 31  |(62).256..(61).1|
000008d0  3a 81 49 b2 31 a4 31 30  3a 53 50 24 b2 53 50 24  |:.I.1.10:SP$.SP$|
000008e0  aa c7 28 32 35 34 29 3a  82 00 03 19 35 f2 85 20  |..(254):....5.. |
000008f0  22 46 52 4f 4d 20 4c 49  4e 45 20 22 3b 46 52 4f  |"FROM LINE ";FRO|
00000900  4d 00 1e 19 3a f2 85 22  54 4f 20 50 52 49 4e 54  |M...:.."TO PRINT|
00000910  45 52 20 28 59 2f 4e 29  22 3b 51 24 00 32 19 3b  |ER (Y/N)";Q$.2.;|
00000920  f2 8b 20 51 24 b3 b1 22  59 22 a7 36 32 30 32 30  |.. Q$.."Y".62020|
00000930  00 41 19 3f f2 a0 34 3a  9f 34 2c 34 3a 9d 34 00  |.A.?..4:.4,4:.4.|
00000940  60 19 44 f2 4c 49 4e 4b  b2 c2 28 34 34 29 ac 32  |`.D.LINK..(44).2|
00000950  35 36 aa c2 28 34 33 29  3a 45 b2 37 34 30 00 6b  |56..(43):E.740.k|
00000960  19 a8 f2 54 b2 4c 49 4e  4b 00 84 19 b2 f2 4c 49  |...T.LINK.....LI|
00000970  4e 4b b2 c2 28 54 aa 31  29 ac 32 35 36 aa c2 28  |NK..(T.1).256..(|
00000980  54 29 00 ac 19 b7 f2 4c  4e b2 c2 28 54 aa 33 29  |T).....LN..(T.3)|
00000990  ac 32 35 36 aa c2 28 54  aa 32 29 3a 8b 4c 4e b3  |.256..(T.2):.LN.|
000009a0  46 52 4f 4d a7 36 32 31  32 30 00 c5 19 b8 f2 8b  |FROM.62120......|
000009b0  4c 4e b1 45 a7 8d 36 32  35 35 30 3a 98 34 3a a0  |LN.E..62550:.4:.|
000009c0  34 3a 80 00 f6 19 b9 f2  53 24 b2 c4 28 4c 4e 29  |4:......S$..(LN)|
000009d0  3a 4c b2 c3 28 53 24 29  ab 31 3a 44 24 b2 ca 28  |:L..(S$).1:D$..(|
000009e0  53 24 2c 32 2c 4c 29 aa  ca 28 53 50 24 2c 31 2c  |S$,2,L)..(SP$,1,|
000009f0  36 ab 4c 29 00 07 1a bc  f2 43 53 b2 30 3a 4e b2  |6.L).....CS.0:N.|
00000a00  30 3a 43 b2 30 00 21 1a  c6 f2 81 50 b2 54 aa 34  |0:C.0.!....P.T.4|
00000a10  a4 4c 49 4e 4b ab 32 3a  50 4b b2 c2 28 50 29 00  |.LINK.2:PK..(P).|
00000a20  3d 1a d0 f2 8b 50 4b b2  31 34 33 a7 50 b2 4c 49  |=....PK.143.P.LI|
00000a30  4e 4b ab 32 3a 89 36 32  31 39 30 00 50 1a d5 f2  |NK.2:.62190.P...|
00000a40  8b 50 4b b2 33 34 a7 43  b2 28 43 b2 30 29 00 65  |.PK.34.C.(C.0).e|
00000a50  1a da f2 8b 43 b2 30 af  50 4b b2 33 32 a7 36 32  |....C.0.PK.32.62|
00000a60  31 39 30 00 8c 1a e4 f2  8b 50 4b b2 31 33 37 a7  |190......PK.137.|
00000a70  4e b2 4e aa 31 3a 43 53  b2 43 53 aa 28 32 30 33  |N.N.1:CS.CS.(203|
00000a80  b0 4e 29 3a 50 4b b2 31  36 34 00 a3 1a e9 f2 4e  |.N):PK.164.....N|
00000a90  b2 4e aa 31 3a 43 53 b2  43 53 aa 28 50 4b b0 4e  |.N.1:CS.CS.(PK.N|
00000aa0  29 00 b2 1a ee f2 82 3a  43 48 b2 43 48 aa 43 53  |)......:CH.CH.CS|
00000ab0  00 eb 1a f0 f2 48 24 b2  c4 28 43 53 29 3a 59 b2  |.....H$..(CS):Y.|
00000ac0  c3 28 48 24 29 3a 48 24  b2 ca 28 48 24 2c 32 2c  |.(H$):H$..(H$,2,|
00000ad0  59 29 3a 48 24 b2 ca 28  53 50 24 2c 31 2c 35 ab  |Y):H$..(SP$,1,5.|
00000ae0  28 59 ab 31 29 29 aa 48  24 00 17 1b f2 f2 44 24  |(Y.1)).H$.....D$|
00000af0  b2 44 24 aa 22 3d 22 aa  c7 28 32 35 34 29 aa 48  |.D$."="..(254).H|
00000b00  24 3a 8d 36 32 35 30 30  3a 44 24 b2 22 22 3a 89  |$:.62500:D$."":.|
00000b10  36 32 31 32 30 00 1d 1b  f4 f2 8f 00 2a 1b 24 f4  |62120.......*.$.|
00000b20  47 54 b2 34 39 31 35 32  00 3a 1b 29 f4 99 c7 28  |GT.49152.:.)...(|
00000b30  32 37 29 3b 22 4b 22 3b  00 56 1b 2b f4 4a 4b b2  |27);"K";.V.+.JK.|
00000b40  c3 28 44 24 29 ac 38 3a  99 c7 28 4a 4b 29 3b c7  |.(D$).8:..(JK);.|
00000b50  28 30 29 3b 00 65 1b 2e  f4 81 49 b2 31 a4 c3 28  |(0);.e....I.1..(|
00000b60  44 24 29 00 83 1b 38 f4  43 b2 c6 28 ca 28 44 24  |D$)...8.C..(.(D$|
00000b70  2c 49 2c 31 29 29 3a 50  b2 47 54 aa 28 43 ac 38  |,I,1)):P.GT.(C.8|
00000b80  29 00 9c 1b 42 f4 81 4a  b2 50 a4 50 aa 37 3a 99  |)...B..J.P.P.7:.|
00000b90  c7 28 c2 28 4a 29 29 3b  3a 82 00 ab 1b 4c f4 82  |.(.(J));:....L..|
00000ba0  3a 99 c7 28 31 30 29 3a  8e 00 e2 1b 56 f4 44 24  |:..(10):....V.D$|
00000bb0  b2 22 54 4f 54 41 4c 22  aa c7 28 32 35 34 29 aa  |."TOTAL"..(254).|
00000bc0  22 3d 22 aa c7 28 32 35  34 29 aa ca 28 c4 28 43  |"="..(254)..(.(C|
00000bd0  48 29 2c 32 2c 39 29 3a  8d 36 32 35 30 30 3a 8e  |H),2,9):.62500:.|
00000be0  00 00 00                                          |...|
00000be3

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 18 Aug 2025, 13:06 UTC
Website designed by .