Multiple names: MARTIAN.HUNT    , MARTIAN.HUNT

00000000: 01 04 49 04 00 00 8F 2A  2A 2A 20 57 4F 52 4B 53  |..I....*** WORKS|
00000010: 20 4F 4E 20 50 45 54 20  32 30 30 31 2D 38 2C 20  | ON PET 2001-8, |
00000020: 4E 45 57 20 50 45 54 2F  43 42 4D 2C 20 42 41 53  |NEW PET/CBM, BAS|
00000030: 49 43 20 34 2E 30 2C 20  26 20 43 42 4D 20 38 30  |IC 4.0, & CBM 80|
00000040: 31 36 20 26 20 38 30 33  32 00 61 04 01 00 8F 2A  |16 & 8032.a....*|
00000050: 2A 2A 4D 41 52 54 49 41  4E 20 48 55 4E 54 2A 2A  |**MARTIAN HUNT**|
00000060: 2A 00 7A 04 02 00 8F 2A  2A 2A 4F 52 49 47 49 4E  |*.z....***ORIGIN|
00000070: 41 4C 20 50 52 4F 47 52  41 4D 00 8B 04 03 00 8F  |AL PROGRAM......|
00000080: 2A 2A 2A 28 43 29 20 31  39 38 30 00 9F 04 04 00  |***(C) 1980.....|
00000090: 8F 2A 2A 2A 4C 45 4E 20  4C 49 4E 44 53 41 59 00  |.***LEN LINDSAY.|
000000A0: BD 04 05 00 8F 2A 2A 2A  4C 41 53 54 20 52 45 56  |.....***LAST REV|
000000B0: 49 53 49 4F 4E 20 34 2F  32 34 2F 38 30 00 E8 04  |ISION 4/24/80...|
000000C0: 09 00 8F 2A 2A 2A 55 53  45 53 20 4D 41 49 4E 20  |...***USES MAIN |
000000D0: 53 55 42 52 4F 55 54 49  4E 45 53 20 31 30 31 30  |SUBROUTINES 1010|
000000E0: 30 2C 20 31 30 35 30 30  00 07 05 0A 00 97 35 39  |0, 10500......59|
000000F0: 34 36 38 2C 31 32 20 3A  20 8F 20 47 52 41 50 48  |468,12 : . GRAPH|
00000100: 49 43 20 4D 4F 44 45 00  22 05 0F 00 58 51 B2 BB  |IC MODE."...XQ..|
00000110: 28 AB 54 49 29 20 3A 20  8F 20 53 45 45 44 20 52  |(.TI) : . SEED R|
00000120: 4E 44 00 53 05 14 00 99  22 93 22 3B 3A 5A 50 B2  |ND.S....".";:ZP.|
00000130: C2 28 35 30 30 30 33 29  3A 8B 5A 50 A7 5A 50 B2  |.(50003):.ZP.ZP.|
00000140: 30 3A 8B C2 28 33 34 38  31 36 29 B2 33 32 A7 5A  |0:..(34816).32.Z|
00000150: 50 B2 31 00 97 05 15 00  8F 20 5A 50 20 4D 45 41  |P.1...... ZP MEA|
00000160: 4E 53 3A 20 20 31 3D 43  42 4D 20 38 30 33 32 20  |NS:  1=CBM 8032 |
00000170: 4F 52 20 43 42 4D 20 38  30 31 36 2C 20 30 3D 41  |OR CBM 8016, 0=A|
00000180: 4C 4C 20 4F 54 48 45 52  20 4D 4F 44 45 4C 53 20  |LL OTHER MODELS |
00000190: 50 45 54 2F 43 42 4D 00  B8 05 28 00 96 20 A5 52  |PET/CBM...(.. .R|
000001A0: 28 4E 29 B2 B5 28 BB 28  31 29 AC 4E AA 31 29 20  |(N)..(.(1).N.1) |
000001B0: 3A 20 8F 20 52 4E 44 23  00 BE 05 32 00 8F 00 EC  |: . RND#...2....|
000001C0: 05 33 00 5A 5A 24 B2 22  14 14 14 14 14 14 14 14  |.3.ZZ$."........|
000001D0: 14 14 14 14 14 14 14 14  14 14 14 14 14 22 20 3A  |............." :|
000001E0: 20 8F 20 32 31 20 44 45  4C 45 54 45 00 22 06 36  | . 21 DELETE.".6|
000001F0: 00 5A 52 24 B2 22 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |.ZR$."..........|
00000200: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000210: 1D 1D 1D 1D 22 20 3A 20  8F 20 33 30 20 52 49 47  |...." : . 30 RIG|
00000220: 48 54 00 4F 06 38 00 5A  44 24 B2 22 11 11 11 11  |HT.O.8.ZD$."....|
00000230: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000240: 11 11 22 20 3A 20 8F 20  32 32 20 44 4F 57 4E 00  |.." : . 22 DOWN.|
00000250: 7C 06 3A 00 5A 53 24 B2  22 20 20 20 20 20 20 20  ||.:.ZS$."       |
00000260: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 22 20  |              " |
00000270: 3A 20 8F 20 32 31 20 53  50 41 43 45 00 94 06 3C  |: . 21 SPACE...<|
00000280: 00 52 4D 24 B2 22 13 22  AA 5A 44 24 AA 5A 53 24  |.RM$.".".ZD$.ZS$|
00000290: AA 5A 5A 24 00 A2 06 59  00 8B 4E 47 B1 30 A7 31  |.ZZ$...Y..NG.0.1|
000002A0: 30 30 00 CD 06 5A 00 99  22 44 4F 20 59 4F 55 20  |00...Z.."DO YOU |
000002B0: 4E 45 45 44 20 49 4E 53  54 52 55 43 54 49 4F 4E  |NEED INSTRUCTION|
000002C0: 53 3F 22 20 3A 20 8D 20  31 30 31 33 30 00 F3 06  |S?" : . 10130...|
000002D0: 5F 00 8B 58 41 24 B2 22  59 22 A7 20 8D 20 35 30  |_..XA$."Y". . 50|
000002E0: 30 30 20 3A 20 8F 20 49  4E 53 54 52 55 43 54 49  |00 : . INSTRUCTI|
000002F0: 4F 4E 53 00 23 07 64 00  58 30 B2 A5 52 28 31 30  |ONS.#.d.X0..R(10|
00000300: 29 20 3A 20 59 30 B2 A5  52 28 31 30 29 20 3A 20  |) : Y0..R(10) : |
00000310: 8F 20 50 49 43 4B 20 48  49 44 44 45 4E 20 50 4F  |. PICK HIDDEN PO|
00000320: 49 4E 54 00 44 07 69 00  4E 44 B2 30 20 3A 4E 43  |INT.D.i.ND.0 :NC|
00000330: B2 30 3A 54 43 B2 30 3A  8F 20 49 4E 49 54 49 41  |.0:TC.0:. INITIA|
00000340: 4C 49 5A 45 00 5E 07 6E  00 8D 20 36 30 30 30 20  |LIZE.^.n.. 6000 |
00000350: 3A 20 8F 20 44 52 41 57  20 42 4F 41 52 44 00 91  |: . DRAW BOARD..|
00000360: 07 78 00 58 B2 35 20 3A  20 59 B2 35 20 3A 20 8F  |.x.X.5 : Y.5 : .|
00000370: 20 49 4E 49 54 20 53 54  41 52 54 49 4E 47 20 4C  | INIT STARTING L|
00000380: 4F 43 41 54 49 4F 4E 20  4F 46 20 4D 41 52 4B 45  |OCATION OF MARKE|
00000390: 52 00 D5 07 C8 00 4D 4C  B2 33 32 37 36 38 AA 28  |R.....ML.32768.(|
000003A0: 38 30 AA 28 38 30 AC 5A  50 29 29 AC 28 59 AB 31  |80.(80.ZP)).(Y.1|
000003B0: 29 AA 32 AC 28 58 AB 31  29 20 3A 20 8F 20 43 55  |).2.(X.1) : . CU|
000003C0: 52 52 45 4E 54 20 4D 41  52 4B 45 52 20 4C 4F 43  |RRENT MARKER LOC|
000003D0: 41 54 49 4F 4E 00 F7 07  D2 00 4D 43 B2 C2 28 4D  |ATION.....MC..(M|
000003E0: 4C 29 20 3A 20 8F 20 4D  41 52 4B 45 52 20 43 48  |L) : . MARKER CH|
000003F0: 41 52 41 43 54 45 52 00  22 08 DC 00 97 20 4D 4C  |ARACTER.".... ML|
00000400: 2C 20 38 31 20 3A 20 8F  20 48 49 47 48 4C 49 47  |, 81 : . HIGHLIG|
00000410: 48 54 20 4D 41 52 4B 45  52 20 4C 4F 43 41 54 49  |HT MARKER LOCATI|
00000420: 4F 4E 00 47 08 E6 00 8D  20 31 30 31 34 30 20 3A  |ON.G.... 10140 :|
00000430: 20 8F 20 47 45 54 20 4E  45 58 54 20 4D 41 52 4B  | . GET NEXT MARK|
00000440: 45 52 20 4D 4F 56 45 00  78 08 F0 00 97 20 4D 4C  |ER MOVE.x.... ML|
00000450: 2C 20 4D 43 20 3A 20 8F  20 52 45 54 55 52 4E 20  |, MC : . RETURN |
00000460: 4D 41 52 4B 45 52 20 4C  4F 43 41 54 49 4E 20 54  |MARKER LOCATIN T|
00000470: 4F 20 4E 4F 52 4D 41 4C  00 9C 08 FA 00 8B 20 58  |O NORMAL...... X|
00000480: 41 B2 30 20 A7 20 32 32  30 20 3A 20 8F 20 49 4C  |A.0 . 220 : . IL|
00000490: 4C 45 47 41 4C 20 43 48  4F 49 43 45 00 CB 08 04  |LEGAL CHOICE....|
000004A0: 01 91 20 58 41 20 8D 20  33 31 30 2C 33 32 30 2C  |.. XA . 310,320,|
000004B0: 33 33 30 2C 33 34 30 2C  33 35 30 2C 33 36 30 2C  |330,340,350,360,|
000004C0: 33 37 30 2C 33 38 30 2C  33 39 30 00 F8 08 0E 01  |370,380,390.....|
000004D0: 8B 20 58 41 B2 35 20 A7  20 97 4D 4C 2C 38 31 3A  |. XA.5 . .ML,81:|
000004E0: 89 34 30 30 20 3A 20 8F  20 47 45 54 20 52 41 44  |.400 : . GET RAD|
000004F0: 49 55 53 20 4E 45 58 54  00 09 09 18 01 8B 58 B1  |IUS NEXT......X.|
00000500: 31 30 20 A7 20 58 B2 31  30 00 1A 09 1D 01 8B 59  |10 . X.10......Y|
00000510: B1 31 30 20 A7 20 59 B2  31 30 00 28 09 22 01 8B  |.10 . Y.10.(."..|
00000520: 58 B3 31 A7 20 58 B2 31  00 36 09 27 01 8B 59 B3  |X.1. X.1.6.'..Y.|
00000530: 31 A7 20 59 B2 31 00 3F  09 2C 01 89 32 30 30 00  |1. Y.1.?.,..200.|
00000540: 51 09 36 01 58 B2 58 AB  31 3A 59 B2 59 AA 31 3A  |Q.6.X.X.1:Y.Y.1:|
00000550: 8E 00 5D 09 40 01 59 B2  59 AA 31 3A 8E 00 6F 09  |..].@.Y.Y.1:..o.|
00000560: 4A 01 58 B2 58 AA 31 3A  59 B2 59 AA 31 3A 8E 00  |J.X.X.1:Y.Y.1:..|
00000570: 7B 09 54 01 58 B2 58 AB  31 3A 8E 00 81 09 5E 01  |{.T.X.X.1:....^.|
00000580: 8E 00 8D 09 68 01 58 B2  58 AA 31 3A 8E 00 9F 09  |....h.X.X.1:....|
00000590: 72 01 58 B2 58 AB 31 3A  59 B2 59 AB 31 3A 8E 00  |r.X.X.1:Y.Y.1:..|
000005A0: AB 09 7C 01 59 B2 59 AB  31 3A 8E 00 BD 09 86 01  |..|.Y.Y.1:......|
000005B0: 58 B2 58 AA 31 3A 59 B2  59 AB 31 3A 8E 00 DC 09  |X.X.1:Y.Y.1:....|
000005C0: 90 01 8D 37 30 30 30 20  3A 20 8F 20 43 4C 45 41  |...7000 : . CLEA|
000005D0: 52 20 52 49 47 48 54 20  41 52 45 41 00 E6 09 95  |R RIGHT AREA....|
000005E0: 01 99 22 13 22 3B 00 F6  09 9A 01 81 5A B2 39 A4  |..".";......Z.9.|
000005F0: 31 20 A9 20 AB 31 00 04  0A A4 01 3A 99 20 A3 32  |1 . .1.....:. .2|
00000600: 34 29 3B 5A 00 0B 0A AE  01 3A 99 00 13 0A B8 01  |4);Z.....:......|
00000610: 82 20 5A 00 30 0A C2 01  99 20 A3 32 32 29 3B 22  |. Z.0.... .22);"|
00000620: 4F 52 20 30 20 28 54 45  4C 45 50 4F 52 54 29 22  |OR 0 (TELEPORT)"|
00000630: 00 36 0A CC 01 99 00 58  0A D1 01 99 20 A3 32 31  |.6.....X.... .21|
00000640: 29 3B 22 4F 52 20 12 58  92 20 28 43 41 4E 43 45  |);"OR .X. (CANCE|
00000650: 4C 20 44 52 4F 50 29 22  00 5E 0A D2 01 99 00 78  |L DROP)".^.....x|
00000660: 0A D6 01 99 5A 53 24 3B  22 12 57 48 41 54 20 52  |....ZS$;".WHAT R|
00000670: 41 44 49 55 53 92 3F 22  00 83 0A E0 01 8D 31 30  |ADIUS.?"......10|
00000680: 31 33 30 00 BA 0A E5 01  8B 58 41 24 B2 22 58 22  |130......XA$."X"|
00000690: A7 20 8D 37 30 30 30 3A  20 8D 36 38 30 30 20 3A  |. .7000: .6800 :|
000006A0: 20 97 4D 4C 2C 4D 43 3A  89 32 30 30 20 3A 20 8F  | .ML,MC:.200 : .|
000006B0: 20 52 45 44 4F 20 44 52  4F 50 00 D6 0A EA 01 8B  | REDO DROP......|
000006C0: 20 58 41 B2 30 20 AF 20  58 41 24 B3 B1 22 30 22  | XA.0 . XA$.."0"|
000006D0: 20 A7 20 34 38 30 00 FC  0A EF 01 4E 44 B2 4E 44  | . 480.....ND.ND|
000006E0: AA 31 20 3A 20 8F 20 55  50 44 41 54 45 20 4E 45  |.1 : . UPDATE NE|
000006F0: 54 20 44 52 4F 50 20 43  4F 55 4E 54 00 09 0B F4  |T DROP COUNT....|
00000700: 01 97 20 4D 4C 2C 20 34  32 00 1D 0B F9 01 52 B2  |.. ML, 42.....R.|
00000710: 58 41 20 3A 20 8F 20 52  41 44 49 55 53 00 42 0B  |XA : . RADIUS.B.|
00000720: FB 01 4E 43 B2 B5 28 FF  AC 52 AC 52 29 3A 8F 20  |..NC..(..R.R):. |
00000730: 4E 45 54 20 43 4F 53 54  20 54 48 49 53 20 44 52  |NET COST THIS DR|
00000740: 4F 50 00 4F 0B FC 01 54  43 B2 54 43 AA 4E 43 00  |OP.O...TC.TC.NC.|
00000750: 6B 0B FE 01 8D 37 32 30  30 3A 8F 20 43 48 45 43  |k....7200:. CHEC|
00000760: 4B 20 49 46 20 49 4E 20  4E 45 54 00 88 0B 03 02  |K IF IN NET.....|
00000770: 8D 37 30 30 30 3A 8F 20  43 4C 45 41 52 20 52 49  |.7000:. CLEAR RI|
00000780: 47 48 54 20 41 52 45 41  00 B4 0B 05 02 8B 52 B2  |GHT AREA......R.|
00000790: 30 20 A7 20 8D 20 37 33  30 30 20 3A 20 89 20 35  |0 . . 7300 : . 5|
000007A0: 32 35 20 3A 20 8F 20 54  45 4C 45 50 4F 52 54 45  |25 : . TELEPORTE|
000007B0: 52 20 4F 4E 00 DC 0B 08  02 99 52 4D 24 3B 22 4E  |R ON......RM$;"N|
000007C0: 45 54 20 52 41 44 49 55  53 22 3B 52 3B 22 26 20  |ET RADIUS";R;"& |
000007D0: 43 4F 53 54 22 3B 4E 43  3B 4E 54 24 00 F5 0B 0D  |COST";NC;NT$....|
000007E0: 02 99 3A 8D 37 31 30 30  3A 8F 20 55 50 44 41 54  |..:.7100:. UPDAT|
000007F0: 45 20 4E 45 54 00 FF 0B  12 02 8D 36 38 30 30 00  |E NET......6800.|
00000800: 08 0C 1C 02 89 32 30 30  00 0E 0C 87 13 80 00 29  |.....200.......)|
00000810: 0C 88 13 99 22 93 22 3B  20 3A 20 8F 20 49 4E 53  |...."."; : . INS|
00000820: 54 52 55 43 54 49 4F 4E  53 00 39 0C 8D 13 99 22  |TRUCTIONS.9...."|
00000830: 11 11 11 11 11 11 11 11  22 00 62 0C 92 13 58 58  |........".b...XX|
00000840: 24 B2 22 54 48 49 53 20  49 53 20 4D 41 52 54 49  |$."THIS IS MARTI|
00000850: 41 4E 20 48 55 4E 54 3A  22 20 3A 20 8D 31 30 35  |AN HUNT:" : .105|
00000860: 30 30 00 68 0C 97 13 99  00 97 0C 9C 13 58 58 24  |00.h.........XX$|
00000870: B2 22 43 41 50 54 55 52  45 20 54 48 45 20 44 45  |."CAPTURE THE DE|
00000880: 41 44 4C 59 20 4D 41 52  54 49 41 4E 22 20 3A 20  |ADLY MARTIAN" : |
00000890: 8D 20 31 30 35 30 30 00  9D 0C A1 13 99 00 C0 0C  |. 10500.........|
000008A0: A6 13 58 58 24 B2 22 2E  2E 2E 49 46 20 59 4F 55  |..XX$."...IF YOU|
000008B0: 20 44 41 52 45 22 20 3A  20 8D 20 31 30 35 30 30  | DARE" : . 10500|
000008C0: 00 CB 0C AB 13 99 20 52  4D 24 3B 00 D6 0C B0 13  |...... RM$;.....|
000008D0: 8D 31 30 31 30 30 00 E0  0C EC 13 99 22 93 22 3B  |.10100......".";|
000008E0: 00 16 0D F6 13 58 58 24  B2 22 59 4F 55 20 41 52  |.....XX$."YOU AR|
000008F0: 45 20 54 48 45 20 43 41  50 54 41 49 4E 20 4F 46  |E THE CAPTAIN OF|
00000900: 20 41 20 53 54 41 52 53  48 49 50 22 20 3A 20 8D  | A STARSHIP" : .|
00000910: 20 31 30 35 30 30 00 1C  0D FB 13 99 00 56 0D 00  | 10500.......V..|
00000920: 14 58 58 24 B2 22 4F 52  42 49 54 54 49 4E 47 20  |.XX$."ORBITTING |
00000930: 54 48 45 20 50 4C 41 4E  45 54 20 4D 41 52 53 2E  |THE PLANET MARS.|
00000940: 20 49 54 20 49 53 20 59  4F 55 52 22 20 3A 20 8D  | IT IS YOUR" : .|
00000950: 20 31 30 35 30 30 00 5C  0D 05 14 99 00 96 0D 0A  | 10500.\........|
00000960: 14 58 58 24 B2 22 4D 49  53 53 49 4F 4E 20 54 4F  |.XX$."MISSION TO|
00000970: 20 43 41 50 54 55 52 45  20 54 48 45 20 4C 41 53  | CAPTURE THE LAS|
00000980: 54 20 52 45 4D 41 49 4E  49 4E 47 22 20 3A 20 8D  |T REMAINING" : .|
00000990: 20 31 30 35 30 30 00 9C  0D 0F 14 99 00 D7 0D 14  | 10500..........|
000009A0: 14 58 58 24 B2 22 4D 41  52 54 49 41 4E 2E 20 53  |.XX$."MARTIAN. S|
000009B0: 49 4E 43 45 20 49 54 20  49 53 20 54 48 45 20 4C  |INCE IT IS THE L|
000009C0: 41 53 54 20 4F 46 20 54  48 45 49 52 22 20 3A 20  |AST OF THEIR" : |
000009D0: 8D 20 31 30 35 30 30 00  DD 0D 19 14 99 00 17 0E  |. 10500.........|
000009E0: 1E 14 58 58 24 B2 22 4B  49 4E 44 20 59 4F 55 20  |..XX$."KIND YOU |
000009F0: 4F 46 20 43 4F 55 52 53  45 20 57 49 4C 4C 20 4E  |OF COURSE WILL N|
00000A00: 4F 54 20 41 54 54 45 4D  50 54 20 54 4F 22 20 3A  |OT ATTEMPT TO" :|
00000A10: 20 8D 31 30 35 30 30 00  1D 0E 23 14 99 00 55 0E  | .10500...#...U.|
00000A20: 28 14 58 58 24 B2 22 4B  49 4C 4C 20 49 54 2C 20  |(.XX$."KILL IT, |
00000A30: 45 56 45 4E 20 54 48 4F  55 47 48 20 49 54 20 49  |EVEN THOUGH IT I|
00000A40: 53 20 45 58 54 52 45 4D  45 4C 59 22 20 3A 20 8D  |S EXTREMELY" : .|
00000A50: 31 30 35 30 30 00 5B 0E  2D 14 99 00 77 0E 32 14  |10500.[.-...w.2.|
00000A60: 58 58 24 B2 22 44 45 41  44 4C 59 2E 22 20 3A 20  |XX$."DEADLY." : |
00000A70: 8D 20 31 30 35 30 30 00  82 0E 3C 14 99 20 52 4D  |. 10500...<.. RM|
00000A80: 24 3B 00 8E 0E 46 14 8D  20 31 30 31 30 30 00 98  |$;...F.. 10100..|
00000A90: 0E 50 14 99 22 93 22 3B  00 CF 0E 5A 14 58 58 24  |.P..".";...Z.XX$|
00000AA0: B2 22 49 54 20 57 49 4C  4C 20 4E 4F 54 20 42 45  |."IT WILL NOT BE|
00000AB0: 20 45 41 53 59 20 54 4F  20 43 41 50 54 55 52 45  | EASY TO CAPTURE|
00000AC0: 20 54 48 45 22 20 3A 20  8D 20 31 30 35 30 30 00  | THE" : . 10500.|
00000AD0: D5 0E 5F 14 99 00 0F 0F  64 14 58 58 24 B2 22 4D  |.._.....d.XX$."M|
00000AE0: 41 52 54 49 41 4E 2E 20  49 54 20 49 53 20 49 4E  |ARTIAN. IT IS IN|
00000AF0: 56 49 53 49 42 4C 45 2C  20 41 4E 44 20 43 41 4E  |VISIBLE, AND CAN|
00000B00: 20 4E 4F 54 22 20 3A 20  8D 20 31 30 35 30 30 00  | NOT" : . 10500.|
00000B10: 15 0F 69 14 99 00 51 0F  6E 14 58 58 24 B2 22 42  |..i...Q.n.XX$."B|
00000B20: 45 20 53 45 45 4E 20 4F  52 20 44 45 54 45 43 54  |E SEEN OR DETECT|
00000B30: 45 44 20 45 56 45 4E 20  42 59 20 59 4F 55 52 20  |ED EVEN BY YOUR |
00000B40: 4D 4F 44 45 52 4E 22 20  3A 20 8D 20 31 30 35 30  |MODERN" : . 1050|
00000B50: 30 00 57 0F 73 14 99 00  93 0F 78 14 58 58 24 B2  |0.W.s.....x.XX$.|
00000B60: 22 53 43 41 4E 4E 49 4E  47 20 45 51 55 49 50 4D  |"SCANNING EQUIPM|
00000B70: 45 4E 54 2E 20 48 4F 57  45 56 45 52 2C 20 59 4F  |ENT. HOWEVER, YO|
00000B80: 55 52 20 53 48 49 50 53  22 20 3A 20 8D 20 31 30  |UR SHIPS" : . 10|
00000B90: 35 30 30 00 99 0F 7D 14  99 00 D3 0F 82 14 58 58  |500...}.......XX|
00000BA0: 24 B2 22 53 43 49 45 4E  54 49 53 54 20 48 41 53  |$."SCIENTIST HAS|
00000BB0: 20 50 45 52 46 45 43 54  45 44 20 41 20 54 59 50  | PERFECTED A TYP|
00000BC0: 45 20 4F 46 20 4E 45 54  22 20 3A 20 8D 20 31 30  |E OF NET" : . 10|
00000BD0: 35 30 30 00 D9 0F 87 14  99 00 0F 10 8C 14 58 58  |500...........XX|
00000BE0: 24 B2 22 4D 41 44 45 20  4F 46 20 46 49 42 45 52  |$."MADE OF FIBER|
00000BF0: 53 20 46 52 4F 4D 20 41  20 46 4F 52 43 45 20 46  |S FROM A FORCE F|
00000C00: 49 45 4C 44 22 20 3A 20  8D 20 31 30 35 30 30 00  |IELD" : . 10500.|
00000C10: 15 10 91 14 99 00 4B 10  96 14 58 58 24 B2 22 54  |......K...XX$."T|
00000C20: 48 41 54 20 43 48 41 4E  47 45 20 45 4E 45 52 47  |HAT CHANGE ENERG|
00000C30: 59 20 4C 45 56 45 4C 53  20 49 46 20 54 48 45 59  |Y LEVELS IF THEY|
00000C40: 22 20 3A 20 8D 20 31 30  35 30 30 00 51 10 9B 14  |" : . 10500.Q...|
00000C50: 99 00 7A 10 A0 14 58 58  24 B2 22 43 4F 4E 54 41  |..z...XX$."CONTA|
00000C60: 43 54 20 54 48 45 20 4D  41 52 54 49 41 4E 2E 22  |CT THE MARTIAN."|
00000C70: 20 3A 20 8D 20 31 30 35  30 30 00 84 10 AA 14 99  | : . 10500......|
00000C80: 52 4D 24 3B 00 90 10 AF  14 8D 20 31 30 31 30 30  |RM$;...... 10100|
00000C90: 00 9A 10 B4 14 99 22 93  22 3B 00 D6 10 BE 14 58  |......".";.....X|
00000CA0: 58 24 B2 22 48 45 20 43  41 4E 20 4D 41 4B 45 20  |X$."HE CAN MAKE |
00000CB0: 54 48 45 53 45 20 4E 45  54 53 20 4F 4E 4C 59 20  |THESE NETS ONLY |
00000CC0: 49 4E 20 43 49 52 43 55  4C 41 52 22 20 3A 20 8D  |IN CIRCULAR" : .|
00000CD0: 20 31 30 35 30 30 00 DC  10 C3 14 99 00 0F 11 C8  | 10500..........|
00000CE0: 14 58 58 24 B2 22 53 48  41 50 45 20 57 49 54 48  |.XX$."SHAPE WITH|
00000CF0: 20 41 20 52 41 44 49 55  53 20 54 48 41 54 20 49  | A RADIUS THAT I|
00000D00: 53 20 41 4E 22 20 3A 20  8D 20 31 30 35 30 30 00  |S AN" : . 10500.|
00000D10: 15 11 CD 14 99 00 50 11  D2 14 58 58 24 B2 22 49  |......P...XX$."I|
00000D20: 4E 54 45 47 45 52 2E 20  48 45 20 57 49 4C 4C 20  |NTEGER. HE WILL |
00000D30: 4D 41 4B 45 20 41 53 20  4D 41 4E 59 20 4F 46 20  |MAKE AS MANY OF |
00000D40: 54 48 45 53 45 22 20 3A  20 8D 20 31 30 35 30 30  |THESE" : . 10500|
00000D50: 00 56 11 D7 14 99 00 8E  11 DC 14 58 58 24 B2 22  |.V.........XX$."|
00000D60: 4E 45 54 53 20 41 53 20  59 4F 55 20 4E 45 45 44  |NETS AS YOU NEED|
00000D70: 2C 20 42 55 54 20 54 48  45 59 20 41 52 45 20 56  |, BUT THEY ARE V|
00000D80: 45 52 59 22 20 3A 20 8D  20 31 30 35 30 30 00 94  |ERY" : . 10500..|
00000D90: 11 E1 14 99 00 CE 11 E6  14 58 58 24 B2 22 45 58  |.........XX$."EX|
00000DA0: 50 45 4E 53 49 56 45 2E  20 54 48 55 53 20 59 4F  |PENSIVE. THUS YO|
00000DB0: 55 20 53 48 4F 55 4C 44  20 54 52 59 20 54 4F 20  |U SHOULD TRY TO |
00000DC0: 55 53 45 22 20 3A 20 8D  20 31 30 35 30 30 00 D4  |USE" : . 10500..|
00000DD0: 11 EB 14 99 00 0C 12 F0  14 58 58 24 B2 22 56 45  |.........XX$."VE|
00000DE0: 52 59 20 46 45 57 20 4E  45 54 53 2E 20 59 4F 55  |RY FEW NETS. YOU|
00000DF0: 20 43 48 4F 4F 53 45 20  54 48 45 20 45 58 41 43  | CHOOSE THE EXAC|
00000E00: 54 22 20 3A 20 8D 20 31  30 35 30 30 00 12 12 F5  |T" : . 10500....|
00000E10: 14 99 00 49 12 FA 14 58  58 24 B2 22 50 4F 49 4E  |...I...XX$."POIN|
00000E20: 54 20 54 4F 20 44 52 4F  50 20 54 48 45 20 4E 45  |T TO DROP THE NE|
00000E30: 54 2C 20 41 4E 44 20 53  50 45 43 49 46 59 22 20  |T, AND SPECIFY" |
00000E40: 3A 20 8D 20 31 30 35 30  30 00 4F 12 FF 14 99 00  |: . 10500.O.....|
00000E50: 6F 12 04 15 58 58 24 B2  22 49 54 53 20 52 41 44  |o...XX$."ITS RAD|
00000E60: 49 55 53 2E 22 20 3A 20  8D 20 31 30 35 30 30 00  |IUS." : . 10500.|
00000E70: 79 12 0E 15 99 52 4D 24  3B 00 84 12 13 15 8D 31  |y....RM$;......1|
00000E80: 30 31 30 30 00 8E 12 18  15 99 22 93 22 3B 00 C8  |0100......".";..|
00000E90: 12 22 15 58 58 24 B2 22  41 46 54 45 52 20 54 48  |.".XX$."AFTER TH|
00000EA0: 45 20 4E 45 54 20 49 53  20 44 52 4F 50 50 45 44  |E NET IS DROPPED|
00000EB0: 20 59 4F 55 52 20 53 43  41 4E 4E 45 52 22 20 3A  | YOUR SCANNER" :|
00000EC0: 20 8D 20 31 30 35 30 30  00 CE 12 27 15 99 00 09  | . 10500...'....|
00000ED0: 13 2C 15 58 58 24 B2 22  43 41 4E 20 4D 4F 4E 49  |.,.XX$."CAN MONI|
00000EE0: 54 4F 52 20 49 54 53 20  45 4E 45 52 47 59 20 4C  |TOR ITS ENERGY L|
00000EF0: 45 56 45 4C 2E 20 49 46  20 49 54 20 49 53 22 20  |EVEL. IF IT IS" |
00000F00: 3A 20 8D 20 31 30 35 30  30 00 0F 13 31 15 99 00  |: . 10500...1...|
00000F10: 41 13 36 15 58 58 24 B2  22 48 49 47 48 20 59 4F  |A.6.XX$."HIGH YO|
00000F20: 55 20 48 41 56 45 20 48  49 54 20 54 48 45 20 4D  |U HAVE HIT THE M|
00000F30: 41 52 54 49 41 4E 22 20  3A 20 8D 20 31 30 35 30  |ARTIAN" : . 1050|
00000F40: 30 00 47 13 3B 15 99 00  78 13 40 15 58 58 24 B2  |0.G.;...x.@.XX$.|
00000F50: 22 28 54 48 45 20 45 44  47 45 20 4F 46 20 54 48  |"(THE EDGE OF TH|
00000F60: 45 20 4E 45 54 20 48 49  54 20 48 49 4D 22 20 3A  |E NET HIT HIM" :|
00000F70: 20 8D 20 31 30 35 30 30  00 7E 13 45 15 99 00 B7  | . 10500.~.E....|
00000F80: 13 4A 15 58 58 24 B2 22  4F 52 20 49 54 20 49 53  |.J.XX$."OR IT IS|
00000F90: 20 43 4F 4D 50 4C 45 54  45 4C 59 20 49 4E 53 49  | COMPLETELY INSI|
00000FA0: 44 45 20 54 48 45 20 4E  45 54 29 2E 22 20 3A 20  |DE THE NET)." : |
00000FB0: 8D 20 31 30 35 30 30 00  BD 13 4D 15 99 00 F7 13  |. 10500...M.....|
00000FC0: 4F 15 58 58 24 B2 22 54  48 45 20 52 41 44 49 55  |O.XX$."THE RADIU|
00000FD0: 53 20 4F 46 20 54 48 45  20 4E 45 54 20 57 49 4C  |S OF THE NET WIL|
00000FE0: 4C 20 42 45 20 50 4C 4F  54 54 45 44 22 20 3A 20  |L BE PLOTTED" : |
00000FF0: 8D 20 31 30 35 30 30 00  FD 13 51 15 99 00 35 14  |. 10500...Q...5.|
00001000: 54 15 58 58 24 B2 22 41  54 20 59 4F 55 52 20 44  |T.XX$."AT YOUR D|
00001010: 52 4F 50 20 50 4F 49 4E  54 2E 20 49 46 20 59 4F  |ROP POINT. IF YO|
00001020: 55 20 53 43 4F 52 45 44  20 41 22 20 3A 20 8D 20  |U SCORED A" : . |
00001030: 31 30 35 30 30 00 3B 14  57 15 99 00 79 14 59 15  |10500.;.W...y.Y.|
00001040: 58 58 24 B2 22 48 49 54  20 49 54 20 57 49 4C 4C  |XX$."HIT IT WILL|
00001050: 20 42 45 20 49 4E 20 52  45 56 45 52 53 45 20 46  | BE IN REVERSE F|
00001060: 49 45 4C 44 20 4C 49 4B  45 20 12 35 92 2E 22 20  |IELD LIKE .5.." |
00001070: 3A 20 8D 20 31 30 35 30  30 00 7F 14 5B 15 99 00  |: . 10500...[...|
00001080: B9 14 5E 15 58 58 24 B2  22 49 46 20 59 4F 55 20  |..^.XX$."IF YOU |
00001090: 4D 49 53 53 45 44 20 49  54 20 57 49 4C 4C 20 42  |MISSED IT WILL B|
000010A0: 45 20 50 52 49 4E 54 45  44 20 4C 49 4B 45 22 20  |E PRINTED LIKE" |
000010B0: 3A 20 8D 20 31 30 35 30  30 00 BF 14 61 15 99 00  |: . 10500...a...|
000010C0: DC 14 63 15 58 58 24 B2  22 54 48 49 53 3A 20 35  |..c.XX$."THIS: 5|
000010D0: 2E 22 20 3A 20 8D 20 31  30 35 30 30 00 E6 14 72  |." : . 10500...r|
000010E0: 15 99 52 4D 24 3B 00 F2  14 77 15 8D 20 31 30 31  |..RM$;...w.. 101|
000010F0: 30 30 00 FC 14 7C 15 99  22 93 22 3B 00 35 15 86  |00...|..".";.5..|
00001100: 15 58 58 24 B2 22 59 4F  55 20 53 48 4F 55 4C 44  |.XX$."YOU SHOULD|
00001110: 20 43 48 4F 4F 53 45 20  59 4F 55 52 20 4E 45 54  | CHOOSE YOUR NET|
00001120: 20 53 49 5A 45 20 57 49  54 48 22 20 3A 20 8D 20  | SIZE WITH" : . |
00001130: 31 30 35 30 30 00 3B 15  8B 15 99 00 76 15 90 15  |10500.;.....v...|
00001140: 58 58 24 B2 22 43 41 52  45 2E 20 44 52 4F 50 20  |XX$."CARE. DROP |
00001150: 54 48 45 4D 20 41 54 20  53 54 41 54 45 47 49 43  |THEM AT STATEGIC|
00001160: 20 4C 4F 43 41 54 49 4F  4E 53 2E 22 20 3A 20 8D  | LOCATIONS." : .|
00001170: 20 31 30 35 30 30 00 7C  15 95 15 99 00 B2 15 9A  | 10500.|........|
00001180: 15 58 58 24 B2 22 4F 4E  43 45 20 59 4F 55 20 54  |.XX$."ONCE YOU T|
00001190: 48 49 4E 4B 20 59 4F 55  20 4B 4E 4F 57 20 49 54  |HINK YOU KNOW IT|
000011A0: 53 20 45 58 41 43 54 22  20 3A 20 8D 20 31 30 35  |S EXACT" : . 105|
000011B0: 30 30 00 B8 15 9F 15 99  00 EF 15 A4 15 58 58 24  |00...........XX$|
000011C0: B2 22 4C 4F 43 41 54 49  4F 4E 20 59 4F 55 20 4D  |."LOCATION YOU M|
000011D0: 55 53 54 20 54 45 4C 45  50 4F 52 54 20 49 54 20  |UST TELEPORT IT |
000011E0: 49 4E 54 4F 22 20 3A 20  8D 20 31 30 35 30 30 00  |INTO" : . 10500.|
000011F0: F5 15 A9 15 99 00 2D 16  B8 15 58 58 24 B2 22 59  |......-...XX$."Y|
00001200: 4F 55 52 20 53 48 49 50  53 20 53 50 45 43 49 41  |OUR SHIPS SPECIA|
00001210: 4C 4C 59 20 44 45 53 49  47 4E 45 44 20 43 41 47  |LLY DESIGNED CAG|
00001220: 45 2E 22 20 3A 20 8D 20  31 30 35 30 30 00 33 16  |E." : . 10500.3.|
00001230: BD 15 99 00 6E 16 C2 15  58 58 24 B2 22 54 4F 20  |....n...XX$."TO |
00001240: 44 4F 20 54 48 49 53 2C  20 43 48 4F 4F 53 45 20  |DO THIS, CHOOSE |
00001250: 49 54 53 20 4C 4F 43 41  54 49 4F 4E 20 41 53 20  |ITS LOCATION AS |
00001260: 54 48 45 22 20 3A 20 8D  20 31 30 35 30 30 00 74  |THE" : . 10500.t|
00001270: 16 C5 15 99 00 AD 16 C7  15 58 58 24 B2 22 44 52  |.........XX$."DR|
00001280: 4F 50 20 50 4F 49 4E 54  2E 20 54 48 45 4E 20 53  |OP POINT. THEN S|
00001290: 50 45 43 49 46 59 20 41  20 52 41 44 49 55 53 20  |PECIFY A RADIUS |
000012A0: 4F 46 22 20 3A 20 8D 20  31 30 35 30 30 00 B3 16  |OF" : . 10500...|
000012B0: C9 15 99 00 EF 16 CC 15  58 58 24 B2 22 5A 45 52  |........XX$."ZER|
000012C0: 4F 20 28 30 29 2E 20 54  48 49 53 20 54 52 49 47  |O (0). THIS TRIG|
000012D0: 47 45 52 53 20 54 48 45  20 54 45 4C 45 50 4F 52  |GERS THE TELEPOR|
000012E0: 54 45 52 2E 22 20 3A 20  8D 20 31 30 35 30 30 00  |TER." : . 10500.|
000012F0: F7 16 D1 15 99 3A 99 00  34 17 D3 15 58 58 24 B2  |.....:..4...XX$.|
00001300: 22 59 4F 55 52 20 53 43  4F 52 45 20 57 49 4C 4C  |"YOUR SCORE WILL|
00001310: 20 42 45 20 43 4F 4E 53  54 41 4E 54 4C 59 20 4D  | BE CONSTANTLY M|
00001320: 4F 4E 49 54 4F 52 45 44  2E 22 20 3A 20 8D 20 31  |ONITORED." : . 1|
00001330: 30 35 30 30 00 3E 17 D6  15 99 52 4D 24 3B 00 4A  |0500.>....RM$;.J|
00001340: 17 DB 15 8D 20 31 30 31  30 30 00 50 17 6F 17 8E  |.... 10100.P.o..|
00001350: 00 69 17 70 17 99 22 93  22 3B 20 3A 20 8F 20 44  |.i.p.."."; : . D|
00001360: 52 41 57 20 42 4F 41 52  44 00 78 17 7A 17 81 20  |RAW BOARD.x.z.. |
00001370: 5A B2 31 20 A4 20 31 30  00 96 17 84 17 3A 99 22  |Z.1 . 10.....:."|
00001380: D7 A0 D7 A0 D7 A0 D7 A0  D7 A0 D7 A0 D7 A0 D7 A0  |................|
00001390: D7 A0 D7 A0 A6 22 00 B4  17 8E 17 3A 99 22 A0 A0  |.....".....:."..|
000013A0: A0 A0 A0 A0 A0 A0 A0 A0  A0 A0 A0 A0 A0 A0 A0 A0  |................|
000013B0: A0 A0 A6 22 00 BC 17 98  17 82 20 5A 00 DA 17 A2  |..."...... Z....|
000013C0: 17 99 22 12 A6 A6 4D 41  52 54 49 41 4E A6 A6 A6  |.."...MARTIAN...|
000013D0: 48 55 4E 54 A6 A6 A6 A6  A6 22 00 E4 17 90 1A 99  |HUNT....."......|
000013E0: 22 13 22 3B 00 FC 17 9A  1A 99 A3 32 33 29 3B 22  |".";.......23);"|
000013F0: 20 55 53 45 20 4B 45 59  50 41 44 22 00 15 18 A4  | USE KEYPAD"....|
00001400: 1A 99 A3 32 33 29 3B 22  54 4F 20 4D 4F 56 45 20  |...23);"TO MOVE |
00001410: 59 4F 55 52 22 00 2D 18  AE 1A 99 A3 32 33 29 3B  |YOUR".-.....23);|
00001420: 22 20 20 53 48 49 50 20  20 28 D1 29 22 00 33 18  |"  SHIP  (.)".3.|
00001430: B8 1A 99 00 4A 18 C2 1A  99 A3 32 33 29 3B 22 20  |....J.....23);" |
00001440: 20 20 37 20 20 38 20 20  39 22 00 61 18 CC 1A 99  |  7  8  9".a....|
00001450: A3 32 33 29 3B 22 20 20  20 20 5C 20 5E 20 2F 20  |.23);"    \ ^ / |
00001460: 22 00 78 18 D6 1A 99 A3  32 33 29 3B 22 20 20 20  |".x.....23);"   |
00001470: 20 20 5C 21 2F 20 20 22  00 8F 18 E0 1A 99 A3 32  |  \!/  ".......2|
00001480: 33 29 3B 22 20 20 20 34  5F C0 2A C0 C0 36 22 00  |3);"   4_.*..6".|
00001490: A6 18 EA 1A 99 A3 32 33  29 3B 22 20 20 20 20 20  |......23);"     |
000014A0: 2F 21 5C 20 20 22 00 BD  18 F4 1A 99 A3 32 33 29  |/!\  ".......23)|
000014B0: 3B 22 20 20 20 20 2F 20  21 20 5C 20 22 00 D4 18  |;"    / ! \ "...|
000014C0: FE 1A 99 A3 32 33 29 3B  22 20 20 20 31 20 20 32  |....23);"   1  2|
000014D0: 20 20 33 22 00 DA 18 08  1B 99 00 F5 18 12 1B 99  |  3"............|
000014E0: A3 32 33 29 3B 22 48 49  54 20 35 20 57 48 45 4E  |.23);"HIT 5 WHEN|
000014F0: 20 59 4F 55 22 00 0F 19  1C 1B 99 A3 32 33 29 3B  | YOU".......23);|
00001500: 22 20 41 52 45 20 41 54  20 59 4F 55 52 20 22 00  |" ARE AT YOUR ".|
00001510: 28 19 26 1B 99 A3 32 33  29 3B 22 20 20 44 52 4F  |(.&...23);"  DRO|
00001520: 50 20 50 4F 49 4E 54 22  00 2E 19 57 1B 8E 00 4B  |P POINT"...W...K|
00001530: 19 58 1B 99 22 13 22 3B  3A 8F 20 43 4C 45 41 52  |.X..".";:. CLEAR|
00001540: 20 52 49 47 48 54 20 41  52 45 41 00 59 19 62 1B  | RIGHT AREA.Y.b.|
00001550: 81 5A B2 31 20 A4 20 32  33 00 6E 19 6C 1B 3A 99  |.Z.1 . 23.n.l.:.|
00001560: A3 32 31 29 3B C8 28 5A  53 24 2C 31 38 29 00 76  |.21);.(ZS$,18).v|
00001570: 19 76 1B 82 20 5A 00 7C  19 BB 1B 8E 00 9A 19 BC  |.v.. Z.|........|
00001580: 1B 99 20 4E 44 3B 22 20  4E 45 54 22 3B 3A 8B 4E  |.. ND;" NET";:.N|
00001590: 44 B3 B1 31 A7 99 22 53  22 3B 00 B9 19 C6 1B 99  |D..1.."S";......|
000015A0: 22 20 44 52 4F 50 50 45  44 20 2F 20 43 4F 53 54  |" DROPPED / COST|
000015B0: 3D 22 3B 54 43 3B 22 13  22 00 BF 19 1F 1C 8E 00  |=";TC;".".......|
000015C0: 0A 1A 20 1C 44 32 B2 28  58 30 AB 58 29 AC 28 58  |.. .D2.(X0.X).(X|
000015D0: 30 AB 58 29 AA 28 59 30  AB 59 29 AC 28 59 30 AB  |0.X).(Y0.Y).(Y0.|
000015E0: 59 29 20 3A 20 8F 20 44  49 53 54 41 4E 43 45 20  |Y) : . DISTANCE |
000015F0: 56 41 4C 55 45 20 46 52  4F 4D 20 44 52 4F 50 20  |VALUE FROM DROP |
00001600: 54 4F 20 4D 41 52 54 49  41 4E 00 39 1A 2A 1C 52  |TO MARTIAN.9.*.R|
00001610: 32 B2 52 AC 52 20 3A 20  8F 20 44 49 53 54 41 4E  |2.R.R : . DISTAN|
00001620: 43 45 20 56 41 4C 55 45  20 4F 46 20 52 41 44 49  |CE VALUE OF RADI|
00001630: 55 53 20 4F 46 20 4E 45  54 00 7D 1A 34 1C 4E 54  |US OF NET.}.4.NT|
00001640: 24 B2 22 4D 49 53 53 45  44 22 3A 97 4D 4C 2C 58  |$."MISSED":.ML,X|
00001650: 41 AA 34 38 3A 8B 20 52  32 B2 B1 44 32 20 A7 20  |A.48:. R2..D2 . |
00001660: 4E 54 24 B2 22 12 48 49  54 92 22 20 3A 20 97 20  |NT$.".HIT." : . |
00001670: 4D 4C 2C 20 58 41 AA 34  38 AA 31 32 38 00 83 1A  |ML, XA.48.128...|
00001680: 83 1C 8E 00 9E 1A 84 1C  99 52 4D 24 3B 22 54 45  |.........RM$;"TE|
00001690: 4C 45 50 4F 52 54 45 52  20 22 3B 4E 54 24 00 AD  |LEPORTER ";NT$..|
000016A0: 1A 8E 1C 8B 44 32 B2 30  A7 37 34 30 30 00 B3 1A  |....D2.0.7400...|
000016B0: E7 1C 8E 00 CD 1A E8 1C  99 22 13 22 3B 20 3A 20  |........."."; : |
000016C0: 8F 20 57 49 4E 4E 45 52  2A 2A 2A 2A 2A 00 D9 1A  |. WINNER*****...|
000016D0: F2 1C 81 5A B2 31 A4 31  30 00 F0 1A FC 1C 3A 99  |...Z.1.10.....:.|
000016E0: A3 32 32 29 3B 22 2A 2A  2A 2A 2A 2A 2A 2A 2A 22  |.22);"*********"|
000016F0: 00 06 1B 06 1D 3A 99 A3  32 33 29 3B 22 12 59 4F  |.....:..23);".YO|
00001700: 55 20 57 4F 4E 22 00 0D  1B 10 1D 82 5A 00 23 1B  |U WON"......Z.#.|
00001710: 1A 1D 99 A3 32 32 29 3B  22 2A 2A 2A 2A 2A 2A 2A  |....22);"*******|
00001720: 2A 2A 22 00 48 1B 24 1D  99 22 11 11 12 44 4F 20  |**".H.$.."...DO |
00001730: 59 4F 55 20 57 41 4E 54  20 54 4F 20 50 4C 41 59  |YOU WANT TO PLAY|
00001740: 20 41 47 41 49 4E 3F 22  00 53 1B 2E 1D 8D 31 30  | AGAIN?".S....10|
00001750: 31 33 30 00 62 1B 38 1D  8B 58 41 24 B2 22 59 22  |130.b.8..XA$."Y"|
00001760: A7 8A 00 7C 1B 42 1D 8B  58 41 24 B2 22 4E 22 A7  |...|.B..XA$."N".|
00001770: 99 22 91 91 91 91 91 91  22 3B 3A 80 00 86 1B 47  |."......";:....G|
00001780: 1D 89 37 34 37 30 00 8C  1B 0F 27 80 00 CC 1B 74  |..7470....'....t|
00001790: 27 8B 58 58 24 B2 22 22  A7 58 58 24 B2 22 12 20  |'.XX$."".XX$.". |
000017A0: 48 49 54 20 53 50 41 43  45 20 54 4F 20 43 4F 4E  |HIT SPACE TO CON|
000017B0: 54 49 4E 55 45 20 92 22  20 3A 20 8F 20 47 45 54  |TINUE ." : . GET|
000017C0: 20 31 20 43 48 41 52 41  43 54 45 52 00 F2 1B 88  | 1 CHARACTER....|
000017D0: 27 8B 58 58 24 B3 B1 22  20 22 A7 99 58 58 24 3B  |'.XX$.." "..XX$;|
000017E0: 20 3A 20 8F 20 50 52 49  4E 54 20 4D 45 53 53 41  | : . PRINT MESSA|
000017F0: 47 45 00 18 1C 92 27 A1  58 41 24 3A 8B 58 41 24  |GE....'.XA$:.XA$|
00001800: B1 22 22 A7 31 30 31 33  30 3A 8F 20 43 4C 45 41  |."".10130:. CLEA|
00001810: 52 20 42 55 46 46 45 52  00 2F 1C 9C 27 A1 58 41  |R BUFFER./..'.XA|
00001820: 24 3A 8B 58 41 24 B2 22  22 A7 31 30 31 34 30 00  |$:.XA$."".10140.|
00001830: 3D 1C A6 27 58 41 B2 C5  28 58 41 24 29 00 4A 1C  |=..'XA..(XA$).J.|
00001840: D7 27 58 58 24 B2 22 22  3A 8E 00 8B 1C 04 29 58  |.'XX$."":.....)X|
00001850: 4C B2 C3 28 58 58 24 29  20 3A 20 8B 20 58 4C B2  |L..(XX$) : . XL.|
00001860: 30 20 A7 20 31 30 35 39  39 20 3A 20 8F 20 45 52  |0 . 10599 : . ER|
00001870: 52 4F 52 20 2D 20 52 45  54 55 52 4E 20 2D 20 53  |ROR - RETURN - S|
00001880: 4C 4F 57 20 50 52 49 4E  54 45 52 00 9B 1C 18 29  |LOW PRINTER....)|
00001890: 81 20 58 58 B2 31 20 A4  20 58 4C 00 AF 1C 22 29  |. XX.1 . XL...")|
000018A0: 3A 99 20 CA 28 58 58 24  2C 58 58 2C 31 29 3B 00  |:. .(XX$,XX,1);.|
000018B0: C8 1C 2C 29 3A 58 54 B2  54 49 20 3A 20 8F 20 53  |..,):XT.TI : . S|
000018C0: 45 54 20 54 49 4D 45 52  00 0F 1D 36 29 3A 8B 20  |ET TIMER...6):. |
000018D0: 58 54 AA 35 AC 53 50 B1  54 49 20 A7 20 31 30 35  |XT.5.SP.TI . 105|
000018E0: 35 30 20 3A 20 8F 20 54  48 45 20 35 20 43 41 4E  |50 : . THE 5 CAN|
000018F0: 20 42 45 20 56 41 52 49  45 44 20 46 4F 52 20 44  | BE VARIED FOR D|
00001900: 49 46 20 4C 45 4E 47 54  48 20 50 41 55 53 45 00  |IF LENGTH PAUSE.|
00001910: 18 1D 40 29 82 20 58 58  00 30 1D 4A 29 99 3A 8F  |..@). XX.0.J).:.|
00001920: 20 43 41 52 52 49 41 47  45 20 52 45 54 55 52 4E  | CARRIAGE RETURN|
00001930: 00 4C 1D 67 29 58 4C B2  30 3A 58 54 B2 30 3A 58  |.L.g)XL.0:XT.0:X|
00001940: 58 B2 30 3A 58 58 24 B2  22 22 3A 8E 00 00 00     |X.0:XX$."":.... |

