PDISK EDITOR
FILE INFORMATION
FILENAME(S): PDISK EDITOR
FILE TYPE(S): PRG
FILE SIZE: 7.5K
FIRST SEEN: 2025-11-30 21:22:21
APPEARS ON: 1 disk(s)
FILE HASH
7a6d0340666b7b956d1a504374123a555de76612f2b95711a54779c18af95c0d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TNC IMPORT 85 | PDISK EDITOR | PRG | DuncanTwain | 16 | 20 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 34 35 31 30 00 22 08 14 00 |.......4510."...|
00000010: 81 58 4C B2 31 A4 34 30 3A 99 22 20 22 3B 3A 82 |.XL.1.40:." ";:.|
00000020: 3A 8E 00 3C 08 1E 00 49 B2 33 39 3A 8B C3 28 41 |:..<...I.39:..(A|
00000030: 24 29 B3 49 AA 31 A7 99 41 24 3A 8E 00 5A 08 28 |$).I.1..A$:..Z.(|
00000040: 00 8B CA 28 41 24 2C 49 2C 31 29 B3 B1 22 20 22 |...(A$,I,1).." "|
00000050: A7 49 B2 49 AB 31 3A 89 34 30 00 7A 08 32 00 99 |.I.I.1:.40.z.2..|
00000060: C8 28 41 24 2C 49 AB 31 29 3A 41 24 B2 CA 28 41 |.(A$,I.1):A$..(A|
00000070: 24 2C 49 AA 31 29 3A 89 33 30 00 97 08 37 00 58 |$,I.1):.30...7.X|
00000080: B2 32 30 AB B5 28 C3 28 41 24 29 AD 32 29 3A 8B |.20..(.(A$).2):.|
00000090: 58 B3 30 A7 58 B2 30 00 BE 08 38 00 99 C8 28 22 |X.0.X.0...8...("|
000000A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000000B0: 1D 1D 1D 1D 1D 22 2C 58 29 3B 41 24 3A 8E 00 FA |.....",X);A$:...|
000000C0: 08 3C 00 97 35 34 32 39 36 2C 31 35 3A 97 35 34 |.<..54296,15:.54|
000000D0: 32 37 36 2C 30 3A 97 35 34 32 37 37 2C 31 30 3A |276,0:.54277,10:|
000000E0: 97 35 34 32 37 38 2C 30 3A 97 35 34 32 37 33 2C |.54278,0:.54273,|
000000F0: B5 28 C6 28 41 24 29 AD 34 29 00 0A 09 46 00 97 |.(.(A$).4)...F..|
00000100: 35 34 32 37 36 2C 33 33 3A 8E 00 1C 09 50 00 41 |54276,33:....P.A|
00000110: 24 B2 22 22 3A 42 24 B2 22 20 9D 22 00 25 09 5A |$."":B$." .".%.Z|
00000120: 00 49 30 B2 30 00 46 09 64 00 8B 42 24 B2 22 20 |.I0.0.F.d..B$." |
00000130: 9D 22 A7 42 24 B2 22 12 A0 92 9D 22 3A 99 42 24 |.".B$."....":.B$|
00000140: 3B 3A 89 31 32 30 00 57 09 6E 00 42 24 B2 22 20 |;:.120.W.n.B$." |
00000150: 9D 22 3A 99 42 24 3B 00 6B 09 78 00 A1 41 24 3A |.":.B$;.k.x..A$:|
00000160: 8B 41 24 B3 B1 22 22 A7 31 35 30 00 82 09 82 00 |.A$.."".150.....|
00000170: 49 30 B2 49 30 AA 31 3A 8B 49 30 B3 33 30 A7 31 |I0.I0.1:.I0.30.1|
00000180: 32 30 00 8A 09 8C 00 89 39 30 00 A9 09 96 00 8B |20......90......|
00000190: 41 24 B2 C7 28 31 33 29 B0 41 24 B2 C7 28 32 30 |A$..(13).A$..(20|
000001A0: 29 A7 99 22 20 22 3B 3A 8E 00 BA 09 9B 00 8B 41 |).." ";:.......A|
000001B0: 24 B2 C7 28 33 34 29 A7 39 30 00 D0 09 A0 00 8B |$..(34).90......|
000001C0: 41 24 B1 B2 22 20 22 AF 41 24 B3 22 5B 22 A7 8E |A$.." ".A$."["..|
000001D0: 00 E7 09 AA 00 8B 41 24 B1 B2 22 C1 22 AF 41 24 |......A$..".".A$|
000001E0: B3 B2 22 DA 22 A7 8E 00 EF 09 B4 00 89 39 30 00 |.."."........90.|
000001F0: 06 0A BE 00 49 24 B2 22 22 3A 97 31 39 38 2C 30 |....I$."":.198,0|
00000200: 3A 41 24 B2 22 22 00 1D 0A C8 00 8D 38 30 3A 8B |:A$.""......80:.|
00000210: C3 28 49 24 29 B1 B2 4C 58 A7 8D 36 30 00 33 0A |.(I$)..LX..60.3.|
00000220: D2 00 8B 41 24 B2 C7 28 31 33 29 A7 8D 36 30 3A |...A$..(13)..60:|
00000230: 99 3A 8E 00 46 0A DC 00 8B 41 24 B3 B1 C7 28 32 |.:..F....A$...(2|
00000240: 30 29 A7 32 35 30 00 63 0A E6 00 8B 20 C3 28 49 |0).250.c.... .(I|
00000250: 24 29 B2 30 A7 99 22 9D 22 3B 3A 8D 36 30 3A 89 |$).0..".";:.60:.|
00000260: 32 30 30 00 86 0A F0 00 49 24 B2 C8 28 49 24 2C |200.....I$..(I$,|
00000270: C3 28 49 24 29 AB 31 29 3A 99 22 9D 9D 20 9D 22 |.(I$).1):.".. ."|
00000280: 3B 3A 89 32 30 30 00 98 0A FA 00 8B C3 28 49 24 |;:.200.......(I$|
00000290: 29 B2 4C 58 A7 32 30 30 00 C0 0A 04 01 49 30 B2 |).LX.200.....I0.|
000002A0: C6 28 41 24 29 3A 8B 49 30 B1 36 33 AF 49 30 B3 |.(A$):.I0.63.I0.|
000002B0: 39 36 A7 49 30 B2 49 30 AB 36 34 3A 89 32 38 30 |96.I0.I0.64:.280|
000002C0: 00 DD 0A 0E 01 8B 49 30 B1 31 39 32 AF 49 30 B3 |......I0.192.I0.|
000002D0: 32 31 39 A7 49 30 B2 49 30 AB 31 32 38 00 EF 0A |219.I0.I0.128...|
000002E0: 18 01 99 41 24 3B 3A 49 24 B2 49 24 AA 41 24 00 |...A$;:I$.I$.A$.|
000002F0: F8 0A 22 01 89 32 30 30 00 18 0B 88 04 97 35 33 |.."..200......53|
00000300: 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 3A A0 |281,0:.53280,0:.|
00000310: 32 3A A0 33 3A A0 31 35 00 43 0B 92 04 99 22 0E |2:.3:.15.C....".|
00000320: 08 93 9E 1D 1D 1D 1D 1D 1D 1D 1D A4 A4 A4 A4 A4 |................|
00000330: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000340: A4 A4 22 00 6B 0B 97 04 99 22 1D 1D 1D 1D 1D 1D |..".k...."......|
00000350: 1D 1D 12 20 20 20 20 C1 D0 C3 C3 A0 D0 C1 D4 C8 |... .........|
00000360: D7 C5 C1 D6 C5 D2 20 20 20 20 22 00 93 0B 9C 04 |...... ".....|
00000370: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 12 20 20 20 C4 C9 |."......... ..|
00000380: D3 CB A0 C5 C4 C9 D4 CF D2 A0 D5 D4 CC C9 D4 D9 |................|
00000390: 20 20 22 00 BA 0B A6 04 99 22 11 9B 1D 1D 1D 1D | "......"......|
000003A0: 1D 1D 1D 1D 31 20 2D 20 D3 45 45 20 4C 49 53 54 |....1 - .EE LIST|
000003B0: 20 4F 46 20 47 41 4D 45 53 22 00 E5 0B AB 04 99 | OF GAMES"......|
000003C0: 22 11 1D 1D 1D 1D 1D 1D 1D 1D 32 20 2D 20 D0 52 |".........2 - .R|
000003D0: 49 4E 54 4F 55 54 20 4C 49 53 54 20 4F 46 20 47 |INTOUT LIST OF G|
000003E0: 41 4D 45 53 22 00 0B 0C B0 04 99 22 11 1D 1D 1D |AMES"......"....|
000003F0: 1D 1D 1D 1D 1D 33 20 2D 20 C4 49 53 50 4C 41 59 |.....3 - .ISPLAY|
00000400: 20 50 41 53 53 57 4F 52 44 53 22 00 36 0C BA 04 | PASSWORDS".6...|
00000410: 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 34 20 2D 20 C4 |.".........4 - .|
00000420: 45 4C 45 54 45 20 47 41 4D 45 53 20 46 52 4F 4D |ELETE GAMES FROM|
00000430: 20 44 49 53 4B 22 00 55 0C C4 04 99 22 11 1D 1D | DISK".U...."...|
00000440: 1D 1D 1D 1D 1D 1D 35 20 2D 20 C3 4F 50 59 20 47 |......5 - .OPY G|
00000450: 41 4D 45 53 22 00 73 0C CE 04 99 22 11 1D 1D 1D |AMES".s...."....|
00000460: 1D 1D 1D 1D 1D 36 20 2D 20 D4 49 44 59 20 44 49 |.....6 - .IDY DI|
00000470: 53 4B 22 00 94 0C D8 04 99 22 11 1D 1D 1D 1D 1D |SK"......"......|
00000480: 1D 1D 1D 37 20 2D 20 D2 45 4E 41 4D 45 20 47 41 |...7 - .ENAME GA|
00000490: 4D 45 53 22 00 AD 0C E2 04 99 22 11 1D 1D 1D 1D |MES"......".....|
000004A0: 1D 1D 1D 1D 38 20 2D 20 D1 55 49 54 22 00 D6 0C |....8 - .UIT"...|
000004B0: E7 04 99 22 1D 1D 1D 1D 1D 1D 1D 1D 81 A4 A4 A4 |..."............|
000004C0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000004D0: A4 A4 A4 A4 A4 22 00 00 0D EC 04 99 22 1D 1D 1D |....."......"...|
000004E0: 1D 1D 1D 1D 1D 12 81 D0 52 45 53 53 20 31 2C 32 |........RESS 1,2|
000004F0: 2C 33 2C 34 2C 35 2C 36 2C 37 20 4F 52 20 38 22 |,3,4,5,6,7 OR 8"|
00000500: 00 29 0D F1 04 99 22 1D 1D 1D 1D 1D 1D 1D 1D 12 |.)....".........|
00000510: 20 20 20 54 48 45 4E 20 50 52 45 53 53 20 D2 45 | THEN PRESS .E|
00000520: 54 55 52 4E 20 20 20 20 22 00 68 0D F6 04 99 22 |TURN ".h...."|
00000530: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000540: 1D 1D 1D 9F 22 3B 3A 4C 58 B2 31 3A 8D 31 39 30 |....";:LX.1:.190|
00000550: 3A 49 B2 C5 28 49 24 29 3A 8B 49 B3 31 B0 20 49 |:I..(I$):.I.1. I|
00000560: B1 38 20 A7 31 31 36 30 00 9A 0D 00 05 91 20 49 |.8 .1160...... I|
00000570: 20 89 20 32 30 30 30 2C 32 31 30 30 2C 32 32 30 | . 2000,2100,220|
00000580: 30 2C 32 34 30 30 2C 32 33 30 30 2C 32 35 30 30 |0,2400,2300,2500|
00000590: 2C 32 36 30 30 2C 33 30 30 30 00 A4 0D 05 05 89 |,2600,3000......|
000005A0: 31 31 36 30 00 D0 0D 0A 05 8B 52 4E B1 30 A7 99 |1160......RN.0..|
000005B0: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1F C7 41 |"..............A|
000005C0: 4D 45 1D 20 49 4E 1D 20 4D 45 4D 4F 52 59 11 22 |ME. IN. MEMORY."|
000005D0: 00 DE 0D 0C 05 41 24 B2 4E 24 3A 89 35 35 00 E4 |.....A$.N$:.55..|
000005E0: 0D 14 05 8E 00 FD 0D 46 05 81 49 B2 31 A4 33 30 |.......F..I.1.30|
000005F0: 30 30 3A 82 3A 97 32 35 31 2C 32 3A 8A 00 13 0E |00:.:.251,2:....|
00000600: 50 05 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 |P..53281,0:.5328|
00000610: 30 2C 30 00 45 0E 55 05 99 22 93 9E 12 20 20 20 |0,0.E.U.."... |
00000620: D0 C1 D4 C8 D7 C5 C1 D6 C5 D2 A0 C4 C9 D3 CB A0 |................|
00000630: C5 C4 C9 D4 CF D2 A0 D5 D4 C9 CC C9 D4 D9 A0 A0 |................|
00000640: 20 20 A0 A0 22 00 7E 0E 5A 05 99 22 9E 12 20 20 | ..".~.Z..".. |
00000650: 20 D4 48 45 20 41 44 56 45 4E 54 55 52 45 53 20 | .HE ADVENTURES |
00000660: 4F 4E 20 54 48 49 53 20 44 49 53 4B 20 41 52 45 |ON THIS DISK ARE|
00000670: 3A 20 20 20 20 11 05 22 3A 8D 34 37 30 30 00 C3 |: ..":.4700..|
00000680: 0E 5B 05 8B 4E 51 B3 31 20 A7 99 22 93 11 11 05 |.[..NQ.1 .."....|
00000690: 20 D4 48 45 52 45 20 41 52 45 20 4E 4F 20 41 44 | .HERE ARE NO AD|
000006A0: 56 45 4E 54 55 52 45 53 20 4F 4E 20 54 48 49 53 |VENTURES ON THIS|
000006B0: 20 44 49 53 4B 2E 22 3A 8D 34 34 31 30 3A 89 31 | DISK.":.4410:.1|
000006C0: 31 36 30 00 CD 0E 5F 05 8D 33 37 33 30 00 09 0F |160..._..3730...|
000006D0: 64 05 99 22 11 11 11 11 12 9C D4 59 50 45 20 54 |d..".......YPE T|
000006E0: 48 45 20 47 41 4D 45 27 53 20 4E 55 4D 42 45 52 |HE GAME'S NUMBER|
000006F0: 20 54 48 45 4E 20 50 52 45 53 53 20 D2 C5 D4 D5 | THEN PRESS ....|
00000700: D2 CE 2E 22 3A 4C 58 B2 32 00 3B 0F 69 05 99 22 |...":LX.2.;.i.."|
00000710: 12 91 D0 52 45 53 53 20 40 20 46 4F 52 20 41 4E |...RESS @ FOR AN|
00000720: 4F 54 48 45 52 20 4C 49 53 54 49 4E 47 2E 20 20 |OTHER LISTING. |
00000730: 20 20 20 20 20 20 20 20 20 20 22 00 6E 0F 6A 05 | ".n.j.|
00000740: 99 22 12 91 D0 52 45 53 53 20 2B 20 54 4F 20 52 |."...RESS + TO R|
00000750: 45 54 55 52 4E 20 54 4F 20 54 48 45 20 4D 45 4E |ETURN TO THE MEN|
00000760: 55 2E 20 20 20 20 20 20 20 20 20 20 11 22 00 96 |U. ."..|
00000770: 0F 6E 05 99 22 12 4E 55 4D 42 45 52 2D 3E 20 92 |.n..".NUMBER-> .|
00000780: 20 9F 22 3B 3A 8D 31 39 30 3A 8B 49 24 B2 22 40 | .";:.190:.I$."@|
00000790: 22 A7 31 33 36 30 00 A9 0F 70 05 8B 49 24 B2 22 |".1360...p..I$."|
000007A0: 2B 22 A7 45 4E B2 31 3A 8E 00 DF 0F 72 05 8B C5 |+".EN.1:....r...|
000007B0: 28 49 24 29 B3 31 20 B0 20 C5 28 49 24 29 B1 4E |(I$).1 . .(I$).N|
000007C0: 51 20 A7 99 22 91 20 20 20 20 20 20 20 20 20 20 |Q ..". |
000007D0: 20 20 20 20 20 20 20 91 22 3A 89 31 33 39 30 00 | .":.1390.|
000007E0: F1 0F 74 05 49 24 B2 46 51 24 28 C5 28 49 24 29 |..t.I$.FQ$(.(I$)|
000007F0: 29 00 09 10 76 05 99 22 91 1D 1D 1D 1D 1D 1D 1D |)...v.."........|
00000800: 1D 1D 1D 1D 1D 1D 22 49 24 00 20 10 78 05 46 24 |......"I$. .x.F$|
00000810: B2 49 24 3A 49 24 B2 49 24 AA 22 2C 53 2C 52 22 |.I$:I$.I$.",S,R"|
00000820: 00 4A 10 82 05 9F 31 35 2C 38 2C 31 35 2C 22 49 |.J....15,8,15,"I|
00000830: 30 22 3A 9F 32 2C 38 2C 32 2C 49 24 3A 8D 34 33 |0":.2,8,2,I$:.43|
00000840: 39 30 3A 8B 45 4E B1 30 A7 8E 00 7C 10 8C 05 99 |90:.EN.0...|....|
00000850: 22 9E 93 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D |"...............|
00000860: 1D 1D 1D 12 20 CC 4F 41 44 49 4E 47 2E 2E 2E 50 |.... .OADING...P|
00000870: 4C 45 41 53 45 20 57 41 49 54 20 22 00 87 10 96 |LEASE WAIT "....|
00000880: 05 84 32 2C 50 57 24 00 AA 10 A0 05 84 32 2C 4E |..2,PW$......2,N|
00000890: 24 2C 41 55 24 2C 45 47 24 2C 52 4E 2C 4A 2C 4B |$,AU$,EG$,RN,J,K|
000008A0: 2C 53 4C 2C 45 47 3A 58 B2 31 00 D4 10 AA 05 84 |,SL,EG:X.1......|
000008B0: 32 2C 49 31 24 2C 49 32 24 2C 49 33 24 3A 8B 49 |2,I1$,I2$,I3$:.I|
000008C0: 32 24 B2 22 20 22 A7 49 4E 24 B2 49 31 24 3A 89 |2$." ".IN$.I1$:.|
000008D0: 31 34 36 30 00 FA 10 AB 05 49 4E 24 B2 49 31 24 |1460.....IN$.I1$|
000008E0: AA 49 32 24 3A 8B 49 33 24 B3 B1 22 20 22 A7 49 |.I2$:.I3$.." ".I|
000008F0: 4E 24 B2 49 4E 24 AA 49 33 24 00 06 11 B4 05 81 |N$.IN$.I3$......|
00000900: 49 B2 31 A4 52 4E 00 13 11 B5 05 84 32 2C 41 24 |I.1.RN......2,A$|
00000910: 2C 42 24 00 2E 11 B6 05 8B 42 24 B2 22 20 22 A7 |,B$......B$." ".|
00000920: 52 24 28 49 29 B2 41 24 3A 89 31 34 36 35 00 3E |R$(I).A$:.1465.>|
00000930: 11 B8 05 52 24 28 49 29 B2 41 24 AA 42 24 00 45 |...R$(I).A$.B$.E|
00000940: 11 B9 05 82 49 00 68 11 BE 05 81 49 B2 31 A4 52 |....I.h....I.1.R|
00000950: 4E 3A 81 4C B2 31 A4 36 3A 84 32 2C 52 28 49 2C |N:.L.1.6:.2,R(I,|
00000960: 4C 29 3A 82 4C 3A 82 49 00 76 11 C8 05 8B 4A B2 |L):.L:.I.v....J.|
00000970: 30 A7 31 35 30 30 00 A6 11 D2 05 81 49 B2 31 A4 |0.1500......I.1.|
00000980: 4A 3A 84 32 2C 54 52 24 28 49 29 2C 4B 57 24 28 |J:.2,TR$(I),KW$(|
00000990: 49 29 2C 54 52 28 49 29 2C 54 56 28 49 29 2C 54 |I),TR(I),TV(I),T|
000009A0: 39 28 49 29 3A 82 00 B4 11 DC 05 8B 4B B2 30 A7 |9(I):.......K.0.|
000009B0: 31 35 32 30 00 F1 11 E6 05 81 49 B2 31 A4 4B 3A |1520......I.1.K:|
000009C0: 84 32 2C 4F 42 24 28 49 29 2C 4F 42 28 49 29 2C |.2,OB$(I),OB(I),|
000009D0: 44 4F 28 49 29 2C 4F 53 24 28 49 29 2C 43 50 24 |DO(I),OS$(I),CP$|
000009E0: 28 49 29 2C 4C 50 28 49 29 2C 4F 39 28 49 29 3A |(I),LP(I),O9(I):|
000009F0: 82 00 31 12 EB 05 99 22 93 11 11 11 11 11 11 11 |..1...."........|
00000A00: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 9E D4 49 |...............I|
00000A10: 44 49 4E 47 20 4D 45 4D 4F 52 59 2E 2E 2E 50 4C |DING MEMORY...PL|
00000A20: 45 41 53 45 20 57 41 49 54 22 3A 49 B2 B8 28 30 |EASE WAIT":I..(0|
00000A30: 29 00 3E 12 F0 05 A0 32 3A A0 31 35 3A 8E 00 73 |).>....2:.15:..s|
00000A40: 12 72 06 8D 34 37 30 30 3A 49 24 B2 46 24 AA 22 |.r..4700:I$.F$."|
00000A50: 2C 53 2C 57 22 3A 9F 31 35 2C 38 2C 31 35 2C 22 |,S,W":.15,8,15,"|
00000A60: 49 30 22 3A 9F 32 2C 38 2C 32 2C 49 24 3A 89 34 |I0":.2,8,2,I$:.4|
00000A70: 34 34 30 00 86 12 A4 06 51 24 B2 C7 28 31 33 29 |440.....Q$..(13)|
00000A80: 3A 89 34 39 30 30 00 BA 12 A5 06 51 31 24 B2 C7 |:.4900.....Q1$..|
00000A90: 28 33 34 29 3A 51 32 24 B2 C7 28 33 34 29 AA C7 |(34):Q2$..(34)..|
00000AA0: 28 31 33 29 AA C7 28 33 34 29 3A 51 33 24 B2 C7 |(13)..(34):Q3$..|
00000AB0: 28 33 34 29 AA C7 28 31 33 29 00 D6 12 A6 06 8B |(34)..(13)......|
00000AC0: 50 57 24 B2 22 22 20 A7 50 57 24 B2 22 50 41 53 |PW$."" .PW$."PAS|
00000AD0: 53 57 4F 52 44 22 00 0E 13 AE 06 99 22 93 9E 11 |SWORD"......"...|
00000AE0: 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 12 20 D2 |.............. .|
00000AF0: 45 43 4F 52 44 49 4E 47 20 C6 49 4C 45 2E 2E 2E |ECORDING .ILE...|
00000B00: 2E D0 4C 45 41 53 45 20 D7 41 49 54 20 22 00 21 |..LEASE .AIT ".!|
00000B10: 13 B8 06 98 32 2C 51 31 24 3B 50 57 24 3B 51 31 |....2,Q1$;PW$;Q1|
00000B20: 24 00 5C 13 C2 06 98 32 2C 51 31 24 3B 4E 24 3B |$.\....2,Q1$;N$;|
00000B30: 51 32 24 3B 41 55 24 3B 51 32 24 3B 45 47 24 3B |Q2$;AU$;Q2$;EG$;|
00000B40: 51 33 24 3B 52 4E 3B 51 24 3B 4A 3B 51 24 3B 4B |Q3$;RN;Q$;J;Q$;K|
00000B50: 3B 51 24 3B 53 4C 3B 51 24 3B 45 47 00 86 13 CC |;Q$;SL;Q$;EG....|
00000B60: 06 8B 49 4E 24 B2 22 22 A7 49 31 24 B2 22 A0 22 |..IN$."".I1$."."|
00000B70: 3A 49 32 24 B2 22 20 22 3A 49 33 24 B2 22 20 22 |:I2$." ":I3$." "|
00000B80: 3A 89 31 37 35 30 00 B3 13 CD 06 8B C3 28 49 4E |:.1750.......(IN|
00000B90: 24 29 B3 38 31 A7 49 31 24 B2 49 4E 24 3A 49 32 |$).81.I1$.IN$:I2|
00000BA0: 24 B2 22 20 22 3A 49 33 24 B2 22 20 22 3A 89 31 |$." ":I3$." ":.1|
00000BB0: 37 35 30 00 ED 13 CE 06 49 31 24 B2 C8 28 49 4E |750.....I1$..(IN|
00000BC0: 24 2C 38 30 29 3A 8B C3 28 49 4E 24 29 B3 31 36 |$,80):..(IN$).16|
00000BD0: 32 A7 49 32 24 B2 CA 28 49 4E 24 2C 38 31 29 3A |2.I2$..(IN$,81):|
00000BE0: 49 33 24 B2 22 20 22 3A 89 31 37 35 30 00 11 14 |I3$." ":.1750...|
00000BF0: CF 06 49 32 24 B2 CA 28 49 4E 24 2C 38 31 2C 38 |..I2$..(IN$,81,8|
00000C00: 30 29 3A 49 33 24 B2 CA 28 49 4E 24 2C 31 36 32 |0):I3$..(IN$,162|
00000C10: 29 00 34 14 D6 06 98 32 2C 51 31 24 3B 49 31 24 |).4....2,Q1$;I1$|
00000C20: 3B 51 32 24 3B 49 32 24 3B 51 32 24 3B 49 33 24 |;Q2$;I2$;Q2$;I3$|
00000C30: 3B 51 31 24 00 40 14 E0 06 81 49 B2 31 A4 52 4E |;Q1$.@....I.1.RN|
00000C40: 00 67 14 E1 06 8B C3 28 52 24 28 49 29 29 B3 38 |.g.....(R$(I)).8|
00000C50: 31 A7 42 24 B2 22 20 22 3A 41 24 B2 52 24 28 49 |1.B$." ":A$.R$(I|
00000C60: 29 3A 89 31 37 36 33 00 89 14 E2 06 42 24 B2 CA |):.1763.....B$..|
00000C70: 28 52 24 28 49 29 2C 38 31 29 3A 41 24 B2 C8 28 |(R$(I),81):A$..(|
00000C80: 52 24 28 49 29 2C 38 30 29 00 A5 14 E3 06 98 32 |R$(I),80)......2|
00000C90: 2C 51 31 24 3B 41 24 3B 51 32 24 3B 42 24 3B 51 |,Q1$;A$;Q2$;B$;Q|
00000CA0: 31 24 3A 82 49 00 C9 14 EA 06 81 20 49 B2 31 A4 |1$:.I...... I.1.|
00000CB0: 52 4E 3A 81 4C B2 31 A4 36 3A 98 32 2C 52 28 49 |RN:.L.1.6:.2,R(I|
00000CC0: 2C 4C 29 3A 82 4C 3A 82 49 00 D7 14 F4 06 8B 4A |,L):.L:.I......J|
00000CD0: B2 30 A7 31 38 30 30 00 19 15 FE 06 81 49 B2 31 |.0.1800......I.1|
00000CE0: A4 4A 3A 98 32 2C 51 31 24 3B 54 52 24 28 49 29 |.J:.2,Q1$;TR$(I)|
00000CF0: 3B 51 32 24 3B 4B 57 24 28 49 29 3B 51 33 24 3B |;Q2$;KW$(I);Q3$;|
00000D00: 54 52 28 49 29 3B 51 24 3B 54 56 28 49 29 3B 51 |TR(I);Q$;TV(I);Q|
00000D10: 24 3B 54 39 28 49 29 3A 82 00 27 15 08 07 8B 4B |$;T9(I):..'....K|
00000D20: B2 30 A7 31 38 32 30 00 32 15 12 07 81 49 B2 31 |.0.1820.2....I.1|
00000D30: A4 4B 00 7D 15 14 07 98 32 2C 51 31 24 4F 42 24 |.K.}....2,Q1$OB$|
00000D40: 28 49 29 3B 51 33 24 4F 42 28 49 29 3B 51 24 44 |(I);Q3$OB(I);Q$D|
00000D50: 4F 28 49 29 3B 51 24 3B 51 31 24 3B 4F 53 24 28 |O(I);Q$;Q1$;OS$(|
00000D60: 49 29 3B 51 32 24 3B 43 50 24 28 49 29 3B 51 33 |I);Q2$;CP$(I);Q3|
00000D70: 24 4C 50 28 49 29 51 24 4F 39 28 49 29 00 83 15 |$LP(I)Q$O9(I)...|
00000D80: 15 07 82 00 94 15 17 07 A0 32 3A A0 31 35 3A 8D |.........2:.15:.|
00000D90: 34 38 30 30 00 9E 15 1C 07 89 31 31 36 30 00 C2 |4800......1160..|
00000DA0: 15 CF 07 8F 20 2A 2A 2A 20 44 49 53 50 4C 41 59 |.... *** DISPLAY|
00000DB0: 20 4C 49 53 54 20 4F 46 20 47 41 4D 45 53 20 2A | LIST OF GAMES *|
00000DC0: 2A 2A 00 FB 15 D0 07 99 22 9E 93 12 1D 20 20 D4 |**......".... .|
00000DD0: 48 45 20 41 44 56 45 4E 54 55 52 45 53 20 4F 4E |HE ADVENTURES ON|
00000DE0: 20 54 48 49 53 20 44 49 53 4B 20 41 52 45 3A 20 | THIS DISK ARE: |
00000DF0: 20 20 11 05 22 3A 8D 34 37 30 30 00 3F 16 DA 07 | ..":.4700.?...|
00000E00: 8B 4E 51 B3 31 A7 99 22 93 11 11 96 20 D4 48 45 |.NQ.1..".... .HE|
00000E10: 52 45 20 41 52 45 20 4E 4F 20 41 44 56 45 4E 54 |RE ARE NO ADVENT|
00000E20: 55 52 45 53 20 4F 4E 20 54 48 49 53 20 44 49 53 |URES ON THIS DIS|
00000E30: 4B 2E 22 3A 8D 34 34 31 30 3A 89 31 31 36 30 00 |K.":.4410:.1160.|
00000E40: 49 16 E4 07 8D 33 37 33 30 00 60 16 EE 07 99 22 |I....3730.`...."|
00000E50: 11 11 11 22 3A 8D 34 34 31 30 3A 89 31 31 36 30 |...":.4410:.1160|
00000E60: 00 85 16 33 08 8F 20 2A 2A 2A 20 50 52 49 4E 54 |...3.. *** PRINT|
00000E70: 4F 55 54 20 4C 49 53 54 20 4F 46 20 47 41 4D 45 |OUT LIST OF GAME|
00000E80: 53 20 2A 2A 2A 00 B4 16 34 08 99 22 93 9E 1D 1D |S ***...4.."....|
00000E90: 12 20 20 CC 4F 41 44 49 4E 47 20 4C 49 53 54 20 |. .OADING LIST |
00000EA0: 4F 46 20 47 41 4D 45 53 20 20 11 11 11 22 3A 8D |OF GAMES ...":.|
00000EB0: 34 37 30 30 00 F8 16 3E 08 8B 4E 51 B3 31 20 A7 |4700...>..NQ.1 .|
00000EC0: 99 22 11 11 96 20 D4 48 45 52 45 20 41 52 45 20 |."... .HERE ARE |
00000ED0: 4E 4F 20 41 44 56 45 4E 54 55 52 45 53 20 4F 4E |NO ADVENTURES ON|
00000EE0: 20 54 48 49 53 20 44 49 53 4B 2E 22 3A 8D 34 34 | THIS DISK.":.44|
00000EF0: 31 30 3A 89 31 31 36 30 00 19 17 3F 08 9F 33 2C |10:.1160...?..3,|
00000F00: 34 3A 98 33 2C C7 28 31 33 29 3A 8B 53 54 B2 30 |4:.3,.(13):.ST.0|
00000F10: A7 A0 33 3A 89 32 31 32 30 00 47 17 40 08 A0 33 |..3:.2120.G.@..3|
00000F20: 3A 99 22 11 11 11 12 96 D0 52 49 4E 54 45 52 20 |:."......RINTER |
00000F30: 4E 4F 54 20 52 45 41 44 59 2E 22 3A 8D 34 34 31 |NOT READY.":.441|
00000F40: 30 3A 89 31 31 36 30 00 86 17 48 08 9F 33 2C 34 |0:.1160...H..3,4|
00000F50: 2C 37 3A 98 33 2C 22 20 20 CE C1 CD C5 20 CF C6 |,7:.3," .... ..|
00000F60: 20 C7 C1 CD C5 22 2C 2C 2C 22 20 20 20 C6 C9 CC | ....",,," ...|
00000F70: C5 CE C1 CD C5 20 20 20 20 20 20 20 20 D0 C1 D3 |..... ...|
00000F80: D3 D7 CF D2 C4 22 00 BE 17 4D 08 98 33 2C 22 20 |....."...M..3," |
00000F90: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 2C 2C | ============",,|
00000FA0: 2C 22 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 20 20 20 |," ======== |
00000FB0: 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 22 00 D2 | ========"..|
00000FC0: 17 52 08 81 49 B2 31 A4 4E 51 3A 99 46 51 24 28 |.R..I.1.NQ:.FQ$(|
00000FD0: 49 29 00 F8 17 5C 08 9F 32 2C 38 2C 32 2C 46 51 |I)...\..2,8,2,FQ|
00000FE0: 24 28 49 29 AA 22 2C 53 2C 52 22 3A 84 32 2C 50 |$(I).",S,R":.2,P|
00000FF0: 57 24 2C 4E 24 3A A0 32 00 1E 18 66 08 4C 58 B2 |W$,N$:.2...f.LX.|
00001000: 34 35 3A 8D 32 31 38 30 3A 4C 58 B2 31 38 3A 4E |45:.2180:LX.18:N|
00001010: 24 B2 46 51 24 28 49 29 3A 8D 32 31 38 30 00 29 |$.FQ$(I):.2180.)|
00001020: 18 68 08 98 33 2C 50 57 24 00 30 18 70 08 82 49 |.h..3,PW$.0.p..I|
00001030: 00 40 18 7A 08 98 33 3A A0 33 3A 89 31 31 36 30 |.@.z..3:.3:.1160|
00001040: 00 8A 18 84 08 41 24 B2 4E 24 AA C8 28 22 20 20 |.....A$.N$..(" |
00001050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001080: 2C 4C 58 AB C3 28 4E 24 29 29 00 97 18 8E 08 98 |,LX..(N$))......|
00001090: 33 2C 41 24 3B 3A 8E 00 B7 18 97 08 8F 20 2A 2A |3,A$;:....... **|
000010A0: 2A 20 44 49 53 50 4C 41 59 20 50 41 53 53 57 4F |* DISPLAY PASSWO|
000010B0: 52 44 53 20 2A 2A 2A 00 E6 18 98 08 99 22 93 9E |RDS ***......"..|
000010C0: 1D 1D 12 20 20 CC 4F 41 44 49 4E 47 20 4C 49 53 |... .OADING LIS|
000010D0: 54 20 4F 46 20 47 41 4D 45 53 20 20 11 11 11 22 |T OF GAMES ..."|
000010E0: 3A 8D 34 37 30 30 00 2A 19 A2 08 8B 4E 51 B3 31 |:.4700.*....NQ.1|
000010F0: 20 A7 99 22 11 11 96 20 D4 48 45 52 45 20 41 52 | .."... .HERE AR|
00001100: 45 20 4E 4F 20 41 44 56 45 4E 54 55 52 45 53 20 |E NO ADVENTURES |
00001110: 4F 4E 20 54 48 49 53 20 44 49 53 4B 2E 22 3A 8D |ON THIS DISK.":.|
00001120: 34 34 31 30 3A 89 31 31 36 30 00 5A 19 A7 08 99 |4410:.1160.Z....|
00001130: 22 93 1D 1D 12 20 20 20 20 20 C6 49 4C 45 4E 41 |".... .ILENA|
00001140: 4D 45 20 20 20 20 20 20 20 20 28 50 41 53 53 57 |ME (PASSW|
00001150: 4F 52 44 29 20 20 20 20 11 22 00 66 19 AC 08 81 |ORD) .".f....|
00001160: 49 B2 31 A4 4E 51 00 8C 19 B6 08 9F 32 2C 38 2C |I.1.NQ......2,8,|
00001170: 32 2C 46 51 24 28 49 29 AA 22 2C 53 2C 52 22 3A |2,FQ$(I).",S,R":|
00001180: 84 32 2C 50 57 24 2C 4E 24 3A A0 32 00 B2 19 C0 |.2,PW$,N$:.2....|
00001190: 08 99 22 05 22 3B A3 35 29 3B 46 51 24 28 49 29 |..".";.5);FQ$(I)|
000011A0: 3B A3 32 33 29 3B 22 99 28 22 3B 50 57 24 3B 22 |;.23);".(";PW$;"|
000011B0: 29 22 00 EA 19 CA 08 8B 49 B2 31 35 A7 99 22 11 |)"......I.15..".|
000011C0: 11 22 3A 8D 34 34 31 30 3A 99 22 91 20 20 20 20 |.":.4410:.". |
000011D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000011E0: 20 20 20 20 20 20 20 20 20 22 00 FD 19 D4 08 82 | "......|
000011F0: 49 3A 8D 34 34 31 30 3A 89 31 31 36 30 00 1A 1A |I:.4410:.1160...|
00001200: FB 08 8F 20 2A 2A 2A 20 43 4F 50 59 20 44 41 54 |... *** COPY DAT|
00001210: 41 20 46 49 4C 45 20 2A 2A 2A 00 4D 1A FC 08 99 |A FILE ***.M....|
00001220: 22 93 81 12 20 20 C9 4E 53 45 52 54 20 D3 CF D5 |"... .NSERT ...|
00001230: D2 C3 C5 20 44 49 53 4B 20 54 48 45 4E 20 50 52 |... DISK THEN PR|
00001240: 45 53 53 20 D2 45 54 55 52 4E 20 20 22 00 74 1A |ESS .ETURN ".t.|
00001250: FE 08 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00001260: 1D 1D 1D 1D 1D 1D 9F 22 3B 3A 4C 58 B2 30 3A 8D |.......";:LX.0:.|
00001270: 31 39 30 2E 00 89 1A 06 09 8D 31 33 36 30 3A 8B |190.......1360:.|
00001280: 45 4E B1 30 A7 31 31 36 30 00 BD 1A 10 09 99 22 |EN.0.1160......"|
00001290: 93 81 12 20 20 20 20 20 20 20 C9 4E 53 45 52 54 |... .NSERT|
000012A0: 20 C4 C5 D3 D4 C9 CE C1 D4 C9 CF CE 20 44 49 53 | ........... DIS|
000012B0: 4B 20 20 20 20 20 20 20 20 20 20 22 3B 00 ED 1A |K ";...|
000012C0: 11 09 99 22 20 20 20 20 20 20 20 20 20 20 54 48 |..." TH|
000012D0: 45 4E 20 50 52 45 53 53 20 D2 45 54 55 52 4E 20 |EN PRESS .ETURN |
000012E0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 14 1B | "...|
000012F0: 12 09 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00001300: 1D 1D 1D 1D 1D 1D 1D 9F 22 3B 3A 4C 58 B2 30 3A |........";:LX.0:|
00001310: 8D 31 39 30 00 1E 1B 1A 09 89 31 36 35 30 00 3B |.190......1650.;|
00001320: 1B 5F 09 8F 20 2A 2A 2A 20 53 43 52 41 54 43 48 |._.. *** SCRATCH|
00001330: 20 41 20 46 49 4C 45 20 2A 2A 2A 00 74 1B 60 09 | A FILE ***.t.`.|
00001340: 99 22 9E 93 12 1D 20 20 D4 48 45 20 41 44 56 45 |.".... .HE ADVE|
00001350: 4E 54 55 52 45 53 20 4F 4E 20 54 48 49 53 20 44 |NTURES ON THIS D|
00001360: 49 53 4B 20 41 52 45 3A 20 20 20 11 05 22 3A 8D |ISK ARE: ..":.|
00001370: 34 37 30 30 00 B8 1B 65 09 8B 4E 51 B3 31 20 A7 |4700...e..NQ.1 .|
00001380: 99 22 93 11 96 20 D4 48 45 52 45 20 41 52 45 20 |."... .HERE ARE |
00001390: 4E 4F 20 41 44 56 45 4E 54 55 52 45 53 20 4F 4E |NO ADVENTURES ON|
000013A0: 20 54 48 49 53 20 44 49 53 4B 2E 22 3A 8D 34 34 | THIS DISK.":.44|
000013B0: 31 30 3A 89 31 31 36 30 00 C2 1B 6A 09 8D 33 37 |10:.1160...j..37|
000013C0: 33 30 00 EE 1B 74 09 99 22 81 12 D4 59 50 45 20 |30...t.."...YPE |
000013D0: 54 48 45 20 46 49 4C 45 4E 41 4D 45 20 4F 46 20 |THE FILENAME OF |
000013E0: 54 48 45 20 47 41 4D 45 20 59 4F 55 20 22 00 1A |THE GAME YOU "..|
000013F0: 1C 75 09 99 22 12 57 41 4E 54 20 54 4F 20 45 52 |.u..".WANT TO ER|
00001400: 41 53 45 20 54 48 45 4E 20 50 52 45 53 53 20 D2 |ASE THEN PRESS .|
00001410: 45 54 55 52 4E 2E 20 11 9F 22 00 29 1C 7E 09 4C |ETURN. ..".).~.L|
00001420: 58 B2 31 35 3A 8D 31 39 30 00 5D 1C 88 09 9F 31 |X.15:.190.]....1|
00001430: 35 2C 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 |5,8,15,"I0":.2,8|
00001440: 2C 32 2C 49 24 AA 22 2C 53 2C 52 22 3A 8D 34 33 |,2,I$.",S,R":.43|
00001450: 39 30 3A 8B 45 4E B1 30 A7 31 31 36 30 00 64 1C |90:.EN.0.1160.d.|
00001460: 92 09 A0 32 00 79 1C 9C 09 98 31 35 2C 22 53 30 |...2.y....15,"S0|
00001470: 3A 22 AA 49 24 3A A0 31 35 00 81 1C 9E 09 49 B2 |:".I$:.15.....I.|
00001480: 31 00 95 1C A0 09 8B 46 51 24 28 49 29 B2 49 24 |1......FQ$(I).I$|
00001490: A7 32 34 37 30 00 AD 1C A1 09 8B 49 B3 B2 4E 51 |.2470......I..NQ|
000014A0: 20 A7 49 B2 49 AA 31 3A 89 32 34 36 34 00 BD 1C | .I.I.1:.2464...|
000014B0: A6 09 8B 49 B2 4E 51 20 A7 32 34 38 30 00 DF 1C |...I.NQ .2480...|
000014C0: A8 09 81 4A B2 49 20 A4 20 4E 51 AB 31 3A 46 51 |...J.I . NQ.1:FQ|
000014D0: 24 28 4A 29 B2 46 51 24 28 4A AA 31 29 3A 82 00 |$(J).FQ$(J.1):..|
000014E0: F7 1C B0 09 4E 51 B2 4E 51 AB 31 3A 8B 4E 51 B1 |....NQ.NQ.1:.NQ.|
000014F0: 30 A7 8D 34 38 30 30 00 01 1D BA 09 89 31 31 36 |0..4800......116|
00001500: 30 00 1D 1D C3 09 8F 20 2A 2A 2A 20 56 41 4C 49 |0...... *** VALI|
00001510: 44 41 54 45 20 44 49 53 4B 20 2A 2A 2A 00 50 1D |DATE DISK ***.P.|
00001520: C4 09 99 22 9E 93 12 20 20 20 20 20 20 20 20 20 |..."... |
00001530: 20 D4 49 44 59 20 C3 4F 4E 54 45 4E 54 53 20 4F | .IDY .ONTENTS O|
00001540: 46 20 C4 49 53 4B 20 20 20 20 20 20 20 20 20 22 |F .ISK "|
00001550: 00 7B 1D CE 09 99 22 11 11 81 20 20 20 20 20 20 |.{...."... |
00001560: 20 20 C9 4E 53 45 52 54 20 44 49 53 4B 20 54 4F | .NSERT DISK TO|
00001570: 20 42 45 20 54 49 44 49 45 44 22 00 A1 1D D8 09 | BE TIDIED".....|
00001580: 99 22 11 20 20 20 20 20 20 20 20 20 20 20 20 54 |.". T|
00001590: 48 45 4E 20 50 52 45 53 53 20 D2 45 54 55 52 4E |HEN PRESS .ETURN|
000015A0: 22 00 CA 1D E2 09 4C 58 B2 31 3A 99 22 11 11 1D |".....LX.1:."...|
000015B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000015C0: 1D 1D 9F 22 3B 3A 8D 31 39 30 00 FD 1D E7 09 99 |...";:.190......|
000015D0: 22 9E 93 12 20 20 20 20 20 20 20 20 D4 49 44 49 |"... .IDI|
000015E0: 4E 47 20 C3 4F 4E 54 45 4E 54 53 20 4F 46 20 C4 |NG .ONTENTS OF .|
000015F0: 49 53 4B 20 20 20 20 20 20 20 20 20 22 00 2A 1E |ISK ".*.|
00001600: EC 09 99 22 11 11 11 11 11 11 05 1D 1D 1D 1D 1D |..."............|
00001610: 1D 1D 1D 1D 1D D0 4C 45 41 53 45 20 42 45 20 50 |......LEASE BE P|
00001620: 41 54 49 45 4E 54 2E 2E 2E 22 00 5B 1E F6 09 99 |ATIENT...".[....|
00001630: 22 11 11 1D D4 48 49 53 20 50 52 4F 43 45 53 53 |"....HIS PROCESS|
00001640: 20 43 41 4E 20 54 41 4B 45 20 53 45 56 45 52 41 | CAN TAKE SEVERA|
00001650: 4C 20 4D 49 4E 55 54 45 53 2E 22 00 81 1E 00 0A |L MINUTES.".....|
00001660: 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 3A 98 31 |.15,8,15,"I0":.1|
00001670: 35 2C 22 56 41 4C 49 44 41 54 45 30 22 3A A0 31 |5,"VALIDATE0":.1|
00001680: 35 00 8B 1E 0A 0A 89 31 31 36 30 00 A7 1E 27 0A |5......1160...'.|
00001690: 8F 20 2A 2A 2A 20 52 45 4E 41 4D 45 20 41 20 46 |. *** RENAME A F|
000016A0: 49 4C 45 20 2A 2A 2A 00 D6 1E 28 0A 99 22 93 9E |ILE ***...(.."..|
000016B0: 1D 1D 12 20 20 CC 4F 41 44 49 4E 47 20 4C 49 53 |... .OADING LIS|
000016C0: 54 20 4F 46 20 47 41 4D 45 53 20 20 11 11 11 22 |T OF GAMES ..."|
000016D0: 3A 8D 34 37 30 30 00 1A 1F 32 0A 8B 4E 51 B3 31 |:.4700...2..NQ.1|
000016E0: 20 A7 99 22 11 11 05 20 D4 48 45 52 45 20 41 52 | .."... .HERE AR|
000016F0: 45 20 4E 4F 20 41 44 56 45 4E 54 55 52 45 53 20 |E NO ADVENTURES |
00001700: 4F 4E 20 54 48 49 53 20 44 49 53 4B 2E 22 3A 8D |ON THIS DISK.":.|
00001710: 34 34 31 30 3A 89 31 31 36 30 00 53 1F 37 0A 99 |4410:.1160.S.7..|
00001720: 22 9E 93 12 1D 20 20 D4 48 45 20 41 44 56 45 4E |".... .HE ADVEN|
00001730: 54 55 52 45 53 20 4F 4E 20 54 48 49 53 20 44 49 |TURES ON THIS DI|
00001740: 53 4B 20 41 52 45 3A 20 20 20 11 05 22 3A 8D 33 |SK ARE: ..":.3|
00001750: 37 33 30 00 8E 1F 3C 0A 99 22 11 11 11 81 12 D7 |730...<.."......|
00001760: 48 41 54 20 49 53 20 54 48 45 20 4F 52 49 47 49 |HAT IS THE ORIGI|
00001770: 4E 41 4C 20 46 49 4C 45 4E 41 4D 45 3F 9F 22 3A |NAL FILENAME?.":|
00001780: 4C 58 B2 31 35 3A 8D 31 39 30 3A 49 B2 31 00 A2 |LX.15:.190:I.1..|
00001790: 1F 46 0A 8B 49 24 B2 46 51 24 28 49 29 A7 32 36 |.F..I$.FQ$(I).26|
000017A0: 34 30 00 B8 1F 48 0A 49 B2 49 AA 31 3A 8B 49 B3 |40...H.I.I.1:.I.|
000017B0: B2 4E 51 A7 32 36 33 30 00 F0 1F 4A 0A 99 22 11 |.NQ.2630...J..".|
000017C0: 11 96 12 1D 1D 1D 1D 1D C6 49 4C 45 4E 41 4D 45 |.........ILENAME|
000017D0: 20 4E 4F 54 20 46 4F 55 4E 44 20 49 4E 20 4C 49 | NOT FOUND IN LI|
000017E0: 53 54 2E 22 3A 8D 34 34 31 30 3A 89 31 31 36 30 |ST.":.4410:.1160|
000017F0: 00 20 20 50 0A 99 22 11 1E 12 D7 48 41 54 20 49 |. P.."....HAT I|
00001800: 53 20 54 48 45 20 4E 45 57 20 46 49 4C 45 4E 41 |S THE NEW FILENA|
00001810: 4D 45 3F 9F 22 3A 4C 58 B2 31 35 3A 8D 31 39 30 |ME?.":LX.15:.190|
00001820: 00 48 20 5A 0A 99 22 11 11 05 20 20 20 20 20 20 |.H Z.."... |
00001830: 20 20 20 20 C3 48 41 4E 47 49 4E 47 20 C6 49 4C | .HANGING .IL|
00001840: 45 4E 41 4D 45 53 2E 22 00 7B 20 64 0A 9F 31 35 |ENAMES.".{ d..15|
00001850: 2C 38 2C 31 35 2C 22 49 30 22 3A 98 31 35 2C 22 |,8,15,"I0":.15,"|
00001860: 52 45 4E 41 4D 45 30 3A 22 AA 49 24 AA 22 3D 22 |RENAME0:".I$."="|
00001870: AA 46 51 24 28 49 29 3A A0 31 35 00 95 20 6E 0A |.FQ$(I):.15.. n.|
00001880: 46 51 24 28 49 29 B2 49 24 3A 8D 34 38 30 30 3A |FQ$(I).I$:.4800:|
00001890: 89 31 31 36 30 00 A8 20 B7 0B 8F 20 2A 2A 2A 20 |.1160.. ... *** |
000018A0: 51 55 49 54 20 2A 2A 2A 00 C9 20 B8 0B 99 22 93 |QUIT ***.. ...".|
000018B0: 09 05 22 C7 28 31 34 32 29 3A 97 38 30 38 2C 32 |..".(142):.808,2|
000018C0: 33 37 3A 9E 35 38 32 36 30 00 CF 20 C2 0B 80 00 |37:.58260.. ....|
000018D0: 05 21 84 0D 99 22 11 11 11 96 12 20 D4 48 45 52 |.!..."..... .HER|
000018E0: 45 20 41 52 45 20 4E 4F 20 4C 4F 43 41 54 49 4F |E ARE NO LOCATIO|
000018F0: 4E 53 2C 20 4F 42 4A 45 43 54 53 20 4F 52 20 20 |NS, OBJECTS OR |
00001900: 20 20 20 22 3B 00 3B 21 8E 0D 99 22 20 4F 42 53 | ";.;!..." OBS|
00001910: 54 41 43 4C 45 53 20 49 4E 20 4D 45 4D 4F 52 59 |TACLES IN MEMORY|
00001920: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00001930: 20 20 20 20 22 3A 89 31 33 35 30 00 51 21 92 0E | ":.1350.Q!..|
00001940: 58 B2 30 3A 81 49 B2 31 A4 4E 51 3A 99 A3 58 29 |X.0:.I.1.NQ:..X)|
00001950: 3B 00 62 21 94 0E 8B 49 B3 31 30 20 A7 99 22 20 |;.b!...I.10 .." |
00001960: 22 3B 00 73 21 96 0E 99 49 22 9D 2D 22 46 51 24 |";.s!...I".-"FQ$|
00001970: 28 49 29 00 89 21 9C 0E 8B 49 B2 31 35 A7 99 22 |(I)..!...I.15.."|
00001980: 13 11 11 22 3A 58 B2 32 30 00 90 21 A6 0E 82 49 |...":X.20..!...I|
00001990: 00 A8 21 B0 0E 99 22 13 11 11 11 11 11 11 11 11 |..!...".........|
000019A0: 11 11 11 11 11 22 3A 8E 00 C5 21 26 11 84 31 35 |.....":...!&..15|
000019B0: 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B 45 |,EN,EM$,ET,ES:.E|
000019C0: 4E B2 30 A7 8E 00 E2 21 30 11 99 22 12 11 11 45 |N.0....!0.."...E|
000019D0: 52 52 4F 52 92 3A 20 22 45 4D 24 3A A0 32 3A A0 |RROR.: "EM$:.2:.|
000019E0: 31 35 00 0D 22 3A 11 99 22 11 11 20 20 20 20 20 |15..":..".. |
000019F0: 81 12 D0 52 45 53 53 20 53 50 41 43 45 42 41 52 |...RESS SPACEBAR|
00001A00: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 22 22 | TO CONTINUE".""|
00001A10: 44 11 8B C2 28 31 39 37 29 B3 B1 36 30 A7 34 34 |D...(197)..60.44|
00001A20: 32 30 00 2F 22 4E 11 97 31 39 38 2C 30 3A 8E 00 |20./"N..198,0:..|
00001A30: 4F 22 58 11 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 |O"X..15,EN,EM$,E|
00001A40: 54 2C 45 53 3A 8B 45 4E B2 30 A7 31 37 30 30 00 |T,ES:.EN.0.1700.|
00001A50: 6E 22 62 11 A0 32 3A A0 31 35 3A 8B 45 4E B3 B1 |n"b..2:.15:.EN..|
00001A60: 36 33 A7 8D 34 34 30 30 3A 89 31 31 36 30 00 A3 |63..4400:.1160..|
00001A70: 22 6C 11 99 22 96 11 12 20 20 D9 4F 55 20 48 41 |"l.."... .OU HA|
00001A80: 56 45 20 41 4C 52 45 41 44 59 20 55 53 45 44 20 |VE ALREADY USED |
00001A90: 54 48 49 53 20 46 49 4C 45 4E 41 4D 45 21 20 20 |THIS FILENAME! |
00001AA0: 20 22 3B 00 E7 22 76 11 99 22 12 20 20 20 20 20 | ";.."v..". |
00001AB0: 20 20 C4 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F | .O YOU WANT TO|
00001AC0: 20 52 45 50 4C 41 43 45 20 49 54 20 3F 20 20 20 | REPLACE IT ? |
00001AD0: 20 20 22 3A 99 22 9F 11 1D 1D 1D 1D 1D 1D 1D 1D | ":."..........|
00001AE0: 1D 1D 1D 1D 1D 22 3B 00 01 23 80 11 85 41 24 3A |.....";..#...A$:|
00001AF0: 8B C8 28 41 24 2C 31 29 B2 22 59 22 A7 34 34 39 |..(A$,1)."Y".449|
00001B00: 32 00 39 23 8A 11 8B C8 28 41 24 2C 31 29 B3 B1 |2.9#....(A$,1)..|
00001B10: 22 4E 22 20 A7 20 99 22 12 D0 4C 45 41 53 45 20 |"N" . ."..LEASE |
00001B20: 41 4E 53 57 45 52 20 59 45 53 20 4F 52 20 4E 4F |ANSWER YES OR NO|
00001B30: 2E 11 22 3A 89 34 34 36 30 00 43 23 8B 11 89 31 |..":.4460.C#...1|
00001B40: 31 36 30 00 66 23 8C 11 9F 31 35 2C 38 2C 31 35 |160.f#...15,8,15|
00001B50: 2C 22 49 30 22 3A 98 31 35 2C 22 53 30 3A 22 AA |,"I0":.15,"S0:".|
00001B60: 49 24 3A A0 31 35 00 7A 23 8E 11 9F 32 2C 38 2C |I$:.15.z#...2,8,|
00001B70: 32 2C 49 24 3A 89 31 37 30 30 00 87 23 9E 11 97 |2,I$:.1700..#...|
00001B80: 38 30 38 2C 32 33 34 00 BA 23 DA 11 49 B2 35 30 |808,234..#..I.50|
00001B90: 3A 4A B2 49 3A 4D 41 58 B2 49 3A 4D 54 B2 4A 3A |:J.I:MAX.I:MT.J:|
00001BA0: 4D 4F B2 32 30 3A 86 49 24 28 39 29 2C 44 24 28 |MO.20:.I$(9),D$(|
00001BB0: 36 29 2C 46 51 24 28 33 30 29 00 04 24 E4 11 86 |6),FQ$(30)..$...|
00001BC0: 52 24 28 49 29 2C 52 28 49 2C 36 29 2C 54 52 24 |R$(I),R(I,6),TR$|
00001BD0: 28 4A 29 2C 4B 57 24 28 4A 29 2C 54 52 28 4A 29 |(J),KW$(J),TR(J)|
00001BE0: 2C 54 56 28 4A 29 2C 4F 42 24 28 4D 4F 29 2C 4F |,TV(J),OB$(MO),O|
00001BF0: 42 28 4D 4F 29 2C 44 4F 28 4D 4F 29 2C 4F 53 24 |B(MO),DO(MO),OS$|
00001C00: 28 4D 4F 29 00 16 24 E9 11 86 54 39 28 4A 29 2C |(MO)..$...T9(J),|
00001C10: 4F 39 28 4D 4F 29 00 60 24 EE 11 86 43 50 24 28 |O9(MO).`$...CP$(|
00001C20: 4D 4F 29 2C 4C 50 28 4D 4F 29 3A 44 24 28 31 29 |MO),LP(MO):D$(1)|
00001C30: B2 22 4E 4F 52 54 48 22 3A 44 24 28 32 29 B2 22 |."NORTH":D$(2)."|
00001C40: 53 4F 55 54 48 22 3A 44 24 28 33 29 B2 22 45 41 |SOUTH":D$(3)."EA|
00001C50: 53 54 22 3A 44 24 28 34 29 B2 22 57 45 53 54 22 |ST":D$(4)."WEST"|
00001C60: 00 7C 24 F8 11 44 24 28 35 29 B2 22 55 50 22 3A |.|$..D$(5)."UP":|
00001C70: 44 24 28 36 29 B2 22 44 4F 57 4E 22 00 86 24 07 |D$(6)."DOWN"..$.|
00001C80: 12 89 31 31 36 30 00 9E 24 5C 12 81 49 B2 31 A4 |..1160..$\..I.1.|
00001C90: 4E 51 3A 46 51 24 28 49 29 B2 22 22 3A 82 00 C3 |NQ:FQ$(I)."":...|
00001CA0: 24 5F 12 4E 51 B2 30 3A 9F 31 35 2C 38 2C 31 35 |$_.NQ.0:.15,8,15|
00001CB0: 3A 9F 32 2C 38 2C 32 2C 22 41 44 43 41 54 2C 53 |:.2,8,2,"ADCAT,S|
00001CC0: 2C 52 22 00 E3 24 60 12 84 31 35 2C 45 4E 2C 45 |,R"..$`..15,EN,E|
00001CD0: 4D 24 2C 45 54 2C 45 53 3A 8B 45 4E B2 30 A7 34 |M$,ET,ES:.EN.0.4|
00001CE0: 37 31 30 00 ED 24 62 12 89 34 37 33 30 00 F7 24 |710..$b..4730..$|
00001CF0: 66 12 84 32 2C 4E 51 00 0F 25 70 12 81 49 B2 31 |f..2,NQ..%p..I.1|
00001D00: A4 4E 51 3A 84 32 2C 46 51 24 28 49 29 3A 82 00 |.NQ:.2,FQ$(I):..|
00001D10: 1C 25 7A 12 A0 32 3A A0 31 35 3A 8E 00 44 25 C0 |.%z..2:.15:..D%.|
00001D20: 12 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 3A 9F |..15,8,15,"I0":.|
00001D30: 32 2C 38 2C 32 2C 22 40 30 3A 41 44 43 41 54 2C |2,8,2,"@0:ADCAT,|
00001D40: 53 2C 57 22 00 4E 25 CA 12 98 32 2C 4E 51 00 66 |S,W".N%...2,NQ.f|
00001D50: 25 D4 12 81 49 B2 31 A4 4E 51 3A 98 32 2C 46 51 |%...I.1.NQ:.2,FQ|
00001D60: 24 28 49 29 3A 82 00 73 25 DE 12 A0 32 3A A0 31 |$(I):..s%...2:.1|
00001D70: 35 3A 8E 00 7B 25 24 13 49 B2 31 00 8F 25 2E 13 |5:..{%$.I.1..%..|
00001D80: 8B 46 51 24 28 49 29 B2 46 24 A7 31 37 30 31 00 |.FQ$(I).F$.1701.|
00001D90: A7 25 38 13 8B 49 B3 B2 4E 51 20 A7 49 B2 49 AA |.%8..I..NQ .I.I.|
00001DA0: 31 3A 89 34 39 31 30 00 B9 25 42 13 8B 4E 51 B3 |1:.4910..%B..NQ.|
00001DB0: B2 33 30 20 A7 34 39 34 30 00 FE 25 47 13 99 22 |.30 .4940..%G.."|
00001DC0: 11 11 11 05 12 20 20 C4 49 53 4B 20 46 55 4C 4C |..... .ISK FULL|
00001DD0: 21 20 20 D0 4C 45 41 53 45 20 55 53 45 20 41 4E |! .LEASE USE AN|
00001DE0: 4F 54 48 45 52 20 44 49 53 4B 2E 22 3A 4E 51 B2 |OTHER DISK.":NQ.|
00001DF0: 33 30 3A 8D 34 34 31 30 3A 89 31 31 36 30 00 18 |30:.4410:.1160..|
00001E00: 26 4C 13 4E 51 B2 49 3A 46 51 24 28 4E 51 29 B2 |&L.NQ.I:FQ$(NQ).|
00001E10: 46 24 3A 89 31 37 30 31 00 00 00 |F$:.1701... |
.......4510."....XL.1.40:." ";:.:..<...I
.39:.C(A$).I.1..A$:..Z.(..J(A$,I,1).." "
.I.I.1:.40.Z.2..H(A$,I.1):A$.J(A$,I.1):.
30...7.X.20..(C(A$).2):.X.0.X.0...8..H("
.....................",X);A$:....<..5429
6,15:.54276,0:.54277,10:.54278,0:.54273,
.(F(A$).4)...F..54276,33:....P.A$."":B$.
" .".%.Z.I0.0.F.D..B$." .".B$.". ..":.B$
;:.120.W.N.B$." .":.B$;.K.X..A$:.A$.."".
150.....I0.I0.1:.I0.30.120......90......
A$.G(13).A$.G(20).." ";:.......A$.G(34).
90.P. ..A$.." ".A$."["........A$.."A".A$
.."Z"........90.....I$."":.198,0:A$.""..
.H..80:.C(I$)..LX..60.3.R..A$.G(13)..60:
.:..F....A$..G(20).250.C.... C(I$).0..".
";:.60:.200.....I$.H(I$,C(I$).1):.".. ."
;:.200......C(I$).LX.200.....I0.F(A$):.I
0.63.I0.96.I0.I0.64:.280......I0.192.I0.
219.I0.I0.128......A$;:I$.I$.A$..."..200
......53281,0:.53280,0: 2: 3: 15.C....".
..................................".K...
."......... APCC PATHWEAVER ".....
."......... DISK EDITOR UTLITY ".....
."..........1 - SEE LIST OF GAMES"......
".........2 - PRINTOUT LIST OF GAMES"...
...".........3 - DISPLAY PASSWORDS".6...
.".........4 - DELETE GAMES FROM DISK".U
.D..".........5 - COPY GAMES".S.N.."....
.....6 - TIDY DISK"...X..".........7 - R
ENAME GAMES"......".........8 - QUIT".V.
..."................................."..
...."..........PRESS 1,2,3,4,5,6,7 OR 8"
.)...."......... THEN PRESS RETURN
".H...."....................";:LX.1:.190
:I.E(I$):.I.1. I.8 .1160...... I . 2000,
2100,2200,2400,2300,2500,2600,3000......
1160.P....RN.0..".............GAME. IN.
MEMORY.".....A$.N$:.55.........F..I.1.30
00:.:.251,2:....P..53281,0:.53280,0.E.U.
."... PATHWEAVER DISK EDITOR UTILITY
".~.Z..".. THE ADVENTURES ON THIS
DISK ARE: ..":.4700.C.[..NQ.1 .."....
THERE ARE NO ADVENTURES ON THIS DISK.":
.4410:.1160.M._..3730...D.."......TYPE T
HE GAME'S NUMBER THEN PRESS RETURN.":LX.
2.;.I.."..PRESS @ FOR ANOTHER LISTING.
".N.J.."..PRESS + TO RETURN TO
THE MENU. ."...N..".NUMBER-> .
.";:.190:.I$."@".1360...P..I$."+".EN.1:
....R..E(I$).1 . E(I$).NQ ..".
.":.1390...T.I$.FQ$(E(I$))...V.."
.............."I$. .X.F$.I$:I$.I$.",S,R"
.J....15,8,15,"I0":.2,8,2,I$:.4390:.EN.0
...|...."................... LOADING...P
LEASE WAIT "......2,PW$... ..2,N$,AU$,EG
$,RN,J,K,SL,EG:X.1.T....2,I1$,I2$,I3$:.I
2$." ".IN$.I1$:.1460.....IN$.I1$.I2$:.I3
$.." ".IN$.IN$.I3$......I.1.RN......2,A$
,B$......B$." ".R$(I).A$:.1465.>...R$(I)
.A$.B$.E....I.H....I.1.RN:.L.1.6:.2,R(I,
L):.L:.I.V.H..J.0.1500...R..I.1.J:.2,TR$
(I),KW$(I),TR(I),TV(I),T9(I):.......K.0.
1520......I.1.K:.2,OB$(I),OB(I),DO(I),OS
$(I),CP$(I),LP(I),O9(I):..1...."........
..............TIDING MEMORY...PLEASE WAI
T":I..(0).>... 2: 15:..S.R..4700:I$.F$."
,S,W":.15,8,15,"I0":.2,8,2,I$:.4440.....
Q$.G(13):.4900.....Q1$.G(34):Q2$.G(34).G
(13).G(34):Q3$.G(34).G(13).V....PW$."" .
PW$."PASSWORD"......"................. R
ECORDING FILE....PLEASE WAIT ".!....2,Q1
$;PW$;Q1$.\.B..2,Q1$;N$;Q2$;AU$;Q2$;EG$;
Q3$;RN;Q$;J;Q$;K;Q$;SL;Q$;EG...L..IN$.""
.I1$." ":I2$." ":I3$." ":.1750...M..C(IN
$).81.I1$.IN$:I2$." ":I3$." ":.1750...N.
I1$.H(IN$,80):.C(IN$).162.I2$.J(IN$,81):
I3$." ":.1750...O.I2$.J(IN$,81,80):I3$.J
(IN$,162).4.V..2,Q1$;I1$;Q2$;I2$;Q2$;I3$
;Q1$.@....I.1.RN.G....C(R$(I)).81.B$." "
:A$.R$(I):.1763.....B$.J(R$(I),81):A$.H(
R$(I),80)......2,Q1$;A$;Q2$;B$;Q1$:.I.I.
... I.1.RN:.L.1.6:.2,R(I,L):.L:.I.W....J
.0.1800......I.1.J:.2,Q1$;TR$(I);Q2$;KW$
(I);Q3$;TR(I);Q$;TV(I);Q$;T9(I):..'....K
.0.1820.2....I.1.K.}....2,Q1$OB$(I);Q3$O
B(I);Q$DO(I);Q$;Q1$;OS$(I);Q2$;CP$(I);Q3
$LP(I)Q$O9(I)........... 2: 15:.4800....
..1160.B.O.. *** DISPLAY LIST OF GAMES *
**...P..".... THE ADVENTURES ON THIS DI
SK ARE: ..":.4700.?.Z..NQ.1..".... THE
RE ARE NO ADVENTURES ON THIS DISK.":.441
0:.1160.I....3730.`...."...":.4410:.1160
...3.. *** PRINTOUT LIST OF GAMES ***...
4.."..... LOADING LIST OF GAMES ...":.
4700...>..NQ.1 .."... THERE ARE NO ADVEN
TURES ON THIS DISK.":.4410:.1160...?..3,
4:.3,G(13):.ST.0. 3:.2120.G.@. 3:.".....
PRINTER NOT READY.":.4410:.1160...H..3,4
,7:.3," NAME OF GAME",,," FILENAME
PASSWORD"...M..3," ============",,
," ======== ========".R.R..I.1.
NQ:.FQ$(I)...\..2,8,2,FQ$(I).",S,R":.2,P
W$,N$: 2...F.LX.45:.2180:LX.18:N$.FQ$(I)
:.2180.).H..3,PW$.0.P..I.@.Z..3: 3:.1160
.....A$.N$.H("
",LX.C(N$))......
3,A$;:....... *** DISPLAY PASSWORDS ***.
....."..... LOADING LIST OF GAMES ..."
:.4700.*....NQ.1 .."... THERE ARE NO ADV
ENTURES ON THIS DISK.":.4410:.1160.Z....
".... FILENAME (PASSWORD)
.".F....I.1.NQ......2,8,2,FQ$(I).",S,R":
.2,PW$,N$: 2......".";.5);FQ$(I);.23);".
(";PW$;")"...J..I.15.."..":.4410:.".
"...T..I:.4410:
.1160...... *** COPY DATA FILE ***.M....
"... INSERT SOURCE DISK THEN PRESS RETU
RN ".T...."...................";:LX.0:.
190.......1360:.EN.0.1160......"...
INSERT DESTINATION DISK ";...
..." THEN PRESS RETURN
"......"....................";:LX.0:
.190......1650.;._.. *** SCRATCH A FILE
***.T.`..".... THE ADVENTURES ON THIS D
ISK ARE: ..":.4700...E..NQ.1 .."... TH
ERE ARE NO ADVENTURES ON THIS DISK.":.44
10:.1160.B.J..3730...T.."..TYPE THE FILE
NAME OF THE GAME YOU "...U..".WANT TO ER
ASE THEN PRESS RETURN. ..".).~.LX.15:.19
0.]....15,8,15,"I0":.2,8,2,I$.",S,R":.43
90:.EN.0.1160.D... 2.Y....15,"S0:".I$: 1
5.....I.1... ..FQ$(I).I$.2470......I..NQ
.I.I.1:.2464......I.NQ .2480......J.I .
NQ.1:FQ$(J).FQ$(J.1):......NQ.NQ.1:.NQ.
0..4800......1160...C.. *** VALIDATE DIS
K ***.P.D.."... TIDY CONTENTS O
F DISK ".{.N.."... INSERT
DISK TO BE TIDIED"...X..". T
HEN PRESS RETURN".J...LX.1:."...........
...........";:.190......"... TIDI
NG CONTENTS OF DISK ".*...."....
.............PLEASE BE PATIENT...".[....
"...THIS PROCESS CAN TAKE SEVERAL MINUTE
S."......15,8,15,"I0":.15,"VALIDATE0": 1
5......1160...'.. *** RENAME A FILE ***.
V.(.."..... LOADING LIST OF GAMES ..."
:.4700...2..NQ.1 .."... THERE ARE NO ADV
ENTURES ON THIS DISK.":.4410:.1160.S.7..
".... THE ADVENTURES ON THIS DISK ARE:
..":.3730...<..".....WHAT IS THE ORIGI
NAL FILENAME?.":LX.15:.190:I.1...F..I$.F
Q$(I).2640...H.I.I.1:.I..NQ.2630...J..".
........FILENAME NOT FOUND IN LIST.":.44
10:.1160. P.."...WHAT IS THE NEW FILENA
ME?.":LX.15:.190.H Z.."... CHAN
GING FILENAMES.".{ D..15,8,15,"I0":.15,"
RENAME0:".I$."=".FQ$(I): 15.. N.FQ$(I).I
$:.4800:.1160.. ... *** QUIT ***.I ...".
.."G(142):.808,237:.58260.O B....!..."..
... THERE ARE NO LOCATIONS, OBJECTS OR
";.;!..." OBSTACLES IN MEMORY.
":.1350.Q!..X.0:.I.1.NQ:..X)
;.B!...I.10 .." ";.S!...I".-"FQ$(I)..!..
.I.15.."...":X.20..!...I..!...".........
.....":..E!&..15,EN,EM$,ET,ES:.EN.0....!
0.."...ERROR.: "EM$: 2: 15..":.."..
..PRESS SPACEBAR TO CONTINUE".""D..B(197
)..60.4420./"N..198,0:..O"X..15,EN,EM$,E
T,ES:.EN.0.1700.N"B. 2: 15:.EN..63..4400
:.1160.."L.."... YOU HAVE ALREADY USED
THIS FILENAME! ";.."V..". DO YOU
WANT TO REPLACE IT ? ":."..........
.....";..#...A$:.H(A$,1)."Y".4492.9#...H
(A$,1).."N" . .".PLEASE ANSWER YES OR NO
..":.4460.C#...1160.F#...15,8,15,"I0":.1
5,"S0:".I$: 15.Z#...2,8,2,I$:.1700..#...
808,234..#Z.I.50:J.I:MAX.I:MT.J:MO.20:.I
$(9),D$(6),FQ$(30)..$...R$(I),R(I,6),TR$
(J),KW$(J),TR(J),TV(J),OB$(MO),OB(MO),DO
(MO),OS$(MO)..$...T9(J),O9(MO).`$...CP$(
MO),LP(MO):D$(1)."NORTH":D$(2)."SOUTH":D
$(3)."EAST":D$(4)."WEST".|$..D$(5)."UP":
D$(6)."DOWN"..$...1160..$\..I.1.NQ:FQ$(I
)."":..C$_.NQ.0:.15,8,15:.2,8,2,"ADCAT,S
,R"..$`..15,EN,EM$,ET,ES:.EN.0.4710..$B.
.4730..$F..2,NQ..%P..I.1.NQ:.2,FQ$(I):..
.%Z. 2: 15:..D%...15,8,15,"I0":.2,8,2,"@
0:ADCAT,S,W".N%J..2,NQ.F%T..I.1.NQ:.2,FQ
$(I):..S%.. 2: 15:..{%$.I.1..%...FQ$(I).
F$.1701..%8..I..NQ .I.I.1:.4910..%B..NQ.
.30 .4940..%G.."..... DISK FULL! PLEAS
E USE ANOTHER DISK.":NQ.30:.4410:.1160..
&L.NQ.I:FQ$(NQ).F$:.1701...
> CLICK IMAGE PREVIEW FOR FULL MODAL