NOMAD
FILE INFORMATION
FILENAME(S): NOMAD
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-11-30 21:07:05
APPEARS ON: 1 disk(s)
FILE HASH
051607ab5e82bca45f6ee8eb97907cad244506931c7d391875fe11e110f730d2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PET GAMES 02 | NOMAD | PRG | DuncanTwain | 27 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0A 04 05 00 99 22 93 22 00 1C 04 0A 00 99 |......."."......|
00000010: A3 32 36 29 3B 22 4E 4F 4D 41 44 22 00 3B 04 14 |.26);"NOMAD".;..|
00000020: 00 99 A3 32 30 29 3B 22 43 52 45 41 54 49 56 45 |...20);"CREATIVE|
00000030: 20 43 4F 4D 50 55 54 49 4E 47 22 00 5E 04 1E 00 | COMPUTING".^...|
00000040: 99 A3 31 38 29 3B 22 4D 4F 52 52 49 53 54 4F 57 |..18);"MORRISTOW|
00000050: 4E 2C 20 4E 45 57 20 4A 45 52 53 45 59 22 00 90 |N, NEW JERSEY"..|
00000060: 04 88 04 86 4B 24 28 33 30 29 2C 44 28 32 2C 32 |....K$(30),D(2,2|
00000070: 29 2C 52 28 33 30 2C 33 30 29 2C 45 28 33 30 2C |),R(30,30),E(30,|
00000080: 33 30 29 2C 50 28 38 2C 32 29 2C 43 28 33 30 29 |30),P(8,2),C(30)|
00000090: 00 9B 04 92 04 86 57 28 33 30 29 00 A7 04 9C 04 |......W(30).....|
000000A0: 86 4E 24 28 33 30 29 00 BC 04 A6 04 8F 2A 2A 47 |.N$(30)......**G|
000000B0: 4F 53 55 42 20 52 55 4C 45 53 2A 2A 00 C6 04 B0 |OSUB RULES**....|
000000C0: 04 8D 33 33 34 30 00 DE 04 BA 04 8F 2A 2A 52 41 |..3340......**RA|
000000D0: 4E 44 4F 4D 20 4E 55 4D 42 45 52 53 2A 2A 00 F5 |NDOM NUMBERS**..|
000000E0: 04 C4 04 96 A5 41 28 58 29 B2 B5 28 BB 28 31 29 |.....A(X)..(.(1)|
000000F0: AC 58 29 AA 31 00 09 05 CE 04 8F 2A 2A 23 20 4F |.X).1......**# O|
00000100: 46 20 52 4F 41 44 53 2A 2A 00 10 05 D8 04 87 4E |F ROADS**......N|
00000110: 00 1B 05 E2 04 81 52 B2 31 A4 4E 00 32 05 EC 04 |......R.1.N.2...|
00000120: 8F 2A 2A 23 20 4F 46 20 49 4E 54 45 52 53 45 43 |.**# OF INTERSEC|
00000130: 2A 2A 00 39 05 F6 04 87 51 00 47 05 00 05 43 28 |**.9....Q.G...C(|
00000140: 52 29 B2 B6 28 51 29 00 55 05 0A 05 8B 51 B3 30 |R)..(Q).U....Q.0|
00000150: A7 31 33 32 30 00 60 05 14 05 57 28 52 29 B2 31 |.1320.`...W(R).1|
00000160: 00 6A 05 1E 05 89 31 33 33 30 00 76 05 28 05 57 |.j....1330.v.(.W|
00000170: 28 52 29 B2 AB 31 00 8B 05 32 05 8F 2A 2A 44 49 |(R)..1...2..**DI|
00000180: 52 45 43 2E 20 52 4F 41 44 2A 2A 00 99 05 3C 05 |REC. ROAD**...<.|
00000190: 81 4A B2 31 A4 43 28 52 29 00 AC 05 46 05 87 45 |.J.1.C(R)...F..E|
000001A0: 28 52 2C 4A 29 2C 52 28 52 2C 4A 29 00 B3 05 50 |(R,J),R(R,J)...P|
000001B0: 05 82 4A 00 BA 05 5A 05 82 52 00 C9 05 64 05 8F |..J...Z..R...d..|
000001C0: 2A 2A 4E 41 4D 45 3F 2A 2A 00 E3 05 6E 05 99 22 |**NAME?**...n.."|
000001D0: 57 48 41 54 20 49 53 20 59 4F 55 52 20 4E 41 4D |WHAT IS YOUR NAM|
000001E0: 45 22 3B 00 EB 05 78 05 85 4E 24 00 06 06 82 05 |E";...x..N$.....|
000001F0: 8F 2A 2A 4F 50 45 4E 49 4E 47 20 53 54 41 54 45 |.**OPENING STATE|
00000200: 4D 45 4E 54 2A 2A 00 1B 06 8C 05 99 3A 99 22 2A |MENT**......:."*|
00000210: 47 4F 4F 44 20 4C 55 43 4B 2A 22 00 32 06 A0 05 |GOOD LUCK*".2...|
00000220: 8F 2A 2A 47 52 41 4D 4D 41 53 20 48 4F 55 53 45 |.**GRAMMAS HOUSE|
00000230: 2A 2A 00 3F 06 AA 05 48 31 B2 A5 41 28 4E 29 00 |**.?...H1..A(N).|
00000240: 50 06 B4 05 48 32 B2 A5 41 28 43 28 48 31 29 29 |P...H2..A(C(H1))|
00000250: 00 67 06 BE 05 8F 2A 2A 44 52 55 4E 4B 20 44 52 |.g....**DRUNK DR|
00000260: 49 56 45 52 53 2A 2A 00 77 06 D2 05 8F 2A 2A 50 |IVERS**.w....**P|
00000270: 4F 4C 49 43 45 2A 2A 00 82 06 DC 05 81 41 B2 31 |OLICE**......A.1|
00000280: A4 38 00 93 06 E6 05 50 28 41 2C 31 29 B2 A5 41 |.8.....P(A,1)..A|
00000290: 28 4E 29 00 AC 06 F0 05 50 28 41 2C 32 29 B2 A5 |(N).....P(A,2)..|
000002A0: 41 28 43 28 50 28 41 2C 31 29 29 29 00 B3 06 FA |A(C(P(A,1)))....|
000002B0: 05 82 41 00 D8 06 04 06 8F 2A 2A 4C 52 41 43 20 |..A......**LRAC |
000002C0: 4E 49 4C 4B 4E 41 52 46 20 4E 41 4D 47 52 45 42 |NILKNARF NAMGREB|
000002D0: 20 4C 4F 44 47 45 2A 2A 00 E0 06 0E 06 52 B2 31 | LODGE**.....R.1|
000002E0: 00 E8 06 18 06 4A B2 30 00 F0 06 22 06 49 B2 31 |.....J.0...".I.1|
000002F0: 00 05 07 2C 06 8F 2A 2A 47 4F 53 55 42 20 43 48 |...,..**GOSUB CH|
00000300: 45 43 4B 2A 2A 00 0F 07 36 06 8D 32 35 32 30 00 |ECK**...6..2520.|
00000310: 27 07 40 06 8F 2A 2A 47 4F 53 55 42 20 54 45 4C |'.@..**GOSUB TEL|
00000320: 45 47 52 41 4D 2A 2A 00 31 07 4A 06 8D 32 35 37 |EGRAM**.1.J..257|
00000330: 30 00 48 07 54 06 8F 2A 2A 41 44 44 20 49 4E 43 |0.H.T..**ADD INC|
00000340: 52 45 4D 45 4E 54 2A 2A 00 52 07 5E 06 4A B2 4A |REMENT**.R.^.J.J|
00000350: AA 31 00 68 07 68 06 8F 2A 2A 4E 45 45 44 20 52 |.1.h.h..**NEED R|
00000360: 45 50 41 49 52 3F 2A 2A 00 7B 07 72 06 8B A5 41 |EPAIR?**.{.r...A|
00000370: 28 31 30 29 B2 31 A7 32 39 34 30 00 8E 07 7C 06 |(10).1.2940...|.|
00000380: 8F 2A 2A 44 45 41 44 20 45 4E 44 3F 2A 2A 00 A3 |.**DEAD END?**..|
00000390: 07 86 06 8B 4A B1 43 28 52 29 B0 4A B2 30 A7 33 |....J.C(R).J.0.3|
000003A0: 30 36 30 00 B6 07 90 06 8F 2A 2A 44 49 52 45 43 |060......**DIREC|
000003B0: 54 49 4F 4E 2A 2A 00 C5 07 9A 06 8B 49 B2 AB 31 |TION**......I..1|
000003C0: A7 31 37 32 30 00 D2 07 A4 06 44 B2 45 28 52 2C |.1720.....D.E(R,|
000003D0: 4A 29 00 DC 07 AE 06 89 31 37 33 30 00 EB 07 B8 |J)......1730....|
000003E0: 06 44 B2 39 AB 45 28 52 2C 4A 29 00 02 08 C2 06 |.D.9.E(R,J).....|
000003F0: 8F 2A 2A 52 4F 41 44 20 43 52 4F 53 53 49 4E 47 |.**ROAD CROSSING|
00000400: 2A 2A 00 0F 08 CC 06 43 B2 52 28 52 2C 4A 29 00 |**.....C.R(R,J).|
00000410: 22 08 D6 06 8F 2A 2A 53 4B 49 50 20 4C 49 4E 45 |"....**SKIP LINE|
00000420: 2A 2A 00 28 08 E0 06 99 00 4C 08 EA 06 8F 2A 2A |**.(.....L....**|
00000430: 47 4F 53 55 42 20 2A 44 49 52 45 43 2C 52 4F 41 |GOSUB *DIREC,ROA|
00000440: 44 20 4F 4E 2A 50 52 49 4E 54 2A 2A 00 56 08 F4 |D ON*PRINT**.V..|
00000450: 06 8D 32 36 38 30 00 6A 08 FE 06 8F 2A 2A 41 54 |..2680.j....**AT|
00000460: 20 47 52 41 4D 4D 41 53 2A 2A 00 89 08 08 07 8B | GRAMMAS**......|
00000470: 48 31 B2 52 AF 52 28 52 2C 4A 29 B2 52 28 48 31 |H1.R.R(R,J).R(H1|
00000480: 2C 48 32 29 A7 32 38 38 30 00 A8 08 12 07 8B 48 |,H2).2880......H|
00000490: 31 B2 52 28 52 2C 4A 29 AF 52 B2 52 28 48 31 2C |1.R(R,J).R.R(H1,|
000004A0: 48 32 29 A7 32 38 38 30 00 BA 08 1C 07 8F 2A 2A |H2).2880......**|
000004B0: 4A 55 4E 43 54 49 4F 4E 2A 2A 00 DD 08 26 07 99 |JUNCTION**...&..|
000004C0: 22 4A 55 4E 43 54 49 4F 4E 3A 20 52 4F 41 44 20 |"JUNCTION: ROAD |
000004D0: 23 22 3B 52 3B 22 20 24 20 23 22 3B 43 00 FB 08 |#";R;" $ #";C...|
000004E0: 30 07 8F 2A 2A 41 53 4B 20 57 48 41 54 20 57 41 |0..**ASK WHAT WA|
000004F0: 59 20 54 4F 20 54 55 52 4E 2A 2A 00 22 09 3A 07 |Y TO TURN**.".:.|
00000500: 99 22 46 4F 52 57 41 52 44 2C 20 4C 45 46 54 2C |."FORWARD, LEFT,|
00000510: 20 52 49 47 48 54 20 4F 52 20 55 2D 54 55 52 4E | RIGHT OR U-TURN|
00000520: 22 3B 00 2A 09 44 07 85 49 24 00 40 09 58 07 8B |";.*.D..I$.@.X..|
00000530: C8 28 49 24 2C 31 29 B2 22 46 22 A7 32 30 38 30 |.(I$,1)."F".2080|
00000540: 00 56 09 62 07 8B C8 28 49 24 2C 31 29 B2 22 52 |.V.b...(I$,1)."R|
00000550: 22 A7 31 39 37 30 00 6C 09 6C 07 8B C8 28 49 24 |".1970.l.l...(I$|
00000560: 2C 31 29 B2 22 4C 22 A7 31 39 39 30 00 82 09 76 |,1)."L".1990...v|
00000570: 07 8B C8 28 49 24 2C 31 29 B2 22 55 22 A7 31 39 |...(I$,1)."U".19|
00000580: 35 30 00 92 09 80 07 8F 2A 2A 47 4F 4F 46 45 44 |50......**GOOFED|
00000590: 2A 2A 00 A8 09 8A 07 99 22 2A 2A 59 4F 55 20 47 |**......"**YOU G|
000005A0: 4F 4F 46 45 44 2A 2A 22 00 B2 09 94 07 89 31 38 |OOFED**"......18|
000005B0: 35 30 00 BC 09 9E 07 49 B2 31 AC 49 00 C6 09 A8 |50.....I.1.I....|
000005C0: 07 89 32 30 38 30 00 D3 09 B2 07 49 B2 57 28 52 |..2080.....I.W(R|
000005D0: 29 AC 49 00 DD 09 BC 07 89 32 30 30 30 00 ED 09 |).I......2000...|
000005E0: C6 07 49 B2 AB 31 AC 57 28 52 29 AC 49 00 FB 09 |..I..1.W(R).I...|
000005F0: D0 07 81 41 B2 31 A4 43 28 43 29 00 0E 0A DA 07 |...A.1.C(C).....|
00000600: 8B 52 28 43 2C 41 29 B2 52 A7 32 30 34 30 00 15 |.R(C,A).R.2040..|
00000610: 0A E4 07 82 41 00 1F 0A EE 07 89 34 32 31 30 00 |....A......4210.|
00000620: 27 0A F8 07 52 B2 43 00 2F 0A 02 08 4A B2 41 00 |'...R.C./...J.A.|
00000630: 3E 0A 0C 08 8F 2A 2A 44 41 52 45 3F 2A 2A 00 50 |>....**DARE?**.P|
00000640: 0A 16 08 8B A5 41 28 34 29 B2 31 A7 32 33 36 30 |.....A(4).1.2360|
00000650: 00 5F 0A 20 08 8F 2A 2A 53 50 45 45 44 2A 2A 00 |._. ..**SPEED**.|
00000660: 6D 0A 2A 08 99 22 53 50 45 45 44 22 3B 00 74 0A |m.*.."SPEED";.t.|
00000670: 34 08 85 53 00 97 0A 3E 08 8F 2A 2A 44 41 4E 47 |4..S...>..**DANG|
00000680: 45 52 4F 55 53 49 54 59 20 43 52 41 53 48 20 43 |EROUSITY CRASH C|
00000690: 48 45 43 4B 53 2A 2A 00 A7 0A 48 08 8B 53 B1 31 |HECKS**...H..S.1|
000006A0: 30 30 A7 33 31 39 30 00 B6 0A 52 08 8B 53 B3 33 |00.3190...R..S.3|
000006B0: 30 A7 33 32 32 30 00 C8 0A 5C 08 8F 2A 2A 49 4C |0.3220...\..**IL|
000006C0: 4C 45 47 41 4C 3F 2A 2A 00 D7 0A 66 08 8B 53 B1 |LEGAL?**...f..S.|
000006D0: 35 35 A7 33 30 39 30 00 F4 0A 70 08 8F 2A 2A 44 |55.3090...p..**D|
000006E0: 52 55 4E 4B 20 44 52 49 56 45 52 53 20 44 52 49 |RUNK DRIVERS DRI|
000006F0: 56 45 2A 2A 00 FF 0A 7A 08 81 41 B2 31 A4 32 00 |VE**...z..A.1.2.|
00000700: 12 0B 84 08 8B 44 28 41 2C 31 29 B2 30 A7 32 32 |.....D(A,1).0.22|
00000710: 31 30 00 23 0B 8E 08 44 28 41 2C 31 29 B2 A5 41 |10.#...D(A,1)..A|
00000720: 28 4E 29 00 3C 0B 98 08 44 28 41 2C 32 29 B2 A5 |(N).<...D(A,2)..|
00000730: 41 28 43 28 44 28 41 2C 31 29 29 29 00 43 0B A2 |A(C(D(A,1))).C..|
00000740: 08 82 41 00 61 0B AC 08 8F 2A 2A 48 49 54 20 42 |..A.a....**HIT B|
00000750: 59 20 44 52 55 4E 4B 20 44 52 49 56 45 52 3F 2A |Y DRUNK DRIVER?*|
00000760: 2A 00 6C 0B B6 08 81 41 B2 31 A4 32 00 7F 0B C0 |*.l....A.1.2....|
00000770: 08 8B 44 28 41 2C 31 29 B2 30 A7 32 32 37 30 00 |..D(A,1).0.2270.|
00000780: A3 0B CA 08 8B 44 28 41 2C 31 29 B2 52 AF 52 28 |.....D(A,1).R.R(|
00000790: 52 2C 4A 29 B2 52 28 44 28 41 2C 31 29 29 A7 32 |R,J).R(D(A,1)).2|
000007A0: 39 31 30 00 CE 0B D4 08 8B 44 28 41 2C 31 29 B2 |910......D(A,1).|
000007B0: 52 28 52 2C 4A 29 AF 52 28 44 28 41 2C 31 29 2C |R(R,J).R(D(A,1),|
000007C0: 44 28 41 2C 32 29 29 B2 52 A7 32 39 31 30 00 D5 |D(A,2)).R.2910..|
000007D0: 0B DE 08 82 41 00 F0 0B E8 08 8F 2A 2A 49 53 20 |....A......**IS |
000007E0: 44 52 49 56 45 52 20 43 41 55 47 48 54 3F 2A 2A |DRIVER CAUGHT?**|
000007F0: 00 FB 0B F2 08 81 41 B2 31 A4 32 00 0E 0C FC 08 |......A.1.2.....|
00000800: 8B 44 28 41 2C 31 29 B2 30 A7 32 33 34 30 00 19 |.D(A,1).0.2340..|
00000810: 0C 06 09 81 42 B2 31 A4 38 00 3F 0C 10 09 8B 44 |....B.1.8.?....D|
00000820: 28 41 2C 31 29 B2 50 28 42 2C 31 29 AF 44 28 41 |(A,1).P(B,1).D(A|
00000830: 2C 32 29 B2 50 28 42 2C 32 29 A7 32 34 30 30 00 |,2).P(B,2).2400.|
00000840: 46 0C 1A 09 82 42 00 4D 0C 24 09 82 41 00 57 0C |F....B.M.$..A.W.|
00000850: 2E 09 89 31 36 32 30 00 71 0C 38 09 8F 2A 2A 53 |...1620.q.8..**S|
00000860: 50 45 45 44 20 44 41 52 45 20 50 52 49 4E 54 2A |PEED DARE PRINT*|
00000870: 2A 00 8B 0C 42 09 91 A5 41 28 33 29 89 32 33 38 |*...B...A(3).238|
00000880: 30 2C 32 34 30 30 2C 32 34 32 30 00 B5 0C 4C 09 |0,2400,2420...L.|
00000890: 99 22 49 20 44 41 52 45 20 59 4F 55 20 54 4F 20 |."I DARE YOU TO |
000008A0: 53 50 45 45 44 20 2A 2A 20 28 44 41 52 45 44 45 |SPEED ** (DAREDE|
000008B0: 56 49 4C 29 22 00 BF 0C 56 09 89 32 34 33 30 00 |VIL)"...V..2430.|
000008C0: E5 0C 60 09 99 22 2A 53 50 45 45 44 49 4E 47 2A |..`.."*SPEEDING*|
000008D0: 20 49 53 20 46 55 4E 20 28 53 4F 20 44 4F 20 49 | IS FUN (SO DO I|
000008E0: 54 29 21 21 22 00 EF 0C 6A 09 89 32 34 33 30 00 |T)!!"...j..2430.|
000008F0: 1C 0D 74 09 99 22 2A 53 50 45 45 44 2A 20 49 20 |..t.."*SPEED* I |
00000900: 44 41 52 45 20 59 4F 55 20 2A 53 50 45 45 44 2A |DARE YOU *SPEED*|
00000910: 20 49 20 44 41 52 45 20 59 4F 55 22 00 26 0D 7E | I DARE YOU".&.~|
00000920: 09 89 32 30 38 30 00 3C 0D 88 09 8F 2A 2A 44 52 |..2080.<....**DR|
00000930: 55 4E 4B 20 43 41 55 47 48 54 2A 2A 00 67 0D 92 |UNK CAUGHT**.g..|
00000940: 09 99 22 41 20 44 52 55 4E 4B 20 44 52 49 56 45 |.."A DRUNK DRIVE|
00000950: 52 20 48 41 53 20 42 45 45 4E 20 43 41 55 47 48 |R HAS BEEN CAUGH|
00000960: 54 2E 20 54 48 45 22 00 91 0D 97 09 99 22 50 4F |T. THE"......"PO|
00000970: 4C 49 43 45 4D 41 4E 20 57 48 4F 20 41 52 52 45 |LICEMAN WHO ARRE|
00000980: 53 54 45 44 20 48 49 4D 20 57 49 4C 4C 20 42 45 |STED HIM WILL BE|
00000990: 22 00 BC 0D 9C 09 99 22 54 45 53 54 49 46 59 49 |"......"TESTIFYI|
000009A0: 4E 47 20 41 54 20 43 4F 55 52 54 20 46 4F 52 20 |NG AT COURT FOR |
000009B0: 54 48 45 20 52 45 53 54 20 4F 46 22 00 CD 0D A6 |THE REST OF"....|
000009C0: 09 99 22 54 48 45 20 47 41 4D 45 2E 22 00 D3 0D |.."THE GAME."...|
000009D0: B0 09 99 00 FB 0D BA 09 44 28 41 2C 31 29 B2 30 |........D(A,1).0|
000009E0: 3A 44 28 41 2C 32 29 B2 30 3A 50 28 42 2C 31 29 |:D(A,2).0:P(B,1)|
000009F0: B2 30 3A 50 28 42 2C 32 29 B2 30 00 05 0E C4 09 |.0:P(B,2).0.....|
00000A00: 89 31 36 32 30 00 14 0E CE 09 8F 2A 2A 43 48 45 |.1620......**CHE|
00000A10: 43 4B 2A 2A 00 1F 0E D8 09 81 41 B2 31 A4 38 00 |CK**......A.1.8.|
00000A20: 4D 0E E2 09 8B 48 31 B2 50 28 41 2C 31 29 AF 52 |M....H1.P(A,1).R|
00000A30: 28 48 31 2C 48 32 29 B2 52 28 50 28 41 2C 31 29 |(H1,H2).R(P(A,1)|
00000A40: 2C 50 28 41 2C 32 29 29 A7 31 34 34 30 00 7B 0E |,P(A,2)).1440.{.|
00000A50: EC 09 8B 48 31 B2 52 28 50 28 41 2C 31 29 2C 50 |...H1.R(P(A,1),P|
00000A60: 28 41 2C 32 29 29 AF 52 28 48 31 2C 48 32 29 B2 |(A,2)).R(H1,H2).|
00000A70: 50 28 41 2C 31 29 A7 31 34 34 30 00 82 0E F6 09 |P(A,1).1440.....|
00000A80: 82 41 00 88 0E 00 0A 8E 00 A3 0E 0A 0A 8F 2A 2A |.A............**|
00000A90: 54 45 4C 45 47 52 41 4D 20 50 52 49 4E 54 20 55 |TELEGRAM PRINT U|
00000AA0: 50 2A 2A 00 A9 0E 14 0A 99 00 BD 0E 1E 0A 99 22 |P**............"|
00000AB0: 44 45 41 52 20 22 3B 4E 24 3B 22 2C 22 00 E6 0E |DEAR ";N$;","...|
00000AC0: 28 0A 99 22 48 4F 57 20 41 52 45 20 59 4F 55 3F |(.."HOW ARE YOU?|
00000AD0: 20 49 20 4C 49 56 45 20 41 54 20 54 48 45 20 43 | I LIVE AT THE C|
00000AE0: 4F 52 4E 45 52 22 00 0F 0F 32 0A 99 22 4F 46 20 |ORNER"...2.."OF |
00000AF0: 52 4F 41 44 20 23 22 3B 48 31 3B 22 24 20 23 22 |ROAD #";H1;"$ #"|
00000B00: 3B 52 28 48 31 2C 48 32 29 3B 22 21 21 21 22 00 |;R(H1,H2);"!!!".|
00000B10: 24 0F 3C 0A 99 22 43 4F 4D 45 20 4F 4E 20 4F 56 |$.<.."COME ON OV|
00000B20: 45 52 2E 22 00 45 0F 46 0A 99 22 20 20 20 20 20 |ER.".E.F.." |
00000B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4C | L|
00000B40: 4F 56 45 2C 22 00 67 0F 50 0A 99 22 20 20 20 20 |OVE,".g.P.." |
00000B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B60: 47 52 41 4D 4D 41 22 00 6D 0F 55 0A 99 00 96 0F |GRAMMA".m.U.....|
00000B70: 5A 0A 99 22 28 28 54 45 4C 45 47 52 41 4D 4D 41 |Z.."((TELEGRAMMA|
00000B80: 20 43 4F 52 50 2E 20 54 45 4C 45 47 52 41 4D 20 | CORP. TELEGRAM |
00000B90: 43 4F 2E 29 29 22 00 9C 0F 64 0A 99 00 A2 0F 6E |CO.))"...d.....n|
00000BA0: 0A 8E 00 C5 0F 78 0A 8F 2A 2A 44 49 52 45 43 2C |.....x..**DIREC,|
00000BB0: 20 52 4F 41 44 20 4F 4E 20 2A 20 50 52 49 4E 54 | ROAD ON * PRINT|
00000BC0: 20 55 50 2A 2A 00 D4 0F 82 0A 99 22 47 4F 49 4E | UP**......"GOIN|
00000BD0: 47 20 22 3B 00 03 10 8C 0A 91 44 89 32 37 31 30 |G ";......D.2710|
00000BE0: 2C 32 37 33 30 2C 32 37 35 30 2C 32 37 37 30 2C |,2730,2750,2770,|
00000BF0: 32 37 39 30 2C 32 38 31 30 2C 32 38 33 30 2C 32 |2790,2810,2830,2|
00000C00: 38 35 30 00 11 10 96 0A 99 22 4E 4F 52 54 48 22 |850......"NORTH"|
00000C10: 3B 00 1B 10 A0 0A 89 32 38 36 30 00 28 10 AA 0A |;......2860.(...|
00000C20: 99 22 57 45 53 54 22 3B 00 32 10 B4 0A 89 32 38 |."WEST";.2....28|
00000C30: 36 30 00 44 10 BE 0A 99 22 4E 4F 52 54 48 45 41 |60.D...."NORTHEA|
00000C40: 53 54 22 3B 00 4E 10 C8 0A 89 32 38 36 30 00 60 |ST";.N....2860.`|
00000C50: 10 D2 0A 99 22 53 4F 55 54 48 45 41 53 54 22 3B |...."SOUTHEAST";|
00000C60: 00 6A 10 DC 0A 89 32 38 36 30 00 7C 10 E6 0A 99 |.j....2860.|....|
00000C70: 22 4E 4F 52 54 48 57 45 53 54 22 3B 00 86 10 F0 |"NORTHWEST";....|
00000C80: 0A 89 32 38 36 30 00 98 10 FA 0A 99 22 53 4F 55 |..2860......"SOU|
00000C90: 54 48 57 45 53 54 22 3B 00 A2 10 04 0B 89 32 38 |THWEST";......28|
00000CA0: 36 30 00 AF 10 0E 0B 99 22 45 41 53 54 22 3B 00 |60......"EAST";.|
00000CB0: B9 10 18 0B 89 32 38 36 30 00 C7 10 22 0B 99 22 |.....2860...".."|
00000CC0: 53 4F 55 54 48 22 3B 00 DB 10 2C 0B 99 22 20 4F |SOUTH";...,.." O|
00000CD0: 4E 20 52 4F 41 44 20 23 22 3B 52 00 E1 10 38 0B |N ROAD #";R...8.|
00000CE0: 8E 00 FD 10 40 0B 8F 2A 2A 41 54 20 47 52 41 4D |....@..**AT GRAM|
00000CF0: 4D 41 53 20 2A 20 50 52 49 4E 54 2A 2A 00 2B 11 |MAS * PRINT**.+.|
00000D00: 4A 0B 99 22 59 4F 55 20 4D 41 44 45 20 49 54 20 |J.."YOU MADE IT |
00000D10: 54 4F 20 47 52 41 4D 4D 41 53 20 48 4F 55 53 45 |TO GRAMMAS HOUSE|
00000D20: 21 21 21 21 21 21 21 21 21 21 22 00 35 11 54 0B |!!!!!!!!!!".5.T.|
00000D30: 89 33 32 34 30 00 58 11 5E 0B 8F 2A 2A 44 52 55 |.3240.X.^..**DRU|
00000D40: 4E 4B 20 48 49 54 20 59 4F 55 52 20 43 41 52 20 |NK HIT YOUR CAR |
00000D50: 2A 50 52 49 4E 54 2A 2A 00 85 11 68 0B 99 22 4B |*PRINT**...h.."K|
00000D60: 45 52 53 50 4C 41 54 54 2D 2D 44 52 55 4E 4B 20 |ERSPLATT--DRUNK |
00000D70: 44 52 49 56 45 52 20 48 49 54 20 59 4F 55 52 20 |DRIVER HIT YOUR |
00000D80: 43 41 52 2E 22 00 8F 11 72 0B 89 33 32 34 30 00 |CAR."...r..3240.|
00000D90: B3 11 7C 0B 8F 2A 2A 43 41 52 20 4E 45 45 44 53 |..|..**CAR NEEDS|
00000DA0: 20 46 49 58 49 4E 47 20 2A 50 52 49 4E 54 20 55 | FIXING *PRINT U|
00000DB0: 50 2A 2A 00 D7 11 86 0B 91 A5 41 28 35 29 89 32 |P**.......A(5).2|
00000DC0: 39 36 30 2C 32 39 38 30 2C 33 30 30 30 2C 33 30 |960,2980,3000,30|
00000DD0: 32 30 2C 33 30 34 30 00 EE 11 90 0B 99 22 50 4F |20,3040......"PO|
00000DE0: 50 2E 2E 2E 46 4C 41 54 20 54 49 52 45 22 00 F8 |P...FLAT TIRE"..|
00000DF0: 11 9A 0B 89 33 30 35 30 00 1F 12 A4 0B 99 22 46 |....3050......"F|
00000E00: 4C 49 50 2E 2E 2E 59 4F 55 52 20 43 41 52 20 44 |LIP...YOUR CAR D|
00000E10: 49 44 20 41 20 53 55 4D 45 52 53 41 4C 54 22 00 |ID A SUMERSALT".|
00000E20: 29 12 AE 0B 89 33 30 35 30 00 3D 12 B8 0B 99 22 |)....3050.=...."|
00000E30: 2A 4F 55 54 20 4F 46 20 47 41 53 2A 22 00 47 12 |*OUT OF GAS*".G.|
00000E40: C2 0B 89 33 30 35 30 00 6F 12 CC 0B 99 22 53 4D |...3050.o...."SM|
00000E50: 4F 4F 53 48 2E 2E 2E 42 55 53 20 46 4C 41 54 54 |OOSH...BUS FLATT|
00000E60: 45 4E 45 44 20 59 4F 55 52 20 43 41 52 2E 22 00 |ENED YOUR CAR.".|
00000E70: 79 12 D6 0B 89 33 30 35 30 00 9D 12 E0 0B 99 22 |y....3050......"|
00000E80: 50 4F 50 2E 2E 2E 42 55 4C 4C 44 4F 47 20 41 54 |POP...BULLDOG AT|
00000E90: 45 20 59 4F 55 52 20 54 49 52 45 21 22 00 A7 12 |E YOUR TIRE!"...|
00000EA0: EA 0B 89 33 32 34 30 00 BF 12 F4 0B 8F 2A 2A 44 |...3240......**D|
00000EB0: 45 41 44 20 45 4E 44 20 50 52 49 4E 54 2A 2A 00 |EAD END PRINT**.|
00000EC0: D1 12 FE 0B 99 22 2A 44 45 41 44 20 45 4E 44 2A |....."*DEAD END*|
00000ED0: 22 00 DB 12 08 0C 89 33 32 34 30 00 ED 12 12 0C |"......3240.....|
00000EE0: 8F 2A 2A 53 50 45 45 44 49 4E 47 2A 2A 00 FF 12 |.**SPEEDING**...|
00000EF0: 1C 0C 99 22 2A 53 50 45 45 44 49 4E 47 2A 22 00 |..."*SPEEDING*".|
00000F00: 1A 13 26 0C 8F 2A 2A 43 41 55 47 48 54 20 42 59 |..&..**CAUGHT BY|
00000F10: 20 50 4F 4C 49 43 45 3F 2A 2A 00 25 13 30 0C 81 | POLICE?**.%.0..|
00000F20: 58 B2 31 A4 38 00 41 13 3A 0C 8B 50 28 58 2C 31 |X.1.8.A.:..P(X,1|
00000F30: 29 B2 52 AF 50 28 58 2C 31 29 B2 4A A7 33 31 37 |).R.P(X,1).J.317|
00000F40: 30 00 48 13 44 0C 82 58 00 00 00 |0.H.D..X... |
.......".".......26);"NOMAD".;.....20);"
CREATIVE COMPUTING".^.....18);"MORRISTOW
N, NEW JERSEY"......K$(30),D(2,2),R(30,3
0),E(30,30),P(8,2),C(30)......W(30).....
.N$(30)......**GOSUB RULES**.F....3340..
....**RANDOM NUMBERS**...D...A(X)..(.(1)
.X).1...N..**# OF ROADS**...X..N......R.
1.N.2....**# OF INTERSEC**.9....Q.G...C(
R)..(Q).U....Q.0.1320.`...W(R).1.J....13
30.V.(.W(R)..1...2..**DIREC. ROAD**...<.
.J.1.C(R)...F..E(R,J),R(R,J)...P..J...Z.
.R.I.D..**NAME?**...N.."WHAT IS YOUR NAM
E";...X..N$......**OPENING STATEMENT**..
....:."*GOOD LUCK*".2. ..**GRAMMAS HOUSE
**.?...H1..A(N).P...H2..A(C(H1)).G....**
DRUNK DRIVERS**.W.R..**POLICE**......A.1
.8.....P(A,1)..A(N).....P(A,2)..A(C(P(A,
1)))......A.X....**LRAC NILKNARF NAMGREB
LODGE**.....R.1.....J.0...".I.1...,..**
GOSUB CHECK**...6..2520.'.@..**GOSUB TEL
EGRAM**.1.J..2570.H.T..**ADD INCREMENT**
.R.^.J.J.1.H.H..**NEED REPAIR?**.{.R...A
(10).1.2940...|..**DEAD END?**......J.C(
R).J.0.3060......**DIRECTION**.E....I..1
.1720.R...D.E(R,J)......1730.....D.9.E(R
,J)...B..**ROAD CROSSING**...L.C.R(R,J).
".V..**SKIP LINE**.(.....L....**GOSUB *D
IREC,ROAD ON*PRINT**.V....2680.J....**AT
GRAMMAS**......H1.R.R(R,J).R(H1,H2).288
0......H1.R(R,J).R.R(H1,H2).2880......**
JUNCTION**...&.."JUNCTION: ROAD #";R;" $
#";C...0..**ASK WHAT WAY TO TURN**.".:.
."FORWARD, LEFT, RIGHT OR U-TURN";.*.D..
I$.@.X..H(I$,1)."F".2080.V.B..H(I$,1)."R
".1970.L.L..H(I$,1)."L".1990...V..H(I$,1
)."U".1950......**GOOFED**......"**YOU G
OOFED**"......1850.....I.1.I.F....2080.S
...I.W(R).I......2000...F.I..1.W(R).I...
P..A.1.C(C)...Z..R(C,A).R.2040......A...
...4210.'...R.C./...J.A.>....**DARE?**.P
.....A(4).1.2360._. ..**SPEED**.M.*.."SP
EED";.T.4..S...>..**DANGEROUSITY CRASH C
HECKS**...H..S.100.3190...R..S.30.3220.H
.\..**ILLEGAL?**.W.F..S.55.3090...P..**D
RUNK DRIVERS DRIVE**...Z..A.1.2......D(A
,1).0.2210.#...D(A,1)..A(N).<...D(A,2)..
A(C(D(A,1))).C....A.A....**HIT BY DRUNK
DRIVER?**.L....A.1.2.....D(A,1).0.2270.
..J..D(A,1).R.R(R,J).R(D(A,1)).2910.N.T.
.D(A,1).R(R,J).R(D(A,1),D(A,2)).R.2910.U
....A......**IS DRIVER CAUGHT?**......A.
1.2......D(A,1).0.2340......B.1.8.?....D
(A,1).P(B,1).D(A,2).P(B,2).2400.F....B.M
.$..A.W....1620.Q.8..**SPEED DARE PRINT*
*...B...A(3).2380,2400,2420...L.."I DARE
YOU TO SPEED ** (DAREDEVIL)"...V..2430.
..`.."*SPEEDING* IS FUN (SO DO IT)!!"...
J..2430...T.."*SPEED* I DARE YOU *SPEED*
I DARE YOU".&.~..2080.<....**DRUNK CAUG
HT**.G...."A DRUNK DRIVER HAS BEEN CAUGH
T. THE"......"POLICEMAN WHO ARRESTED HIM
WILL BE"......"TESTIFYING AT COURT FOR
THE REST OF".M...."THE GAME.".S.........
D(A,1).0:D(A,2).0:P(B,1).0:P(B,2).0...D.
.1620...N..**CHECK**...X..A.1.8.M....H1.
P(A,1).R(H1,H2).R(P(A,1),P(A,2)).1440.{.
...H1.R(P(A,1),P(A,2)).R(H1,H2).P(A,1).1
440......A............**TELEGRAM PRINT U
P**............"DEAR ";N$;","...(.."HOW
ARE YOU? I LIVE AT THE CORNER"...2.."OF
ROAD #";H1;"$ #";R(H1,H2);"!!!".$.<.."CO
ME ON OVER.".E.F.." L
OVE,".G.P.." GRAMMA".
M.U.....Z.."((TELEGRAMMA CORP. TELEGRAM
CO.))"...D.....N...E.X..**DIREC, ROAD ON
* PRINT UP**.T...."GOING ";......D.2710
,2730,2750,2770,2790,2810,2830,2850.....
."NORTH";... ..2860.(...."WEST";.2....28
60.D...."NORTHEAST";.N.H..2860.`.R.."SOU
THEAST";.J....2860.|...."NORTHWEST";....
..2860......"SOUTHWEST";......2860......
"EAST";......2860.G.".."SOUTH";...,.." O
N ROAD #";R...8.....@..**AT GRAMMAS * PR
INT**.+.J.."YOU MADE IT TO GRAMMAS HOUSE
!!!!!!!!!!".5.T..3240.X.^..**DRUNK HIT Y
OUR CAR *PRINT**...H.."KERSPLATT--DRUNK
DRIVER HIT YOUR CAR."...R..3240...|..**C
AR NEEDS FIXING *PRINT UP**.W.....A(5).2
960,2980,3000,3020,3040......"POP...FLAT
TIRE"......3050......"FLIP...YOUR CAR D
ID A SUMERSALT".)....3050.=...."*OUT OF
GAS*".G.B..3050.O.L.."SMOOSH...BUS FLATT
ENED YOUR CAR.".Y.V..3050......"POP...BU
LLDOG ATE YOUR TIRE!"......3240......**D
EAD END PRINT**.Q...."*DEAD END*"......3
240......**SPEEDING**......"*SPEEDING*".
..&..**CAUGHT BY POLICE?**.%.0..X.1.8.A.
:..P(X,1).R.P(X,1).J.3170.H.D..X...
> CLICK IMAGE PREVIEW FOR FULL MODAL