PCM-DATABASE
FILE INFORMATION
FILENAME(S): PCM-DATABASE
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-12-02 02:08:05
APPEARS ON: 1 disk(s)
FILE HASH
2027ac9b8ece38a88e95cd1ca82fce2cad5979036b95d1d17558f4ad5792902b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HULP WERKPRG 02 | PCM-DATABASE | PRG | Shocktrooper | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 02 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 99 C7 28 33 30 29 3A 99 |53281,0:..(30):.|
00000020: C7 28 31 34 29 3B C7 28 38 29 3A 89 32 36 00 42 |.(14);.(8):.26.B|
00000030: 08 05 00 41 24 B2 22 22 3A 49 B2 30 3A 99 22 A6 |...A$."":I.0:.".|
00000040: 22 3B 00 53 08 06 00 A1 47 24 3A 8B 47 24 B2 22 |";.S....G$:.G$."|
00000050: 22 A7 36 00 8A 08 07 00 8B 47 24 B2 C7 28 31 34 |".6......G$..(14|
00000060: 38 29 B0 47 24 B2 C7 28 31 37 29 B0 47 24 B2 C7 |8).G$..(17).G$..|
00000070: 28 32 39 29 B0 47 24 B2 C7 28 31 35 37 29 B0 47 |(29).G$..(157).G|
00000080: 24 B2 C7 28 31 34 35 29 A7 36 00 A0 08 08 00 8B |$..(145).6......|
00000090: 47 24 B2 C7 28 32 30 29 AF 41 24 B2 22 22 A7 36 |G$..(20).A$."".6|
000000A0: 00 D2 08 09 00 8B 47 24 B2 C7 28 32 39 29 A7 99 |......G$..(29)..|
000000B0: C7 28 32 30 29 C7 28 32 30 29 22 A6 22 3B 3A 49 |.(20).(20)".";:I|
000000C0: B2 49 AB 31 3A 41 24 B2 C8 28 41 24 2C 49 29 3A |.I.1:A$..(A$,I):|
000000D0: 89 36 00 FE 08 0A 00 8B 47 24 B3 B1 C7 28 31 33 |.6......G$...(13|
000000E0: 29 A7 41 24 B2 41 24 AA 47 24 3A 49 B2 49 AA 31 |).A$.A$.G$:I.I.1|
000000F0: 3A 99 22 9D 22 47 24 22 A6 22 3B 3A 89 36 00 14 |:."."G$".";:.6..|
00000100: 09 0B 00 8B 41 24 B2 C7 28 31 33 29 A7 41 24 B2 |....A$..(13).A$.|
00000110: 22 22 3A 8E 00 20 09 0C 00 99 22 9D 20 22 3A 8E |"":.. ....". ":.|
00000120: 00 35 09 0E 00 99 22 12 11 22 51 24 22 9D 91 91 |.5....".."Q$"...|
00000130: 22 3A 8D 31 38 00 60 09 0F 00 41 B2 30 3A 81 49 |":.18.`...A.0:.I|
00000140: B2 31 A4 31 37 3A 8B CA 28 4B 24 2C 49 AC 32 AB |.1.17:..(K$,I.2.|
00000150: 31 2C 31 29 B2 41 24 A7 41 B2 49 3A 49 B2 31 37 |1,1).A$.A.I:I.17|
00000160: 00 69 09 10 00 82 49 3A 8E 00 7B 09 12 00 A1 41 |.i....I:..{....A|
00000170: 24 3A 8B 41 24 B2 22 22 A7 31 38 00 81 09 13 00 |$:.A$."".18.....|
00000180: 8E 00 92 09 15 00 99 22 13 22 A3 33 35 29 3B 49 |.......".".35);I|
00000190: 3A 8E 00 B2 09 17 00 99 22 12 41 52 45 20 59 4F |:.......".ARE YO|
000001A0: 55 20 53 55 52 45 3F 20 59 2F 4E 22 3A 8D 31 38 |U SURE? Y/N":.18|
000001B0: 3A 8E 00 F3 09 1A 00 99 22 93 22 A6 31 31 29 C7 |:.......".".11).|
000001C0: 28 31 34 32 29 22 12 20 44 20 41 20 54 20 41 20 |(142)". D A T A |
000001D0: 42 20 41 20 53 20 45 20 22 3A 99 A6 31 31 29 22 |B A S E ":..11)"|
000001E0: 11 2A 20 4A 55 53 54 20 41 20 4D 4F 4D 45 4E 54 |.* JUST A MOMENT|
000001F0: 20 2A 22 00 32 0A 1B 00 48 24 B2 22 43 2E 42 2E | *".2...H$."C.B.|
00000200: 4D 2E 22 3A 51 24 B2 22 12 59 4F 55 52 20 43 48 |M.":Q$.".YOUR CH|
00000210: 4F 49 43 45 20 20 20 20 20 20 20 20 20 20 20 20 |OICE |
00000220: 20 20 20 20 20 20 20 20 20 3F 20 3D 20 48 45 4C | ? = HEL|
00000230: 50 22 00 6D 0A 1C 00 4E B2 B5 28 28 B8 28 30 29 |P".m...N..((.(0)|
00000240: AB 28 B8 28 30 29 B3 30 29 AC 36 35 35 33 36 29 |.(.(0).0).65536)|
00000250: AD 34 30 29 3A 50 B2 31 3A 58 B2 28 4E AA 31 29 |.40):P.1:X.(N.1)|
00000260: AD 31 30 3A 4E B2 31 30 AC B5 28 58 29 00 83 0A |.10:N.10..(X)...|
00000270: 1D 00 86 53 24 28 4E 29 3A 4C 24 B2 22 20 4C 49 |...S$(N):L$." LI|
00000280: 4E 45 22 00 9B 0A 1E 00 81 4A B2 30 A4 4E 3A 53 |NE"......J.0.N:S|
00000290: 24 28 4A 29 B2 22 2D 22 3A 82 4A 00 BC 0A 1F 00 |$(J)."-":.J.....|
000002A0: 99 22 11 20 22 B5 28 58 29 22 50 41 47 45 53 22 |.". ".(X)"PAGES"|
000002B0: 3A 99 4E 22 45 4E 54 52 49 45 53 22 00 E7 0A 20 |:.N"ENTRIES"... |
000002C0: 00 4B 24 B2 22 43 2C 50 2C 45 2C 49 2C 4E 2C 53 |.K$."C,P,E,I,N,S|
000002D0: 2C 4C 2C 48 2C 4B 2C 41 2C 3F 2C 52 2C 46 2C 44 |,L,H,K,A,?,R,F,D|
000002E0: 2C 47 22 3A 89 33 38 00 EF 0A 22 00 4B B2 30 00 |,G":.38...".K.0.|
000002F0: 1F 0B 23 00 51 B2 30 3A 99 22 93 12 43 48 41 50 |..#.Q.0:."..CHAP|
00000300: 54 45 52 20 43 4F 4E 54 45 4E 54 53 20 46 49 4C |TER CONTENTS FIL|
00000310: 45 3A 20 22 3B 48 24 3A 99 22 50 41 47 45 22 00 |E: ";H$:."PAGE".|
00000320: 5A 0B 24 00 81 4A B2 4B A4 4E 3A 8B C6 28 53 24 |Z.$..J.K.N:..(S$|
00000330: 28 4A 29 29 B2 31 38 A7 99 22 9D 22 B5 28 4A AD |(J)).18..".".(J.|
00000340: 31 30 AA 31 29 3B 53 24 28 4A 29 3A 51 B2 51 AA |10.1);S$(J):Q.Q.|
00000350: 31 3A 8B 51 B1 31 39 A7 33 38 00 61 0B 25 00 82 |1:.Q.19.38.a.%..|
00000360: 4A 00 71 0B 26 00 8D 31 34 3A 8B 41 B2 30 A7 33 |J.q.&..14:.A.0.3|
00000370: 38 00 AB 0B 27 00 91 41 89 33 34 2C 34 33 2C 31 |8...'..A.34,43,1|
00000380: 35 35 2C 35 34 2C 36 39 2C 38 37 2C 39 33 2C 31 |55,54,69,87,93,1|
00000390: 33 33 2C 31 32 37 2C 31 37 32 2C 37 33 2C 31 34 |33,127,172,73,14|
000003A0: 37 2C 35 31 2C 37 33 2C 31 36 34 00 BE 0B 28 00 |7,51,73,164...(.|
000003B0: 8B 4A B3 4E AA 31 A7 4B B2 4A 3A 89 33 35 00 C6 |.J.N.1.K.J:.35..|
000003C0: 0B 29 00 89 33 34 00 F4 0B 2B 00 41 24 B2 22 2D |.)..34...+.A$."-|
000003D0: 31 22 3A 99 22 11 11 50 41 47 45 22 3A 8D 35 3A |1":."..PAGE":.5:|
000003E0: 50 B2 C5 28 41 24 29 3A 8D 31 35 3A 8B 41 B3 B1 |P..(A$):.15:.A..|
000003F0: 30 A7 33 39 00 11 0C 2C 00 8B 50 B3 31 B0 50 B1 |0.39...,..P.1.P.|
00000400: B5 28 58 29 A7 99 22 91 91 91 91 91 22 3A 89 34 |.(X)..".....":.4|
00000410: 33 00 45 0C 2D 00 99 22 12 93 50 41 47 45 22 50 |3.E.-.."..PAGE"P|
00000420: 3B 48 24 3A 81 49 B2 30 A4 39 3A 4C B2 28 50 AB |;H$:.I.0.9:L.(P.|
00000430: 31 29 AC 31 30 AA 49 3A 99 22 9D 22 4C 3B 53 24 |1).10.I:."."L;S$|
00000440: 28 4C 29 3A 82 00 55 0C 2E 00 8D 31 34 3A 8B 41 |(L):..U....14:.A|
00000450: B2 30 A7 34 36 00 63 0C 2F 00 8B 41 B3 B1 31 36 |.0.46.c./..A..16|
00000460: A7 33 39 00 76 0C 30 00 50 B2 50 AA 31 3A 8B 50 |.39.v.0.P.P.1:.P|
00000470: B1 58 A7 50 B2 31 00 7E 0C 31 00 89 34 35 00 98 |.X.P.1.~.1..45..|
00000480: 0C 33 00 99 22 93 46 49 4C 45 4E 41 4D 45 22 3A |.3..".FILENAME":|
00000490: 8D 35 3A 48 24 B2 41 24 00 A0 0C 34 00 89 34 35 |.5:H$.A$...4..45|
000004A0: 00 D2 0C 36 00 41 24 B2 22 2D 31 22 3A 99 22 11 |...6.A$."-1":.".|
000004B0: 11 49 4E 53 45 52 54 22 4C 24 3A 8D 35 3A 4A B2 |.INSERT"L$:.5:J.|
000004C0: C5 28 41 24 29 3A 8D 31 35 3A 8B 41 B3 B1 30 A7 |.(A$):.15:.A..0.|
000004D0: 34 35 00 F4 0C 37 00 8B 4A B3 30 B0 4A B1 B5 28 |45...7..J.0.J..(|
000004E0: 58 29 AC 31 30 AA 31 A7 99 22 91 91 91 91 91 22 |X).10.1.."....."|
000004F0: 3A 89 35 34 00 17 0D 38 00 41 24 B2 22 22 3A 99 |:.54...8.A$."":.|
00000500: 22 45 4E 54 52 59 22 3A 8D 35 3A 8D 31 35 3A 8B |"ENTRY":.5:.15:.|
00000510: 41 B3 B1 30 A7 34 35 00 30 0D 39 00 99 22 49 4E |A..0.45.0.9.."IN|
00000520: 53 45 52 54 49 4E 47 22 3A 8B 52 B2 4E A7 34 35 |SERTING":.R.N.45|
00000530: 00 55 0D 3A 00 81 49 B2 4A AA 31 A4 4E 3A 8B 53 |.U.:..I.J.1.N:.S|
00000540: 24 28 49 29 B2 22 2D 22 A7 4B 4B B2 49 3A 49 B2 |$(I)."-".KK.I:I.|
00000550: 4E 3A 89 36 30 00 5E 0D 3B 00 4B 4B B2 49 00 65 |N:.60.^.;.KK.I.e|
00000560: 0D 3C 00 82 49 00 93 0D 3D 00 81 49 B2 4B 4B A4 |.<..I...=..I.KK.|
00000570: 4A AA 31 A9 AB 31 3A 53 24 28 49 29 B2 53 24 28 |J.1..1:S$(I).S$(|
00000580: 49 AB 31 29 3A 8D 32 31 3A 82 3A 53 24 28 4A 29 |I.1):.21:.:S$(J)|
00000590: B2 41 24 00 C5 0D 3E 00 8B C8 28 53 24 28 4A 29 |.A$...>...(S$(J)|
000005A0: 2C 31 29 B2 22 2A 22 A7 53 24 28 4A 29 B2 22 12 |,1)."*".S$(J).".|
000005B0: 22 AA C9 28 53 24 28 4A 29 2C C3 28 53 24 28 4A |"..(S$(J),.(S$(J|
000005C0: 29 29 AB 31 29 00 D5 0D 3F 00 50 B2 B5 28 4A AD |)).1)...?.P..(J.|
000005D0: 31 30 29 AA 31 00 09 0E 40 00 99 22 12 93 50 41 |10).1...@.."..PA|
000005E0: 47 45 22 50 3B 48 24 3A 81 49 B2 30 A4 39 3A 4C |GE"P;H$:.I.0.9:L|
000005F0: B2 28 50 AB 31 29 AC 31 30 AA 49 3A 99 22 9D 22 |.(P.1).10.I:."."|
00000600: 4C 3B 53 24 28 4C 29 3A 82 00 24 0E 41 00 4A B2 |L;S$(L):..$.A.J.|
00000610: 4A AA 31 3A 8B 4A B1 B5 28 58 29 AC 31 30 AB 31 |J.1:.J..(X).10.1|
00000620: A7 4A B2 30 00 43 0E 42 00 99 22 11 11 49 4E 53 |.J.0.C.B.."..INS|
00000630: 45 52 54 22 3B 4C 24 3B 4A 3A 41 24 B2 22 22 3A |ERT";L$;J:A$."":|
00000640: 89 35 36 00 4B 0E 43 00 89 34 35 00 65 0E 45 00 |.56.K.C..45.e.E.|
00000650: 99 22 11 11 22 3A 8D 32 33 3A 8B 41 24 B3 B1 22 |."..":.23:.A$.."|
00000660: 59 22 A7 34 35 00 84 0E 46 00 99 22 11 4E 45 57 |Y".45...F..".NEW|
00000670: 20 46 49 4C 45 20 4E 41 4D 45 22 3A 8D 35 3A 48 | FILE NAME":.5:H|
00000680: 24 B2 41 24 00 A0 0E 47 00 81 4A B2 30 A4 4E 3A |$.A$...G..J.0.N:|
00000690: 53 24 28 4A 29 B2 22 2D 22 3A 82 4A 3A 89 34 35 |S$(J)."-":.J:.45|
000006A0: 00 D2 0E 49 00 99 22 93 12 20 20 20 20 20 20 20 |...I..".. |
000006B0: 20 20 20 20 20 20 20 20 20 4D 20 45 20 4E 20 55 | M E N U|
000006C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006D0: 20 22 00 F0 0E 4A 00 99 22 12 50 92 41 47 45 22 | "...J..".P.AGE"|
000006E0: A3 32 33 29 22 12 4E 92 45 57 20 46 49 4C 45 22 |.23)".N.EW FILE"|
000006F0: 00 28 0F 4B 00 99 3A 99 22 12 43 92 48 41 50 54 |.(.K..:.".C.HAPT|
00000700: 45 52 22 A3 32 33 29 3B 3A 99 22 12 46 92 49 4C |ER".23);:.".F.IL|
00000710: 45 4E 41 4D 45 22 3A 99 3A 99 22 12 47 92 45 54 |ENAME":.:.".G.ET|
00000720: 20 45 4E 54 52 59 22 3B 00 3E 0F 4C 00 99 A3 32 | ENTRY";.>.L...2|
00000730: 33 29 3A 99 22 12 4B 92 49 4C 4C 22 4C 24 00 57 |3):.".K.ILL"L$.W|
00000740: 0F 4D 00 99 3A 99 22 12 45 92 4E 54 45 52 22 4C |.M..:.".E.NTER"L|
00000750: 24 3B A3 32 33 29 3B 00 82 0F 4E 00 99 22 12 48 |$;.23);...N..".H|
00000760: 92 41 52 44 20 43 4F 50 59 22 3A 99 3A 99 22 12 |.ARD COPY":.:.".|
00000770: 41 92 4C 50 48 41 42 45 54 49 5A 45 22 A3 32 33 |A.LPHABETIZE".23|
00000780: 29 3B 00 AA 0F 4F 00 99 22 12 49 92 4E 53 45 52 |);...O..".I.NSER|
00000790: 54 22 4C 24 3A 99 3A 99 22 12 52 92 45 43 54 49 |T"L$:.:.".R.ECTI|
000007A0: 46 59 22 4C 24 A3 32 33 29 3B 00 DB 0F 50 00 99 |FY"L$.23);...P..|
000007B0: 22 12 44 92 45 46 49 4E 49 54 49 4F 4E 53 22 3A |".D.EFINITIONS":|
000007C0: 99 3A 99 22 12 53 92 41 56 45 20 54 4F 20 54 41 |.:.".S.AVE TO TA|
000007D0: 50 45 20 4F 52 20 44 49 53 4B 22 00 FD 0F 51 00 |PE OR DISK"...Q.|
000007E0: 99 3A 99 22 12 4C 92 4F 41 44 20 46 52 4F 4D 20 |.:.".L.OAD FROM |
000007F0: 54 41 50 45 20 4F 52 20 44 49 53 4B 22 00 07 10 |TAPE OR DISK"...|
00000800: 52 00 99 3A 99 51 24 00 18 10 53 00 8D 31 38 3A |R..:.Q$...S..18:|
00000810: 99 22 93 22 3A 8D 31 35 00 24 10 54 00 8B 41 B2 |.".":.15.$.T..A.|
00000820: 30 A7 37 33 00 2C 10 55 00 89 33 39 00 4B 10 57 |0.73.,.U..39.K.W|
00000830: 00 99 22 93 12 53 41 56 45 11 22 3A 8D 32 33 3A |.."..SAVE.":.23:|
00000840: 8B 41 24 B3 B1 22 59 22 A7 34 35 00 75 10 58 00 |.A$.."Y".45.u.X.|
00000850: 99 22 11 12 44 49 53 43 20 4F 52 20 54 41 50 45 |."..DISC OR TAPE|
00000860: 3F 20 44 2F 54 22 3A 8D 31 38 3A 8B 41 24 B2 22 |? D/T":.18:.A$."|
00000870: 54 22 A7 39 31 00 85 10 59 00 8B 41 24 B3 B1 22 |T".91...Y..A$.."|
00000880: 44 22 A7 34 35 00 BC 10 5A 00 9F 31 35 2C 38 2C |D".45...Z..15,8,|
00000890: 31 35 2C 22 49 22 3A A0 31 35 3A 9F 32 2C 38 2C |15,"I":.15:.2,8,|
000008A0: 32 2C 22 40 30 3A 22 AA 48 24 AA 22 20 BF 2C 53 |2,"@0:".H$." .,S|
000008B0: 2C 57 22 3A 4A B2 32 3A 89 31 30 30 00 D5 10 5B |,W":J.2:.100...[|
000008C0: 00 99 3A 9F 31 2C 31 2C 31 2C 48 24 3A 4A B2 31 |..:.1,1,1,H$:J.1|
000008D0: 3A 89 31 30 30 00 F5 10 5D 00 99 22 93 12 4C 4F |:.100...].."..LO|
000008E0: 41 44 92 11 22 3A 8D 32 33 3A 8B 41 24 B3 B1 22 |AD..":.23:.A$.."|
000008F0: 59 22 A7 34 35 00 1F 11 5E 00 99 22 11 12 44 49 |Y".45...^.."..DI|
00000900: 53 43 20 4F 52 20 54 41 50 45 3F 20 44 2F 54 22 |SC OR TAPE? D/T"|
00000910: 3A 8D 31 38 3A 8B 41 24 B2 22 54 22 A7 39 38 00 |:.18:.A$."T".98.|
00000920: 2F 11 5F 00 8B 41 24 B3 B1 22 44 22 A7 34 35 00 |/._..A$.."D".45.|
00000930: 5A 11 60 00 8D 31 30 38 3A 99 22 11 46 49 4C 45 |Z.`..108:.".FILE|
00000940: 20 4E 41 4D 45 3F 22 3A 8D 35 3A 4E 24 B2 41 24 | NAME?":.5:N$.A$|
00000950: 3A 8B 4E 24 B2 22 22 A7 34 35 00 90 11 61 00 9F |:.N$."".45...a..|
00000960: 31 35 2C 38 2C 31 35 2C 22 49 22 3A A0 31 35 3A |15,8,15,"I":.15:|
00000970: 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 4E 24 AA 22 |.2,8,2,"0:".N$."|
00000980: 20 BF 2C 53 2C 52 22 3A 4A B2 32 3A 89 31 30 34 | .,S,R":J.2:.104|
00000990: 00 A4 11 62 00 9F 31 2C 31 2C 30 3A 4A B2 31 3A |...b..1,1,0:J.1:|
000009A0: 89 31 30 34 00 C6 11 64 00 81 49 B2 4E A4 30 A9 |.104...d..I.N.0.|
000009B0: AB 31 3A 4B B2 49 3A 8B 53 24 28 49 29 B3 B1 22 |.1:K.I:.S$(I).."|
000009C0: 2D 22 A7 49 B2 30 00 D3 11 65 00 82 49 3A 4B B2 |-".I.0...e..I:K.|
000009D0: 4B AA 31 00 EE 11 66 00 98 4A 2C 48 24 AA 22 20 |K.1...f..J,H$." |
000009E0: BF 22 3A 98 4A 2C 4B 3A 81 49 B2 30 A4 4B 00 09 |.":.J,K:.I.0.K..|
000009F0: 12 67 00 98 4A 2C 53 24 28 49 29 3A 8D 32 31 3A |.g..J,S$(I):.21:|
00000A00: 82 3A A0 20 4A 3A 89 34 35 00 40 12 68 00 84 4A |.:. J:.45.@.h..J|
00000A10: 2C 4E 24 3A 8B C9 28 4E 24 2C 32 29 B3 B1 22 20 |,N$:..(N$,2).." |
00000A20: BF 22 A7 99 22 12 22 4E 24 22 20 4E 4F 54 20 46 |.".."."N$" NOT F|
00000A30: 4F 55 4E 44 22 3A 8D 31 38 3A A0 4A 3A 89 34 35 |OUND":.18:.J:.45|
00000A40: 00 6E 12 69 00 48 24 B2 4E 24 3A 48 24 B2 C8 28 |.n.i.H$.N$:H$..(|
00000A50: 48 24 2C C3 28 48 24 29 AB 32 29 3A 99 22 11 12 |H$,.(H$).2):."..|
00000A60: 46 4F 55 4E 44 20 22 48 24 3A 84 4A 2C 4B 00 8F |FOUND "H$:.J,K..|
00000A70: 12 6A 00 81 49 B2 30 A4 4B 3A 84 4A 2C 53 24 28 |.j..I.0.K:.J,S$(|
00000A80: 49 29 3A 8D 32 31 3A 82 3A A0 4A 3A 89 34 35 00 |I):.21:.:.J:.45.|
00000A90: BF 12 6C 00 99 22 12 93 44 49 53 43 20 46 49 4C |..l.."..DISC FIL|
00000AA0: 45 20 4C 49 53 54 49 4E 47 3F 20 59 2F 4E 22 3A |E LISTING? Y/N":|
00000AB0: 8D 31 38 3A 8B 41 24 B3 B1 22 59 22 A7 20 8E 00 |.18:.A$.."Y". ..|
00000AC0: D7 12 6D 00 99 22 93 12 53 43 41 4E 4E 49 4E 47 |..m.."..SCANNING|
00000AD0: 20 44 49 53 43 11 22 00 E7 12 6E 00 9F 31 2C 38 | DISC."...n..1,8|
00000AE0: 2C 30 2C 22 24 30 22 00 F5 12 6F 00 A1 23 31 2C |,0,"$0"...o..#1,|
00000AF0: 41 24 2C 42 24 00 03 13 70 00 A1 23 31 2C 41 24 |A$,B$...p..#1,A$|
00000B00: 2C 42 24 00 11 13 71 00 A1 23 31 2C 41 24 2C 42 |,B$...q..#1,A$,B|
00000B10: 24 00 19 13 72 00 43 B2 30 00 2D 13 73 00 8B 41 |$...r.C.0.-.s..A|
00000B20: 24 B3 B1 22 22 A7 43 B2 C6 28 41 24 29 00 47 13 |$.."".C..(A$).G.|
00000B30: 74 00 8B 42 24 B3 B1 22 22 A7 43 B2 43 AA C6 28 |t..B$.."".C.C..(|
00000B40: 42 24 29 AC 32 35 36 00 63 13 75 00 44 24 B2 44 |B$).256.c.u.D$.D|
00000B50: 24 AA 22 12 22 AA CA 28 C4 28 43 29 2C 32 29 AA |$."."..(.(C),2).|
00000B60: 22 92 22 00 7C 13 76 00 A1 23 31 2C 42 24 3A 8B |".".|.v..#1,B$:.|
00000B70: 53 54 B3 B1 30 A7 A0 31 3A 99 3A 8E 00 8F 13 77 |ST..0..1:.:....w|
00000B80: 00 8B 42 24 B3 B1 C7 28 33 34 29 A7 31 31 38 00 |..B$...(34).118.|
00000B90: B3 13 78 00 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 |..x..#1,B$:.B$..|
00000BA0: C7 28 33 34 29 A7 44 24 B2 44 24 AA 42 24 3A 89 |.(34).D$.D$.B$:.|
00000BB0: 31 32 30 00 CC 13 79 00 A1 23 31 2C 42 24 3A 8B |120...y..#1,B$:.|
00000BC0: 42 24 B2 C7 28 33 32 29 A7 31 32 31 00 D6 13 7A |B$..(32).121...z|
00000BD0: 00 43 24 B2 22 22 00 F6 13 7B 00 43 24 B2 43 24 |.C$.""...{.C$.C$|
00000BE0: AA 42 24 3A A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 |.B$:.#1,B$:.B$..|
00000BF0: 22 22 A7 31 32 33 00 0B 14 7C 00 8B C9 28 44 24 |"".123...|...(D$|
00000C00: 2C 31 29 B2 22 BF 22 A7 99 44 24 00 1A 14 7D 00 |,1)."."..D$...}.|
00000C10: 44 24 B2 22 22 3A 89 31 31 32 00 4A 14 7F 00 41 |D$."":.112.J...A|
00000C20: 24 B2 22 2D 31 22 3A 99 22 11 11 4B 49 4C 4C 22 |$."-1":."..KILL"|
00000C30: 4C 24 3A 8D 35 3A 4A B2 C5 28 41 24 29 3A 8D 31 |L$:.5:J..(A$):.1|
00000C40: 35 3A 8B 41 B3 B1 30 A7 34 35 00 6D 14 80 00 8B |5:.A..0.45.m....|
00000C50: 4A B3 30 B0 4A B1 B5 28 58 29 AC 31 30 AA 31 A7 |J.0.J..(X).10.1.|
00000C60: 99 22 91 91 91 91 91 22 3A 89 31 32 37 00 9C 14 |.".....":.127...|
00000C70: 81 00 81 49 B2 4A A4 4E AB 31 3A 8B 53 24 28 49 |...I.J.N.1:.S$(I|
00000C80: 29 B2 22 2D 22 AF 53 24 28 49 AA 31 29 B2 22 2D |)."-".S$(I.1)."-|
00000C90: 22 A7 49 B2 4E AB 31 3A 89 31 33 31 00 B2 14 82 |".I.N.1:.131....|
00000CA0: 00 53 24 28 49 29 B2 53 24 28 49 AA 31 29 3A 8D |.S$(I).S$(I.1):.|
00000CB0: 32 31 00 C6 14 83 00 82 3A 53 24 28 4E 29 B2 22 |21......:S$(N)."|
00000CC0: 2D 22 3A 89 34 35 00 EF 14 85 00 99 22 93 12 48 |-":.45......"..H|
00000CD0: 41 52 44 20 43 4F 50 59 3F 20 59 2F 4E 11 22 3A |ARD COPY? Y/N.":|
00000CE0: 8D 31 38 3A 8B 41 24 B3 B1 22 59 22 A7 34 35 00 |.18:.A$.."Y".45.|
00000CF0: 23 15 86 00 99 22 11 12 45 4E 54 49 52 45 20 46 |#...."..ENTIRE F|
00000D00: 49 4C 45 3F 20 59 2F 4E 11 22 3A 8D 31 38 3A 8B |ILE? Y/N.":.18:.|
00000D10: 41 24 B2 22 59 22 A7 46 B2 30 3A 4D B2 4E 3A 89 |A$."Y".F.0:M.N:.|
00000D20: 31 33 38 00 38 15 87 00 99 22 53 54 41 52 54 49 |138.8...."STARTI|
00000D30: 4E 47 22 4C 24 3A 8D 35 00 51 15 88 00 46 B2 C5 |NG"L$:.5.Q...F..|
00000D40: 28 41 24 29 3A 8B 46 B3 30 B0 46 B1 4E 89 31 33 |(A$):.F.0.F.N.13|
00000D50: 33 00 7D 15 89 00 99 22 45 4E 44 49 4E 47 22 4C |3.}...."ENDING"L|
00000D60: 24 3A 8D 35 3A 4D B2 C5 28 41 24 29 3A 8B 4D B3 |$:.5:M..(A$):.M.|
00000D70: 30 B0 4D B1 4E B0 4D B3 46 A7 31 33 33 00 86 15 |0.M.N.M.F.133...|
00000D80: 8A 00 9F 34 2C 34 00 A1 15 8B 00 98 34 2C 22 20 |...4,4......4," |
00000D90: 20 20 20 20 46 49 4C 45 3A 20 22 3B 48 24 3A 98 | FILE: ";H$:.|
00000DA0: 34 00 C5 15 8C 00 4C 4C B2 34 3A 81 49 B2 46 A4 |4.....LL.4:.I.F.|
00000DB0: 4D 3A 8B C8 28 53 24 28 49 29 2C 31 29 B2 22 12 |M:..(S$(I),1).".|
00000DC0: 22 A7 31 34 33 00 ED 15 8D 00 8B 53 24 28 49 29 |".143......S$(I)|
00000DD0: B3 B1 22 2D 22 A7 98 34 2C 22 20 20 20 20 20 22 |.."-"..4," "|
00000DE0: 53 24 28 49 29 3A 4C 4C B2 4C 4C AA 32 00 F6 15 |S$(I):LL.LL.2...|
00000DF0: 8E 00 89 31 34 35 00 0B 16 8F 00 98 34 2C 22 20 |...145......4," |
00000E00: 20 20 20 2A 22 3B 53 24 28 49 29 00 17 16 90 00 | *";S$(I).....|
00000E10: 4C 4C B2 4C 4C AA 34 00 25 16 91 00 82 49 3A A0 |LL.LL.4.%....I:.|
00000E20: 34 3A 89 34 35 00 35 16 93 00 8B 41 24 B2 22 C1 |4:.45.5....A$.".|
00000E30: 22 A7 31 35 35 00 68 16 94 00 41 24 B2 22 2D 31 |".155.h...A$."-1|
00000E40: 22 3A 99 22 11 11 52 45 43 54 49 46 59 22 4C 24 |":."..RECTIFY"L$|
00000E50: 3A 8D 35 3A 4A B2 C5 28 41 24 29 3A 8D 31 35 3A |:.5:J..(A$):.15:|
00000E60: 8B 41 B3 B1 30 A7 34 35 00 8B 16 95 00 8B 4A B3 |.A..0.45......J.|
00000E70: 30 B0 4A B1 B5 28 58 29 AC 31 30 AA 31 A7 99 22 |0.J..(X).10.1.."|
00000E80: 91 91 91 91 91 22 3A 89 31 34 38 00 A7 16 96 00 |.....":.148.....|
00000E90: 99 53 24 28 4A 29 3A 85 41 24 3A 8D 31 35 3A 8B |.S$(J):.A$:.15:.|
00000EA0: 41 B3 B1 30 A7 34 35 00 B4 16 97 00 53 24 28 4A |A..0.45.....S$(J|
00000EB0: 29 B2 41 24 00 E6 16 98 00 8B C8 28 53 24 28 4A |).A$.......(S$(J|
00000EC0: 29 2C 31 29 B2 22 2A 22 A7 53 24 28 4A 29 B2 22 |),1)."*".S$(J)."|
00000ED0: 12 22 AA C9 28 53 24 28 4A 29 2C C3 28 53 24 28 |."..(S$(J),.(S$(|
00000EE0: 4A 29 29 AB 31 29 00 EE 16 99 00 89 34 35 00 20 |J)).1)......45. |
00000EF0: 17 9B 00 41 24 B2 22 2D 31 22 3A 99 22 11 11 45 |...A$."-1":."..E|
00000F00: 4E 54 45 52 22 3B 4C 24 3A 8D 35 3A 4A B2 C5 28 |NTER";L$:.5:J..(|
00000F10: 41 24 29 3A 8D 31 35 3A 8B 41 B3 B1 30 A7 34 35 |A$):.15:.A..0.45|
00000F20: 00 43 17 9C 00 8B 4A B3 30 B0 4A B1 B5 28 58 29 |.C....J.0.J..(X)|
00000F30: AC 31 30 AA 31 A7 99 22 91 91 91 91 91 22 3A 89 |.10.1..".....":.|
00000F40: 31 35 35 00 66 17 9D 00 41 24 B2 22 22 3A 99 22 |155.f...A$."":."|
00000F50: 45 4E 54 52 59 22 3A 8D 35 3A 8D 31 35 3A 8B 41 |ENTRY":.5:.15:.A|
00000F60: B3 B1 30 A7 34 35 00 A1 17 9E 00 53 24 28 4A 29 |..0.45.....S$(J)|
00000F70: B2 41 24 3A 8B C8 28 53 24 28 4A 29 2C 31 29 B2 |.A$:..(S$(J),1).|
00000F80: 22 2A 22 A7 53 24 28 4A 29 B2 22 12 22 AA C9 28 |"*".S$(J)."."..(|
00000F90: 53 24 28 4A 29 2C C3 28 53 24 28 4A 29 29 AB 31 |S$(J),.(S$(J)).1|
00000FA0: 29 00 B1 17 9F 00 50 B2 B5 28 4A AD 31 30 29 AA |).....P..(J.10).|
00000FB0: 31 00 E5 17 A0 00 99 22 12 93 50 41 47 45 22 50 |1......"..PAGE"P|
00000FC0: 3B 48 24 3A 81 49 B2 30 A4 39 3A 4C B2 28 50 AB |;H$:.I.0.9:L.(P.|
00000FD0: 31 29 AC 31 30 AA 49 3A 99 22 9D 22 4C 3B 53 24 |1).10.I:."."L;S$|
00000FE0: 28 4C 29 3A 82 00 00 18 A1 00 4A B2 4A AA 31 3A |(L):......J.J.1:|
00000FF0: 8B 4A B1 B5 28 58 29 AC 31 30 AB 31 A7 4A B2 30 |.J..(X).10.1.J.0|
00001000: 00 1F 18 A2 00 99 22 11 11 45 4E 54 45 52 22 3B |......"..ENTER";|
00001010: 4C 24 3B 4A 3A 41 24 B2 22 22 3A 89 31 35 37 00 |L$;J:A$."":.157.|
00001020: 42 18 A4 00 99 22 11 11 47 45 54 20 45 4E 54 52 |B...."..GET ENTR|
00001030: 59 22 3A 8D 35 3A 8D 31 35 3A 8B 41 B3 B1 30 A7 |Y":.5:.15:.A..0.|
00001040: 34 35 00 68 18 A5 00 8B C8 28 41 24 2C 31 29 B2 |45.h.....(A$,1).|
00001050: 22 2A 22 A7 41 24 B2 22 12 22 AA C9 28 41 24 2C |"*".A$."."..(A$,|
00001060: C3 28 41 24 29 AB 31 29 00 8A 18 A6 00 54 B2 AB |.(A$).1).....T..|
00001070: 31 3A 81 49 B2 30 A4 4E 3A 8B 53 24 28 49 29 B2 |1:.I.0.N:.S$(I).|
00001080: 41 24 A7 54 B2 49 3A 49 B2 4E 00 90 18 A7 00 82 |A$.T.I:I.N......|
00001090: 00 B1 18 A8 00 8B 54 B2 AB 31 A7 99 22 11 12 4E |......T..1.."..N|
000010A0: 4F 54 20 46 4F 55 4E 44 22 3A 8D 31 38 3A 89 34 |OT FOUND":.18:.4|
000010B0: 35 00 C5 18 A9 00 50 B2 B5 28 54 AD 31 30 29 AA |5.....P..(T.10).|
000010C0: 31 3A 89 34 35 00 00 19 AC 00 99 22 93 12 41 4C |1:.45......"..AL|
000010D0: 50 48 41 42 45 54 49 5A 45 20 43 48 41 50 54 45 |PHABETIZE CHAPTE|
000010E0: 52 20 45 4E 54 52 49 45 53 20 59 2F 4E 3F 11 22 |R ENTRIES Y/N?."|
000010F0: 3A 8D 31 38 3A 8B 41 24 B2 22 59 22 A7 31 39 31 |:.18:.A$."Y".191|
00001100: 00 10 19 AD 00 8B 41 24 B3 B1 22 4E 22 A7 34 35 |......A$.."N".45|
00001110: 00 45 19 AF 00 99 22 41 50 48 41 42 45 54 49 5A |.E...."APHABETIZ|
00001120: 45 20 53 54 41 52 54 49 4E 47 22 4C 24 3A 8D 35 |E STARTING"L$:.5|
00001130: 3A 55 B2 C5 28 41 24 29 3A 8D 31 35 3A 8B 41 B3 |:U..(A$):.15:.A.|
00001140: B1 30 A7 34 35 00 56 19 B0 00 8B 55 B3 30 B0 55 |.0.45.V....U.0.U|
00001150: B1 4E A7 89 33 38 00 72 19 B1 00 8B CA 28 53 24 |.N..38.r.....(S$|
00001160: 28 55 29 2C 31 2C 31 29 B2 22 12 22 A7 55 B2 55 |(U),1,1).".".U.U|
00001170: AA 31 00 9A 19 B2 00 81 49 B2 4E A4 30 A9 AB 31 |.1......I.N.0..1|
00001180: 3A 8B 53 24 28 49 29 B3 B1 22 2D 22 A7 4B 4B B2 |:.S$(I).."-".KK.|
00001190: 49 3A 49 B2 30 3A 89 31 38 30 00 A3 19 B3 00 4B |I:I.0:.180.....K|
000011A0: 4B B2 31 00 AA 19 B4 00 82 49 00 DC 19 B5 00 4B |K.1......I.....K|
000011B0: B2 30 3A 81 49 B2 55 A4 4B 4B 3A 8B C8 28 28 53 |.0:.I.U.KK:..((S|
000011C0: 24 28 49 29 29 2C 31 29 B2 22 12 22 A7 4B B2 31 |$(I)),1).".".K.1|
000011D0: 3A 4E 4E B2 49 AB 31 3A 49 B2 4B 4B 00 EC 19 B6 |:NN.I.1:I.KK....|
000011E0: 00 82 49 3A 8B 4B B2 31 A7 31 38 34 00 F6 19 B7 |..I:.K.1.184....|
000011F0: 00 4E 4E B2 4B 4B 00 FE 19 B8 00 49 B2 30 00 11 |.NN.KK.....I.0..|
00001200: 1A B9 00 4A B2 55 3A 8B 49 B2 4E 4E AB 55 A7 34 |...J.U:.I.NN.U.4|
00001210: 35 00 21 1A BA 00 8B 4A B2 4E 4E AB 49 A7 31 38 |5.!....J.NN.I.18|
00001220: 39 00 58 1A BB 00 8B 53 24 28 4A 29 B1 53 24 28 |9.X....S$(J).S$(|
00001230: 4A AA 31 29 A7 54 50 24 B2 53 24 28 4A 29 3A 53 |J.1).TP$.S$(J):S|
00001240: 24 28 4A 29 B2 53 24 28 4A AA 31 29 3A 53 24 28 |$(J).S$(J.1):S$(|
00001250: 4A AA 31 29 B2 54 50 24 00 67 1A BC 00 4A B2 4A |J.1).TP$.g...J.J|
00001260: AA 31 3A 89 31 38 36 00 76 1A BD 00 49 B2 49 AA |.1:.186.v...I.I.|
00001270: 31 3A 89 31 38 35 00 9C 1A BF 00 99 22 93 11 22 |1:.185......".."|
00001280: A6 39 29 22 12 20 20 20 20 20 2A 20 57 41 52 4E |.9)". * WARN|
00001290: 49 4E 47 20 2A 20 20 20 20 20 92 22 00 BD 1A C0 |ING * ."....|
000012A0: 00 99 A6 39 29 22 12 20 20 20 54 48 49 53 20 43 |...9)". THIS C|
000012B0: 41 4E 20 54 41 4B 45 20 41 20 20 20 92 00 DE 1A |AN TAKE A ....|
000012C0: C1 00 99 A6 39 29 22 12 20 20 20 56 45 52 59 20 |....9)". VERY |
000012D0: 4C 4F 4E 47 20 54 49 4D 45 21 20 20 20 92 00 E8 |LONG TIME! ...|
000012E0: 1A C2 00 99 3A 49 B2 4E 00 02 1B C3 00 8B 53 24 |....:I.N......S$|
000012F0: 28 49 29 B2 22 2D 22 A7 49 B2 49 AB 31 3A 89 31 |(I)."-".I.I.1:.1|
00001300: 39 35 00 22 1B C4 00 45 46 B2 49 AA 31 3A 53 24 |95."...EF.I.1:S$|
00001310: 28 45 46 29 B2 22 12 5A 5A 5A 5A 5A 5A 5A 5A 5A |(EF).".ZZZZZZZZZ|
00001320: 5A 22 00 3F 1B C5 00 49 B2 30 3A 4A B2 30 3A 57 |Z".?...I.0:J.0:W|
00001330: 24 B2 22 12 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A 22 00 |$.".ZZZZZZZZZZ".|
00001340: 5C 1B C7 00 8B C6 28 53 24 28 49 29 29 B3 B1 31 |\.....(S$(I))..1|
00001350: 38 A7 49 B2 49 AA 31 3A 89 31 39 39 00 6A 1B C8 |8.I.I.1:.199.j..|
00001360: 00 8B 49 B2 45 46 A7 32 32 30 00 81 1B C9 00 57 |..I.EF.220.....W|
00001370: 24 B2 53 24 28 49 29 3A 54 B2 49 3A 49 B2 49 AA |$.S$(I):T.I:I.I.|
00001380: 31 00 9E 1B CA 00 8B C6 28 53 24 28 49 29 29 B3 |1.......(S$(I)).|
00001390: B1 31 38 A7 49 B2 49 AA 31 3A 89 32 30 32 00 B9 |.18.I.I.1:.202..|
000013A0: 1B CB 00 8B 53 24 28 49 29 B3 57 24 A7 57 24 B2 |....S$(I).W$.W$.|
000013B0: 53 24 28 49 29 3A 54 B2 49 00 CC 1B CC 00 8B 49 |S$(I):T.I......I|
000013C0: B2 45 46 A7 99 57 24 3A 89 32 30 36 00 DB 1B CD |.EF..W$:.206....|
000013D0: 00 49 B2 49 AA 31 3A 89 32 30 32 00 EE 1B CE 00 |.I.I.1:.202.....|
000013E0: 8B 57 24 B3 B1 53 24 28 4A 29 A7 32 31 30 00 0A |.W$..S$(J).210..|
000013F0: 1C CF 00 4A B2 4A AA 31 3A 8B C6 28 53 24 28 4A |...J.J.1:..(S$(J|
00001400: 29 29 B3 B1 31 38 A7 32 30 37 00 17 1C D0 00 49 |))..18.207.....I|
00001410: B2 4A 3A 89 32 30 30 00 35 1C D2 00 81 44 B2 54 |.J:.200.5....D.T|
00001420: A4 45 46 AB 31 3A 53 24 28 44 29 B2 53 24 28 44 |.EF.1:S$(D).S$(D|
00001430: AA 31 29 3A 82 00 5F 1C D4 00 81 44 B2 45 46 A4 |.1):.._....D.EF.|
00001440: 4A AA 31 A9 AB 31 3A 53 24 28 44 29 B2 53 24 28 |J.1..1:S$(D).S$(|
00001450: 44 AB 31 29 3A 82 3A 53 24 28 4A 29 B2 57 24 00 |D.1):.:S$(J).W$.|
00001460: 80 1C D5 00 57 24 B2 22 12 5A 5A 5A 5A 5A 5A 5A |....W$.".ZZZZZZZ|
00001470: 5A 5A 5A 22 3A 49 B2 54 AA 31 3A 4A B2 4A AA 31 |ZZZ":I.T.1:J.J.1|
00001480: 00 9A 1C D7 00 8B C6 28 53 24 28 49 29 29 B2 31 |.......(S$(I)).1|
00001490: 38 A7 49 B2 4A 3A 89 32 30 30 00 A8 1C D8 00 54 |8.I.J:.200.....T|
000014A0: 50 24 B2 53 24 28 49 29 00 C6 1C D9 00 81 44 B2 |P$.S$(I)......D.|
000014B0: 49 A4 45 46 AB 31 3A 53 24 28 44 29 B2 53 24 28 |I.EF.1:S$(D).S$(|
000014C0: 44 AA 31 29 3A 82 00 F1 1C DA 00 81 44 B2 45 46 |D.1):.......D.EF|
000014D0: A4 4A AA 31 A9 AB 31 3A 53 24 28 44 29 B2 53 24 |.J.1..1:S$(D).S$|
000014E0: 28 44 AB 31 29 3A 82 3A 53 24 28 4A 29 B2 54 50 |(D.1):.:S$(J).TP|
000014F0: 24 00 06 1D DB 00 49 B2 49 AA 31 3A 4A B2 4A AA |$.....I.I.1:J.J.|
00001500: 31 3A 89 32 31 35 00 19 1D DC 00 53 24 28 45 46 |1:.215.....S$(EF|
00001510: 29 B2 22 2D 22 3A 89 34 35 00 00 00 |)."-":.45... |
.......53280,0:.53281,0:.G(30):.G(14);G(
8):.26.B...A$."":I.0:.".";.S....G$:.G$."
".6......G$.G(148).G$.G(17).G$.G(29).G$.
G(157).G$.G(145).6. ....G$.G(20).A$."".6
.R....G$.G(29)..G(20)G(20)".";:I.I.1:A$.
H(A$,I):.6......G$..G(13).A$.A$.G$:I.I.1
:."."G$".";:.6......A$.G(13).A$."":.. ..
..". ":..5....".."Q$"...":.18.`...A.0:.I
.1.17:.J(K$,I.2.1,1).A$.A.I:I.17.I....I:
..{....A$:.A$."".18............".".35);I
:.......".ARE YOU SURE? Y/N":.18:.......
".".11)G(142)". D A T A B A S E ":..11)"
.* JUST A MOMENT *".2...H$."C.B.M.":Q$."
.YOUR CHOICE ? = HEL
P".M...N..((.(0).(.(0).0).65536).40):P.1
:X.(N.1).10:N.10..(X)......S$(N):L$." LI
NE"......J.0.N:S$(J)."-":.J......". ".(X
)"PAGES":.N"ENTRIES"... .K$."C,P,E,I,N,S
,L,H,K,A,?,R,F,D,G":.38...".K.0...#.Q.0:
."..CHAPTER CONTENTS FILE: ";H$:."PAGE".
Z.$..J.K.N:.F(S$(J)).18..".".(J.10.1);S$
(J):Q.Q.1:.Q.19.38.A.%..J.Q.&..14:.A.0.3
8...'..A.34,43,155,54,69,87,93,133,127,1
72,73,147,51,73,164...(..J.N.1.K.J:.35.F
.)..34...+.A$."-1":."..PAGE":.5:P.E(A$):
.15:.A..0.39...,..P.1.P..(X)..".....":.4
3.E.-.."..PAGE"P;H$:.I.0.9:L.(P.1).10.I:
."."L;S$(L):..U....14:.A.0.46.C./..A..16
.39.V.0.P.P.1:.P.X.P.1.~.1..45...3..".FI
LENAME":.5:H$.A$. .4..45.R.6.A$."-1":.".
.INSERT"L$:.5:J.E(A$):.15:.A..0.45...7..
J.0.J..(X).10.1..".....":.54...8.A$."":.
"ENTRY":.5:.15:.A..0.45.0.9.."INSERTING"
:.R.N.45.U.:..I.J.1.N:.S$(I)."-".KK.I:I.
N:.60.^.;.KK.I.E.<..I...=..I.KK.J.1..1:S
$(I).S$(I.1):.21:.:S$(J).A$.E.>..H(S$(J)
,1)."*".S$(J).".".I(S$(J),C(S$(J)).1).U.
?.P..(J.10).1...@.."..PAGE"P;H$:.I.0.9:L
.(P.1).10.I:."."L;S$(L):..$.A.J.J.1:.J..
(X).10.1.J.0.C.B.."..INSERT";L$;J:A$."":
.56.K.C..45.E.E.."..":.23:.A$.."Y".45...
F..".NEW FILE NAME":.5:H$.A$. .G..J.0.N:
S$(J)."-":.J:.45.R.I.."..
M E N U "...J..".P.AGE"
.23)".N.EW FILE".(.K..:.".C.HAPTER".23);
:.".F.ILENAME":.:.".G.ET ENTRY";.>.L...2
3):.".K.ILL"L$.W.M..:.".E.NTER"L$;.23);.
..N..".H.ARD COPY":.:.".A.LPHABETIZE".23
);...O..".I.NSERT"L$:.:.".R.ECTIFY"L$.23
);...P..".D.EFINITIONS":.:.".S.AVE TO TA
PE OR DISK"...Q..:.".L.OAD FROM TAPE OR
DISK"...R..:.Q$...S..18:.".":.15.$.T..A.
0.73.,.U..39.K.W.."..SAVE.":.23:.A$.."Y"
.45.U.X.."..DISC OR TAPE? D/T":.18:.A$."
T".91...Y..A$.."D".45...Z..15,8,15,"I":
15:.2,8,2,"@0:".H$." .,S,W":J.2:.100.U.[
..:.1,1,1,H$:J.1:.100...].."..LOAD..":.2
3:.A$.."Y".45...^.."..DISC OR TAPE? D/T"
:.18:.A$."T".98./._..A$.."D".45.Z.`..108
:.".FILE NAME?":.5:N$.A$:.N$."".45...A..
15,8,15,"I": 15:.2,8,2,"0:".N$." .,S,R":
J.2:.104...B..1,1,0:J.1:.104.F.D..I.N.0.
.1:K.I:.S$(I).."-".I.0.S.E..I:K.K.1...F.
.J,H$." .":.J,K:.I.0.K...G..J,S$(I):.21:
.: J:.45.@.H..J,N$:.I(N$,2).." .".."."N
$" NOT FOUND":.18: J:.45.N.I.H$.N$:H$.H(
H$,C(H$).2):."..FOUND "H$:.J,K...J..I.0.
K:.J,S$(I):.21:.: J:.45...L.."..DISC FIL
E LISTING? Y/N":.18:.A$.."Y". ..W.M.."..
SCANNING DISC."...N..1,8,0,"$0"...O..#1,
A$,B$...P..#1,A$,B$...Q..#1,A$,B$...R.C.
0.-.S..A$.."".C.F(A$).G.T..B$.."".C.C.F(
B$).256.C.U.D$.D$.".".J(D(C),2).".".|.V.
.#1,B$:.ST..0. 1:.:....W..B$..G(34).118.
..X..#1,B$:.B$..G(34).D$.D$.B$:.120.L.Y.
.#1,B$:.B$.G(32).121.V.Z.C$.""...{.C$.C$
.B$:.#1,B$:.B$.."".123...|..I(D$,1).".".
.D$...}.D$."":.112.J..A$."-1":."..KILL"
L$:.5:J.E(A$):.15:.A..0.45.M....J.0.J..(
X).10.1..".....":.127......I.J.N.1:.S$(I
)."-".S$(I.1)."-".I.N.1:.131.....S$(I).S
$(I.1):.21.F....:S$(N)."-":.45......"..H
ARD COPY? Y/N.":.18:.A$.."Y".45.#...."..
ENTIRE FILE? Y/N.":.18:.A$."Y".F.0:M.N:.
138.8...."STARTING"L$:.5.Q...F.E(A$):.F.
0.F.N.133.}...."ENDING"L$:.5:M.E(A$):.M.
0.M.N.M.F.133......4,4......4," FILE
: ";H$:.4.E...LL.4:.I.F.M:.H(S$(I),1).".
".143......S$(I).."-"..4," "S$(I):LL
.LL.2......145......4," *";S$(I).....
LL.LL.4.%....I: 4:.45.5....A$."A".155.H.
..A$."-1":."..RECTIFY"L$:.5:J.E(A$):.15:
.A..0.45......J.0.J..(X).10.1..".....":.
148......S$(J):.A$:.15:.A..0.45.....S$(J
).A$......H(S$(J),1)."*".S$(J).".".I(S$(
J),C(S$(J)).1)......45. ...A$."-1":."..E
NTER";L$:.5:J.E(A$):.15:.A..0.45.C....J.
0.J..(X).10.1..".....":.155.F...A$."":."
ENTRY":.5:.15:.A..0.45.....S$(J).A$:.H(S
$(J),1)."*".S$(J).".".I(S$(J),C(S$(J)).1
).....P..(J.10).1... .."..PAGE"P;H$:.I.0
.9:L.(P.1).10.I:."."L;S$(L):......J.J.1:
.J..(X).10.1.J.0......"..ENTER";L$;J:A$.
"":.157.B...."..GET ENTRY":.5:.15:.A..0.
45.H....H(A$,1)."*".A$.".".I(A$,C(A$).1)
.....T..1:.I.0.N:.S$(I).A$.T.I:I.N......
......T..1.."..NOT FOUND":.18:.45.E...P.
.(T.10).1:.45......"..ALPHABETIZE CHAPTE
R ENTRIES Y/N?.":.18:.A$."Y".191......A$
.."N".45.E...."APHABETIZE STARTING"L$:.5
:U.E(A$):.15:.A..0.45.V....U.0.U.N..38.R
....J(S$(U),1,1).".".U.U.1......I.N.0..1
:.S$(I).."-".KK.I:I.0:.180.....KK.1.....
.I.....K.0:.I.U.KK:.H((S$(I)),1).".".K.1
:NN.I.1:I.KK......I:.K.1.184.....NN.KK..
...I.0.....J.U:.I.NN.U.45.!....J.NN.I.18
9.X....S$(J).S$(J.1).TP$.S$(J):S$(J).S$(
J.1):S$(J.1).TP$.G...J.J.1:.186.V...I.I.
1:.185......"..".9)". * WARNING *
.".......9)". THIS CAN TAKE A ....
A...9)". VERY LONG TIME! ....B..:I.N
...C..S$(I)."-".I.I.1:.195.".D.EF.I.1:S$
(EF).".ZZZZZZZZZZ".?.E.I.0:J.0:W$.".ZZZZ
ZZZZZZ".\.G..F(S$(I))..18.I.I.1:.199.J.H
..I.EF.220...I.W$.S$(I):T.I:I.I.1...J..F
(S$(I))..18.I.I.1:.202...K..S$(I).W$.W$.
S$(I):T.I.L.L..I.EF..W$:.206...M.I.I.1:.
202...N..W$..S$(J).210...O.J.J.1:.F(S$(J
))..18.207...P.I.J:.200.5.R..D.T.EF.1:S$
(D).S$(D.1):.._.T..D.EF.J.1..1:S$(D).S$(
D.1):.:S$(J).W$...U.W$.".ZZZZZZZZZZ":I.T
.1:J.J.1...W..F(S$(I)).18.I.J:.200...X.T
P$.S$(I).F.Y..D.I.EF.1:S$(D).S$(D.1):...
.Z..D.EF.J.1..1:S$(D).S$(D.1):.:S$(J).TP
$.....I.I.1:J.J.1:.215.....S$(EF)."-":.4
5...
> CLICK IMAGE PREVIEW FOR FULL MODAL