Multiple names: RECORDINGS.C, RECORDINGS.C    

00000000: 01 08 16 08 05 00 86 48  24 28 38 29 2C 41 24 28  |.......H$(8),A$(|
00000010: 31 30 30 2C 38 29 00 36  08 0A 00 99 C7 28 31 34  |100,8).6.....(14|
00000020: 37 29 3B 3A 97 35 33 32  38 30 2C 31 32 3A 97 35  |7);:.53280,12:.5|
00000030: 33 32 38 31 2C 35 00 6E  08 14 00 99 C7 28 31 34  |3281,5.n.....(14|
00000040: 32 29 22 9F DB DB DB DB  DB DB DB DB DB DB DB DB  |2)".............|
00000050: DB DB DB DB DB DB DB DB  DB DB DB DB DB DB DB DB  |................|
00000060: DB DB DB DB DB DB DB DB  DB DB DB DB 22 3B 00 7A  |............";.z|
00000070: 08 1E 00 81 54 B2 31 A4  32 33 00 AB 08 28 00 99  |....T.1.23...(..|
00000080: 22 DB 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000A0: 20 20 20 20 20 20 20 20  DB 22 3B 00 B2 08 32 00  |        .";...2.|
000000B0: 82 54 00 E2 08 3C 00 99  22 DB DB DB DB DB DB DB  |.T...<..".......|
000000C0: DB DB DB DB DB DB DB DB  DB DB DB DB DB DB DB DB  |................|
000000D0: DB DB DB DB DB DB DB DB  DB DB DB DB DB DB DB DB  |................|
000000E0: 22 3B 00 F8 08 46 00 97  32 30 32 33 2C 39 31 3A  |";...F..2023,91:|
000000F0: 97 35 36 32 39 35 2C 33  00 1F 09 50 00 99 22 13  |.56295,3...P..".|
00000100: 11 11 11 11 11 11 11 11  11 22 3A 99 A3 31 34 29  |.........":..14)|
00000110: 22 52 45 43 4F 52 44 20  41 4C 42 55 4D 53 22 00  |"RECORD ALBUMS".|
00000120: 39 09 5A 00 99 A3 31 34  29 22 91 A3 A3 A3 A3 A3  |9.Z...14)"......|
00000130: A3 A3 A3 A3 A3 A3 A3 A3  22 00 4A 09 64 00 81 54  |........".J.d..T|
00000140: B2 31 A4 33 30 30 30 3A  82 54 00 64 09 77 00 8F  |.1.3000:.T.d.w..|
00000150: 2A 2A 52 45 41 44 20 44  41 54 41 20 48 45 41 44  |**READ DATA HEAD|
00000160: 49 4E 47 53 00 79 09 78  00 81 54 B2 30 A4 38 3A  |INGS.y.x..T.0.8:|
00000170: 87 48 24 28 54 29 3A 82  54 00 8A 09 C7 00 8F 2A  |.H$(T):.T......*|
00000180: 2A 4D 41 49 4E 20 4D 45  4E 55 00 AF 09 C8 00 97  |*MAIN MENU......|
00000190: 35 33 32 38 30 2C 36 3A  97 35 33 32 38 31 2C 31  |53280,6:.53281,1|
000001A0: 31 3A 99 C7 28 31 34 29  22 93 05 11 11 22 3B 00  |1:..(14)"....";.|
000001B0: CD 09 D2 00 99 A3 31 31  29 22 CD 45 4E 55 20 4F  |......11)".ENU O|
000001C0: 46 20 C1 43 54 49 56 49  54 49 45 53 22 00 EB 09  |F .CTIVITIES"...|
000001D0: DC 00 99 A3 31 31 29 22  A3 A3 A3 A3 A3 A3 A3 A3  |....11)"........|
000001E0: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 22 00 1A 0A E6 00  |..........".....|
000001F0: 99 A3 33 29 22 11 11 31  2E 20 CC CF C1 C4 A0 54  |..3)"..1. .....T|
00000200: 48 45 20 49 4E 46 4F 52  4D 41 54 49 4F 4E 20 46  |HE INFORMATION F|
00000210: 52 4F 4D 20 44 49 53 4B  2E 22 00 41 0A F0 00 99  |ROM DISK.".A....|
00000220: 3A 99 A3 33 29 22 32 2E  20 D2 C5 D6 C9 C5 D7 20  |:..3)"2. ...... |
00000230: 54 48 45 20 49 4E 46 4F  52 4D 41 54 49 4F 4E 2E  |THE INFORMATION.|
00000240: 22 00 61 0A FA 00 99 3A  99 A3 33 29 22 33 2E 20  |".a....:..3)"3. |
00000250: C1 C4 C4 20 41 20 4E 45  57 20 45 4E 54 52 59 2E  |... A NEW ENTRY.|
00000260: 22 00 89 0A 04 01 99 3A  99 A3 33 29 22 34 2E 20  |"......:..3)"4. |
00000270: C3 C8 C1 CE C7 C5 20 53  4F 4D 45 20 49 4E 46 4F  |...... SOME INFO|
00000280: 52 4D 41 54 49 4F 4E 2E  22 00 A9 0A 0E 01 99 3A  |RMATION."......:|
00000290: 99 A3 33 29 22 35 2E 20  C4 C5 CC C5 D4 C5 20 41  |..3)"5. ...... A|
000002A0: 4E 20 45 4E 54 52 59 2E  22 00 D6 0A 18 01 99 3A  |N ENTRY."......:|
000002B0: 99 A3 33 29 22 36 2E 20  D3 C1 D6 C5 20 54 48 45  |..3)"6. .... THE|
000002C0: 20 49 4E 46 4F 52 4D 41  54 49 4F 4E 20 4F 4E 20  | INFORMATION ON |
000002D0: 44 49 53 4B 2E 22 00 F4  0A 22 01 99 3A 99 A3 33  |DISK."..."..:..3|
000002E0: 29 22 37 2E 20 D0 D2 C9  CE D4 49 4E 47 20 4D 45  |)"7. .....ING ME|
000002F0: 4E 55 2E 22 00 23 0B 2C  01 99 3A 99 A3 33 29 22  |NU.".#.,..:..3)"|
00000300: 38 2E 20 CD C5 CE D5 20  4F 46 20 4F 54 48 45 52  |8. .... OF OTHER|
00000310: 20 50 52 4F 47 52 41 4D  53 20 4F 4E 20 44 49 53  | PROGRAMS ON DIS|
00000320: 4B 2E 22 00 52 0B 30 01  99 22 11 11 11 1D 1D 1D  |K.".R.0.."......|
00000330: 1D 1D 1D 12 C3 C8 CF CF  D3 C5 20 C2 D9 20 D0 D2  |.......... .. ..|
00000340: C5 D3 D3 C9 CE C7 20 C1  20 CE D5 CD C2 C5 D2 92  |...... . .......|
00000350: 22 3B 00 67 0B 36 01 A1  41 4E 24 3A 8B 41 4E 24  |";.g.6..AN$:.AN$|
00000360: B2 22 22 A7 33 31 30 00  81 0B 40 01 8B 41 4E 24  |."".310...@..AN$|
00000370: B3 22 31 22 B0 41 4E 24  B1 22 38 22 A7 89 33 35  |."1".AN$."8"..35|
00000380: 30 00 8E 0B 4A 01 4D B2  C5 28 41 4E 24 29 00 C2  |0...J.M..(AN$)..|
00000390: 0B 54 01 91 4D 89 32 30  30 30 2C 35 30 30 30 2C  |.T..M.2000,5000,|
000003A0: 38 30 30 30 2C 31 31 30  30 30 2C 31 34 30 30 30  |8000,11000,14000|
000003B0: 2C 31 37 30 30 30 2C 32  30 30 30 30 2C 32 33 30  |,17000,20000,230|
000003C0: 30 30 00 DD 0B 5D 01 8F  2A 2A 49 46 20 57 52 4F  |00...]..**IF WRO|
000003D0: 4E 47 20 4D 45 4E 55 20  49 4E 50 55 54 00 E9 0B  |NG MENU INPUT...|
000003E0: 5E 01 81 54 B2 31 A4 31  30 00 20 0C 68 01 99 22  |^..T.1.10. .h.."|
000003F0: 05 9D 9D 9D 9D 9D 9D CE  D5 CD C2 C5 D2 22 3B 3A  |.............";:|
00000400: 81 59 B2 31 A4 31 35 30  3A 82 59 3A 99 22 96 12  |.Y.1.150:.Y:."..|
00000410: 9D 9D 9D 9D 9D 9D CE D5  CD C2 C5 D2 92 05 22 3B  |..............";|
00000420: 00 30 0C 72 01 81 59 B2  31 A4 31 35 30 3A 82 59  |.0.r..Y.1.150:.Y|
00000430: 00 37 0C 7C 01 82 54 00  40 0C 86 01 89 33 31 30  |.7.|..T.@....310|
00000440: 00 5A 0C CF 07 8F 2A 2A  46 52 4F 4D 20 4D 45 4E  |.Z....**FROM MEN|
00000450: 55 20 4F 50 54 49 4F 4E  20 31 00 67 0C D0 07 97  |U OPTION 1.g....|
00000460: 35 33 32 38 30 2C 37 00  88 0C DA 07 99 22 93 11  |53280,7......"..|
00000470: 11 11 11 11 11 11 11 11  22 3A 99 A3 31 37 29 22  |........":..17)"|
00000480: CC 4F 41 44 49 4E 47 22  00 94 0C E4 07 49 B2 30  |.OADING".....I.0|
00000490: 3A 4A B2 30 00 B0 0C EE  07 9F 32 2C 38 2C 32 2C  |:J.0......2,8,2,|
000004A0: 22 30 3A 44 49 53 4B 46  49 4C 45 2C 53 2C 52 22  |"0:DISKFILE,S,R"|
000004B0: 00 BF 0C 0C 08 84 32 2C  41 24 28 49 2C 4A 29 00  |......2,A$(I,J).|
000004C0: D0 0C 16 08 8B 53 54 B3  B1 30 A7 89 32 31 30 30  |.....ST..0..2100|
000004D0: 00 DA 0C 20 08 4A B2 4A  AA 31 00 ED 0C 24 08 8B  |... .J.J.1...$..|
000004E0: 4A B1 38 A7 4A B2 30 3A  49 B2 49 AA 31 00 F7 0C  |J.8.J.0:I.I.1...|
000004F0: 2A 08 89 32 30 36 30 00  FE 0C 34 08 A0 32 00 10  |*..2060...4..2..|
00000500: 0D 98 08 58 B2 49 3A 5A  31 B2 31 3A 89 32 30 30  |...X.I:Z1.1:.200|
00000510: 00 2A 0D 87 13 8F 2A 2A  46 52 4F 4D 20 4D 45 4E  |.*....**FROM MEN|
00000520: 55 20 4F 50 54 49 4F 4E  20 32 00 35 0D 88 13 89  |U OPTION 2.5....|
00000530: 33 30 30 30 30 00 42 0D  8A 13 99 22 93 22 3A 49  |30000.B....".":I|
00000540: B2 30 00 4D 0D 92 13 81  4A B2 30 A4 38 00 64 0D  |.0.M....J.0.8.d.|
00000550: 96 13 8B 4A B2 30 A7 99  C7 28 31 34 37 29 22 11  |...J.0...(147)".|
00000560: 11 11 11 22 00 74 0D 9C  13 99 A3 32 29 41 24 28  |...".t.....2)A$(|
00000570: 49 2C 4A 29 00 7F 0D 9E  13 8B 4A B2 36 A7 99 00  |I,J)......J.6...|
00000580: 8A 0D A0 13 8B 4A B2 37  A7 99 00 91 0D A6 13 82  |.....J.7........|
00000590: 4A 00 A0 0D AB 13 8B 49  B2 58 A7 89 35 31 30 30  |J......I.X..5100|
000005A0: 00 C2 0D B0 13 99 A3 31  34 29 22 11 11 C1 4E 4F  |.......14)"...NO|
000005B0: 54 48 45 52 20 45 4E 54  52 59 3F 20 28 59 2F 4E  |THER ENTRY? (Y/N|
000005C0: 29 22 00 D8 0D BA 13 A1  41 4E 24 3A 8B 41 4E 24  |)"......AN$:.AN$|
000005D0: B2 22 22 A7 35 30 35 30  00 F9 0D C4 13 8B 41 4E  |."".5050......AN|
000005E0: 24 B2 22 59 22 B0 41 4E  24 B2 22 D9 22 A7 49 B2  |$."Y".AN$.".".I.|
000005F0: 49 AA 31 3A 89 35 30 31  30 00 02 0E CE 13 89 32  |I.1:.5010......2|
00000600: 30 30 00 35 0E EC 13 99  22 11 11 11 11 CC 41 53  |00.5....".....AS|
00000610: 54 20 45 4E 54 52 59 2E  20 D0 52 45 53 53 20 C6  |T ENTRY. .RESS .|
00000620: 31 20 54 4F 20 52 45 54  55 52 4E 20 54 4F 20 4D  |1 TO RETURN TO M|
00000630: 45 4E 55 22 3B 00 4D 0E  F6 13 A1 41 4E 24 3A 8B  |ENU";.M....AN$:.|
00000640: 41 4E 24 B3 B1 22 85 22  A7 35 31 31 30 00 56 0E  |AN$..".".5110.V.|
00000650: 00 14 89 32 30 30 00 70  0E 3F 1F 8F 2A 2A 46 52  |...200.p.?..**FR|
00000660: 4F 4D 20 4D 45 4E 55 20  4F 50 54 49 4F 4E 20 33  |OM MENU OPTION 3|
00000670: 00 85 0E 40 1F 99 C7 28  31 34 37 29 3A 97 35 33  |...@...(147):.53|
00000680: 32 38 30 2C 35 00 A2 0E  4A 1F 99 3A 99 A3 31 33  |280,5...J..:..13|
00000690: 29 22 C1 C4 C4 C9 CE C7  20 C1 20 D2 C5 C3 CF D2  |)"...... . .....|
000006A0: C4 22 00 BF 0E 54 1F 99  A3 31 33 29 22 A3 A3 A3  |."...T...13)"...|
000006B0: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 22 3A 99 00  |............":..|
000006C0: DA 0E 5E 1F 81 54 B2 30  A4 38 3A 99 22 20 22 3B  |..^..T.0.8:." ";|
000006D0: 48 24 28 54 29 3A 99 3A  82 54 00 ED 0E 63 1F 8B  |H$(T):.:.T...c..|
000006E0: 5A B2 31 A7 4A B2 30 3A  89 38 30 35 30 00 07 0F  |Z.1.J.0:.8050...|
000006F0: 65 1F 8B 5A 31 B2 31 A7  49 B2 49 AA 31 3A 4A B2  |e..Z1.1.I.I.1:J.|
00000700: 30 3A 89 38 30 35 30 00  13 0F 68 1F 49 B2 30 3A  |0:.8050...h.I.0:|
00000710: 4A B2 30 00 22 0F 72 1F  99 22 13 11 11 11 11 11  |J.0.".r.."......|
00000720: 22 3B 00 4A 0F 7C 1F 85  22 1D 1D 1D 1D 1D 1D 1D  |";.J.|..".......|
00000730: 1D 1D 1D 1D 1D 1D 1D 2A  9D 9D 9D 22 3B 41 24 28  |.......*...";A$(|
00000740: 49 2C 4A 29 3A 89 38 35  30 30 00 6F 0F 86 1F 99  |I,J):.8500.o....|
00000750: A3 31 31 29 22 11 12 C1  4E 4F 54 48 45 52 20 52  |.11)"...NOTHER R|
00000760: 45 43 4F 52 44 3F 20 28  59 2F 4E 29 92 22 3B 00  |ECORD? (Y/N).";.|
00000770: 85 0F 90 1F A1 41 4E 24  3A 8B 41 4E 24 B2 22 22  |.....AN$:.AN$.""|
00000780: A7 38 30 38 30 00 A3 0F  9A 1F 8B 41 4E 24 B2 22  |.8080......AN$."|
00000790: 4E 22 B0 41 4E 24 B2 22  CE 22 A7 58 B2 49 3A 89  |N".AN$.".".X.I:.|
000007A0: 32 30 30 00 BB 0F A4 1F  49 B2 49 AA 31 3A 4A B2  |200.....I.I.1:J.|
000007B0: 30 3A 5A B2 31 3A 89 38  30 30 30 00 DA 0F 34 21  |0:Z.1:.8000...4!|
000007C0: 99 A3 31 33 29 22 9E C5  4E 54 52 59 20 CF 2E CB  |..13)"..NTRY ...|
000007D0: 2E 3F 20 28 59 2F 4E 29  05 22 00 F0 0F 3E 21 A1  |.? (Y/N)."...>!.|
000007E0: 41 4E 24 3A 8B 41 4E 24  B2 22 22 A7 38 35 31 30  |AN$:.AN$."".8510|
000007F0: 00 0F 10 48 21 8B 41 4E  24 B2 22 4E 22 B0 41 4E  |...H!.AN$."N".AN|
00000800: 24 B2 22 CE 22 A7 5A B2  31 3A 89 38 30 30 30 00  |$.".".Z.1:.8000.|
00000810: 19 10 52 21 4A B2 4A AA  31 00 2C 10 5C 21 8B 4A  |..R!J.J.1.,.\!.J|
00000820: B1 38 A7 4A B2 38 3A 89  38 30 37 30 00 36 10 66  |.8.J.8:.8070.6.f|
00000830: 21 89 38 30 36 30 00 50  10 F7 2A 8F 2A 2A 46 52  |!.8060.P..*.**FR|
00000840: 4F 4D 20 4D 45 4E 55 20  4F 50 54 49 4F 4E 20 34  |OM MENU OPTION 4|
00000850: 00 5D 10 F8 2A 97 35 33  32 38 30 2C 37 00 7E 10  |.]..*.53280,7.~.|
00000860: 02 2B 99 22 93 11 11 22  3B A3 31 32 29 22 96 C3  |.+."...";.12)"..|
00000870: C8 C1 CE C7 C5 20 CF D0  D4 C9 CF CE D3 22 00 99  |..... ......."..|
00000880: 10 0C 2B 99 A3 31 32 29  22 B7 B7 B7 B7 B7 B7 B7  |..+..12)".......|
00000890: B7 B7 B7 B7 B7 B7 B7 05  22 00 BB 10 16 2B 99 A3  |........"....+..|
000008A0: 38 29 22 11 11 31 2E 20  D2 45 56 49 45 57 20 41  |8)"..1. .EVIEW A|
000008B0: 4E 44 20 43 48 41 4E 47  45 2E 22 00 DE 10 20 2B  |ND CHANGE."... +|
000008C0: 99 A3 38 29 22 11 11 11  32 2E 20 D3 45 41 52 43  |..8)"...2. .EARC|
000008D0: 48 20 41 4E 44 20 43 48  41 4E 47 45 2E 22 00 03  |H AND CHANGE."..|
000008E0: 11 2A 2B 99 A3 38 29 22  11 11 11 33 2E 20 D2 45  |.*+..8)"...3. .E|
000008F0: 54 55 52 4E 20 54 4F 20  4D 41 49 4E 20 4D 45 4E  |TURN TO MAIN MEN|
00000900: 55 2E 22 00 35 11 34 2B  99 A3 36 29 22 11 11 11  |U.".5.4+..6)"...|
00000910: 11 11 11 11 11 11 12 C3  C8 CF CF D3 C5 A0 C2 D9  |................|
00000920: A0 D0 D2 C5 D3 D3 C9 CE  C7 A0 C1 A0 CE D5 CD C2  |................|
00000930: C5 D2 92 22 3B 00 4C 11  3E 2B A1 41 4E 24 3A 8B  |...";.L.>+.AN$:.|
00000940: 41 4E 24 B2 22 22 A7 31  31 30 37 30 00 68 11 48  |AN$."".11070.h.H|
00000950: 2B 8B 41 4E 24 B3 22 31  22 B0 41 4E 24 B1 22 33  |+.AN$."1".AN$."3|
00000960: 22 A7 89 31 31 31 31 30  00 75 11 52 2B 4D B2 C5  |"..11110.u.R+M..|
00000970: 28 41 4E 24 29 00 8C 11  5C 2B 91 4D 89 31 31 31  |(AN$)...\+.M.111|
00000980: 36 30 2C 31 31 35 30 30  2C 32 30 30 00 A7 11 65  |60,11500,200...e|
00000990: 2B 8F 2A 2A 49 46 20 57  52 4F 4E 47 20 4D 45 4E  |+.**IF WRONG MEN|
000009A0: 55 20 49 4E 50 55 54 00  B3 11 66 2B 81 54 B2 31  |U INPUT...f+.T.1|
000009B0: A4 31 30 00 E8 11 70 2B  99 22 9E 9D 9D 9D 9D 9D  |.10...p+."......|
000009C0: 9D CE D5 CD C2 C5 D2 22  3B 3A 81 59 B2 31 A4 31  |.......";:.Y.1.1|
000009D0: 35 30 3A 82 59 3A 99 22  1C 9D 9D 9D 9D 9D 9D CE  |50:.Y:."........|
000009E0: D5 CD C2 C5 D2 05 22 3B  00 F8 11 7A 2B 81 59 B2  |......";...z+.Y.|
000009F0: 31 A4 31 35 30 3A 82 59  00 FF 11 84 2B 82 54 00  |1.150:.Y....+.T.|
00000A00: 0A 12 8E 2B 89 31 31 30  37 30 00 2D 12 97 2B 8F  |...+.11070.-..+.|
00000A10: 2A 2A 46 52 4F 4D 20 43  48 41 4E 47 49 4E 47 20  |**FROM CHANGING |
00000A20: 4D 45 4E 55 20 4F 50 54  49 4F 4E 20 31 00 3F 12  |MENU OPTION 1.?.|
00000A30: 98 2B 99 22 13 22 3A 49  B2 30 3A 43 53 B2 30 00  |.+.".":I.0:CS.0.|
00000A40: 4A 12 A2 2B 81 4A B2 30  A4 38 00 61 12 AC 2B 8B  |J..+.J.0.8.a..+.|
00000A50: 4A B2 30 A7 99 C7 28 31  34 37 29 22 11 11 11 11  |J.0...(147)"....|
00000A60: 22 00 7B 12 B6 2B 99 A3  36 29 22 9E 22 3B 4A 3B  |".{..+..6)".";J;|
00000A70: 22 05 22 3B 41 24 28 49  2C 4A 29 00 86 12 C0 2B  |".";A$(I,J)....+|
00000A80: 8B 4A B2 36 A7 99 00 91  12 CA 2B 8B 4A B2 37 A7  |.J.6......+.J.7.|
00000A90: 99 00 98 12 D4 2B 82 4A  00 C1 12 DE 2B 99 A3 38  |.....+.J....+..8|
00000AA0: 29 22 11 11 96 12 C3 C8  C1 CE C7 C5 92 05 20 54  |)"............ T|
00000AB0: 48 49 53 20 45 4E 54 52  59 3F 20 28 59 2F 4E 29  |HIS ENTRY? (Y/N)|
00000AC0: 22 00 D8 12 E8 2B A1 41  4E 24 3A 8B 41 4E 24 B2  |"....+.AN$:.AN$.|
00000AD0: 22 22 A7 31 31 32 34 30  00 F4 12 F2 2B 8B 41 4E  |"".11240....+.AN|
00000AE0: 24 B2 22 59 22 B0 41 4E  24 B2 22 D9 22 A7 89 31  |$."Y".AN$."."..1|
00000AF0: 31 33 31 30 00 03 13 FC  2B 8B 49 B2 58 A7 89 35  |1310....+.I.X..5|
00000B00: 31 30 30 00 24 13 06 2C  99 A3 31 34 29 22 11 C1  |100.$..,..14)"..|
00000B10: 4E 4F 54 48 45 52 20 45  4E 54 52 59 3F 20 28 59  |NOTHER ENTRY? (Y|
00000B20: 2F 4E 29 22 00 3B 13 10  2C A1 41 4E 24 3A 8B 41  |/N)".;..,.AN$:.A|
00000B30: 4E 24 B2 22 22 A7 31 31  32 38 30 00 5D 13 1A 2C  |N$."".11280.]..,|
00000B40: 8B 41 4E 24 B2 22 59 22  B0 41 4E 24 B2 22 D9 22  |.AN$."Y".AN$."."|
00000B50: A7 49 B2 49 AA 31 3A 89  31 31 33 30 32 00 66 13  |.I.I.1:.11302.f.|
00000B60: 24 2C 89 32 30 30 00 77  13 26 2C 8B 43 53 B2 31  |$,.200.w.&,.CS.1|
00000B70: A7 89 31 34 35 30 30 00  82 13 28 2C 89 31 31 31  |..14500...(,.111|
00000B80: 37 30 00 B2 13 2E 2C 99  22 91 1D 1D C5 4E 54 45  |70....,."....NTE|
00000B90: 52 20 9E CE D5 CD C2 C5  D2 05 20 4F 46 20 4C 49  |R ........ OF LI|
00000BA0: 4E 45 20 54 4F 20 42 45  20 43 48 41 4E 47 45 44  |NE TO BE CHANGED|
00000BB0: 2E 22 00 C9 13 38 2C A1  41 4E 24 3A 8B 41 4E 24  |."...8,.AN$:.AN$|
00000BC0: B2 22 22 A7 31 31 33 32  30 00 EA 13 42 2C 8B 41  |."".11320...B,.A|
00000BD0: 4E 24 B3 22 30 22 B0 41  4E 24 B1 22 38 22 A7 99  |N$."0".AN$."8"..|
00000BE0: 22 11 22 3A 89 31 31 33  31 30 00 FF 13 4C 2C 4A  |".":.11310...L,J|
00000BF0: B2 C5 28 41 4E 24 29 3A  99 C7 28 31 39 29 3B 00  |..(AN$):..(19);.|
00000C00: 22 14 56 2C 44 4E 24 B2  22 11 11 11 11 11 11 11  |".V,DN$.".......|
00000C10: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000C20: 11 22 00 3E 14 60 2C 8B  4A B2 37 A7 99 C8 28 44  |.".>.`,.J.7...(D|
00000C30: 4E 24 2C 31 33 29 3B 3A  89 31 31 33 39 30 00 5A  |N$,13);:.11390.Z|
00000C40: 14 6A 2C 8B 4A B2 38 A7  99 C8 28 44 4E 24 2C 31  |.j,.J.8...(DN$,1|
00000C50: 35 29 3B 3A 89 31 31 33  39 30 00 6B 14 74 2C 99  |5);:.11390.k.t,.|
00000C60: C8 28 44 4E 24 2C 4A AA  35 29 3B 00 8F 14 7E 2C  |.(DN$,J.5);...~,|
00000C70: 99 A3 39 29 22 20 20 20  20 20 20 20 20 20 20 20  |..9)"           |
00000C80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 22 00  |              ".|
00000C90: A7 14 88 2C 85 22 91 1D  1D 1D 1D 1D 1D 1D 22 3B  |...,."........";|
00000CA0: 41 24 28 49 2C 4A 29 00  E7 14 92 2C 99 C7 28 31  |A$(I,J)....,..(1|
00000CB0: 39 29 3B C8 28 44 4E 24  2C 31 38 29 3B A3 32 29  |9);.(DN$,18);.2)|
00000CC0: 3B 22 20 20 20 20 20 20  C3 48 41 4E 47 45 20 41  |;"      .HANGE A|
00000CD0: 4E 4F 54 48 45 52 20 4C  49 4E 45 3F 20 28 59 2F  |NOTHER LINE? (Y/|
00000CE0: 4E 29 20 20 20 20 22 00  FE 14 9C 2C A1 41 4E 24  |N)    "....,.AN$|
00000CF0: 3A 8B 41 4E 24 B2 22 22  A7 31 31 34 32 30 00 1A  |:.AN$."".11420..|
00000D00: 15 A6 2C 8B 41 4E 24 B2  22 59 22 B0 41 4E 24 B2  |..,.AN$."Y".AN$.|
00000D10: 22 D9 22 A7 89 31 31 33  31 30 00 25 15 B0 2C 89  |"."..11310.%..,.|
00000D20: 31 31 32 37 30 00 48 15  EB 2C 8F 2A 2A 46 52 4F  |11270.H..,.**FRO|
00000D30: 4D 20 43 48 41 4E 47 49  4E 47 20 4D 45 4E 55 20  |M CHANGING MENU |
00000D40: 4F 50 54 49 4F 4E 20 32  00 51 15 EC 2C 43 53 B2  |OPTION 2.Q..,CS.|
00000D50: 31 00 5C 15 F6 2C 89 31  34 35 30 30 00 76 15 AF  |1.\..,.14500.v..|
00000D60: 36 8F 2A 2A 46 52 4F 4D  20 4D 45 4E 55 20 4F 50  |6.**FROM MENU OP|
00000D70: 54 49 4F 4E 20 35 00 88  15 B0 36 97 35 33 32 38  |TION 5....6.5328|
00000D80: 30 2C 32 3A 44 53 B2 30  00 AB 15 BA 36 99 22 93  |0,2:DS.0....6.".|
00000D90: 11 11 22 3B A3 31 32 29  22 9E C4 C5 CC C5 D4 C9  |..";.12)".......|
00000DA0: CE C7 20 CF D0 D4 C9 CF  CE D3 22 00 C8 15 C4 36  |.. ......."....6|
00000DB0: 99 A3 31 32 29 22 B7 B7  B7 B7 B7 B7 B7 B7 B7 B7  |..12)"..........|
00000DC0: B7 B7 B7 B7 B7 B7 05 22  00 EA 15 CE 36 99 A3 38  |......."....6..8|
00000DD0: 29 22 11 11 31 2E 20 D2  45 56 49 45 57 20 41 4E  |)"..1. .EVIEW AN|
00000DE0: 44 20 44 45 4C 45 54 45  2E 22 00 0D 16 D8 36 99  |D DELETE."....6.|
00000DF0: A3 38 29 22 11 11 11 32  2E 20 D3 45 41 52 43 48  |.8)"...2. .EARCH|
00000E00: 20 41 4E 44 20 44 45 4C  45 54 45 2E 22 00 32 16  | AND DELETE.".2.|
00000E10: E2 36 99 A3 38 29 22 11  11 11 33 2E 20 D2 45 54  |.6..8)"...3. .ET|
00000E20: 55 52 4E 20 54 4F 20 4D  41 49 4E 20 4D 45 4E 55  |URN TO MAIN MENU|
00000E30: 2E 22 00 64 16 EC 36 99  A3 36 29 22 11 11 11 11  |.".d..6..6)"....|
00000E40: 11 11 11 11 11 12 C3 C8  CF CF D3 C5 A0 C2 D9 A0  |................|
00000E50: D0 D2 C5 D3 D3 C9 CE C7  A0 C1 A0 CE D5 CD C2 C5  |................|
00000E60: D2 92 22 3B 00 7B 16 F6  36 A1 41 4E 24 3A 8B 41  |..";.{..6.AN$:.A|
00000E70: 4E 24 B2 22 22 A7 31 34  30 37 30 00 97 16 00 37  |N$."".14070....7|
00000E80: 8B 41 4E 24 B3 22 31 22  B0 41 4E 24 B1 22 33 22  |.AN$."1".AN$."3"|
00000E90: A7 89 31 34 31 31 30 00  A4 16 0A 37 4D B2 C5 28  |..14110....7M..(|
00000EA0: 41 4E 24 29 00 BB 16 14  37 91 4D 89 31 34 31 36  |AN$)....7.M.1416|
00000EB0: 30 2C 31 34 35 30 30 2C  32 30 30 00 D6 16 1D 37  |0,14500,200....7|
00000EC0: 8F 2A 2A 49 46 20 57 52  4F 4E 47 20 4D 45 4E 55  |.**IF WRONG MENU|
00000ED0: 20 49 4E 50 55 54 00 E2  16 1E 37 81 54 B2 31 A4  | INPUT....7.T.1.|
00000EE0: 31 30 00 17 17 28 37 99  22 9E 9D 9D 9D 9D 9D 9D  |10...(7.".......|
00000EF0: CE D5 CD C2 C5 D2 22 3B  3A 81 59 B2 31 A4 31 35  |......";:.Y.1.15|
00000F00: 30 3A 82 59 3A 99 22 1C  9D 9D 9D 9D 9D 9D CE D5  |0:.Y:.".........|
00000F10: CD C2 C5 D2 05 22 3B 00  27 17 32 37 81 59 B2 31  |.....";.'.27.Y.1|
00000F20: A4 31 35 30 3A 82 59 00  2E 17 3C 37 82 54 00 39  |.150:.Y...<7.T.9|
00000F30: 17 46 37 89 31 34 30 37  30 00 5D 17 4F 37 8F 2A  |.F7.14070.].O7.*|
00000F40: 2A 46 52 4F 4D 20 44 45  4C 45 54 49 4E 47 20 4D  |*FROM DELETING M|
00000F50: 45 4E 55 20 4F 50 54 49  4F 4E 20 31 2E 00 6A 17  |ENU OPTION 1..j.|
00000F60: 50 37 99 22 13 22 3A 49  B2 30 00 75 17 5A 37 81  |P7.".":I.0.u.Z7.|
00000F70: 4A B2 30 A4 38 00 8C 17  64 37 8B 4A B2 30 A7 99  |J.0.8...d7.J.0..|
00000F80: C7 28 31 34 37 29 22 11  11 11 11 22 00 9C 17 6E  |.(147)"...."...n|
00000F90: 37 99 A3 37 29 41 24 28  49 2C 4A 29 00 A7 17 78  |7..7)A$(I,J)...x|
00000FA0: 37 8B 4A B2 36 A7 99 00  B2 17 82 37 8B 4A B2 37  |7.J.6......7.J.7|
00000FB0: A7 99 00 B9 17 8C 37 82  4A 00 E2 17 96 37 99 A3  |......7.J....7..|
00000FC0: 38 29 22 11 11 9E 12 C4  C5 CC C5 D4 C5 92 05 20  |8)"............ |
00000FD0: 54 48 49 53 20 45 4E 54  52 59 3F 20 28 59 2F 4E  |THIS ENTRY? (Y/N|
00000FE0: 29 22 00 F9 17 A0 37 A1  41 4E 24 3A 8B 41 4E 24  |)"....7.AN$:.AN$|
00000FF0: B2 22 22 A7 31 34 32 34  30 00 15 18 AA 37 8B 41  |."".14240....7.A|
00001000: 4E 24 B2 22 59 22 B0 41  4E 24 B2 22 D9 22 A6 89  |N$."Y".AN$."."..|
00001010: 31 34 33 31 30 00 24 18  B4 37 8B 49 B2 58 A7 89  |14310.$..7.I.X..|
00001020: 35 31 30 30 00 45 18 BE  37 99 A3 31 34 29 22 11  |5100.E..7..14)".|
00001030: C1 4E 4F 54 48 45 52 20  45 4E 54 52 59 3F 20 28  |.NOTHER ENTRY? (|
00001040: 59 2F 4E 29 22 00 5C 18  C8 37 A1 41 4E 24 3A 8B  |Y/N)".\..7.AN$:.|
00001050: 41 4E 24 B2 22 22 A7 31  34 32 38 30 00 7E 18 D2  |AN$."".14280.~..|
00001060: 37 8B 41 4E 24 B2 22 59  22 B0 41 4E 24 B2 22 D9  |7.AN$."Y".AN$.".|
00001070: 22 A7 49 B2 49 AA 31 3A  89 31 34 33 30 32 00 87  |".I.I.1:.14302..|
00001080: 18 DC 37 89 32 30 30 00  98 18 DE 37 8B 44 53 B2  |..7.200....7.DS.|
00001090: 31 A7 89 31 34 35 32 30  00 A3 18 E0 37 89 31 34  |1..14520....7.14|
000010A0: 31 37 30 00 B2 18 E6 37  58 B2 58 AB 31 3A 44 45  |170....7X.X.1:DE|
000010B0: B2 49 00 C5 18 F0 37 81  49 B2 44 45 A4 58 3A 81  |.I....7.I.DE.X:.|
000010C0: 4A B2 30 A4 38 00 DB 18  FA 37 41 24 28 49 2C 4A  |J.0.8....7A$(I,J|
000010D0: 29 B2 41 24 28 49 AA 31  2C 4A 29 00 E5 18 04 38  |).A$(I.1,J)....8|
000010E0: 82 4A 3A 82 49 00 14 19  0E 38 99 A3 38 29 22 91  |.J:.I....8..8)".|
000010F0: 9E C4 C5 CC C5 D4 C5 C4  92 20 41 53 20 52 45 51  |......... AS REQ|
00001100: 55 45 53 54 45 44 2E 20  20 20 20 20 20 20 20 20  |UESTED.         |
00001110: 20 20 05 22 00 1F 19 18  38 89 31 34 32 36 30 00  |  ."....8.14260.|
00001120: 43 19 71 38 8F 2A 2A 46  52 4F 4D 20 44 45 4C 45  |C.q8.**FROM DELE|
00001130: 54 49 4E 47 20 4D 45 4E  55 20 4F 50 54 49 4F 4E  |TING MENU OPTION|
00001140: 20 32 2E 00 5D 19 A4 38  85 22 93 11 11 D3 45 41  | 2..]..8."....EA|
00001150: 52 43 48 20 57 4F 52 44  22 3B 44 45 24 00 7F 19  |RCH WORD";DE$...|
00001160: A6 38 99 A3 36 29 22 11  11 D0 4C 45 41 53 45 20  |.8..6)"...LEASE |
00001170: 57 41 49 54 20 41 20 4D  4F 4D 45 4E 54 2E 22 00  |WAIT A MOMENT.".|
00001180: 87 19 AE 38 49 B2 30 00  92 19 B8 38 81 4A B2 30  |...8I.0....8.J.0|
00001190: A4 38 00 A3 19 C2 38 41  B2 C3 28 41 24 28 49 2C  |.8....8A..(A$(I,|
000011A0: 4A 29 29 00 B1 19 CC 38  81 44 45 B2 31 A4 41 AB  |J))....8.DE.1.A.|
000011B0: 33 00 D6 19 D6 38 8B C8  28 44 45 24 2C 34 29 B2  |3....8..(DE$,4).|
000011C0: CA 28 41 24 28 49 2C 4A  29 2C 44 45 2C 34 29 A7  |.(A$(I,J),DE,4).|
000011D0: 89 31 34 36 34 30 00 E1  19 E0 38 82 44 45 3A 82  |.14640....8.DE:.|
000011E0: 4A 00 EB 19 EA 38 49 B2  49 AA 31 00 FD 19 F4 38  |J....8I.I.1....8|
000011F0: 8B 49 B2 58 AA 31 A7 89  31 34 36 30 30 00 08 1A  |.I.X.1..14600...|
00001200: FE 38 89 31 34 35 32 30  00 23 1A 08 39 99 22 11  |.8.14520.#..9.".|
00001210: 11 D3 45 41 52 43 48 20  43 4F 4D 50 4C 45 54 45  |..EARCH COMPLETE|
00001220: 44 2E 22 00 48 1A 12 39  99 22 12 D0 52 45 53 53  |D.".H..9."..RESS|
00001230: 20 C6 31 20 54 4F 20 52  45 54 55 52 4E 20 54 4F  | .1 TO RETURN TO|
00001240: 20 4D 45 4E 55 2E 92 22  00 61 1A 1C 39 A1 41 4E  | MENU..".a..9.AN|
00001250: 24 3A 8B 41 4E 24 B3 B1  22 85 22 A7 31 34 36 32  |$:.AN$..".".1462|
00001260: 30 00 72 1A 1E 39 8B 43  53 B2 31 A7 89 31 31 30  |0.r..9.CS.1..110|
00001270: 31 30 00 83 1A 20 39 8B  52 56 B2 31 A7 89 33 30  |10... 9.RV.1..30|
00001280: 30 30 30 00 8E 1A 26 39  89 31 34 30 31 30 00 97  |000...&9.14010..|
00001290: 1A 30 39 44 53 B2 31 00  A8 1A 32 39 8B 43 53 B2  |.09DS.1...29.CS.|
000012A0: 31 A7 89 31 31 31 37 30  00 B3 1A 34 39 89 31 34  |1..11170...49.14|
000012B0: 31 37 30 00 CD 1A 67 42  8F 2A 2A 46 52 4F 4D 20  |170...gB.**FROM |
000012C0: 4D 45 4E 55 20 4F 50 54  49 4F 4E 20 36 00 DB 1A  |MENU OPTION 6...|
000012D0: 68 42 97 35 33 32 38 30  2C 31 30 00 06 1B 72 42  |hB.53280,10...rB|
000012E0: 99 22 93 11 11 11 11 11  11 11 11 11 22 3A 99 A3  |."..........":..|
000012F0: 39 29 22 D3 41 56 49 4E  47 20 4E 45 57 20 52 45  |9)".AVING NEW RE|
00001300: 43 4F 52 44 53 22 00 23  1B 90 42 9F 32 2C 38 2C  |CORDS".#..B.2,8,|
00001310: 32 2C 22 40 30 3A 44 49  53 4B 46 49 4C 45 2C 53  |2,"@0:DISKFILE,S|
00001320: 2C 57 22 00 2F 1B 9A 42  49 B2 30 3A 4A B2 30 00  |,W"./..BI.0:J.0.|
00001330: 3E 1B AE 42 98 32 2C 41  24 28 49 2C 4A 29 00 48  |>..B.2,A$(I,J).H|
00001340: 1B B8 42 4A B2 4A AA 31  00 5B 1B C2 42 8B 4A B1  |..BJ.J.1.[..B.J.|
00001350: 38 A7 4A B2 30 3A 49 B2  49 AA 31 00 6D 1B C6 42  |8.J.0:I.I.1.m..B|
00001360: 8B 49 B2 58 AA 31 A7 89  31 37 31 31 30 00 78 1B  |.I.X.1..17110.x.|
00001370: CC 42 89 31 37 30 37 30  00 7F 1B D6 42 A0 32 00  |.B.17070....B.2.|
00001380: 88 1B E0 42 89 32 30 30  00 A2 1B 1F 4E 8F 2A 2A  |...B.200....N.**|
00001390: 46 52 4F 4D 20 4D 45 4E  55 20 4F 50 54 49 4F 4E  |FROM MENU OPTION|
000013A0: 20 37 00 AF 1B 20 4E 97  35 33 32 38 30 2C 34 00  | 7... N.53280,4.|
000013B0: D2 1B 2A 4E 99 22 93 11  11 11 22 3B A3 31 32 29  |..*N."....";.12)|
000013C0: 22 D0 D2 C9 CE D4 C9 CE  C7 20 CF D0 D4 C9 CF CE  |"........ ......|
000013D0: D3 22 00 EE 1B 34 4E 99  A3 31 32 29 22 B7 B7 B7  |."...4N..12)"...|
000013E0: B7 B7 B7 B7 B7 B7 B7 B7  B7 B7 B7 B7 B7 22 00 10  |............."..|
000013F0: 1C 3E 4E 99 A3 36 29 22  11 11 31 2E 20 D0 52 49  |.>N..6)"..1. .RI|
00001400: 4E 54 20 41 4C 4C 20 45  4E 54 52 49 45 53 2E 22  |NT ALL ENTRIES."|
00001410: 00 31 1C 48 4E 99 A3 36  29 22 11 11 32 2E 20 D3  |.1.HN..6)"..2. .|
00001420: 45 41 52 43 48 20 41 4E  44 20 50 52 49 4E 54 2E  |EARCH AND PRINT.|
00001430: 22 00 55 1C 52 4E 99 A3  36 29 22 11 11 33 2E 20  |".U.RN..6)"..3. |
00001440: D2 45 54 55 52 4E 20 54  4F 20 4D 41 49 4E 20 4D  |.ETURN TO MAIN M|
00001450: 45 4E 55 2E 22 00 88 1C  5C 4E 99 A3 37 29 22 11  |ENU."...\N..7)".|
00001460: 11 11 11 11 11 11 11 11  11 12 C3 C8 CF CF D3 C5  |................|
00001470: 20 C2 D9 20 D0 D2 C5 D3  D3 C9 CE C7 20 C1 20 CE  | .. ........ . .|
00001480: D5 CD C2 C5 D2 92 22 3B  00 9F 1C 66 4E A1 41 4E  |......";...fN.AN|
00001490: 24 3A 8B 41 4E 24 B2 22  22 A7 32 30 30 37 30 00  |$:.AN$."".20070.|
000014A0: BB 1C 70 4E 8B 41 4E 24  B3 22 31 22 B0 41 4E 24  |..pN.AN$."1".AN$|
000014B0: B1 22 33 22 A7 89 32 30  31 31 30 00 C8 1C 7A 4E  |."3"..20110...zN|
000014C0: 4D B2 C5 28 41 4E 24 29  00 DF 1C 84 4E 91 4D 89  |M..(AN$)....N.M.|
000014D0: 32 30 31 36 30 2C 32 30  35 30 30 2C 32 30 30 00  |20160,20500,200.|
000014E0: FA 1C 8D 4E 8F 2A 2A 49  46 20 57 52 4F 4E 47 20  |...N.**IF WRONG |
000014F0: 4D 45 4E 55 20 49 4E 50  55 54 00 06 1D 8E 4E 81  |MENU INPUT....N.|
00001500: 54 B2 31 A4 31 30 00 3B  1D 98 4E 99 22 9E 9D 9D  |T.1.10.;..N."...|
00001510: 9D 9D 9D 9D CE D5 CD C2  C5 D2 22 3B 3A 81 59 B2  |..........";:.Y.|
00001520: 31 A4 31 35 30 3A 82 59  3A 99 22 1C 9D 9D 9D 9D  |1.150:.Y:.".....|
00001530: 9D 9D CE D5 CD C2 C5 D2  05 22 3B 00 4B 1D A2 4E  |.........";.K..N|
00001540: 81 59 B2 31 A4 31 35 30  3A 82 59 00 52 1D AC 4E  |.Y.1.150:.Y.R..N|
00001550: 82 54 00 5D 1D B6 4E 89  32 30 30 37 30 00 69 1D  |.T.]..N.20070.i.|
00001560: C0 4E 49 B2 30 3A 4A B2  30 00 77 1D CA 4E 9F 34  |.NI.0:J.0.w..N.4|
00001570: 2C 34 2C 37 3A 9D 34 00  8F 1D DE 4E 99 22 20 20  |,4,7:.4....N."  |
00001580: 20 20 20 20 20 20 22 3B  41 24 28 49 2C 4A 29 00  |      ";A$(I,J).|
00001590: 9A 1D E8 4E 8B 4A B2 36  A7 99 00 A5 1D F2 4E 8B  |...N.J.6......N.|
000015A0: 4A B2 37 A7 99 00 B4 1D  FC 4E 8B 4A B2 38 A7 99  |J.7......N.J.8..|
000015B0: 3A 99 3A 99 00 BE 1D 06  4F 4A B2 4A AA 31 00 CF  |:.:.....OJ.J.1..|
000015C0: 1D 10 4F 8B 4A B2 B3 38  A7 89 32 30 31 39 30 00  |..O.J..8..20190.|
000015D0: D9 1D 24 4F 98 34 3A A0  34 00 08 1E 2E 4F 99 22  |..$O.4:.4....O."|
000015E0: 93 22 3B A3 39 29 3B 22  11 11 11 11 11 11 11 11  |.";.9);"........|
000015F0: 11 11 05 C1 4E 4F 54 48  45 52 20 45 4E 54 52 59  |....NOTHER ENTRY|
00001600: 3F 20 28 59 2F 4E 29 22  00 1F 1E 38 4F A1 41 4E  |? (Y/N)"...8O.AN|
00001610: 24 3A 8B 41 4E 24 B2 22  22 A7 32 30 32 38 30 00  |$:.AN$."".20280.|
00001620: 3B 1E 42 4F 8B 41 4E 24  B2 22 4E 22 B0 41 4E 24  |;.BO.AN$."N".AN$|
00001630: B2 22 CE 22 A7 89 32 30  30 30 30 00 56 1E 43 4F  |."."..20000.V.CO|
00001640: 49 B2 49 AA 31 3A 4A B2  30 3A 8B 49 B2 58 AA 31  |I.I.1:J.0:.I.X.1|
00001650: A7 89 35 31 30 30 00 65  1E 44 4F 8B 50 54 A7 89  |..5100.e.DO.PT..|
00001660: 32 30 35 32 30 00 70 1E  46 4F 89 32 30 31 37 30  |20520.p.FO.20170|
00001670: 00 80 1E 4C 4F 98 34 3A  A0 34 3A 89 35 31 30 30  |...LO.4:.4:.5100|
00001680: 00 9F 1E E1 4F 8F 2A 2A  46 52 4F 4D 20 50 52 49  |....O.**FROM PRI|
00001690: 4E 54 49 4E 47 20 4F 50  54 49 4F 4E 20 32 2E 00  |NTING OPTION 2..|
000016A0: B9 1E 14 50 85 22 93 11  11 D3 45 41 52 43 48 20  |...P."....EARCH |
000016B0: 57 4F 52 44 22 3B 53 45  24 00 EC 1E 16 50 99 22  |WORD";SE$....P."|
000016C0: 11 11 11 1D 1D 1D 1D 9E  D0 4C 45 41 53 45 20 57  |.........LEASE W|
000016D0: 41 49 54 20 41 20 4D 49  4E 55 54 45 2E 05 22 3A  |AIT A MINUTE..":|
000016E0: 8B 50 54 B2 31 A7 89 32  30 35 32 30 00 F4 1E 1E  |.PT.1..20520....|
000016F0: 50 49 B2 30 00 FF 1E 28  50 81 4A B2 30 A4 38 00  |PI.0...(P.J.0.8.|
00001700: 10 1F 32 50 41 B2 C3 28  41 24 28 49 2C 4A 29 29  |..2PA..(A$(I,J))|
00001710: 00 1E 1F 3C 50 81 53 45  B2 31 A4 41 AB 33 00 4C  |...<P.SE.1.A.3.L|
00001720: 1F 46 50 8B C8 28 53 45  24 2C 34 29 B2 CA 28 41  |.FP..(SE$,4)..(A|
00001730: 24 28 49 2C 4A 29 2C 53  45 2C 34 29 A7 50 54 B2  |$(I,J),SE,4).PT.|
00001740: 31 3A 4A B2 30 3A 89 32  30 31 37 30 00 57 1F 50  |1:J.0:.20170.W.P|
00001750: 50 82 53 45 3A 82 4A 00  61 1F 5A 50 49 B2 49 AA  |P.SE:.J.a.ZPI.I.|
00001760: 31 00 73 1F 64 50 8B 49  B2 58 AA 31 A7 89 32 30  |1.s.dP.I.X.1..20|
00001770: 36 30 30 00 7E 1F 6E 50  89 32 30 35 32 30 00 99  |600.~.nP.20520..|
00001780: 1F 78 50 99 22 11 11 D3  45 41 52 43 48 20 43 4F  |.xP."...EARCH CO|
00001790: 4D 50 4C 45 54 45 44 2E  22 00 BE 1F 82 50 99 22  |MPLETED."....P."|
000017A0: 12 D0 52 45 53 53 20 C6  31 20 54 4F 20 52 45 54  |..RESS .1 TO RET|
000017B0: 55 52 4E 20 54 4F 20 4D  45 4E 55 2E 92 22 00 D7  |URN TO MENU.."..|
000017C0: 1F 8C 50 A1 41 4E 24 3A  8B 41 4E 24 B3 B1 22 85  |..P.AN$:.AN$..".|
000017D0: 22 A7 32 30 36 32 30 00  E2 1F 96 50 89 32 30 30  |".20620....P.200|
000017E0: 31 30 00 FC 1F D7 59 8F  2A 2A 46 52 4F 4D 20 4D  |10....Y.**FROM M|
000017F0: 45 4E 55 20 4F 50 54 49  4F 4E 20 38 00 2B 20 D8  |ENU OPTION 8.+ .|
00001800: 59 99 C7 28 31 34 32 29  22 93 11 11 11 11 4C 4F  |Y..(142)".....LO|
00001810: 41 44 22 C7 28 33 34 29  22 4D 45 4E 55 22 C7 28  |AD".(34)"MENU".(|
00001820: 33 34 29 22 2C 38 11 11  11 11 22 00 43 20 E2 59  |34)",8....".C .Y|
00001830: 99 22 52 55 4E 22 3A 99  22 91 91 91 91 91 91 91  |."RUN":.".......|
00001840: 91 91 22 00 60 20 EC 59  97 36 33 31 2C 31 33 3A  |..".` .Y.631,13:|
00001850: 97 36 33 32 2C 31 33 3A  97 31 39 38 2C 32 3A 80  |.632,13:.198,2:.|
00001860: 00 71 20 2F 75 8F 2A 2A  46 52 4F 4D 20 35 30 30  |.q /u.**FROM 500|
00001870: 30 00 99 20 30 75 52 56  B2 31 3A 99 22 93 22 3B  |0.. 0uRV.1:.".";|
00001880: A3 31 32 29 22 11 11 D2  C5 D6 C9 C5 D7 C9 CE C7  |.12)"...........|
00001890: A0 CF D0 D4 C9 CF CE D3  22 00 B6 20 3A 75 99 A3  |........".. :u..|
000018A0: 31 32 29 22 B7 B7 B7 B7  B7 B7 B7 B7 B7 B7 B7 B7  |12)"............|
000018B0: B7 B7 B7 B7 B7 22 00 D1  20 44 75 99 A3 36 29 22  |.....".. Du..6)"|
000018C0: 11 11 31 2E 20 D2 45 56  49 45 57 20 41 4C 4C 2E  |..1. .EVIEW ALL.|
000018D0: 22 00 F4 20 4E 75 99 A3  36 29 22 11 11 11 32 2E  |".. Nu..6)"...2.|
000018E0: 20 D3 45 41 52 43 48 20  41 4E 44 20 52 45 56 49  | .EARCH AND REVI|
000018F0: 45 57 2E 22 00 19 21 58  75 99 A3 36 29 22 11 11  |EW."..!Xu..6)"..|
00001900: 11 33 2E 20 D2 45 54 55  52 4E 20 54 4F 20 4D 41  |.3. .ETURN TO MA|
00001910: 49 4E 20 4D 45 4E 55 2E  22 00 4B 21 62 75 99 A3  |IN MENU.".K!bu..|
00001920: 36 29 22 11 11 11 11 11  11 11 11 11 12 C3 C8 CF  |6)".............|
00001930: CF D3 C5 A0 C2 D9 A0 D0  D2 C5 D3 D3 C9 CE C7 A0  |................|
00001940: C1 A0 CE D5 CD C2 C5 D2  92 22 3B 00 62 21 6C 75  |.........";.b!lu|
00001950: A1 41 4E 24 3A 8B 41 4E  24 B2 22 22 A7 33 30 30  |.AN$:.AN$."".300|
00001960: 36 30 00 7E 21 76 75 8B  41 4E 24 B3 22 31 22 B0  |60.~!vu.AN$."1".|
00001970: 41 4E 24 B1 22 33 22 A7  89 33 30 30 36 30 00 8B  |AN$."3"..30060..|
00001980: 21 80 75 4D B2 C5 28 41  4E 24 29 00 A1 21 8A 75  |!.uM..(AN$)..!.u|
00001990: 91 4D 89 35 30 30 32 2C  31 34 35 30 30 2C 32 30  |.M.5002,14500,20|
000019A0: 30 00 EA 21 50 C3 83 22  C3 41 54 45 47 4F 52 59  |0..!P..".ATEGORY|
000019B0: 3A 22 2C 22 D4 49 54 4C  45 3A 22 2C 22 C3 4F 4D  |:",".ITLE:",".OM|
000019C0: 50 4F 53 45 52 3A 22 2C  22 D0 45 52 46 4F 52 4D  |POSER:",".ERFORM|
000019D0: 45 52 3A 22 2C 22 C3 4F  4E 44 55 43 54 4F 52 3A  |ER:",".ONDUCTOR:|
000019E0: 22 2C 22 CC 41 42 45 4C  3A 22 00 13 22 5A C3 83  |",".ABEL:".."Z..|
000019F0: 22 C3 41 54 41 4C 4F 47  20 23 3A 22 2C 22 D3 48  |".ATALOG #:",".H|
00001A00: 45 4C 46 20 23 3A 22 2C  22 C3 4F 4D 4D 45 4E 54  |ELF #:",".OMMENT|
00001A10: 53 3A 22 00 00 00                                 |S:"...          |

.......H$(8),A$(100,8).6....G(147);:.532
80,12:.53281,5.N....G(142)".............
............................";.Z....T.1.
23...(..".                              
        .";...2..T...<.."...............
........................";...F..2023,91:
.56295,3...P.."..........":..14)"RECORD 
ALBUMS".9.Z...14)"..............".J.D..T
.1.3000:.T.D.W..**READ DATA HEADINGS.Y.X
..T.0.8:.H$(T):.T...G..**MAIN MENU...H..
53280,6:.53281,11:.G(14)"....";.M.R...11
)"MENU OF ACTIVITIES".......11)"........
..........".......3)"..1. LOAD THE INFOR
MATION FROM DISK.".A....:..3)"2. REVIEW 
THE INFORMATION.".A....:..3)"3. ADD A NE
W ENTRY."......:..3)"4. CHANGE SOME INFO
RMATION."......:..3)"5. DELETE AN ENTRY.
".V....:..3)"6. SAVE THE INFORMATION ON 
DISK."..."..:..3)"7. PRINTING MENU.".#.,
..:..3)"8. MENU OF OTHER PROGRAMS ON DIS
K.".R.0.."..........CHOOSE BY PRESSING A
 NUMBER.";.G.6..AN$:.AN$."".310...@..AN$
."1".AN$."8"..350...J.M.E(AN$).B.T..M.20
00,5000,8000,11000,14000,17000,20000,230
00...]..**IF WRONG MENU INPUT...^..T.1.1
0. .H..".......NUMBER";:.Y.1.150:.Y:."..
......NUMBER..";.0.R..Y.1.150:.Y.7.|..T.
@....310.Z.O..**FROM MENU OPTION 1.G.P..
53280,7...Z.."..........":..17)"LOADING"
.....I.0:J.0......2,8,2,"0:DISKFILE,S,R"
......2,A$(I,J).P....ST..0..2100.Z. .J.J
.1...$..J.8.J.0:I.I.1...*..2060...4. 2..
...X.I:Z1.1:.200.*....**FROM MENU OPTION
 2.5....30000.B....".":I.0.M....J.0.8.D.
...J.0..G(147)"....".T.....2)A$(I,J)...
..J.6..... ..J.7........J. ....I.X..5100
.B.....14)"..ANOTHER ENTRY? (Y/N)".X....
AN$:.AN$."".5050...D..AN$."Y".AN$."Y".I.
I.1:.5010...N..200.5...."....LAST ENTRY.
 PRESS F1 TO RETURN TO MENU";.M....AN$:.
AN$..".".5110.V....200.P.?..**FROM MENU 
OPTION 3...@..G(147):.53280,5...J..:..13
)"ADDING A RECORD"...T...13)"...........
....":..Z.^..T.0.8:." ";H$(T):.:.T...C..
Z.1.J.0:.8050...E..Z1.1.I.I.1:J.0:.8050.
..H.I.0:J.0.".R.."......";.J.|..".......
.......*...";A$(I,J):.8500.O.....11)"..A
NOTHER RECORD? (Y/N).";......AN$:.AN$.""
.8080......AN$."N".AN$."N".X.I:.200.....
I.I.1:J.0:Z.1:.8000.Z.4!..13)".ENTRY O.K
.? (Y/N)."...>!.AN$:.AN$."".8510...H!.AN
$."N".AN$."N".Z.1:.8000...R!J.J.1.,.\!.J
.8.J.8:.8070.6.F!.8060.P..*.**FROM MENU 
OPTION 4.]..*.53280,7.~..+."...";.12)".C
HANGE OPTIONS"....+..12)"...............
"....+..8)"..1. REVIEW AND CHANGE."... +
..8)"...2. SEARCH AND CHANGE."...*+..8)"
...3. RETURN TO MAIN MENU.".5.4+..6)"...
.......CHOOSE BY PRESSING A NUMBER.";.L.
>+.AN$:.AN$."".11070.H.H+.AN$."1".AN$."3
"..11110.U.R+M.E(AN$)...\+.M.11160,11500
,200...E+.**IF WRONG MENU INPUT...F+.T.1
.10...P+.".......NUMBER";:.Y.1.150:.Y:."
.......NUMBER.";...Z+.Y.1.150:.Y....+.T.
...+.11070.-..+.**FROM CHANGING MENU OPT
ION 1.?..+.".":I.0:CS.0.J..+.J.0.8.A..+.
J.0..G(147)"....".{..+..6)".";J;".";A$(I
,J)....+.J.6.....J+.J.7.....T+.J.A..+..8
)"....CHANGE.. THIS ENTRY? (Y/N)".X..+.A
N$:.AN$."".11240....+.AN$."Y".AN$."Y"..1
1310....+.I.X..5100.$..,..14)".ANOTHER E
NTRY? (Y/N)".;..,.AN$:.AN$."".11280.]..,
.AN$."Y".AN$."Y".I.I.1:.11302.F.$,.200.W
.&,.CS.1..14500...(,.11170....,."...ENTE
R .NUMBER. OF LINE TO BE CHANGED.".I.8,.
AN$:.AN$."".11320...B,.AN$."0".AN$."8"..
".":.11310...L,J.E(AN$):.G(19);.".V,DN$.
"........................".>.`,.J.7..H(D
N$,13);:.11390.Z.J,.J.8..H(DN$,15);:.113
90.K.T,.H(DN$,J.5);...~,..9)"           
              "....,."........";A$(I,J).
...,.G(19);H(DN$,18);.2);"      CHANGE A
NOTHER LINE? (Y/N)    "....,.AN$:.AN$.""
.11420....,.AN$."Y".AN$."Y"..11310.%..,.
11270.H..,.**FROM CHANGING MENU OPTION 2
.Q..,CS.1.\..,.14500.V..6.**FROM MENU OP
TION 5....6.53280,2:DS.0....6."...";.12)
".DELETING OPTIONS".H.D6..12)"..........
......."...N6..8)"..1. REVIEW AND DELETE
."...X6..8)"...2. SEARCH AND DELETE.".2.
.6..8)"...3. RETURN TO MAIN MENU.".D..6.
.6)"..........CHOOSE BY PRESSING A NUMBE
R.";.{..6.AN$:.AN$."".14070....7.AN$."1"
.AN$."3"..14110....7M.E(AN$)....7.M.1416
0,14500,200.V..7.**IF WRONG MENU INPUT..
..7.T.1.10...(7.".......NUMBER";:.Y.1.15
0:.Y:.".......NUMBER.";.'.27.Y.1.150:.Y.
..<7.T.9.F7.14070.].O7.**FROM DELETING M
ENU OPTION 1..J.P7.".":I.0.U.Z7.J.0.8...
D7.J.0..G(147)"...."...N7..7)A$(I,J)...X
7.J.6......7.J.7......7.J....7..8)"....D
ELETE.. THIS ENTRY? (Y/N)"... 7.AN$:.AN$
."".14240....7.AN$."Y".AN$."Y"..14310.$.
.7.I.X..5100.E..7..14)".ANOTHER ENTRY? (
Y/N)".\.H7.AN$:.AN$."".14280.~.R7.AN$."Y
".AN$."Y".I.I.1:.14302....7.200....7.DS.
1..14520....7.14170....7X.X.1:DE.I.E..7.
I.DE.X:.J.0.8....7A$(I,J).A$(I.1,J)....8
.J:.I....8..8)"..DELETED. AS REQUESTED. 
          ."....8.14260.C.Q8.**FROM DELE
TING MENU OPTION 2..]..8."...SEARCH WORD
";DE$...8..6)"..PLEASE WAIT A MOMENT.".
...8I.0....8.J.0.8...B8A.C(A$(I,J))...L8
.DE.1.A.3.V.V8.H(DE$,4).J(A$(I,J),DE,4).
.14640....8.DE:.J....8I.I.1....8.I.X.1..
14600....8.14520.#..9."..SEARCH COMPLETE
D.".H..9.".PRESS F1 TO RETURN TO MENU.."
.A..9.AN$:.AN$..".".14620.R..9.CS.1..110
10... 9.RV.1..30000...&9.14010...09DS.1.
..29.CS.1..11170...49.14170.M.GB.**FROM 
MENU OPTION 6...HB.53280,10...RB."......
....":..9)"SAVING NEW RECORDS".#..B.2,8,
2,"@0:DISKFILE,S,W"./..BI.0:J.0.>..B.2,A
$(I,J).H..BJ.J.1.[.BB.J.8.J.0:I.I.1.M.FB
.I.X.1..17110.X.LB.17070..VB 2....B.200
....N.**FROM MENU OPTION 7... N.53280,4.
R.*N."....";.12)"PRINTING OPTIONS"...4N.
.12)"................"...>N..6)"..1. PRI
NT ALL ENTRIES.".1.HN..6)"..2. SEARCH AN
D PRINT.".U.RN..6)"..3. RETURN TO MAIN M
ENU."...\N..7)"...........CHOOSE BY PRES
SING A NUMBER.";...FN.AN$:.AN$."".20070.
..PN.AN$."1".AN$."3"..20110.H.ZNM.E(AN$)
....N.M.20160,20500,200....N.**IF WRONG 
MENU INPUT....N.T.1.10.;..N.".......NUMB
ER";:.Y.1.150:.Y:.".......NUMBER.";.K..N
.Y.1.150:.Y.R..N.T.]..N.20070.I..NI.0:J.
0.W.JN.4,4,7:.4....N."        ";A$(I,J).
...N.J.6......N.J.7......N.J.8..:.:.....
OJ.J.1.O..O.J..8..20190.Y.$O.4: 4....O."
.";.9);"...........ANOTHER ENTRY? (Y/N)"
...8O.AN$:.AN$."".20280.;.BO.AN$."N".AN$
."N"..20000.V.COI.I.1:J.0:.I.X.1..5100.E
.DO.PT..20520.P.FO.20170...LO.4: 4:.5100
....O.**FROM PRINTING OPTION 2.....P."..
.SEARCH WORD";SE$....P."........PLEASE W
AIT A MINUTE..":.PT.1..20520....PI.0...(
P.J.0.8...2PA.C(A$(I,J))...<P.SE.1.A.3.L
.FP.H(SE$,4).J(A$(I,J),SE,4).PT.1:J.0:.2
0170.W.PP.SE:.J.A.ZPI.I.1.S.DP.I.X.1..20
600.~.NP.20520...XP."..SEARCH COMPLETED.
"....P.".PRESS F1 TO RETURN TO MENU..".W
..P.AN$:.AN$..".".20620....P.20010...WY.
**FROM MENU OPTION 8.+ XY.G(142)".....LO
AD"G(34)"MENU"G(34)",8....".C .Y."RUN":.
".........".` .Y.631,13:.632,13:.198,2:.
.Q /U.**FROM 5000.. 0URV.1:.".";.12)"..R
EVIEWING OPTIONS".. :U..12)"............
.....".Q DU..6)"..1. REVIEW ALL.".. NU..
6)"...2. SEARCH AND REVIEW."..!XU..6)"..
.3. RETURN TO MAIN MENU.".K!BU..6)".....
.....CHOOSE BY PRESSING A NUMBER.";.B!LU
.AN$:.AN$."".30060.~!VU.AN$."1".AN$."3".
.30060..!.UM.E(AN$)..!.U.M.5002,14500,20
0..!PC."CATEGORY:","TITLE:","COMPOSER:",
"PERFORMER:","CONDUCTOR:","LABEL:".."ZC.
"CATALOG #:","SHELF #:","COMMENTS:"...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL