WA
FILE INFORMATION
FILENAME(S): WA
FILE TYPE(S): PRG
FILE SIZE: 11.7K
FIRST SEEN: 2025-11-30 20:21:59
APPEARS ON: 1 disk(s)
FILE HASH
75d9a11cea9e94a7d785055bad2c71264f4b62e750f7697820ea40dfa3710a08
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| STORY WRITER | WA | PRG | Curtcool, Misc | 21 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2C 08 01 00 8F 20 4F 50 45 4E 31 35 2C 38 |..,.... OPEN15,8|
00000010: 2C 31 35 3A 50 52 49 4E 54 23 31 35 2C 22 53 30 |,15:PRINT#15,"S0|
00000020: 3A 57 41 22 3A 43 4C 4F 53 45 31 35 00 3E 08 02 |:WA":CLOSE15.>..|
00000030: 00 8F 20 53 41 56 45 20 22 57 41 22 2C 38 00 57 |.. SAVE "WA",8.W|
00000040: 08 0A 00 8B 41 B2 30 A7 41 B2 31 3A 93 22 57 4F |....A.0.A.1:."WO|
00000050: 42 4A 22 2C 38 2C 31 00 6B 08 32 00 97 35 32 2C |BJ",8,1.k.2..52,|
00000060: 38 30 3A 97 35 36 2C 38 30 3A 9C 00 87 08 63 00 |80:.56,80:....c.|
00000070: 89 20 31 30 30 30 30 3A 20 8F 20 2A 2A 20 44 52 |. 10000: . ** DR|
00000080: 49 56 45 52 20 2A 2A 00 9D 08 64 00 8F 20 2A 2A |IVER **...d.. **|
00000090: 20 48 4F 55 53 45 4B 45 45 50 20 2A 2A 00 CB 08 | HOUSEKEEP **...|
000000A0: 6E 00 99 22 9F 22 3B C7 28 38 29 3B C7 28 31 34 |n..".";.(8);.(14|
000000B0: 29 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 |):.53280,0:.5328|
000000C0: 31 2C 30 3A 97 36 35 30 2C 36 34 00 E1 08 78 00 |1,0:.650,64...x.|
000000D0: 86 20 53 46 24 28 31 32 29 2C 43 46 25 28 31 37 |. SF$(12),CF%(17|
000000E0: 29 00 FE 08 82 00 81 49 B2 38 33 32 A4 38 34 37 |)......I.832.847|
000000F0: 3A 97 49 2C 30 3A 82 3A 4E 41 24 B2 22 22 00 34 |:.I,0:.:NA$."".4|
00000100: 09 8C 00 9F 33 2C 38 2C 33 2C 22 41 44 56 20 49 |....3,8,3,"ADV I|
00000110: 4E 46 4F 2C 53 2C 52 22 3A 81 49 B2 38 33 32 A4 |NFO,S,R":.I.832.|
00000120: 38 34 36 3A 84 33 2C 42 59 25 3A 97 49 2C 42 59 |846:.3,BY%:.I,BY|
00000130: 25 3A 82 49 00 48 09 8E 00 84 33 2C 42 59 25 3A |%:.I.H....3,BY%:|
00000140: 97 38 35 31 2C 42 59 25 00 65 09 91 00 84 33 2C |.851,BY%.e....3,|
00000150: 41 4C 25 2C 4E 41 24 3A A0 33 3A 8B 41 4C 25 B2 |AL%,NA$:.3:.AL%.|
00000160: 30 A7 31 35 30 00 78 09 94 00 4E 41 24 B2 C8 28 |0.150.x...NA$..(|
00000170: 4E 41 24 2C 41 4C 25 29 00 98 09 96 00 50 31 B2 |NA$,AL%).....P1.|
00000180: 38 32 38 3A 50 32 B2 38 32 39 3A 50 33 B2 38 33 |828:P2.829:P3.83|
00000190: 30 3A 50 34 B2 38 33 31 00 A5 09 A0 00 9F 31 35 |0:P4.831......15|
000001A0: 2C 38 2C 31 35 00 AB 09 C7 00 8E 00 C4 09 C8 00 |,8,15...........|
000001B0: 8F 20 2A 2A 20 54 49 54 4C 45 20 53 43 52 45 45 |. ** TITLE SCREE|
000001C0: 4E 20 2A 2A 00 EF 09 DC 00 97 32 35 35 2C 31 3A |N **......255,1:|
000001D0: 9E 34 39 31 35 38 3A 8D 39 35 30 3A 9E 34 39 31 |.49158:.950:.491|
000001E0: 38 38 3A 8D 31 35 30 30 3A 8D 39 36 30 3A 8E 00 |88:.1500:.960:..|
000001F0: 0A 0A 2C 01 8F 20 2A 2A 20 43 52 45 44 49 54 53 |..,.. ** CREDITS|
00000200: 20 53 43 52 45 45 4E 20 2A 2A 00 42 0A 36 01 97 | SCREEN **.B.6..|
00000210: 32 35 35 2C 32 3A 9E 34 39 31 35 38 3A 8D 39 35 |255,2:.49158:.95|
00000220: 30 3A 9E 34 39 31 38 38 3A 8D 39 36 30 3A 97 32 |0:.49188:.960:.2|
00000230: 35 35 2C 33 3A 9E 34 39 31 35 38 3A 9E 34 39 32 |55,3:.49158:.492|
00000240: 30 36 00 4C 0A 3B 01 4B 24 B2 22 22 00 68 0A 40 |06.L.;.K$."".h.@|
00000250: 01 81 49 B2 31 A4 35 30 30 3A A1 4B 24 3A 8B 4B |..I.1.500:.K$:.K|
00000260: 24 B2 22 22 A7 33 33 30 00 8F 0A 45 01 8D 39 35 |$."".330...E..95|
00000270: 30 3A 8D 31 36 30 30 3A 99 22 93 22 3A 8D 39 36 |0:.1600:.".":.96|
00000280: 30 3A 97 32 35 35 2C 30 3A 9E 34 39 31 35 38 00 |0:.255,0:.49158.|
00000290: AB 0A 47 01 97 32 35 35 2C 36 AC 31 36 AA 37 3A |..G..255,6.16.7:|
000002A0: 9E 34 39 31 36 37 3A 89 33 39 39 00 D9 0A 4A 01 |.49167:.399...J.|
000002B0: 8B C2 28 36 35 33 29 B2 32 A7 8D 39 35 30 3A 8D |..(653).2..950:.|
000002C0: 31 36 30 30 3A 99 22 93 22 3A 8D 39 36 30 3A 8D |1600:.".":.960:.|
000002D0: 32 30 30 30 3A 89 33 39 39 00 E5 0A 54 01 82 49 |2000:.399...T..I|
000002E0: 3A 89 33 32 35 00 F4 0A 8F 01 97 35 33 32 38 31 |:.325......53281|
000002F0: 2C 30 3A 8E 00 0B 0B 90 01 8F 20 2A 2A 20 44 49 |,0:....... ** DI|
00000300: 53 50 4C 41 59 20 41 54 20 2A 2A 00 1F 0B 95 01 |SPLAY AT **.....|
00000310: 8B 59 B2 30 A7 99 22 13 22 3B 3A 89 34 31 35 00 |.Y.0..".";:.415.|
00000320: 3B 0B 9A 01 99 22 13 22 3B 3A 81 59 59 B2 31 A4 |;....".";:.YY.1.|
00000330: 59 3A 99 22 11 22 3B 3A 82 59 59 00 51 0B 9F 01 |Y:.".";:.YY.Q...|
00000340: 81 58 58 B2 31 A4 58 3A 99 22 1D 22 3B 3A 82 58 |.XX.1.X:.".";:.X|
00000350: 58 00 5B 0B A4 01 99 4D 24 3A 8E 00 78 0B F4 01 |X.[....M$:..x...|
00000360: 8F 20 2A 2A 20 4D 41 4B 45 20 4F 55 54 4C 49 4E |. ** MAKE OUTLIN|
00000370: 45 20 42 4F 58 20 2A 2A 00 8A 0B F9 01 97 35 33 |E BOX **......53|
00000380: 32 38 30 2C 30 3A 99 22 9F 22 00 C1 0B FE 01 99 |280,0:."."......|
00000390: 22 93 05 11 11 11 11 A7 B7 B7 B7 B7 B7 B7 B7 B7 |"...............|
000003A0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
000003B0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 A5 22 |..............."|
000003C0: 3B 00 CE 0B 08 02 81 20 49 B2 31 A4 31 34 00 FF |;...... I.1.14..|
000003D0: 0B 12 02 99 22 A7 20 20 20 20 20 20 20 20 20 20 |....". |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 A5 22 3B 00 | .";.|
00000400: 07 0C 1C 02 82 20 49 00 37 0C 26 02 99 22 A7 AF |..... I.7.&.."..|
00000410: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000420: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000430: AF AF AF AF AF A5 22 00 42 0C 30 02 99 22 9F 22 |......".B.0.."."|
00000440: 3A 8E 00 63 0C 58 02 8F 20 2A 2A 20 41 44 56 45 |:..c.X.. ** ADVE|
00000450: 4E 54 55 57 52 49 54 45 20 4F 50 54 49 4F 4E 53 |NTUWRITE OPTIONS|
00000460: 20 2A 2A 00 6C 0C 5D 02 8D 35 30 30 00 87 0C 62 | **.l.]..500...b|
00000470: 02 81 49 B2 30 A4 36 3A 97 32 35 35 2C 49 3A 9E |..I.0.6:.255,I:.|
00000480: 34 39 31 35 32 3A 82 00 9A 0C 8A 02 97 32 35 35 |49152:.......255|
00000490: 2C 32 37 3A 9E 34 39 31 35 32 00 A3 0C 94 02 8D |,27:.49152......|
000004A0: 38 35 30 00 BB 0C 99 02 8B 20 4B 24 B3 22 31 22 |850...... K$."1"|
000004B0: B0 4B 24 B1 22 36 22 A7 36 36 30 00 C7 0C A8 02 |.K$."6".660.....|
000004C0: 43 B2 C5 28 4B 24 29 00 CD 0C BB 02 8E 00 F0 0C |C..(K$).........|
000004D0: BC 02 8F 20 2A 2A 20 43 4C 45 41 52 20 49 4E 53 |... ** CLEAR INS|
000004E0: 54 52 55 43 54 49 4F 4E 20 41 52 45 41 20 2A 2A |TRUCTION AREA **|
000004F0: 00 0A 0D C6 02 97 50 31 2C 35 3A 97 50 32 2C 31 |......P1,5:.P2,1|
00000500: 34 3A 9E 34 39 31 35 35 3A 8E 00 27 0D EE 02 8F |4:.49155:..'....|
00000510: 20 2A 2A 20 43 4C 45 41 52 20 42 4F 54 54 4F 4D | ** CLEAR BOTTOM|
00000520: 20 57 49 4E 44 4F 57 00 41 0D F3 02 97 50 31 2C | WINDOW.A....P1,|
00000530: 32 30 3A 97 50 32 2C 35 3A 9E 34 39 31 35 35 3A |20:.P2,5:.49155:|
00000540: 8E 00 5F 0D 20 03 8F 20 2A 2A 20 53 43 41 4E 20 |.._. .. ** SCAN |
00000550: 46 4F 52 20 53 50 41 43 45 42 41 52 20 2A 2A 00 |FOR SPACEBAR **.|
00000560: 68 0D 2A 03 8D 38 35 30 00 81 0D 34 03 8B 4B 24 |h.*..850...4..K$|
00000570: B3 B1 22 20 22 AF 4B 24 B3 B1 22 A0 22 A7 38 31 |.." ".K$..".".81|
00000580: 30 00 87 0D 3E 03 8E 00 A0 0D 52 03 8F 20 2A 2A |0...>.....R.. **|
00000590: 20 57 41 49 54 20 46 4F 52 20 4B 45 59 20 2A 2A | WAIT FOR KEY **|
000005A0: 00 B3 0D 5C 03 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 |...\..K$:.K$."".|
000005B0: 38 36 30 00 C8 0D 66 03 8B C2 28 38 33 34 29 B2 |860...f...(834).|
000005C0: 31 A7 9E 34 39 32 31 35 00 CE 0D 83 03 8E 00 EF |1..49215........|
000005D0: 0D 84 03 8F 20 2A 2A 20 54 45 53 54 20 46 4F 52 |.... ** TEST FOR|
000005E0: 20 44 49 53 4B 20 45 52 52 4F 52 53 20 2A 2A 00 | DISK ERRORS **.|
000005F0: FB 0D 8E 03 84 31 35 2C 45 3A 8E 00 12 0E B6 03 |.....15,E:......|
00000600: 8F 20 2A 2A 20 53 43 52 45 45 4E 20 4F 46 46 20 |. ** SCREEN OFF |
00000610: 2A 2A 00 2C 0E BB 03 97 35 33 32 36 35 2C C2 28 |**.,....53265,.(|
00000620: 35 33 32 36 35 29 AF 32 33 39 3A 8E 00 42 0E C0 |53265).239:..B..|
00000630: 03 8F 20 2A 2A 20 53 43 52 45 45 4E 20 4F 4E 20 |.. ** SCREEN ON |
00000640: 2A 2A 00 5B 0E C5 03 97 35 33 32 36 35 2C C2 28 |**.[....53265,.(|
00000650: 35 33 32 36 35 29 B0 31 36 3A 8E 00 72 0E E8 03 |53265).16:..r...|
00000660: 8F 20 2A 2A 20 43 41 52 44 20 49 4D 41 47 45 20 |. ** CARD IMAGE |
00000670: 2A 2A 00 7F 0E ED 03 97 35 33 32 38 30 2C 36 00 |**......53280,6.|
00000680: B3 0E F2 03 99 22 93 1F 12 20 20 20 20 20 20 20 |....."... |
00000690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006B0: 20 22 3B 00 E8 0E FC 03 99 22 1F 12 20 05 20 20 | ";......".. . |
000006C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006E0: 20 20 20 1F 20 20 22 3B 00 1E 0F 06 04 99 22 1F | . ";......".|
000006F0: 12 20 05 20 20 20 20 20 20 20 20 20 20 20 20 20 |. . |
00000700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000710: 20 20 20 20 20 20 20 20 90 20 1F 20 22 3B 00 2C | . . ";.,|
00000720: 0F 10 04 81 20 49 B2 30 20 A4 20 37 00 62 0F 1A |.... I.0 . 7.b..|
00000730: 04 99 22 1F 12 20 05 20 A3 A3 A3 A3 A3 A3 A3 A3 |..".. . ........|
00000740: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000750: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 90 20 1F 20 |........... . . |
00000760: 22 3B 00 70 0F 1F 04 8B 49 B2 37 A7 31 30 37 30 |";.p....I.7.1070|
00000770: 00 A6 0F 24 04 99 22 1F 12 20 05 20 20 20 20 20 |...$..".. . |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007A0: 90 20 1F 20 22 3B 00 AD 0F 2E 04 82 49 00 E4 0F |. . ";......I...|
000007B0: 38 04 99 22 1F 12 20 1F 20 90 20 20 20 20 20 20 |8..".. . . |
000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 90 20 | . |
000007E0: 1F 20 22 3B 00 16 10 42 04 99 22 1F 12 20 20 20 |. ";...B..".. |
000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000810: 20 20 20 20 20 22 00 1C 10 4B 04 8E 00 36 10 DC | "...K...6..|
00000820: 05 8F 20 2A 2A 20 49 4E 54 4F 20 4D 55 4C 54 49 |.. ** INTO MULTI|
00000830: 20 42 4D 20 2A 2A 00 64 10 E6 05 97 35 36 35 37 | BM **.d....5657|
00000840: 38 2C C2 28 35 36 35 37 38 29 B0 33 3A 97 35 36 |8,.(56578).3:.56|
00000850: 35 37 36 2C 28 C2 28 35 36 35 37 36 29 AF 32 35 |576,(.(56576).25|
00000860: 32 29 B0 32 00 99 10 F0 05 97 35 33 32 37 32 2C |2).2......53272,|
00000870: 28 C2 28 35 33 32 37 32 29 AF 31 35 29 B0 31 31 |(.(53272).15).11|
00000880: 32 3A 97 35 33 32 37 32 2C 28 C2 28 35 33 32 37 |2:.53272,(.(5327|
00000890: 32 29 AF 32 34 30 29 B0 38 00 C5 10 FA 05 97 35 |2).240).8......5|
000008A0: 33 32 36 35 2C C2 28 35 33 32 36 35 29 B0 33 32 |3265,.(53265).32|
000008B0: 3A 97 35 33 32 37 30 2C C2 28 35 33 32 37 30 29 |:.53270,.(53270)|
000008C0: B0 31 36 3A 8E 00 E1 10 40 06 8F 20 2A 2A 20 4F |.16:....@.. ** O|
000008D0: 55 54 20 4F 46 20 4D 55 4C 54 49 20 42 4D 20 2A |UT OF MULTI BM *|
000008E0: 2A 00 18 11 4A 06 97 35 33 32 38 31 2C 30 3A 97 |*...J..53281,0:.|
000008F0: 35 36 35 37 38 2C C2 28 35 36 35 37 38 29 B0 33 |56578,.(56578).3|
00000900: 3A 97 35 36 35 37 36 2C 28 C2 28 35 36 35 37 36 |:.56576,(.(56576|
00000910: 29 AF 32 35 32 29 B0 33 00 4C 11 54 06 97 35 33 |).252).3.L.T..53|
00000920: 32 37 32 2C 28 C2 28 35 33 32 37 32 29 AF 31 35 |272,(.(53272).15|
00000930: 29 B0 31 36 3A 97 35 33 32 37 32 2C 28 C2 28 35 |).16:.53272,(.(5|
00000940: 33 32 37 32 29 AF 32 34 30 29 B0 36 00 7A 11 5E |3272).240).6.z.^|
00000950: 06 97 35 33 32 36 35 2C C2 28 35 33 32 36 35 29 |..53265,.(53265)|
00000960: AF 32 32 33 3A 97 35 33 32 37 30 2C C2 28 35 33 |.223:.53270,.(53|
00000970: 32 37 30 29 AF 32 33 39 3A 8E 00 8E 11 D0 07 8F |270).239:.......|
00000980: 20 2A 2A 20 4F 50 54 49 4F 4E 53 20 2A 2A 00 C3 | ** OPTIONS **..|
00000990: 11 D5 07 97 35 33 32 38 31 2C 30 3A 8D 35 30 30 |....53281,0:.500|
000009A0: 3A 97 32 35 35 2C 30 3A 9E 34 39 31 35 38 3A 97 |:.255,0:.49158:.|
000009B0: 32 35 35 2C 30 36 AC 31 36 AA 30 37 3A 9E 34 39 |255,06.16.07:.49|
000009C0: 31 36 37 00 FA 11 DA 07 9E 34 39 31 36 31 3A 81 |167......49161:.|
000009D0: 49 B2 31 36 32 A4 31 36 37 3A 97 32 35 35 2C 49 |I.162.167:.255,I|
000009E0: 3A 9E 34 39 31 35 32 3A 82 49 3A 97 32 35 35 2C |:.49152:.I:.255,|
000009F0: 31 37 39 3A 9E 34 39 31 35 32 00 18 12 DF 07 8D |179:.49152......|
00000A00: 32 35 30 30 3A 8D 37 35 30 3A 97 32 35 35 2C 32 |2500:.750:.255,2|
00000A10: 37 3A 9E 34 39 31 35 32 00 35 12 E4 07 8D 38 35 |7:.49152.5....85|
00000A20: 30 3A 8B 4B 24 B3 22 31 22 B0 4B 24 B1 22 35 22 |0:.K$."1".K$."5"|
00000A30: A7 32 30 32 30 00 5D 12 EE 07 4B B2 C5 28 4B 24 |.2020.]...K..(K$|
00000A40: 29 3A 91 4B 89 32 31 30 30 2C 32 32 30 30 2C 32 |):.K.2100,2200,2|
00000A50: 36 30 30 2C 32 33 30 30 2C 32 34 30 30 00 6A 12 |600,2300,2400.j.|
00000A60: 33 08 9E 34 39 31 36 34 3A 8E 00 79 12 34 08 8F |3..49164:..y.4..|
00000A70: 20 2A 2A 20 43 4C 49 43 4B 00 94 12 3E 08 8B C2 | ** CLICK...>...|
00000A80: 28 38 33 34 29 B2 30 A7 97 38 33 34 2C 31 3A 89 |(834).0..834,1:.|
00000A90: 32 31 39 39 00 9F 12 48 08 97 38 33 34 2C 30 00 |2199...H..834,0.|
00000AA0: A9 12 97 08 89 32 30 31 35 00 C2 12 98 08 8F 20 |.....2015...... |
00000AB0: 2A 2A 20 4E 55 4D 42 45 52 20 4F 46 20 57 4F 52 |** NUMBER OF WOR|
00000AC0: 44 53 00 E7 12 A2 08 8D 37 35 30 3A 81 49 B2 31 |DS......750:.I.1|
00000AD0: 37 30 A4 31 37 31 3A 97 32 35 35 2C 49 3A 9E 34 |70.171:.255,I:.4|
00000AE0: 39 31 35 32 3A 82 49 00 10 13 A7 08 59 B2 32 32 |9152:.I.....Y.22|
00000AF0: 3A 58 B2 33 32 3A 4D 24 B2 22 A4 A4 22 3A 8D 34 |:X.32:M$."..":.4|
00000B00: 30 30 3A 4E 57 24 B2 22 22 3A 81 49 B2 31 A4 32 |00:NW$."":.I.1.2|
00000B10: 00 28 13 AC 08 8D 38 35 30 3A 8B 4B 24 B2 C7 28 |.(....850:.K$..(|
00000B20: 31 33 29 A7 32 32 35 30 00 40 13 B1 08 8B 4B 24 |13).2250.@....K$|
00000B30: B3 22 30 22 B0 4B 24 B1 22 39 22 A7 32 32 32 30 |."0".K$."9".2220|
00000B40: 00 5E 13 B6 08 4E 57 24 B2 4E 57 24 AA 4B 24 3A |.^...NW$.NW$.K$:|
00000B50: 4D 24 B2 4E 57 24 3A 8D 34 30 30 3A 82 49 00 77 |M$.NW$:.400:.I.w|
00000B60: 13 C7 08 8D 38 35 30 3A 8B 4B 24 B3 B1 C7 28 31 |....850:.K$...(1|
00000B70: 33 29 A7 32 32 34 37 00 93 13 C8 08 8B C5 28 4E |3).2247.......(N|
00000B80: 57 24 29 B1 35 30 A7 9E 34 39 32 30 36 3A 89 32 |W$).50..49206:.2|
00000B90: 32 30 30 00 A9 13 CA 08 97 38 33 35 2C C5 28 4E |200......835,.(N|
00000BA0: 57 24 29 3A 89 32 30 31 35 00 B6 13 FC 08 8F 20 |W$):.2015...... |
00000BB0: 2A 2A 20 52 55 4E 00 C0 13 5F 09 89 32 30 39 39 |** RUN..._..2099|
00000BC0: 00 CE 13 60 09 8F 20 2A 2A 20 51 55 49 54 00 F2 |...`.. ** QUIT..|
00000BD0: 13 6A 09 8D 37 35 30 3A 81 49 B2 31 36 38 A4 31 |.j..750:.I.168.1|
00000BE0: 36 39 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 |69:.255,I:.49152|
00000BF0: 3A 82 00 11 14 74 09 8D 38 35 30 3A 8B 4B 24 B3 |:....t..850:.K$.|
00000C00: B1 22 59 22 AF 4B 24 B3 B1 22 4E 22 A7 32 34 32 |."Y".K$.."N".242|
00000C10: 30 00 22 14 7E 09 8B 4B 24 B2 22 4E 22 A7 32 30 |0.".~..K$."N".20|
00000C20: 31 35 00 34 14 88 09 8D 31 32 36 35 30 3A 89 31 |15.4....12650:.1|
00000C30: 36 30 39 39 00 4D 14 C4 09 8F 20 2A 2A 20 4C 49 |6099.M.... ** LI|
00000C40: 53 54 20 4F 50 54 49 4F 4E 53 20 2A 2A 00 61 14 |ST OPTIONS **.a.|
00000C50: CE 09 8B C2 28 38 33 34 29 B3 B1 30 A7 32 35 33 |....(834)..0.253|
00000C60: 30 00 74 14 D8 09 4D 24 B2 22 4F 46 46 22 3A 89 |0.t...M$."OFF":.|
00000C70: 32 35 34 30 00 81 14 E2 09 4D 24 B2 22 4F 4E 20 |2540.....M$."ON |
00000C80: 22 00 93 14 EC 09 59 B2 37 3A 58 B2 33 31 3A 8D |".....Y.7:X.31:.|
00000C90: 34 30 30 00 B7 14 F6 09 4D 24 B2 C4 28 C2 28 38 |400.....M$..(.(8|
00000CA0: 33 35 29 29 AA 22 20 20 22 3A 59 B2 39 3A 58 B2 |35))." ":Y.9:X.|
00000CB0: 33 30 3A 8D 34 30 30 00 CB 14 00 0A 8B C2 28 38 |30:.400.......(8|
00000CC0: 35 31 29 B3 B1 30 A7 32 35 38 30 00 DE 14 0A 0A |51)..0.2580.....|
00000CD0: 4D 24 B2 22 4E 4F 20 22 3A 89 32 35 39 30 00 EB |M$."NO ":.2590..|
00000CE0: 14 14 0A 4D 24 B2 22 59 45 53 22 00 FE 14 1E 0A |...M$."YES".....|
00000CF0: 59 B2 31 32 3A 58 B2 33 31 3A 8D 34 30 30 00 04 |Y.12:X.31:.400..|
00000D00: 15 27 0A 8E 00 19 15 28 0A 8F 20 2A 2A 20 4C 49 |.'.....(.. ** LI|
00000D10: 4E 45 46 45 45 44 20 2A 2A 00 34 15 32 0A 8B C2 |NEFEED **.4.2...|
00000D20: 28 38 35 31 29 B2 30 A7 97 38 35 31 2C 31 3A 89 |(851).0..851,1:.|
00000D30: 32 36 39 39 00 3F 15 3C 0A 97 38 35 31 2C 30 00 |2699.?.<..851,0.|
00000D40: 49 15 8B 0A 89 32 30 31 35 00 6C 15 10 27 8F 20 |I....2015.l..'. |
00000D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8F 15 11 |************....|
00000D70: 27 8F 20 2A 20 53 54 4F 52 59 20 57 52 49 54 45 |'. * STORY WRITE|
00000D80: 52 20 53 4F 55 52 43 45 20 43 4F 44 45 20 2A 00 |R SOURCE CODE *.|
00000D90: B2 15 12 27 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...'. **********|
00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DB0: 2A 2A 00 C7 15 1A 27 8D 31 30 30 3A 8F 20 48 4F |**....'.100:. HO|
00000DC0: 55 53 45 4B 45 45 50 00 DB 15 1F 27 8B C2 28 38 |USEKEEP....'..(8|
00000DD0: 35 30 29 B2 30 A7 31 30 30 32 30 00 FB 15 20 27 |50).0.10020... '|
00000DE0: 97 32 35 35 2C 30 3A 9E 34 39 31 35 38 3A 97 32 |.255,0:.49158:.2|
00000DF0: 35 35 2C 33 3A 9E 34 39 31 35 38 00 24 16 21 27 |55,3:.49158.$.!'|
00000E00: 97 35 33 32 38 31 2C 30 3A 97 32 35 35 2C 30 36 |.53281,0:.255,06|
00000E10: AC 31 36 AA 30 37 3A 9E 34 39 31 36 37 3A 89 31 |.16.07:.49167:.1|
00000E20: 30 30 33 35 00 3C 16 24 27 8D 32 30 30 3A 8F 20 |0035.<.$'.200:. |
00000E30: 54 49 54 4C 45 20 53 43 52 45 45 4E 00 56 16 2E |TITLE SCREEN.V..|
00000E40: 27 8D 33 30 30 3A 8F 20 43 52 45 44 49 54 53 20 |'.300:. CREDITS |
00000E50: 53 43 52 45 45 4E 00 70 16 33 27 9E 34 39 31 36 |SCREEN.p.3'.4916|
00000E60: 31 3A 8F 20 53 50 4C 49 54 20 53 43 52 45 45 4E |1:. SPLIT SCREEN|
00000E70: 00 88 16 38 27 8D 20 36 30 30 3A 8F 20 41 44 56 |...8'. 600:. ADV|
00000E80: 20 4F 50 54 49 4F 4E 53 00 B6 16 42 27 91 20 43 | OPTIONS...B'. C|
00000E90: 20 8D 20 31 31 30 30 30 2C 31 32 30 30 30 2C 31 | . 11000,12000,1|
00000EA0: 33 30 30 30 2C 31 34 30 30 30 2C 31 35 30 30 30 |3000,14000,15000|
00000EB0: 2C 31 36 30 30 30 00 C9 16 6A 27 58 58 B2 B8 28 |,16000...j'XX..(|
00000EC0: 30 29 3A 89 31 30 30 34 30 00 E9 16 F8 2A 8F 20 |0):.10040....*. |
00000ED0: 2A 2A 2A 20 4D 41 49 4E 20 49 4E 53 54 52 55 43 |*** MAIN INSTRUC|
00000EE0: 54 49 4F 4E 53 20 2A 2A 2A 00 0A 17 02 2B 8D 37 |TIONS ***....+.7|
00000EF0: 30 30 3A 81 49 B2 37 A4 31 34 3A 97 32 35 35 2C |00:.I.7.14:.255,|
00000F00: 49 3A 9E 34 39 31 35 32 3A 82 00 22 17 07 2B 8D |I:.49152:.."..+.|
00000F10: 37 35 30 3A 97 32 35 35 2C 33 37 3A 9E 34 39 31 |750:.255,37:.491|
00000F20: 35 32 00 2B 17 0C 2B 8D 38 30 30 00 42 17 20 2B |52.+..+.800.B. +|
00000F30: 8D 37 30 30 3A 97 32 35 35 2C 37 3A 9E 34 39 31 |.700:.255,7:.491|
00000F40: 35 32 00 6E 17 2A 2B 81 49 B2 31 36 A4 32 30 3A |52.n.*+.I.16.20:|
00000F50: 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 3A 82 3A |.255,I:.49152:.:|
00000F60: 97 32 35 35 2C 33 37 3A 9E 34 39 31 35 32 00 77 |.255,37:.49152.w|
00000F70: 17 34 2B 8D 38 30 30 00 7D 17 48 2B 8E 00 99 17 |.4+.800.}.H+....|
00000F80: E0 2E 8F 20 2A 2A 20 53 54 41 52 54 45 52 20 4F |... ** STARTER O|
00000F90: 50 54 49 4F 4E 53 20 2A 2A 00 BC 17 E5 2E 8D 37 |PTIONS **......7|
00000FA0: 30 30 3A 81 49 B2 32 31 A4 32 37 3A 97 32 35 35 |00:.I.21.27:.255|
00000FB0: 2C 49 3A 9E 34 39 31 35 32 3A 82 49 00 D4 17 EA |,I:.49152:.I....|
00000FC0: 2E 8D 37 35 30 3A 97 32 35 35 2C 32 37 3A 9E 34 |..750:.255,27:.4|
00000FD0: 39 31 35 32 00 F2 17 F4 2E 8D 38 35 30 3A 8B 4B |9152......850:.K|
00000FE0: 24 B3 22 31 22 B0 4B 24 B1 22 34 22 A7 31 32 30 |$."1".K$."4".120|
00000FF0: 32 30 00 19 18 FE 2E 4B B2 C5 28 4B 24 29 3A 91 |20.....K..(K$):.|
00001000: 4B 89 31 32 31 30 30 2C 31 32 32 30 30 2C 31 32 |K.12100,12200,12|
00001010: 33 30 30 2C 31 32 34 30 30 00 30 18 44 2F 8F 20 |300,12400.0.D/. |
00001020: 2A 2A 20 53 54 41 52 54 45 52 20 49 4E 53 54 52 |** STARTER INSTR|
00001030: 00 62 18 4E 2F 8D 37 30 30 3A 97 32 35 35 2C 31 |.b.N/.700:.255,1|
00001040: 36 31 3A 9E 34 39 31 35 32 3A 81 49 B2 32 38 A4 |61:.49152:.I.28.|
00001050: 33 37 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 |37:.255,I:.49152|
00001060: 3A 82 00 99 18 58 2F 8D 38 30 30 3A 8D 37 30 30 |:....X/.800:.700|
00001070: 3A 97 32 35 35 2C 31 36 31 3A 9E 34 39 31 35 32 |:.255,161:.49152|
00001080: 3A 81 49 B2 33 38 A4 34 34 3A 97 32 35 35 2C 49 |:.I.38.44:.255,I|
00001090: 3A 9E 34 39 31 35 32 3A 82 00 D0 18 6C 2F 8D 38 |:.49152:....l/.8|
000010A0: 30 30 3A 8D 37 30 30 3A 97 32 35 35 2C 31 36 31 |00:.700:.255,161|
000010B0: 3A 9E 34 39 31 35 32 3A 81 49 B2 34 35 A4 35 32 |:.49152:.I.45.52|
000010C0: 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 3A 82 |:.255,I:.49152:.|
000010D0: 00 E0 18 76 2F 8D 38 30 30 3A 89 31 32 30 30 30 |...v/.800:.12000|
000010E0: 00 EE 18 A8 2F 8F 20 2A 2A 42 45 47 49 4E 00 F7 |..../. **BEGIN..|
000010F0: 18 AB 2F 8D 37 35 30 00 1A 19 AD 2F 8D 37 30 30 |../.750..../.700|
00001100: 3A 81 49 B2 35 33 A4 35 38 3A 97 32 35 35 2C 49 |:.I.53.58:.255,I|
00001110: 3A 9E 34 39 31 35 32 3A 82 49 00 32 19 B2 2F 97 |:.49152:.I.2../.|
00001120: 32 35 35 2C 32 37 3A 9E 34 39 31 35 32 3A 8D 38 |255,27:.49152:.8|
00001130: 35 30 00 5D 19 B7 2F 8B 4B 24 B3 B1 22 41 22 AF |50.]../.K$.."A".|
00001140: 4B 24 B3 B1 22 59 22 AF 4B 24 B3 B1 22 49 22 AF |K$.."Y".K$.."I".|
00001150: 4B 24 B3 B1 22 85 22 A7 31 32 32 31 30 00 6F 19 |K$..".".12210.o.|
00001160: B9 2F 8B 4B 24 B2 22 85 22 A7 31 32 30 30 30 00 |./.K$.".".12000.|
00001170: 89 19 BC 2F 8B 4B 24 B2 22 59 22 A7 97 38 33 32 |.../.K$."Y"..832|
00001180: 2C 30 3A 89 31 32 32 34 30 00 A3 19 C1 2F 8B 4B |,0:.12240..../.K|
00001190: 24 B2 22 41 22 A7 97 38 33 32 2C 31 3A 89 31 32 |$."A"..832,1:.12|
000011A0: 32 38 30 00 DA 19 C6 2F 8D 37 30 30 3A 81 49 B2 |280..../.700:.I.|
000011B0: 37 30 A4 38 31 3A 97 32 35 35 2C 49 3A 9E 34 39 |70.81:.255,I:.49|
000011C0: 31 35 32 3A 82 49 3A 8D 37 35 30 3A 97 32 35 35 |152:.I:.750:.255|
000011D0: 2C 33 37 3A 9E 34 39 31 35 32 00 EA 19 CB 2F 8D |,37:.49152..../.|
000011E0: 38 30 30 3A 89 31 32 32 30 30 00 1C 1A D0 2F 8D |800:.12200..../.|
000011F0: 37 30 30 3A 97 32 35 35 2C 35 33 3A 9E 34 39 31 |700:.255,53:.491|
00001200: 35 32 3A 81 49 B2 35 39 A4 36 32 3A 97 32 35 35 |52:.I.59.62:.255|
00001210: 2C 49 3A 9E 34 39 31 35 32 3A 82 49 00 54 1A DA |,I:.49152:.I.T..|
00001220: 2F 8D 38 35 30 3A 8B 4B 24 B3 B1 22 59 22 AF 4B |/.850:.K$.."Y".K|
00001230: 24 B3 B1 22 4E 22 AF 4B 24 B3 B1 22 D9 22 AF 4B |$.."N".K$..".".K|
00001240: 24 B3 B1 22 CE 22 AF 4B 24 B3 B1 22 85 22 A7 31 |$..".".K$..".".1|
00001250: 32 32 35 30 00 66 1A DF 2F 8B 4B 24 B2 22 85 22 |2250.f../.K$."."|
00001260: A7 31 32 30 30 30 00 7F 1A E4 2F 8B 4B 24 B2 22 |.12000..../.K$."|
00001270: 4E 22 B0 4B 24 B2 22 CE 22 A7 31 32 32 30 30 00 |N".K$.".".12200.|
00001280: 91 1A EE 2F 4E 41 24 B2 22 22 3A 89 31 32 37 30 |.../NA$."":.1270|
00001290: 30 00 C3 1A F8 2F 8D 37 30 30 3A 97 32 35 35 2C |0..../.700:.255,|
000012A0: 35 33 3A 9E 34 39 31 35 32 3A 81 49 B2 36 33 A4 |53:.49152:.I.63.|
000012B0: 36 35 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 |65:.255,I:.49152|
000012C0: 3A 82 49 00 DB 1A FA 2F 8D 37 35 30 3A 97 32 35 |:.I..../.750:.25|
000012D0: 35 2C 35 38 3A 9E 34 39 31 35 32 00 FC 1A FB 2F |5,58:.49152..../|
000012E0: 59 B2 31 32 3A 58 B2 31 36 3A 4D 24 B2 22 A4 A4 |Y.12:X.16:M$."..|
000012F0: A4 A4 A4 A4 A4 A4 22 3A 8D 34 30 30 00 19 1B FD |......":.400....|
00001300: 2F 59 B2 31 32 3A 58 B2 31 35 3A 8D 31 32 35 30 |/Y.12:X.15:.1250|
00001310: 30 3A 4E 41 24 B2 47 53 24 00 2C 1B FE 2F 8B 4E |0:NA$.GS$.,../.N|
00001320: 41 24 B2 22 85 22 A7 31 32 32 30 30 00 5E 1B FF |A$.".".12200.^..|
00001330: 2F 8D 37 30 30 3A 97 32 35 35 2C 35 33 3A 9E 34 |/.700:.255,53:.4|
00001340: 39 31 35 32 3A 81 49 B2 36 36 A4 36 37 3A 97 32 |9152:.I.66.67:.2|
00001350: 35 35 2C 49 3A 9E 34 39 31 35 32 3A 82 49 00 81 |55,I:.49152:.I..|
00001360: 1B 01 30 97 32 35 35 2C 31 37 38 3A 9E 34 39 31 |..0.255,178:.491|
00001370: 35 32 3A 97 32 35 35 2C 32 37 3A 9E 34 39 31 35 |52:.255,27:.4915|
00001380: 32 00 B9 1B 02 30 8D 38 35 30 3A 8B 4B 24 B3 B1 |2....0.850:.K$..|
00001390: 22 4D 22 AF 4B 24 B3 B1 22 46 22 AF 4B 24 B3 B1 |"M".K$.."F".K$..|
000013A0: 22 CD 22 AF 4B 24 B3 B1 22 C6 22 AF 4B 24 B3 B1 |".".K$..".".K$..|
000013B0: 22 85 22 A7 31 32 32 39 30 00 CB 1B 03 30 8B 4B |".".12290....0.K|
000013C0: 24 B2 22 85 22 A7 31 32 32 30 30 00 FD 1B 04 30 |$.".".12200....0|
000013D0: 8D 37 30 30 3A 97 32 35 35 2C 35 33 3A 9E 34 39 |.700:.255,53:.49|
000013E0: 31 35 32 3A 81 49 B2 36 38 A4 36 39 3A 97 32 35 |152:.I.68.69:.25|
000013F0: 35 2C 49 3A 9E 34 39 31 35 32 3A 82 49 00 29 1C |5,I:.49152:.I.).|
00001400: 05 30 8B 4B 24 B2 22 4D 22 B0 4B 24 B2 22 CD 22 |.0.K$."M".K$."."|
00001410: A7 53 58 24 B2 22 4D 41 4C 45 22 3A 97 38 33 33 |.SX$."MALE":.833|
00001420: 2C 30 3A 89 31 32 32 39 35 00 41 1C 06 30 53 58 |,0:.12295.A..0SX|
00001430: 24 B2 22 46 45 4D 41 4C 45 22 3A 97 38 33 33 2C |$."FEMALE":.833,|
00001440: 31 00 78 1C 07 30 59 B2 38 3A 58 B2 33 30 3A 4D |1.x..0Y.8:X.30:M|
00001450: 24 B2 53 58 24 3A 8D 34 30 30 3A 59 B2 39 3A 58 |$.SX$:.400:Y.9:X|
00001460: B2 32 30 3A 4D 24 B2 C8 28 4E 41 24 2C 38 29 AA |.20:M$..(NA$,8).|
00001470: 22 2E 22 3A 8D 34 30 30 00 96 1C 08 30 81 49 B2 |".":.400....0.I.|
00001480: 36 31 A4 36 32 3A 97 32 35 35 2C 49 3A 9E 34 39 |61.62:.255,I:.49|
00001490: 31 35 32 3A 82 49 00 CE 1C 09 30 8D 38 35 30 3A |152:.I....0.850:|
000014A0: 8B 4B 24 B3 B1 22 59 22 AF 4B 24 B3 B1 22 4E 22 |.K$.."Y".K$.."N"|
000014B0: AF 4B 24 B3 B1 22 D9 22 AF 4B 24 B3 B1 22 CE 22 |.K$..".".K$.."."|
000014C0: AF 4B 24 B3 B1 22 85 22 A7 31 32 32 39 37 00 E7 |.K$..".".12297..|
000014D0: 1C 0A 30 8B 4B 24 B2 22 85 22 B0 4B 24 B2 22 4E |..0.K$.".".K$."N|
000014E0: 22 A7 31 32 32 30 30 00 F9 1C 0B 30 97 38 34 38 |".12200....0.848|
000014F0: 2C 30 3A 89 31 32 37 30 30 00 0B 1D 0C 30 8F 20 |,0:.12700....0. |
00001500: 2A 2A 20 43 4F 4E 54 49 4E 55 45 00 1D 1D 16 30 |** CONTINUE....0|
00001510: 97 38 34 38 2C 31 3A 89 31 32 37 30 30 00 23 1D |.848,1:.12700.#.|
00001520: 70 30 8E 00 38 1D D4 30 8F 20 2A 2A 20 47 45 54 |p0..8..0. ** GET|
00001530: 20 4E 41 4D 45 20 2A 2A 00 43 1D D7 30 47 53 24 | NAME **.C..0GS$|
00001540: B2 22 22 00 5D 1D D9 30 8D 38 35 30 3A 8B 4B 24 |."".]..0.850:.K$|
00001550: B3 B1 C7 28 32 30 29 A7 31 32 35 34 30 00 6F 1D |...(20).12540.o.|
00001560: DE 30 8B 47 53 24 B2 22 22 A7 31 32 35 30 35 00 |.0.GS$."".12505.|
00001570: 7F 1D E3 30 4D 24 B2 22 A4 22 3A 8D 34 30 30 00 |...0M$.".":.400.|
00001580: 9B 1D E8 30 8B C3 28 47 53 24 29 B2 30 A7 47 53 |...0..(GS$).0.GS|
00001590: 24 B2 22 22 3A 89 31 32 35 30 35 00 C0 1D ED 30 |$."":.12505....0|
000015A0: 58 B2 58 AB 31 3A 47 53 24 B2 C8 28 47 53 24 2C |X.X.1:GS$..(GS$,|
000015B0: C3 28 47 53 24 29 AB 31 29 3A 89 31 32 35 30 35 |.(GS$).1):.12505|
000015C0: 00 DE 1D FC 30 8B 4B 24 B2 C7 28 31 33 29 B0 4B |....0.K$..(13).K|
000015D0: 24 B2 C7 28 31 34 31 29 A7 31 32 35 38 30 00 F8 |$..(141).12580..|
000015E0: 1D 01 31 8B 4B 24 B2 22 85 22 A7 47 53 24 B2 4B |..1.K$.".".GS$.K|
000015F0: 24 3A 89 31 32 35 39 39 00 0C 1E 06 31 8B C3 28 |$:.12599....1..(|
00001600: 47 53 24 29 B2 38 A7 31 32 35 30 35 00 25 1E 0B |GS$).8.12505.%..|
00001610: 31 8B 4B 24 B3 22 41 22 B0 4B 24 B1 22 5A 22 A7 |1.K$."A".K$."Z".|
00001620: 31 32 35 36 30 00 30 1E 0D 31 89 31 32 35 37 30 |12560.0..1.12570|
00001630: 00 49 1E 10 31 8B 4B 24 B3 22 C1 22 B0 4B 24 B1 |.I..1.K$.".".K$.|
00001640: 22 DA 22 A7 31 32 35 30 35 00 5C 1E 15 31 4B 24 |".".12505.\..1K$|
00001650: B2 C7 28 C6 28 4B 24 29 AB 39 36 29 00 83 1E 1A |..(.(K$).96)....|
00001660: 31 47 53 24 B2 47 53 24 AA 4B 24 3A 58 B2 58 AA |1GS$.GS$.K$:X.X.|
00001670: 31 3A 4D 24 B2 4B 24 3A 8D 34 30 30 3A 89 31 32 |1:M$.K$:.400:.12|
00001680: 35 30 35 00 9F 1E 24 31 41 4C 25 B2 C3 28 47 53 |505...$1AL%..(GS|
00001690: 24 29 3A 8B 41 4C 25 B2 30 A7 31 32 35 30 30 00 |$):.AL%.0.12500.|
000016A0: C2 1E 26 31 4C 43 24 B2 C8 28 47 53 24 2C 31 29 |..&1LC$..(GS$,1)|
000016B0: 3A 8B 4C 43 24 B1 B2 C7 28 39 36 29 A7 31 32 35 |:.LC$...(96).125|
000016C0: 39 39 00 EC 1E 29 31 4C 43 24 B2 C7 28 C6 28 4C |99...)1LC$..(.(L|
000016D0: 43 24 29 AA 33 32 29 3A 47 53 24 B2 4C 43 24 AA |C$).32):GS$.LC$.|
000016E0: C9 28 47 53 24 2C 41 4C 25 AB 31 29 00 F2 1E 37 |.(GS$,AL%.1)...7|
000016F0: 31 8E 00 0B 1F 38 31 8F 20 2A 2A 20 53 41 56 45 |1....81. ** SAVE|
00001700: 20 41 44 56 45 4E 20 49 4E 46 4F 00 1D 1F 3D 31 | ADVEN INFO...=1|
00001710: 8B 4E 41 24 B2 22 22 A7 31 32 36 35 30 00 3A 1F |.NA$."".12650.:.|
00001720: 42 31 81 49 B2 31 A4 41 4C 25 3A 5A B2 C6 28 CA |B1.I.1.AL%:Z..(.|
00001730: 28 4E 41 24 2C 49 2C 31 29 29 00 4A 1F 47 31 8B |(NA$,I,1)).J.G1.|
00001740: 5A B3 36 34 A7 31 32 36 33 30 00 62 1F 4C 31 8B |Z.64.12630.b.L1.|
00001750: 5A B3 39 36 A7 5A B2 5A AB 36 34 3A 89 31 32 36 |Z.96.Z.Z.64:.126|
00001760: 33 30 00 74 1F 51 31 8B 5A B3 32 35 36 A7 5A B2 |30.t.Q1.Z.256.Z.|
00001770: 5A AB 33 32 00 97 1F 56 31 97 38 33 38 AA 28 49 |Z.32...V1.838.(I|
00001780: AB 31 29 2C 5A 3A 82 49 3A 97 38 33 38 AA 28 49 |.1),Z:.I:.838.(I|
00001790: AB 31 29 2C 32 35 35 00 CA 1F 6A 31 9E 34 39 31 |.1),255...j1.491|
000017A0: 36 34 3A 98 31 35 2C 22 53 30 3A 41 44 56 20 49 |64:.15,"S0:ADV I|
000017B0: 4E 46 4F 22 3A 9F 33 2C 38 2C 33 2C 22 41 44 56 |NFO":.3,8,3,"ADV|
000017C0: 20 49 4E 46 4F 2C 53 2C 57 22 00 FA 1F 6F 31 81 | INFO,S,W"...o1.|
000017D0: 49 B2 38 33 32 A4 38 34 36 3A 98 33 2C C2 28 49 |I.832.846:.3,.(I|
000017E0: 29 3B C7 28 31 33 29 3B 3A 82 3A 98 33 2C C2 28 |);.(13);:.:.3,.(|
000017F0: 38 35 31 29 3B C7 28 31 33 29 00 21 20 9B 31 98 |851);.(13).! .1.|
00001800: 33 2C 41 4C 25 3B C7 28 31 33 29 3B 4E 41 24 3B |3,AL%;.(13);NA$;|
00001810: C7 28 31 33 29 3A A0 33 3A 9E 34 39 31 36 31 3A |.(13):.3:.49161:|
00001820: 8E 00 3C 20 9C 31 8F 20 2A 2A 20 47 4F 54 4F 20 |..< .1. ** GOTO |
00001830: 53 54 41 52 54 45 52 20 44 49 53 4B 00 7E 20 A6 |STARTER DISK.~ .|
00001840: 31 8D 31 32 36 30 30 3A 8D 37 30 30 3A 59 B2 31 |1.12600:.700:Y.1|
00001850: 31 3A 58 B2 35 3A 4D 24 B2 22 C9 4E 53 45 52 54 |1:X.5:M$.".NSERT|
00001860: 20 54 48 45 20 D3 D4 CF D2 D9 A0 D3 D4 C1 D2 D4 | THE ...........|
00001870: C5 D2 A0 C4 C9 D3 CB 2E 22 3A 8D 34 30 30 00 9B |........":.400..|
00001880: 20 AB 31 8D 37 35 30 3A 97 32 35 35 2C 33 37 3A | .1.750:.255,37:|
00001890: 9E 34 39 31 35 32 3A 8D 38 30 30 00 B2 20 B0 31 |.49152:.800.. .1|
000018A0: 8D 31 37 30 30 30 3A 8B 45 B3 B1 30 A7 31 32 37 |.17000:.E..0.127|
000018B0: 31 35 00 C6 20 B5 31 8B 44 4E 24 B2 22 53 53 22 |15.. .1.DN$."SS"|
000018C0: A7 31 32 37 33 32 00 FC 20 B8 31 97 32 35 35 2C |.12732.. .1.255,|
000018D0: 31 31 33 3A 9E 34 39 31 35 32 3A 97 32 35 35 2C |113:.49152:.255,|
000018E0: 33 37 3A 9E 34 39 31 35 32 3A 9E 34 39 32 30 36 |37:.49152:.49206|
000018F0: 3A 8D 38 30 30 3A 89 31 32 37 31 35 00 0E 21 BC |:.800:.12715..!.|
00001900: 31 8D 31 32 36 30 30 3A 9E 34 39 31 36 34 00 43 |1.12600:.49164.C|
00001910: 21 BF 31 99 22 93 22 3A 59 B2 31 32 3A 58 B2 31 |!.1.".":Y.12:X.1|
00001920: 30 3A 4D 24 B2 22 05 CC CF C1 C4 C9 CE C7 20 D3 |0:M$."........ .|
00001930: D4 CF D2 D9 A0 D3 D4 C1 D2 D4 C5 D2 90 22 3A 8D |.............":.|
00001940: 34 30 30 00 67 21 C4 31 46 30 B2 B8 28 30 29 3A |400.g!.1F0..(0):|
00001950: A0 31 35 3A 41 24 B2 22 57 41 22 3A 9E 34 39 32 |.15:A$."WA":.492|
00001960: 32 34 2C 41 24 3A 90 00 82 21 C8 32 8F 20 2A 2A |24,A$:...!.2. **|
00001970: 20 57 52 49 54 45 52 20 4F 50 54 49 4F 4E 53 20 | WRITER OPTIONS |
00001980: 2A 2A 00 AC 21 CD 32 8D 37 30 30 3A 81 49 B2 31 |**..!.2.700:.I.1|
00001990: 34 31 A4 31 34 35 3A 97 32 35 35 2C 49 3A 9E 34 |41.145:.255,I:.4|
000019A0: 39 31 35 32 3A 82 49 3A 8D 37 35 30 00 BF 21 D2 |9152:.I:.750..!.|
000019B0: 32 97 32 35 35 2C 32 37 3A 9E 34 39 31 35 32 00 |2.255,27:.49152.|
000019C0: DD 21 DC 32 8D 38 35 30 3A 8B 4B 24 B3 22 31 22 |.!.2.850:.K$."1"|
000019D0: B0 4B 24 B1 22 33 22 A7 31 33 30 32 30 00 FE 21 |.K$."3".13020..!|
000019E0: E6 32 4B B2 C5 28 4B 24 29 3A 91 4B 89 31 33 31 |.2K..(K$):.K.131|
000019F0: 30 30 2C 31 33 32 30 30 2C 31 33 33 30 30 00 14 |00,13200,13300..|
00001A00: 22 2C 33 8F 20 2A 2A 20 57 52 49 54 45 52 20 49 |",3. ** WRITER I|
00001A10: 4E 53 54 52 00 47 22 36 33 8D 37 30 30 3A 81 49 |NSTR.G"63.700:.I|
00001A20: B2 31 34 36 A4 31 35 34 3A 97 32 35 35 2C 49 3A |.146.154:.255,I:|
00001A30: 9E 34 39 31 35 32 3A 82 3A 97 32 35 35 2C 33 37 |.49152:.:.255,37|
00001A40: 3A 9E 34 39 31 35 32 00 7E 22 40 33 8D 38 30 30 |:.49152.~"@3.800|
00001A50: 3A 8D 37 30 30 3A 97 32 35 35 2C 31 34 36 3A 9E |:.700:.255,146:.|
00001A60: 34 39 31 35 32 3A 81 49 B2 31 35 35 A4 31 35 39 |49152:.I.155.159|
00001A70: 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 00 91 |:.255,I:.49152..|
00001A80: 22 5E 33 82 49 3A 8D 38 30 30 3A 89 31 33 30 30 |"^3.I:.800:.1300|
00001A90: 30 00 A6 22 90 33 8F 20 2A 2A 20 57 52 49 54 45 |0..".3. ** WRITE|
00001AA0: 20 53 54 4F 52 59 00 DD 22 95 33 8D 37 30 30 3A | STORY..".3.700:|
00001AB0: 97 32 35 35 2C 31 36 30 3A 9E 34 39 31 35 32 3A |.255,160:.49152:|
00001AC0: 97 32 35 35 2C 35 38 3A 9E 34 39 31 35 32 3A 97 |.255,58:.49152:.|
00001AD0: 32 35 35 2C 33 37 3A 9E 34 39 31 35 32 00 FD 22 |255,37:.49152.."|
00001AE0: 9A 33 8D 38 35 30 3A 8B 4B 24 B3 B1 22 20 22 AF |.3.850:.K$.." ".|
00001AF0: 4B 24 B3 B1 22 85 22 A7 31 33 32 31 30 00 0F 23 |K$..".".13210..#|
00001B00: A4 33 8B 4B 24 B2 22 85 22 A7 31 33 30 30 30 00 |.3.K$.".".13000.|
00001B10: 21 23 A9 33 8D 31 32 36 30 30 3A 9E 34 39 31 36 |!#.3.12600:.4916|
00001B20: 34 00 56 23 AE 33 99 22 93 22 3A 59 B2 31 30 3A |4.V#.3.".":Y.10:|
00001B30: 58 B2 39 3A 4D 24 B2 22 05 CC CF C1 C4 C9 CE C7 |X.9:M$."........|
00001B40: 20 C5 C4 C9 D4 CF D2 2F D0 D2 CF CF C6 C5 D2 90 | ....../........|
00001B50: 22 3A 8D 34 30 30 00 66 23 B8 33 A0 31 35 3A 46 |":.400.f#.3.15:F|
00001B60: 30 B2 B8 28 30 29 00 7E 23 BD 33 41 24 B2 22 45 |0..(0).~#.3A$."E|
00001B70: 50 22 3A 9E 34 39 32 32 34 2C 41 24 3A 90 00 84 |P":.49224,A$:...|
00001B80: 23 F4 33 8E 00 9E 23 B0 36 8F 20 2A 2A 20 50 52 |#.3...#.6. ** PR|
00001B90: 49 4E 54 20 4F 50 54 49 4F 4E 53 20 2A 2A 00 C3 |INT OPTIONS **..|
00001BA0: 23 B5 36 8D 37 30 30 3A 81 49 B2 31 31 37 A4 31 |#.6.700:.I.117.1|
00001BB0: 32 32 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 |22:.255,I:.49152|
00001BC0: 3A 82 49 00 DB 23 BA 36 8D 37 35 30 3A 97 32 35 |:.I..#.6.750:.25|
00001BD0: 35 2C 32 37 3A 9E 34 39 31 35 32 00 F9 23 C4 36 |5,27:.49152..#.6|
00001BE0: 8D 38 35 30 3A 8B 4B 24 B3 22 31 22 B0 4B 24 B1 |.850:.K$."1".K$.|
00001BF0: 22 34 22 A7 31 34 30 32 30 00 20 24 CE 36 4B B2 |"4".14020. $.6K.|
00001C00: C5 28 4B 24 29 3A 91 4B 89 31 34 31 30 30 2C 31 |.(K$):.K.14100,1|
00001C10: 34 32 30 30 2C 31 34 33 30 30 2C 31 34 34 30 30 |4200,14300,14400|
00001C20: 00 35 24 14 37 8F 20 2A 2A 20 50 52 49 4E 54 20 |.5$.7. ** PRINT |
00001C30: 49 4E 53 54 52 00 68 24 1E 37 8D 37 30 30 3A 81 |INSTR.h$.7.700:.|
00001C40: 49 B2 31 32 33 A4 31 32 36 3A 97 32 35 35 2C 49 |I.123.126:.255,I|
00001C50: 3A 9E 34 39 31 35 32 3A 82 3A 97 32 35 35 2C 33 |:.49152:.:.255,3|
00001C60: 37 3A 9E 34 39 31 35 32 00 78 24 28 37 8D 38 30 |7:.49152.x$(7.80|
00001C70: 30 3A 89 31 34 30 30 30 00 90 24 78 37 8F 20 2A |0:.14000..$x7. *|
00001C80: 2A 20 50 52 49 4E 54 20 4E 4F 54 45 43 41 52 44 |* PRINT NOTECARD|
00001C90: 00 B4 24 82 37 8D 37 30 30 3A 81 49 B2 31 32 37 |..$.7.700:.I.127|
00001CA0: A4 31 33 33 3A 97 32 35 35 2C 49 3A 9E 34 39 31 |.133:.255,I:.491|
00001CB0: 35 32 3A 82 00 DB 24 87 37 8D 37 35 30 3A 97 32 |52:...$.7.750:.2|
00001CC0: 35 35 2C 35 38 3A 9E 34 39 31 35 32 3A 97 32 35 |55,58:.49152:.25|
00001CD0: 35 2C 33 37 3A 9E 34 39 31 35 32 00 FB 24 8C 37 |5,37:.49152..$.7|
00001CE0: 8D 38 35 30 3A 8B 4B 24 B3 B1 22 20 22 AF 4B 24 |.850:.K$.." ".K$|
00001CF0: B3 B1 22 85 22 A7 31 34 32 32 30 00 0D 25 91 37 |..".".14220..%.7|
00001D00: 8B 4B 24 B2 22 85 22 A7 31 34 32 37 38 00 24 25 |.K$.".".14278.$%|
00001D10: 96 37 8D 31 37 30 30 30 3A 8B 45 B3 B1 30 A7 31 |.7.17000:.E..0.1|
00001D20: 34 32 31 35 00 56 25 9B 37 9E 34 39 31 36 34 3A |4215.V%.7.49164:|
00001D30: 9F 32 2C 38 2C 32 2C 22 43 41 52 44 46 49 4C 45 |.2,8,2,"CARDFILE|
00001D40: 53 2C 53 2C 52 22 3A 8D 39 30 30 3A 8B 45 B2 30 |S,S,R":.900:.E.0|
00001D50: A7 31 34 32 34 35 00 68 25 A0 37 8D 31 37 30 32 |.14245.h%.7.1702|
00001D60: 30 3A 89 31 34 32 31 35 00 8A 25 A5 37 81 49 B2 |0:.14215..%.7.I.|
00001D70: 31 A4 31 37 3A 84 32 2C 43 46 25 28 49 29 3A 82 |1.17:.2,CF%(I):.|
00001D80: 3A A0 32 3A 9E 34 39 31 36 31 00 B3 25 AA 37 8D |:.2:.49161..%.7.|
00001D90: 37 30 30 3A 8D 37 35 30 3A 81 49 B2 31 32 33 A4 |700:.750:.I.123.|
00001DA0: 31 32 36 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 |126:.255,I:.4915|
00001DB0: 32 3A 82 00 D5 25 AF 37 97 32 35 35 2C 33 37 3A |2:...%.7.255,37:|
00001DC0: 9E 34 39 31 35 32 3A 97 32 35 35 2C 35 38 3A 9E |.49152:.255,58:.|
00001DD0: 34 39 31 35 32 00 F5 25 B0 37 8D 38 35 30 3A 8B |49152..%.7.850:.|
00001DE0: 4B 24 B3 B1 22 20 22 AF 4B 24 B3 B1 22 85 22 A7 |K$.." ".K$..".".|
00001DF0: 31 34 32 35 36 00 07 26 B1 37 8B 4B 24 B2 22 85 |14256..&.7.K$.".|
00001E00: 22 A7 31 34 32 37 38 00 22 26 B4 37 9E 34 39 31 |".14278."&.7.491|
00001E10: 38 32 3A 8B C2 28 32 35 35 29 B2 30 A7 31 34 32 |82:..(255).0.142|
00001E20: 37 30 00 56 26 B7 37 8D 37 35 30 3A 97 32 35 35 |70.V&.7.750:.255|
00001E30: 2C 31 37 35 3A 9E 34 39 31 35 32 3A 97 32 35 35 |,175:.49152:.255|
00001E40: 2C 33 37 3A 9E 34 39 31 35 32 3A 9E 34 39 32 30 |,37:.49152:.4920|
00001E50: 36 3A 8D 38 30 30 00 6A 26 B9 37 8B 44 4E 24 B2 |6:.800.j&.7.DN$.|
00001E60: 22 53 57 22 A7 31 34 32 30 30 00 75 26 BC 37 89 |"SW".14200.u&.7.|
00001E70: 31 34 32 37 38 00 99 26 BE 37 9E 34 39 31 36 34 |14278..&.7.49164|
00001E80: 3A 81 49 B2 31 A4 31 37 3A 8B 43 46 25 28 49 29 |:.I.1.17:.CF%(I)|
00001E90: B3 B1 31 A7 31 34 32 37 35 00 C0 26 BF 37 8D 37 |..1.14275..&.7.7|
00001EA0: 35 30 3A 97 32 35 35 2C 31 37 33 3A 9E 34 39 31 |50:.255,173:.491|
00001EB0: 35 32 3A 97 32 35 35 2C 49 3A 9E 34 39 32 30 39 |52:.255,I:.49209|
00001EC0: 00 E9 26 C0 37 8D 37 35 30 3A 97 32 35 35 2C 31 |..&.7.750:.255,1|
00001ED0: 37 34 3A 9E 34 39 31 35 32 3A 97 32 35 35 2C 49 |74:.49152:.255,I|
00001EE0: AB 31 3A 9E 34 39 32 31 32 00 F7 26 C3 37 82 49 |.1:.49212..&.7.I|
00001EF0: 3A 9E 34 39 31 36 31 00 02 27 C6 37 8D 31 37 31 |:.49161..'.7.171|
00001F00: 30 30 00 12 27 DB 37 8D 37 35 30 3A 89 31 34 30 |00..'.7.750:.140|
00001F10: 30 30 00 27 27 DC 37 8F 20 2A 2A 20 50 52 49 4E |00.''.7. ** PRIN|
00001F20: 54 20 53 54 4F 52 59 00 4B 27 E6 37 8D 37 30 30 |T STORY.K'.7.700|
00001F30: 3A 81 49 B2 31 33 34 A4 31 34 30 3A 97 32 35 35 |:.I.134.140:.255|
00001F40: 2C 49 3A 9E 34 39 31 35 32 3A 82 00 72 27 EB 37 |,I:.49152:..r'.7|
00001F50: 8D 37 35 30 3A 97 32 35 35 2C 35 38 3A 9E 34 39 |.750:.255,58:.49|
00001F60: 31 35 32 3A 97 32 35 35 2C 33 37 3A 9E 34 39 31 |152:.255,37:.491|
00001F70: 35 32 00 92 27 F0 37 8D 38 35 30 3A 8B 4B 24 B3 |52..'.7.850:.K$.|
00001F80: B1 22 20 22 AF 4B 24 B3 B1 22 85 22 A7 31 34 33 |." ".K$..".".143|
00001F90: 32 30 00 A4 27 F5 37 8B 4B 24 B2 22 85 22 A7 31 |20..'.7.K$.".".1|
00001FA0: 34 33 39 39 00 BB 27 F8 37 8D 31 37 30 30 30 3A |4399..'.7.17000:|
00001FB0: 8B 45 B3 B1 30 A7 31 34 33 31 35 00 D0 27 FA 37 |.E..0.14315..'.7|
00001FC0: 8B 44 4E 24 B3 B1 22 53 57 22 A7 31 34 33 33 35 |.DN$.."SW".14335|
00001FD0: 00 FE 27 FC 37 8D 37 35 30 3A 97 32 35 35 2C 31 |..'.7.750:.255,1|
00001FE0: 37 36 3A 9E 34 39 31 35 32 3A 9E 34 39 31 36 34 |76:.49152:.49164|
00001FF0: 3A 97 32 35 35 2C 30 3A 9E 34 39 31 37 30 00 10 |:.255,0:.49170..|
00002000: 28 FD 37 9E 34 39 31 36 31 3A 89 31 34 33 36 35 |(.7.49161:.14365|
00002010: 00 2F 28 FF 37 8D 31 35 37 30 30 3A 8B 45 B3 B1 |./(.7.15700:.E..|
00002020: 30 A7 8D 31 37 30 32 30 3A 89 31 34 33 30 30 00 |0..17020:.14300.|
00002030: 56 28 04 38 8D 37 35 30 3A 97 32 35 35 2C 35 38 |V(.8.750:.255,58|
00002040: 3A 9E 34 39 31 35 32 3A 97 32 35 35 2C 32 37 3A |:.49152:.255,27:|
00002050: 9E 34 39 31 35 32 00 7E 28 09 38 8D 38 35 30 3A |.49152.~(.8.850:|
00002060: 8B 4B 24 B3 B1 22 85 22 AF 28 4B 24 B3 22 41 22 |.K$..".".(K$."A"|
00002070: B0 4B 24 B1 22 4C 22 29 A7 31 34 33 34 35 00 98 |.K$."L").14345..|
00002080: 28 0E 38 8B 4B 24 B2 22 85 22 A7 8D 31 37 31 30 |(.8.K$."."..1710|
00002090: 30 3A 89 31 34 30 30 30 00 C2 28 13 38 4B B2 C6 |0:.14000..(.8K..|
000020A0: 28 4B 24 29 AB 36 34 3A 8B C8 28 53 46 24 28 4B |(K$).64:..(SF$(K|
000020B0: 29 2C 35 29 B2 22 45 4D 50 54 59 22 A7 31 34 33 |),5)."EMPTY".143|
000020C0: 34 35 00 EA 28 14 38 59 B2 35 3A 58 B2 37 3A 81 |45..(.8Y.5:X.7:.|
000020D0: 49 B2 31 A4 4B 3A 59 B2 59 AA 32 3A 8B 59 B1 31 |I.1.K:Y.Y.2:.Y.1|
000020E0: 37 A7 59 B2 37 3A 58 B2 32 33 00 0F 29 15 38 82 |7.Y.7:X.23..).8.|
000020F0: 49 3A 4D 24 B2 22 12 1E 22 AA C8 28 53 46 24 28 |I:M$.".."..(SF$(|
00002100: 4B 29 2C 38 29 AA 22 92 9F 22 3A 8D 34 30 30 00 |K),8)."..":.400.|
00002110: 44 29 18 38 8D 37 35 30 3A 97 32 35 35 2C 31 37 |D).8.750:.255,17|
00002120: 36 3A 9E 34 39 31 35 32 3A 9E 34 39 31 36 34 3A |6:.49152:.49164:|
00002130: 97 32 35 35 2C 4B 3A 9E 34 39 31 37 30 3A 9E 34 |.255,K:.49170:.4|
00002140: 39 31 36 31 00 6D 29 1D 38 8D 37 30 30 3A 8D 37 |9161.m).8.700:.7|
00002150: 35 30 3A 81 49 B2 31 32 33 A4 31 32 36 3A 97 32 |50:.I.123.126:.2|
00002160: 35 35 2C 49 3A 9E 34 39 31 35 32 3A 82 00 8F 29 |55,I:.49152:...)|
00002170: 22 38 97 32 35 35 2C 33 37 3A 9E 34 39 31 35 32 |"8.255,37:.49152|
00002180: 3A 97 32 35 35 2C 35 38 3A 9E 34 39 31 35 32 00 |:.255,58:.49152.|
00002190: AF 29 24 38 8D 38 35 30 3A 8B 4B 24 B3 B1 22 20 |.)$8.850:.K$.." |
000021A0: 22 AF 4B 24 B3 B1 22 85 22 A7 31 34 33 37 32 00 |".K$..".".14372.|
000021B0: C1 29 25 38 8B 4B 24 B2 22 85 22 A7 31 34 33 39 |.)%8.K$.".".1439|
000021C0: 39 00 DC 29 27 38 9E 34 39 31 38 32 3A 8B C2 28 |9..)'8.49182:..(|
000021D0: 32 35 35 29 B2 30 A7 31 34 33 39 35 00 10 2A 2A |255).0.14395..**|
000021E0: 38 8D 37 35 30 3A 97 32 35 35 2C 31 37 35 3A 9E |8.750:.255,175:.|
000021F0: 34 39 31 35 32 3A 97 32 35 35 2C 33 37 3A 9E 34 |49152:.255,37:.4|
00002200: 39 31 35 32 3A 9E 34 39 32 30 36 3A 8D 38 30 30 |9152:.49206:.800|
00002210: 00 24 2A 2C 38 8B 44 4E 24 B2 22 53 57 22 A7 31 |.$*,8.DN$."SW".1|
00002220: 34 33 30 30 00 2F 2A 31 38 89 31 34 33 39 39 00 |4300./*18.14399.|
00002230: 5D 2A 3B 38 8D 37 35 30 3A 97 32 35 35 2C 31 37 |]*;8.750:.255,17|
00002240: 37 3A 9E 34 39 31 35 32 3A 9E 34 39 31 36 34 3A |7:.49152:.49164:|
00002250: 9E 34 39 31 37 33 3A 9E 34 39 31 36 31 00 74 2A |.49173:.49161.t*|
00002260: 3F 38 8D 31 37 31 30 30 3A 8D 37 35 30 3A 89 31 |?8.17100:.750:.1|
00002270: 34 30 30 30 00 7A 2A 40 38 8E 00 93 2A 98 3A 8F |4000.z*@8...*.:.|
00002280: 20 2A 2A 20 44 49 53 4B 20 4F 50 54 49 4F 4E 53 | ** DISK OPTIONS|
00002290: 20 2A 2A 00 BB 2A 9D 3A 8D 37 30 30 3A 81 49 B2 | **..*.:.700:.I.|
000022A0: 38 32 A4 38 39 3A 97 32 35 35 2C 49 3A 9E 34 39 |82.89:.255,I:.49|
000022B0: 31 35 32 3A 82 49 3A 8D 37 35 30 00 CE 2A A2 3A |152:.I:.750..*.:|
000022C0: 97 32 35 35 2C 32 37 3A 9E 34 39 31 35 32 00 EC |.255,27:.49152..|
000022D0: 2A AC 3A 8D 38 35 30 3A 8B 4B 24 B3 22 31 22 B0 |*.:.850:.K$."1".|
000022E0: 4B 24 B1 22 36 22 A7 31 35 30 32 30 00 1F 2B B6 |K$."6".15020..+.|
000022F0: 3A 4B B2 C5 28 4B 24 29 3A 91 4B 89 31 35 31 30 |:K..(K$):.K.1510|
00002300: 30 2C 31 35 32 30 30 2C 31 35 33 30 30 2C 31 35 |0,15200,15300,15|
00002310: 34 30 30 2C 31 35 35 30 30 2C 31 35 36 30 30 00 |400,15500,15600.|
00002320: 33 2B FC 3A 8F 20 2A 2A 20 44 49 53 4B 20 49 4E |3+.:. ** DISK IN|
00002330: 53 54 52 00 69 2B 06 3B 8D 37 30 30 3A 81 49 B2 |STR.i+.;.700:.I.|
00002340: 39 31 A4 39 38 3A 97 32 35 35 2C 49 3A 9E 34 39 |91.98:.255,I:.49|
00002350: 31 35 32 3A 82 3A 97 32 35 35 2C 33 37 3A 9E 34 |152:.:.255,37:.4|
00002360: 39 31 35 32 3A 8D 38 30 30 00 9B 2B 10 3B 8D 37 |9152:.800..+.;.7|
00002370: 30 30 3A 97 32 35 35 2C 39 31 3A 9E 34 39 31 35 |00:.255,91:.4915|
00002380: 32 3A 81 49 B2 39 39 A4 31 30 37 3A 97 32 35 35 |2:.I.99.107:.255|
00002390: 2C 49 3A 9E 34 39 31 35 32 3A 82 00 AB 2B 2E 3B |,I:.49152:...+.;|
000023A0: 8D 38 30 30 3A 89 31 35 30 30 30 00 BE 2B 60 3B |.800:.15000..+`;|
000023B0: 8F 20 2A 2A 20 43 52 45 41 54 45 20 44 44 00 F2 |. ** CREATE DD..|
000023C0: 2B 65 3B 8D 37 30 30 3A 81 49 B2 31 30 38 A4 31 |+e;.700:.I.108.1|
000023D0: 30 39 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 32 |09:.255,I:.49152|
000023E0: 3A 82 49 3A 97 32 35 35 2C 35 38 3A 9E 34 39 31 |:.I:.255,58:.491|
000023F0: 35 32 00 05 2C 6A 3B 97 32 35 35 2C 33 37 3A 9E |52..,j;.255,37:.|
00002400: 34 39 31 35 32 00 25 2C 6F 3B 8D 38 35 30 3A 8B |49152.%,o;.850:.|
00002410: 4B 24 B3 B1 22 20 22 AF 4B 24 B3 B1 22 85 22 A7 |K$.." ".K$..".".|
00002420: 31 35 32 31 35 00 37 2C 74 3B 8B 4B 24 B2 22 85 |15215.7,t;.K$.".|
00002430: 22 A7 31 35 32 39 30 00 57 2C 79 3B 8D 37 35 30 |".15290.W,y;.750|
00002440: 3A 97 32 35 35 2C 31 31 30 3A 9E 34 39 31 35 32 |:.255,110:.49152|
00002450: 3A 9E 34 39 31 36 34 00 86 2C 7A 3B 9F 32 2C 38 |:.49164..,z;.2,8|
00002460: 2C 32 2C 22 44 49 53 4B 4E 41 4D 45 2C 53 2C 52 |,2,"DISKNAME,S,R|
00002470: 22 3A 8D 39 30 30 3A 8B 45 B3 B1 30 A7 A0 32 3A |":.900:.E..0..2:|
00002480: 89 31 35 32 33 30 00 AA 2C 7B 3B 84 32 2C 44 4E |.15230..,{;.2,DN|
00002490: 24 3A 8B C8 28 44 4E 24 2C 32 29 B2 22 44 44 22 |$:..(DN$,2)."DD"|
000024A0: A7 A0 32 3A 89 31 35 32 33 30 00 C1 2C 7C 3B 8D |..2:.15230..,|;.|
000024B0: 31 37 30 32 30 3A 8D 37 35 30 3A 89 31 35 32 30 |17020:.750:.1520|
000024C0: 30 00 F3 2C 7E 3B 98 31 35 2C 22 4E 30 3A 44 41 |0..,~;.15,"N0:DA|
000024D0: 54 41 44 49 53 4B 2C 44 44 22 3A 8D 39 30 30 3A |TADISK,DD":.900:|
000024E0: 8B 45 B3 B1 30 A7 9E 34 39 31 36 31 3A 89 31 35 |.E..0..49161:.15|
000024F0: 32 39 30 00 2B 2D 83 3B 9F 32 2C 38 2C 32 2C 22 |290.+-.;.2,8,2,"|
00002500: 53 54 4F 52 59 46 49 4C 45 53 2C 53 2C 57 22 3A |STORYFILES,S,W":|
00002510: 8D 39 30 30 3A 8B 45 B3 B1 30 A7 A0 32 3A 9E 34 |.900:.E..0..2:.4|
00002520: 39 31 36 31 3A 89 31 35 32 39 30 00 4E 2D 88 3B |9161:.15290.N-.;|
00002530: 81 49 B2 31 A4 31 32 3A 98 32 2C 22 45 4D 50 54 |.I.1.12:.2,"EMPT|
00002540: 59 22 2C C7 28 31 33 29 3A 82 49 3A A0 32 00 80 |Y",.(13):.I:.2..|
00002550: 2D 92 3B 9F 32 2C 38 2C 32 2C 22 44 49 53 4B 4E |-.;.2,8,2,"DISKN|
00002560: 41 4D 45 2C 53 2C 57 22 3A 98 32 2C 22 44 44 22 |AME,S,W":.2,"DD"|
00002570: 2C C7 28 31 33 29 3A A0 32 3A 9E 34 39 31 36 31 |,.(13):.2:.49161|
00002580: 00 8B 2D BA 3B 89 31 35 30 30 30 00 9F 2D C4 3B |..-.;.15000..-.;|
00002590: 8F 20 2A 2A 20 43 41 54 41 4C 4F 47 20 44 44 00 |. ** CATALOG DD.|
000025A0: D3 2D C9 3B 8D 37 30 30 3A 81 49 B2 31 31 31 A4 |.-.;.700:.I.111.|
000025B0: 31 31 32 3A 97 32 35 35 2C 49 3A 9E 34 39 31 35 |112:.255,I:.4915|
000025C0: 32 3A 82 49 3A 97 32 35 35 2C 35 38 3A 9E 34 39 |2:.I:.255,58:.49|
000025D0: 31 35 32 00 E6 2D CE 3B 97 32 35 35 2C 33 37 3A |152..-.;.255,37:|
000025E0: 9E 34 39 31 35 32 00 06 2E D3 3B 8D 38 35 30 3A |.49152....;.850:|
000025F0: 8B 4B 24 B3 B1 22 20 22 AF 4B 24 B3 B1 22 85 22 |.K$.." ".K$.."."|
00002600: A7 31 35 33 31 35 00 18 2E D8 3B 8B 4B 24 B2 22 |.15315....;.K$."|
00002610: 85 22 A7 31 35 33 39 30 00 2F 2E DD 3B 8D 31 35 |.".15390./..;.15|
00002620: 37 30 30 3A 8B 45 B3 B1 30 A7 31 35 33 35 30 00 |700:.E..0.15350.|
00002630: 53 2E E2 3B 8D 37 35 30 3A 97 32 35 35 2C 33 37 |S..;.750:.255,37|
00002640: 3A 9E 34 39 31 35 32 3A 8D 38 30 30 3A 89 31 35 |:.49152:.800:.15|
00002650: 33 39 30 00 87 2E F6 3B 8D 37 35 30 3A 97 32 35 |390....;.750:.25|
00002660: 35 2C 31 31 33 3A 9E 34 39 31 35 32 3A 97 32 35 |5,113:.49152:.25|
00002670: 35 2C 33 37 3A 9E 34 39 31 35 32 3A 9E 34 39 32 |5,37:.49152:.492|
00002680: 30 36 3A 8D 38 30 30 00 92 2E 1E 3C 89 31 35 30 |06:.800....<.150|
00002690: 30 30 00 A7 2E 28 3C 8F 20 2A 2A 20 44 45 4C 45 |00...(<. ** DELE|
000026A0: 54 45 20 46 49 4C 45 00 DF 2E 2D 3C 8D 37 30 30 |TE FILE...-<.700|
000026B0: 3A 97 32 35 35 2C 31 31 35 3A 9E 34 39 31 35 32 |:.255,115:.49152|
000026C0: 3A 97 32 35 35 2C 31 31 32 3A 9E 34 39 31 35 32 |:.255,112:.49152|
000026D0: 3A 97 32 35 35 2C 35 38 3A 9E 34 39 31 35 32 00 |:.255,58:.49152.|
000026E0: F2 2E 32 3C 97 32 35 35 2C 33 37 3A 9E 34 39 31 |..2<.255,37:.491|
000026F0: 35 32 00 12 2F 37 3C 8D 38 35 30 3A 8B 4B 24 B3 |52../7<.850:.K$.|
00002700: B1 22 20 22 AF 4B 24 B3 B1 22 85 22 A7 31 35 34 |." ".K$..".".154|
00002710: 31 35 00 24 2F 3C 3C 8B 4B 24 B2 22 85 22 A7 31 |15.$/<<.K$.".".1|
00002720: 35 34 39 30 00 3B 2F 41 3C 8D 31 35 37 30 30 3A |5490.;/A<.15700:|
00002730: 8B 45 B3 B1 30 A7 31 35 34 38 30 00 62 2F 46 3C |.E..0.15480.b/F<|
00002740: 97 50 31 2C 32 32 3A 97 50 32 2C 31 3A 9E 34 39 |.P1,22:.P2,1:.49|
00002750: 31 35 35 3A 97 32 35 35 2C 39 30 3A 9E 34 39 31 |155:.255,90:.491|
00002760: 35 32 00 6B 2F 48 3C 8D 38 35 30 00 7D 2F 4B 3C |52.k/H<.850.}/K<|
00002770: 8B 4B 24 B2 22 85 22 A7 31 35 34 39 30 00 96 2F |.K$.".".15490../|
00002780: 50 3C 8B 4B 24 B3 22 41 22 B0 4B 24 B1 22 4C 22 |P<.K$."A".K$."L"|
00002790: A7 31 35 34 33 32 00 C0 2F 55 3C 4B B2 C6 28 4B |.15432../U<K..(K|
000027A0: 24 29 AB 36 34 3A 8B C8 28 53 46 24 28 4B 29 2C |$).64:..(SF$(K),|
000027B0: 35 29 B2 22 45 4D 50 54 59 22 A7 31 35 34 33 32 |5)."EMPTY".15432|
000027C0: 00 E8 2F 56 3C 59 B2 35 3A 58 B2 37 3A 81 49 B2 |../V<Y.5:X.7:.I.|
000027D0: 31 A4 4B 3A 59 B2 59 AA 32 3A 8B 59 B1 31 37 A7 |1.K:Y.Y.2:.Y.17.|
000027E0: 59 B2 37 3A 58 B2 32 33 00 0D 30 57 3C 82 49 3A |Y.7:X.23..0W<.I:|
000027F0: 4D 24 B2 22 12 1E 22 AA C8 28 53 46 24 28 4B 29 |M$.".."..(SF$(K)|
00002800: 2C 38 29 AA 22 92 9F 22 3A 8D 34 30 30 00 42 30 |,8)."..":.400.B0|
00002810: 5A 3C 9E 34 39 31 36 34 3A 98 31 35 2C 22 53 30 |Z<.49164:.15,"S0|
00002820: 3A 53 54 22 AA C7 28 4B AA 36 34 29 3A 53 46 24 |:ST"..(K.64):SF$|
00002830: 28 4B 29 B2 22 45 4D 50 54 59 22 3A 8D 31 35 38 |(K)."EMPTY":.158|
00002840: 30 30 00 54 30 5F 3C 9E 34 39 31 36 31 3A 89 31 |00.T0_<.49161:.1|
00002850: 35 34 39 30 00 88 30 78 3C 8D 37 35 30 3A 97 32 |5490..0x<.750:.2|
00002860: 35 35 2C 31 31 33 3A 9E 34 39 31 35 32 3A 97 32 |55,113:.49152:.2|
00002870: 35 35 2C 33 37 3A 9E 34 39 31 35 32 3A 9E 34 39 |55,37:.49152:.49|
00002880: 32 30 36 3A 8D 38 30 30 00 93 30 82 3C 89 31 35 |206:.800..0.<.15|
00002890: 30 30 30 00 A8 30 8C 3C 8F 20 2A 2A 20 52 45 4E |000..0.<. ** REN|
000028A0: 41 4D 45 20 46 49 4C 45 00 E0 30 91 3C 8D 37 30 |AME FILE..0.<.70|
000028B0: 30 3A 97 32 35 35 2C 31 31 36 3A 9E 34 39 31 35 |0:.255,116:.4915|
000028C0: 32 3A 97 32 35 35 2C 31 31 32 3A 9E 34 39 31 35 |2:.255,112:.4915|
000028D0: 32 3A 97 32 35 35 2C 35 38 3A 9E 34 39 31 35 32 |2:.255,58:.49152|
000028E0: 00 F3 30 96 3C 97 32 35 35 2C 33 37 3A 9E 34 39 |..0.<.255,37:.49|
000028F0: 31 35 32 00 13 31 9B 3C 8D 38 35 30 3A 8B 4B 24 |152..1.<.850:.K$|
00002900: B3 B1 22 20 22 AF 4B 24 B3 B1 22 85 22 A7 31 35 |.." ".K$..".".15|
00002910: 35 31 35 00 25 31 A0 3C 8B 4B 24 B2 22 85 22 A7 |515.%1.<.K$.".".|
00002920: 31 35 35 39 30 00 3C 31 A5 3C 8D 31 35 37 30 30 |15590.<1.<.15700|
00002930: 3A 8B 45 B3 B1 30 A7 31 35 35 38 30 00 63 31 AA |:.E..0.15580.c1.|
00002940: 3C 97 50 31 2C 32 32 3A 97 50 32 2C 32 3A 9E 34 |<.P1,22:.P2,2:.4|
00002950: 39 31 35 35 3A 97 32 35 35 2C 39 30 3A 9E 34 39 |9155:.255,90:.49|
00002960: 31 35 32 00 6C 31 AC 3C 8D 38 35 30 00 7E 31 AF |152.l1.<.850.~1.|
00002970: 3C 8B 4B 24 B2 22 85 22 A7 31 35 35 39 30 00 97 |<.K$.".".15590..|
00002980: 31 B4 3C 8B 4B 24 B3 22 41 22 B0 4B 24 B1 22 4C |1.<.K$."A".K$."L|
00002990: 22 A7 31 35 35 33 32 00 C1 31 B9 3C 4B B2 C6 28 |".15532..1.<K..(|
000029A0: 4B 24 29 AB 36 34 3A 8B C8 28 53 46 24 28 4B 29 |K$).64:..(SF$(K)|
000029B0: 2C 35 29 B2 22 45 4D 50 54 59 22 A7 31 35 35 33 |,5)."EMPTY".1553|
000029C0: 32 00 E9 31 BA 3C 59 B2 35 3A 58 B2 37 3A 81 49 |2..1.<Y.5:X.7:.I|
000029D0: B2 31 A4 4B 3A 59 B2 59 AA 32 3A 8B 59 B1 31 37 |.1.K:Y.Y.2:.Y.17|
000029E0: A7 59 B2 37 3A 58 B2 32 33 00 0E 32 BB 3C 82 49 |.Y.7:X.23..2.<.I|
000029F0: 3A 4D 24 B2 22 12 1E 22 AA C8 28 53 46 24 28 4B |:M$.".."..(SF$(K|
00002A00: 29 2C 38 29 AA 22 92 9F 22 3A 8D 34 30 30 00 26 |),8)."..":.400.&|
00002A10: 32 BC 3C 97 50 31 2C 32 33 3A 97 50 32 2C 31 3A |2.<.P1,23:.P2,1:|
00002A20: 9E 34 39 31 35 35 00 50 32 BE 3C 59 B2 32 33 3A |.49155.P2.<Y.23:|
00002A30: 58 B2 36 3A 4D 24 B2 22 CE 45 57 20 4E 41 4D 45 |X.6:M$.".EW NAME|
00002A40: 3F 20 A4 A4 A4 A4 A4 A4 A4 A4 22 3A 8D 34 30 30 |? ........":.400|
00002A50: 00 6D 32 C0 3C 59 B2 32 33 3A 58 B2 31 35 3A 8D |.m2.<Y.23:X.15:.|
00002A60: 31 32 35 30 30 3A 4E 41 24 B2 47 53 24 00 80 32 |12500:NA$.GS$..2|
00002A70: C2 3C 8B 4E 41 24 B2 22 85 22 A7 31 35 35 39 30 |.<.NA$.".".15590|
00002A80: 00 B6 32 C8 3C 9E 34 39 31 36 34 3A 98 31 35 2C |..2.<.49164:.15,|
00002A90: 22 52 30 3A 22 AA 4E 41 24 AA 22 3D 22 AA 53 46 |"R0:".NA$."=".SF|
00002AA0: 24 28 4B 29 3A 53 46 24 28 4B 29 B2 4E 41 24 3A |$(K):SF$(K).NA$:|
00002AB0: 8D 31 35 38 30 30 00 C8 32 CD 3C 9E 34 39 31 36 |.15800..2.<.4916|
00002AC0: 31 3A 89 31 35 34 39 30 00 FC 32 DC 3C 97 50 31 |1:.15490..2.<.P1|
00002AD0: 2C 32 31 3A 97 50 32 2C 31 3A 9E 34 39 31 35 35 |,21:.P2,1:.49155|
00002AE0: 3A 97 32 35 35 2C 31 31 33 3A 9E 34 39 31 35 32 |:.255,113:.49152|
00002AF0: 3A 9E 34 39 32 30 36 3A 8D 38 30 30 00 07 33 E6 |:.49206:.800..3.|
00002B00: 3C 89 31 35 30 30 30 00 14 33 F0 3C 8D 31 37 31 |<.15000..3.<.171|
00002B10: 30 30 3A 8E 00 2A 33 54 3D 8F 20 2A 2A 20 44 49 |00:..*3T=. ** DI|
00002B20: 52 45 43 54 4F 52 59 20 2A 2A 00 5E 33 59 3D 9E |RECTORY **.^3Y=.|
00002B30: 34 39 31 36 34 3A 9F 32 2C 38 2C 32 2C 22 53 54 |49164:.2,8,2,"ST|
00002B40: 4F 52 59 46 49 4C 45 53 2C 53 2C 52 22 3A 8D 39 |ORYFILES,S,R":.9|
00002B50: 30 30 3A 8B 45 B3 B1 30 A7 31 35 37 39 39 00 7F |00:.E..0.15799..|
00002B60: 33 5E 3D 8D 37 30 30 3A 97 32 35 35 2C 31 31 34 |3^=.700:.255,114|
00002B70: 3A 9E 34 39 31 35 32 3A 59 B2 37 3A 58 B2 34 00 |:.49152:Y.7:X.4.|
00002B80: A0 33 61 3D 81 49 B2 31 A4 31 32 3A 84 32 2C 53 |.3a=.I.1.12:.2,S|
00002B90: 46 24 28 49 29 3A 54 46 24 B2 53 46 24 28 49 29 |F$(I):TF$.SF$(I)|
00002BA0: 00 C4 33 63 3D 8B C8 28 54 46 24 2C 35 29 B2 22 |..3c=..(TF$,5)."|
00002BB0: 45 4D 50 54 59 22 A7 54 46 24 B2 22 22 3A 89 31 |EMPTY".TF$."":.1|
00002BC0: 35 37 31 38 00 D8 33 64 3D 54 46 24 B2 C8 28 53 |5718..3d=TF$..(S|
00002BD0: 46 24 28 49 29 2C 38 29 00 F7 33 66 3D 4D 24 B2 |F$(I),8)..3f=M$.|
00002BE0: C7 28 36 34 AA 49 29 AA 22 29 20 9E 12 22 AA 54 |.(64.I).") ..".T|
00002BF0: 46 24 AA 22 9F 92 22 00 15 34 68 3D 8D 34 30 30 |F$.".."..4h=.400|
00002C00: 3A 59 B2 59 AA 32 3A 8B 59 B1 31 37 A7 59 B2 37 |:Y.Y.2:.Y.17.Y.7|
00002C10: 3A 58 B2 32 30 00 1C 34 6D 3D 82 49 00 2C 34 B7 |:X.20..4m=.I.,4.|
00002C20: 3D A0 32 3A 9E 34 39 31 36 31 3A 8E 00 46 34 B8 |=.2:.49161:..F4.|
00002C30: 3D 8F 20 2A 2A 20 55 50 44 41 54 45 20 53 46 20 |=. ** UPDATE SF |
00002C40: 44 49 52 20 2A 2A 00 5E 34 BD 3D 98 31 35 2C 22 |DIR **.^4.=.15,"|
00002C50: 53 30 3A 53 54 4F 52 59 46 49 4C 45 53 22 00 8B |S0:STORYFILES"..|
00002C60: 34 C2 3D 9F 32 2C 38 2C 32 2C 22 53 54 4F 52 59 |4.=.2,8,2,"STORY|
00002C70: 46 49 4C 45 53 2C 53 2C 57 22 3A 8D 39 30 30 3A |FILES,S,W":.900:|
00002C80: 8B 45 B3 B1 30 A7 31 35 38 39 39 00 AF 34 CC 3D |.E..0.15899..4.=|
00002C90: 81 49 B2 31 A4 31 32 3A 98 32 2C C8 28 53 46 24 |.I.1.12:.2,.(SF$|
00002CA0: 28 49 29 2C 38 29 3B C7 28 31 33 29 3A 82 49 00 |(I),8);.(13):.I.|
00002CB0: B8 34 1B 3E A0 32 3A 8E 00 D5 34 80 3E 8F 20 2A |.4.>.2:...4.>. *|
00002CC0: 2A 2A 20 51 55 49 54 20 41 44 56 45 4E 54 55 52 |** QUIT ADVENTUR|
00002CD0: 45 20 2A 2A 2A 00 F9 34 8A 3E 8D 37 35 30 3A 81 |E ***..4.>.750:.|
00002CE0: 49 B2 31 36 38 A4 31 36 39 3A 97 32 35 35 2C 49 |I.168.169:.255,I|
00002CF0: 3A 9E 34 39 31 35 32 3A 82 00 19 35 94 3E 8D 38 |:.49152:...5.>.8|
00002D00: 35 30 3A 8B 4B 24 B3 B1 22 59 22 AF 4B 24 B3 B1 |50:.K$.."Y".K$..|
00002D10: 22 4E 22 A7 31 36 30 32 30 00 27 35 9E 3E 8B 4B |"N".16020.'5.>.K|
00002D20: 24 B2 22 4E 22 A7 8E 00 32 35 A8 3E 8D 31 32 36 |$."N"...25.>.126|
00002D30: 35 30 00 5C 35 E3 3E 9E 34 39 31 36 34 3A 99 22 |50.\5.>.49164:."|
00002D40: 93 05 22 3A 97 35 33 32 38 30 2C 31 34 3A 97 35 |..":.53280,14:.5|
00002D50: 33 32 38 31 2C 36 3A A0 31 35 3A A2 00 7B 35 68 |3281,6:.15:..{5h|
00002D60: 42 8F 20 2A 2A 20 54 45 53 54 20 46 4F 52 20 44 |B. ** TEST FOR D|
00002D70: 49 53 4B 20 4E 41 4D 45 20 2A 2A 00 AC 35 72 42 |ISK NAME **..5rB|
00002D80: 9E 34 39 31 36 34 3A 9F 32 2C 38 2C 32 2C 22 44 |.49164:.2,8,2,"D|
00002D90: 49 53 4B 4E 41 4D 45 2C 53 2C 52 22 3A 8D 39 30 |ISKNAME,S,R":.90|
00002DA0: 30 3A 8B 45 B2 30 A7 31 37 30 33 30 00 DE 35 7C |0:.E.0.17030..5||
00002DB0: 42 A0 32 3A 9E 34 39 31 36 31 3A 8D 37 35 30 3A |B.2:.49161:.750:|
00002DC0: 97 32 35 35 2C 31 31 33 3A 9E 34 39 31 35 32 3A |.255,113:.49152:|
00002DD0: 97 32 35 35 2C 33 37 3A 9E 34 39 31 35 32 00 F5 |.255,37:.49152..|
00002DE0: 35 81 42 9E 34 39 32 30 36 3A 8D 38 30 30 3A 89 |5.B.49206:.800:.|
00002DF0: 31 37 30 39 39 00 17 36 86 42 84 32 2C 44 4E 24 |17099..6.B.2,DN$|
00002E00: 3A 44 4E 24 B2 C8 28 44 4E 24 2C 32 29 3A A0 32 |:DN$..(DN$,2):.2|
00002E10: 3A 9E 34 39 31 36 31 00 1D 36 CB 42 8E 00 33 36 |:.49161..6.B..36|
00002E20: CC 42 8F 20 2A 2A 20 49 4E 53 45 52 54 20 53 57 |.B. ** INSERT SW|
00002E30: 20 2A 2A 00 4C 36 D6 42 8D 37 30 30 3A 97 32 35 | **.L6.B.700:.25|
00002E40: 35 2C 31 37 32 3A 9E 34 39 31 35 32 00 7C 36 E0 |5,172:.49152.|6.|
00002E50: 42 8D 37 35 30 3A 97 32 35 35 2C 33 37 3A 9E 34 |B.750:.255,37:.4|
00002E60: 39 31 35 32 3A 8D 38 30 30 3A 8D 31 37 30 30 30 |9152:.800:.17000|
00002E70: 3A 8B 45 B3 B1 30 A7 31 37 31 32 30 00 AE 36 EA |:.E..0.17120..6.|
00002E80: 42 8B 44 4E 24 B3 B1 22 53 57 22 A7 97 32 35 35 |B.DN$.."SW"..255|
00002E90: 2C 31 31 33 3A 9E 34 39 31 35 32 3A 9E 34 39 32 |,113:.49152:.492|
00002EA0: 30 36 3A 8D 38 30 30 3A 89 31 37 31 32 30 00 B9 |06:.800:.17120..|
00002EB0: 36 2F 43 8D 37 35 30 3A 8E 00 00 00 |6/C.750:.... |
..,.... OPEN15,8,15:PRINT#15,"S0:WA":CLO
SE15.>.... SAVE "WA",8.W....A.0.A.1:."WO
BJ",8,1.K.2..52,80:.56,80:....C.. 10000:
. ** DRIVER **...D.. ** HOUSEKEEP **.K.
N..".";G(8);G(14):.53280,0:.53281,0:.650
,64...X.. SF$(12),CF%(17)......I.832.847
:.I,0:.:NA$."".4....3,8,3,"ADV INFO,S,R"
:.I.832.846:.3,BY%:.I,BY%:.I.H....3,BY%:
.851,BY%.E....3,AL%,NA$: 3:.AL%.0.150.X.
..NA$.H(NA$,AL%).....P1.828:P2.829:P3.83
0:P4.831... ..15,8,15...G...D.H.. ** TIT
LE SCREEN **......255,1:.49158:.950:.491
88:.1500:.960:....,.. ** CREDITS SCREEN
**.B.6..255,2:.49158:.950:.49188:.960:.2
55,3:.49158:.49206.L.;.K$."".H.@..I.1.50
0:.K$:.K$."".330...E..950:.1600:.".":.96
0:.255,0:.49158...G..255,6.16.7:.49167:.
399.Y.J..B(653).2..950:.1600:.".":.960:.
2000:.399...T..I:.325......53281,0:.....
.. ** DISPLAY AT **......Y.0..".";:.415.
;....".";:.YY.1.Y:.".";:.YY.Q....XX.1.X:
.".";:.XX.[....M$:..X.... ** MAKE OUTLIN
E BOX **......53280,0:.".".A....".......
......................................."
;.N.... I.1.14......".
.";...... I.7.&.."..
......................................".
B.0..".":..C.X.. ** ADVENTUWRITE OPTIONS
**.L.]..500...B..I.0.6:.255,I:.49152:..
.....255,27:.49152......850...... K$."1"
.K$."6".660.G...C.E(K$).M.......... ** C
LEAR INSTRUCTION AREA **...F..P1,5:.P2,1
4:.49155:..'.... ** CLEAR BOTTOM WINDOW.
A....P1,20:.P2,5:.49155:.._. .. ** SCAN
FOR SPACEBAR **.H.*..850...4..K$.." ".K$
.." ".810...>... .R.. ** WAIT FOR KEY **
...\..K$:.K$."".860.H.F..B(834).1..49215
.N.......... ** TEST FOR DISK ERRORS **.
.....15,E:....... ** SCREEN OFF **.,....
53265,B(53265).239:..B.... ** SCREEN ON
**.[.E..53265,B(53265).16:..R.... ** CAR
D IMAGE **.....53280,6......"...
";.....
.".. .
. ";......".. .
. . ";.,.... I.0 . 7.B..
..".. . ................................
... . . ";.P....I.7.1070...$..".. .
. . ";..
....I...8..".. . .
. . ";...B.."..
"...K...6..
.. ** INTO MULTI BM **.D....56578,B(5657
8).3:.56576,(B(56576).252).2......53272,
(B(53272).15).112:.53272,(B(53272).240).
8.E....53265,B(53265).32:.53270,B(53270)
.16:....@.. ** OUT OF MULTI BM **...J..5
3281,0:.56578,B(56578).3:.56576,(B(56576
).252).3.L.T..53272,(B(53272).15).16:.53
272,(B(53272).240).6.Z.^..53265,B(53265)
.223:.53270,B(53270).239:....P.. ** OPTI
ONS **.C.U..53281,0:.500:.255,0:.49158:.
255,06.16.07:.49167...Z..49161:.I.162.16
7:.255,I:.49152:.I:.255,179:.49152......
2500:.750:.255,27:.49152.5....850:.K$."1
".K$."5".2020.]...K.E(K$):.K.2100,2200,2
600,2300,2400.J.3..49164:..Y.4.. ** CLIC
K...>..B(834).0..834,1:.2199...H..834,0.
.....2015.B.... ** NUMBER OF WORDS......
750:.I.170.171:.255,I:.49152:.I.....Y.22
:X.32:M$."..":.400:NW$."":.I.1.2.(....85
0:.K$.G(13).2250.@....K$."0".K$."9".2220
.^...NW$.NW$.K$:M$.NW$:.400:.I.W.G..850:
.K$..G(13).2247...H..E(NW$).50..49206:.2
200...J..835,E(NW$):.2015...... ** RUN..
._..2099.N.`.. ** QUIT...J..750:.I.168.1
69:.255,I:.49152:....T..850:.K$.."Y".K$.
."N".2420.".~..K$."N".2015.4....12650:.1
6099.M.D.. ** LIST OPTIONS **.A.N..B(834
)..0.2530.T.X.M$."OFF":.2540.....M$."ON
".....Y.7:X.31:.400.....M$.D(B(835))."
":Y.9:X.30:.400.K....B(851)..0.2580.....
M$."NO ":.2590.....M$."YES".....Y.12:X.3
1:.400...'.....(.. ** LINEFEED **.4.2..B
(851).0..851,1:.2699.?.<..851,0.I....201
5.L..'. ****************************....
'. * STORY WRITER SOURCE CODE *....'. **
**************************.G..'.100:. HO
USEKEEP....'.B(850).0.10020... '.255,0:.
49158:.255,3:.49158.$.!'.53281,0:.255,06
.16.07:.49167:.10035.<.$'.200:. TITLE SC
REEN.V..'.300:. CREDITS SCREEN.P.3'.4916
1:. SPLIT SCREEN...8'. 600:. ADV OPTIONS
...B'. C . 11000,12000,13000,14000,15000
,16000.I.J'XX..(0):.10040....*. *** MAIN
INSTRUCTIONS ***....+.700:.I.7.14:.255,
I:.49152:.."..+.750:.255,37:.49152.+..+.
800.B. +.700:.255,7:.49152.N.*+.I.16.20:
.255,I:.49152:.:.255,37:.49152.W.4+.800.
}.H+....... ** STARTER OPTIONS **......7
00:.I.21.27:.255,I:.49152:.I.T....750:.2
55,27:.49152......850:.K$."1".K$."4".120
20.....K.E(K$):.K.12100,12200,12300,1240
0.0.D/. ** STARTER INSTR.B.N/.700:.255,1
61:.49152:.I.28.37:.255,I:.49152:....X/.
800:.700:.255,161:.49152:.I.38.44:.255,I
:.49152:..P.L/.800:.700:.255,161:.49152:
.I.45.52:.255,I:.49152:....V/.800:.12000
..../. **BEGIN..../.750..../.700:.I.53.5
8:.255,I:.49152:.I.2../.255,27:.49152:.8
50.]../.K$.."A".K$.."Y".K$.."I".K$..".".
12210.O../.K$.".".12000..../.K$."Y"..832
,0:.12240...A/.K$."A"..832,1:.12280.Z.F/
.700:.I.70.81:.255,I:.49152:.I:.750:.255
,37:.49152...K/.800:.12200...P/.700:.255
,53:.49152:.I.59.62:.255,I:.49152:.I.T.Z
/.850:.K$.."Y".K$.."N".K$.."Y".K$.."N".K
$..".".12250.F../.K$.".".12000.../.K$."
N".K$."N".12200..../NA$."":.12700.C../.7
00:.255,53:.49152:.I.63.65:.255,I:.49152
:.I..../.750:.255,58:.49152..../Y.12:X.1
6:M$."........":.400..../Y.12:X.15:.1250
0:NA$.GS$.,../.NA$.".".12200.^../.700:.2
55,53:.49152:.I.66.67:.255,I:.49152:.I..
..0.255,178:.49152:.255,27:.49152....0.8
50:.K$.."M".K$.."F".K$.."M".K$.."F".K$..
".".12290.K..0.K$.".".12200....0.700:.25
5,53:.49152:.I.68.69:.255,I:.49152:.I.).
.0.K$."M".K$."M".SX$."MALE":.833,0:.1229
5.A..0SX$."FEMALE":.833,1.X..0Y.8:X.30:M
$.SX$:.400:Y.9:X.20:M$.H(NA$,8).".":.400
....0.I.61.62:.255,I:.49152:.I.N..0.850:
.K$.."Y".K$.."N".K$.."Y".K$.."N".K$.."."
.12297....0.K$.".".K$."N".12200....0.848
,0:.12700....0. ** CONTINUE....0.848,1:.
12700.#.P0..8.T0. ** GET NAME **.C.W0GS$
."".].Y0.850:.K$..G(20).12540.O..0.GS$."
".12505...0M$.".":.400....0.C(GS$).0.GS
$."":.12505....0X.X.1:GS$.H(GS$,C(GS$).1
):.12505....0.K$.G(13).K$.G(141).12580..
..1.K$.".".GS$.K$:.12599....1.C(GS$).8.1
2505.%..1.K$."A".K$."Z".12560.0..1.12570
.I..1.K$."A".K$."Z".12505.\..1K$.G(F(K$)
.96)....1GS$.GS$.K$:X.X.1:M$.K$:.400:.12
505...$1AL%.C(GS$):.AL%.0.12500.B.&1LC$.
H(GS$,1):.LC$..G(96).12599...)1LC$.G(F(L
C$).32):GS$.LC$.I(GS$,AL%.1)...71....81.
** SAVE ADVEN INFO...=1.NA$."".12650.:.
B1.I.1.AL%:Z.F(J(NA$,I,1)).J.G1.Z.64.126
30.B.L1.Z.96.Z.Z.64:.12630.T.Q1.Z.256.Z.
Z.32...V1.838.(I.1),Z:.I:.838.(I.1),255.
J.J1.49164:.15,"S0:ADV INFO":.3,8,3,"ADV
INFO,S,W"...O1.I.832.846:.3,B(I);G(13);
:.:.3,B(851);G(13).! .1.3,AL%;G(13);NA$;
G(13): 3:.49161:..< .1. ** GOTO STARTER
DISK.~ .1.12600:.700:Y.11:X.5:M$."INSERT
THE STORY STARTER DISK.":.400.. .1.750:
.255,37:.49152:.800.. .1.17000:.E..0.127
15.F .1.DN$."SS".12732.. .1.255,113:.491
52:.255,37:.49152:.49206:.800:.12715..!.
1.12600:.49164.C!.1.".":Y.12:X.10:M$.".L
OADING STORY STARTER.":.400.G!D1F0..(0):
15:A$."WA":.49224,A$:...!H2. ** WRITER
OPTIONS **..!M2.700:.I.141.145:.255,I:.4
9152:.I:.750..!R2.255,27:.49152..!.2.850
:.K$."1".K$."3".13020..!.2K.E(K$):.K.131
00,13200,13300..",3. ** WRITER INSTR.G"6
3.700:.I.146.154:.255,I:.49152:.:.255,37
:.49152.~"@3.800:.700:.255,146:.49152:.I
.155.159:.255,I:.49152.."^3.I:.800:.1300
0..".3. ** WRITE STORY..".3.700:.255,160
:.49152:.255,58:.49152:.255,37:.49152.."
.3.850:.K$.." ".K$..".".13210..#.3.K$.".
".13000.!#.3.12600:.49164.V#.3.".":Y.10:
X.9:M$.".LOADING EDITOR/PROOFER.":.400.F
#.3 15:F0..(0).~#.3A$."EP":.49224,A$:...
#.3...#.6. ** PRINT OPTIONS **.C#.6.700:
.I.117.122:.255,I:.49152:.I..#.6.750:.25
5,27:.49152..#D6.850:.K$."1".K$."4".1402
0. $N6K.E(K$):.K.14100,14200,14300,14400
.5$.7. ** PRINT INSTR.H$.7.700:.I.123.12
6:.255,I:.49152:.:.255,37:.49152.X$(7.80
0:.14000..$X7. ** PRINT NOTECARD..$.7.70
0:.I.127.133:.255,I:.49152:...$.7.750:.2
55,58:.49152:.255,37:.49152..$.7.850:.K$
.." ".K$..".".14220..%.7.K$.".".14278.$%
.7.17000:.E..0.14215.V%.7.49164:.2,8,2,"
CARDFILES,S,R":.900:.E.0.14245.H% 7.1702
0:.14215..%.7.I.1.17:.2,CF%(I):.: 2:.491
61..%.7.700:.750:.I.123.126:.255,I:.4915
2:..U%.7.255,37:.49152:.255,58:.49152..%
.7.850:.K$.." ".K$..".".14256..&.7.K$.".
".14278."&.7.49182:.B(255).0.14270.V&.7.
750:.255,175:.49152:.255,37:.49152:.4920
6:.800.J&.7.DN$."SW".14200.U&.7.14278..&
.7.49164:.I.1.17:.CF%(I)..1.14275..&.7.7
50:.255,173:.49152:.255,I:.49209..&.7.75
0:.255,174:.49152:.255,I.1:.49212..&C7.I
:.49161..'F7.17100..'.7.750:.14000.''.7.
** PRINT STORY.K'.7.700:.I.134.140:.255
,I:.49152:..R'.7.750:.255,58:.49152:.255
,37:.49152..'.7.850:.K$.." ".K$..".".143
20..'.7.K$.".".14399..'.7.17000:.E..0.14
315.P'.7.DN$.."SW".14335..'.7.750:.255,1
76:.49152:.49164:.255,0:.49170..(.7.4916
1:.14365./(.7.15700:.E..0..17020:.14300.
V(.8.750:.255,58:.49152:.255,27:.49152.~
(.8.850:.K$..".".(K$."A".K$."L").14345..
(.8.K$."."..17100:.14000.B(.8K.F(K$).64:
.H(SF$(K),5)."EMPTY".14345..(.8Y.5:X.7:.
I.1.K:Y.Y.2:.Y.17.Y.7:X.23..).8.I:M$."..
".H(SF$(K),8)."..":.400.D).8.750:.255,17
6:.49152:.49164:.255,K:.49170:.49161.M).
8.700:.750:.I.123.126:.255,I:.49152:...)
"8.255,37:.49152:.255,58:.49152..)$8.850
:.K$.." ".K$..".".14372.A)%8.K$.".".1439
9..)'8.49182:.B(255).0.14395..**8.750:.2
55,175:.49152:.255,37:.49152:.49206:.800
.$*,8.DN$."SW".14300./*18.14399.]*;8.750
:.255,177:.49152:.49164:.49173:.49161.T*
?8.17100:.750:.14000.Z*@8...*.:. ** DISK
OPTIONS **..*.:.700:.I.82.89:.255,I:.49
152:.I:.750.N*.:.255,27:.49152..*.:.850:
.K$."1".K$."6".15020..+.:K.E(K$):.K.1510
0,15200,15300,15400,15500,15600.3+.:. **
DISK INSTR.I+.;.700:.I.91.98:.255,I:.49
152:.:.255,37:.49152:.800..+.;.700:.255,
91:.49152:.I.99.107:.255,I:.49152:...+.;
.800:.15000..+`;. ** CREATE DD..+E;.700:
.I.108.109:.255,I:.49152:.I:.255,58:.491
52..,J;.255,37:.49152.%,O;.850:.K$.." ".
K$..".".15215.7,T;.K$.".".15290.W,Y;.750
:.255,110:.49152:.49164..,Z;.2,8,2,"DISK
NAME,S,R":.900:.E..0. 2:.15230..,{;.2,DN
$:.H(DN$,2)."DD". 2:.15230.A,|;.17020:.7
50:.15200..,~;.15,"N0:DATADISK,DD":.900:
.E..0..49161:.15290.+-.;.2,8,2,"STORYFIL
ES,S,W":.900:.E..0. 2:.49161:.15290.N-.;
.I.1.12:.2,"EMPTY",G(13):.I: 2..-.;.2,8,
2,"DISKNAME,S,W":.2,"DD",G(13): 2:.49161
..-.;.15000..-D;. ** CATALOG DD.S-I;.700
:.I.111.112:.255,I:.49152:.I:.255,58:.49
152..-N;.255,37:.49152...S;.850:.K$.." "
.K$..".".15315...X;.K$.".".15390./..;.15
700:.E..0.15350.S..;.750:.255,37:.49152:
.800:.15390....;.750:.255,113:.49152:.25
5,37:.49152:.49206:.800....<.15000...(<.
** DELETE FILE...-<.700:.255,115:.49152
:.255,112:.49152:.255,58:.49152...2<.255
,37:.49152../7<.850:.K$.." ".K$..".".154
15.$/<<.K$.".".15490.;/A<.15700:.E..0.15
480.B/F<.P1,22:.P2,1:.49155:.255,90:.491
52.K/H<.850.}/K<.K$.".".15490../P<.K$."A
".K$."L".15432../U<K.F(K$).64:.H(SF$(K),
5)."EMPTY".15432../V<Y.5:X.7:.I.1.K:Y.Y.
2:.Y.17.Y.7:X.23..0W<.I:M$."..".H(SF$(K)
,8)."..":.400.B0Z<.49164:.15,"S0:ST".G(K
.64):SF$(K)."EMPTY":.15800.T0_<.49161:.1
5490..0X<.750:.255,113:.49152:.255,37:.4
9152:.49206:.800..0.<.15000..0.<. ** REN
AME FILE..0.<.700:.255,116:.49152:.255,1
12:.49152:.255,58:.49152..0.<.255,37:.49
152..1.<.850:.K$.." ".K$..".".15515.%1 <
.K$.".".15590.<1.<.15700:.E..0.15580.C1.
<.P1,22:.P2,2:.49155:.255,90:.49152.L1.<
.850.~1.<.K$.".".15590..1.<.K$."A".K$."L
".15532.A1.<K.F(K$).64:.H(SF$(K),5)."EMP
TY".15532..1.<Y.5:X.7:.I.1.K:Y.Y.2:.Y.17
.Y.7:X.23..2.<.I:M$."..".H(SF$(K),8)."..
":.400.&2.<.P1,23:.P2,1:.49155.P2.<Y.23:
X.6:M$."NEW NAME? ........":.400.M2.<Y.2
3:X.15:.12500:NA$.GS$..2B<.NA$.".".15590
..2H<.49164:.15,"R0:".NA$."=".SF$(K):SF$
(K).NA$:.15800.H2M<.49161:.15490..2.<.P1
,21:.P2,1:.49155:.255,113:.49152:.49206:
.800..3.<.15000..3.<.17100:..*3T=. ** DI
RECTORY **.^3Y=.49164:.2,8,2,"STORYFILES
,S,R":.900:.E..0.15799.3^=.700:.255,114
:.49152:Y.7:X.4. 3A=.I.1.12:.2,SF$(I):TF
$.SF$(I).D3C=.H(TF$,5)."EMPTY".TF$."":.1
5718.X3D=TF$.H(SF$(I),8)..3F=M$.G(64.I).
") ..".TF$.".."..4H=.400:Y.Y.2:.Y.17.Y.7
:X.20..4M=.I.,4.= 2:.49161:..F4.=. ** UP
DATE SF DIR **.^4.=.15,"S0:STORYFILES"..
4B=.2,8,2,"STORYFILES,S,W":.900:.E..0.15
899..4L=.I.1.12:.2,H(SF$(I),8);G(13):.I.
.4.> 2:..U4.>. *** QUIT ADVENTURE ***..4
.>.750:.I.168.169:.255,I:.49152:...5.>.8
50:.K$.."Y".K$.."N".16020.'5.>.K$."N"...
25.>.12650.\5.>.49164:."..":.53280,14:.5
3281,6: 15:..{5HB. ** TEST FOR DISK NAME
**..5RB.49164:.2,8,2,"DISKNAME,S,R":.90
0:.E.0.17030..5|B 2:.49161:.750:.255,113
:.49152:.255,37:.49152..5.B.49206:.800:.
17099..6.B.2,DN$:DN$.H(DN$,2): 2:.49161.
.6KB..36LB. ** INSERT SW **.L6VB.700:.25
5,172:.49152.|6.B.750:.255,37:.49152:.80
0:.17000:.E..0.17120..6.B.DN$.."SW"..255
,113:.49152:.49206:.800:.17120..6/C.750:
....
> CLICK IMAGE PREVIEW FOR FULL MODAL