..I....*** WORKS ON PET 2001-8, NEW PET/
CBM, BASIC 4.0, & CBM 8016 & 8032.A....*
**MARTIAN HUNT***.Z....***ORIGINAL PROGR
AM......***(C) 1980......***LEN LINDSAY.
.....***LAST REVISION 4/24/80......***US
ES MAIN SUBROUTINES 10100, 10500......59
468,12 : . GRAPHIC MODE."...XQ..(.TI) : 
. SEED RND.S....".";:ZP.B(50003):.ZP.ZP.
0:.B(34816).32.ZP.1...... ZP MEANS:  1=C
BM 8032 OR CBM 8016, 0=ALL OTHER MODELS 
PET/CBM...(.. .R(N)..(.(1).N.1) : . RND#
...2.....3.ZZ$."....................." :
 . 21 DELETE.".6.ZR$."..................
............" : . 30 RIGHT.O.8.ZD$."....
.................." : . 22 DOWN.|.:.ZS$.
"                     " : . 21 SPACE...<
.RM$.".".ZD$.ZS$.ZZ$...Y..NG.0.100.M.Z..
"DO YOU NEED INSTRUCTIONS?" : . 10130...
_..XA$."Y". . 5000 : . INSTRUCTIONS.#.D.
X0..R(10) : Y0..R(10) : . PICK HIDDEN PO
INT.D.I.ND.0 :NC.0:TC.0:. INITIALIZE.^.N
.. 6000 : . DRAW BOARD...X.X.5 : Y.5 : .
 INIT STARTING LOCATION OF MARKER.U.H.ML
.32768.(80.(80.ZP)).(Y.1).2.(X.1) : . CU
RRENT MARKER LOCATION...R.MC.B(ML) : . M
ARKER CHARACTER.".... ML, 81 : . HIGHLIG
HT MARKER LOCATION.G.... 10140 : . GET N
EXT MARKER MOVE.X.... ML, MC : . RETURN 
MARKER LOCATIN TO NORMAL...... XA.0 . 22
0 : . ILLEGAL CHOICE.K.... XA . 310,320,
330,340,350,360,370,380,390...... XA.5 .
 .ML,81:.400 : . GET RADIUS NEXT......X.
10 . X.10......Y.10 . Y.10.(."..X.1. X.1
.6.'..Y.1. Y.1.?.,..200.Q.6.X.X.1:Y.Y.1:
..].@.Y.Y.1:..O.J.X.X.1:Y.Y.1:..{.T.X.X.
1:....^.....H.X.X.1:....R.X.X.1:Y.Y.1:..
..|.Y.Y.1:......X.X.1:Y.Y.1:.......7000 
: . CLEAR RIGHT AREA......".";......Z.9.
1 . .1.....:. .24);Z.....:....... Z.0.B.
. .22);"OR 0 (TELEPORT)".6.L...X.Q.. .21
);"OR .X. (CANCEL DROP)".^.R...X.V..ZS$;
".WHAT RADIUS.?"......10130......XA$."X"
. .7000: .6800 : .ML,MC:.200 : . REDO DR
OP.V.... XA.0 . XA$.."0" . 480.....ND.ND
.1 : . UPDATE NET DROP COUNT...... ML, 4
2.....R.XA : . RADIUS.B...NC..(..R.R):. 
NET COST THIS DROP.O...TC.TC.NC.K....720
0:. CHECK IF IN NET......7000:. CLEAR RI
GHT AREA......R.0 . . 7300 : . 525 : . T
ELEPORTER ON......RM$;"NET RADIUS";R;"& 
COST";NC;NT$......:.7100:. UPDATE NET...
...6800......200.......)...."."; : . INS
TRUCTIONS.9...."........".B...XX$."THIS 
IS MARTIAN HUNT:" : .10500.H.........XX$
."CAPTURE THE DEADLY MARTIAN" : . 10500.
..........XX$."...IF YOU DARE" : . 10500
.K.... RM$;.V....10100......".";.....XX$
."YOU ARE THE CAPTAIN OF A STARSHIP" : .
 10500.......V...XX$."ORBITTING THE PLAN
ET MARS. IT IS YOUR" : . 10500.\........
.XX$."MISSION TO CAPTURE THE LAST REMAIN
ING" : . 10500.......W...XX$."MARTIAN. S
INCE IT IS THE LAST OF THEIR" : . 10500.
..........XX$."KIND YOU OF COURSE WILL N
OT ATTEMPT TO" : .10500...#...U.(.XX$."K
ILL IT, EVEN THOUGH IT IS EXTREMELY" : .
10500.[.-...W.2.XX$."DEADLY." : . 10500.
..<.. RM$;...F.. 10100...P..".";.O.Z.XX$
."IT WILL NOT BE EASY TO CAPTURE THE" : 
. 10500.U._.....D.XX$."MARTIAN. IT IS IN
VISIBLE, AND CAN NOT" : . 10500...I...Q.
N.XX$."BE SEEN OR DETECTED EVEN BY YOUR 
MODERN" : . 10500.W.S.....X.XX$."SCANNIN
G EQUIPMENT. HOWEVER, YOUR SHIPS" : . 10
500...}...S...XX$."SCIENTIST HAS PERFECT
ED A TYPE OF NET" : . 10500.Y.........XX
$."MADE OF FIBERS FROM A FORCE FIELD" : 
. 10500.......K...XX$."THAT CHANGE ENERG
Y LEVELS IF THEY" : . 10500.Q.....Z. .XX
$."CONTACT THE MARTIAN." : . 10500......
RM$;...... 10100......".";.V...XX$."HE C
AN MAKE THESE NETS ONLY IN CIRCULAR" : .
 10500...C.....H.XX$."SHAPE WITH A RADIU
S THAT IS AN" : . 10500...M...P.R.XX$."I
NTEGER. HE WILL MAKE AS MANY OF THESE" :
 . 10500.V.W.......XX$."NETS AS YOU NEED
, BUT THEY ARE VERY" : . 10500.......N..
.XX$."EXPENSIVE. THUS YOU SHOULD TRY TO 
USE" : . 10500.T.........XX$."VERY FEW N
ETS. YOU CHOOSE THE EXACT" : . 10500....
...I...XX$."POINT TO DROP THE NET, AND S
PECIFY" : . 10500.O.....O...XX$."ITS RAD
IUS." : . 10500.Y....RM$;......10100....
..".";.H.".XX$."AFTER THE NET IS DROPPED
 YOUR SCANNER" : . 10500.N.'.....,.XX$."
CAN MONITOR ITS ENERGY LEVEL. IF IT IS" 
: . 10500...1...A.6.XX$."HIGH YOU HAVE H
IT THE MARTIAN" : . 10500.G.;...X.@.XX$.
"(THE EDGE OF THE NET HIT HIM" : . 10500
.~.E.....J.XX$."OR IT IS COMPLETELY INSI
DE THE NET)." : . 10500...M.....O.XX$."T
HE RADIUS OF THE NET WILL BE PLOTTED" : 
. 10500...Q...5.T.XX$."AT YOUR DROP POIN
T. IF YOU SCORED A" : . 10500.;.W...Y.Y.
XX$."HIT IT WILL BE IN REVERSE FIELD LIK
E .5.." : . 10500..[.....^.XX$."IF YOU 
MISSED IT WILL BE PRINTED LIKE" : . 1050
0...A.....C.XX$."THIS: 5." : . 10500...R
..RM$;...W.. 10100...|..".";.5...XX$."YO
U SHOULD CHOOSE YOUR NET SIZE WITH" : . 
10500.;.....V...XX$."CARE. DROP THEM AT 
STATEGIC LOCATIONS." : . 10500.|........
.XX$."ONCE YOU THINK YOU KNOW ITS EXACT"
 : . 10500...........XX$."LOCATION YOU M
UST TELEPORT IT INTO" : . 10500.......-.
..XX$."YOUR SHIPS SPECIALLY DESIGNED CAG
E." : . 10500.3.....N.B.XX$."TO DO THIS,
 CHOOSE ITS LOCATION AS THE" : . 10500.T
.E.....G.XX$."DROP POINT. THEN SPECIFY A
 RADIUS OF" : . 10500...I.....L.XX$."ZER
O (0). THIS TRIGGERS THE TELEPORTER." : 
. 10500...Q..:..4.S.XX$."YOUR SCORE WILL
 BE CONSTANTLY MONITORED." : . 10500.>.V
..RM$;.J.... 10100.P.O...I.P.."."; : . D
RAW BOARD.X.Z.. Z.1 . 10.....:."W W W W 
W W W W W W .".....:."                  
  ."...... Z.Z...."...MARTIAN...HUNT....
."......".";.......23);" USE KEYPAD"....
...23);"TO MOVE YOUR".-.....23);"  SHIP 
 (Q)".3.....J.B...23);"   7  8  9".A.L..
.23);"    \ ^ / ".X.V...23);"     \!/  "
.......23);"   4_.*..6".......23);"     
/!\  ".......23);"    / ! \ ".T.....23);
"   1  2  3".Z...........23);"HIT 5 WHEN
 YOU".......23);" ARE AT YOUR ".(.&...23
);"  DROP POINT"...W...K.X..".";:. CLEAR
 RIGHT AREA.Y.B..Z.1 . 23.N.L.:..21);H(Z
S$,18).V.V.. Z.|.......... ND;" NET";:.N
D..1.."S";...F.." DROPPED / COST=";TC;".
"......... .D2.(X0.X).(X0.X).(Y0.Y).(Y0.
Y) : . DISTANCE VALUE FROM DROP TO MARTI
AN.9.*.R2.R.R : . DISTANCE VALUE OF RADI
US OF NET.}.4.NT$."MISSED":.ML,XA.48:. R
2..D2 . NT$.".HIT." : . ML, XA.48.128...
.........RM$;"TELEPORTER ";NT$......D2.0
.7400.......M...."."; : . WINNER*****.Y.
...Z.1.10.....:..22);"*********".....:..
23);".YOU WON"......Z.#.....22);"*******
**".H.$.."...DO YOU WANT TO PLAY AGAIN?"
.S....10130.B.8..XA$."Y"...|.B..XA$."N".
."......";:....G..7470....'..L.T'.XX$.""
.XX$.". HIT SPACE TO CONTINUE ." : . GET
 1 CHARACTER....'.XX$.." "..XX$; : . PRI
NT MESSAGE....'.XA$:.XA$."".10130:. CLEA
R BUFFER./..'.XA$:.XA$."".10140.=..'XA.E
(XA$).J.W'XX$."":.....)XL.C(XX$) : . XL.
0 . 10599 : . ERROR - RETURN - SLOW PRIN
TER....). XX.1 . XL..."):. J(XX$,XX,1);.
H.,):XT.TI : . SET TIMER...6):. XT.5.SP.
TI . 10550 : . THE 5 CAN BE VARIED FOR D
IF LENGTH PAUSE...@). XX.0.J).:. CARRIAG
E RETURN.L.G)XL.0:XT.0:XX.0:XX$."":....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL