ADDRESS BOOK.C
FILE INFORMATION
FILENAME(S): ADDRESS BOOK.C
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-10-19 22:48:26
APPEARS ON: 1 disk(s)
FILE HASH
5fb7243209b27f9633ece9e6a2b74ccbe9f4bff80a11f167696a9c80cd06ece8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 1541TEST DEMO | ADDRESS BOOK.C | PRG | Radd Maxx | 21 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
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 35 3A 97 35 |7);:.53280,15:.5| 00000030: 33 32 38 31 2C 39 00 6E 08 14 00 99 C7 28 31 34 |3281,9.n.....(14| 00000040: 32 29 22 9E D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 |2)".............| 00000050: D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 |................| 00000060: D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 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 D6 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 D6 22 3B 00 B2 08 32 00 | .";...2.| 000000B0: 82 54 00 E2 08 3C 00 99 22 D6 D6 D6 D6 D6 D6 D6 |.T...<..".......| 000000C0: D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 |................| 000000D0: D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 |................| 000000E0: 22 3B 00 F8 08 46 00 97 32 30 32 33 2C 38 36 3A |";...F..2023,86:| 000000F0: 97 35 36 32 39 35 2C 37 00 1E 09 50 00 99 22 13 |.56295,7...P..".| 00000100: 11 11 11 11 11 11 11 11 11 22 3A 99 A3 31 34 29 |.........":..14)| 00000110: 22 41 44 44 52 45 53 53 20 42 4F 4F 4B 22 00 37 |"ADDRESS BOOK".7| 00000120: 09 5A 00 99 A3 31 34 29 22 91 A3 A3 A3 A3 A3 A3 |.Z...14)".......| 00000130: A3 A3 A3 A3 A3 A3 22 00 48 09 64 00 81 54 B2 31 |......".H.d..T.1| 00000140: A4 33 30 30 30 3A 82 54 00 62 09 77 00 8F 2A 2A |.3000:.T.b.w..**| 00000150: 52 45 41 44 20 44 41 54 41 20 48 45 41 44 49 4E |READ DATA HEADIN| 00000160: 47 53 00 77 09 78 00 81 54 B2 30 A4 38 3A 87 48 |GS.w.x..T.0.8:.H| 00000170: 24 28 54 29 3A 82 54 00 88 09 C7 00 8F 2A 2A 4D |$(T):.T......**M| 00000180: 41 49 4E 20 4D 45 4E 55 00 AD 09 C8 00 97 35 33 |AIN MENU......53| 00000190: 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 31 31 3A |280,6:.53281,11:| 000001A0: 99 C7 28 31 34 29 22 93 05 11 11 22 3B 00 CB 09 |..(14)"....";...| 000001B0: D2 00 99 A3 31 31 29 22 CD 45 4E 55 20 4F 46 20 |....11)".ENU OF | 000001C0: C1 43 54 49 56 49 54 49 45 53 22 00 E9 09 DC 00 |.CTIVITIES".....| 000001D0: 99 A3 31 31 29 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |..11)"..........| 000001E0: A3 A3 A3 A3 A3 A3 A3 A3 22 00 18 0A E6 00 99 A3 |........".......| 000001F0: 33 29 22 11 11 31 2E 20 CC CF C1 C4 A0 54 48 45 |3)"..1. .....THE| 00000200: 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 46 52 4F | INFORMATION FRO| 00000210: 4D 20 44 49 53 4B 2E 22 00 3F 0A F0 00 99 3A 99 |M DISK.".?....:.| 00000220: A3 33 29 22 32 2E 20 D2 C5 D6 C9 C5 D7 20 54 48 |.3)"2. ...... TH| 00000230: 45 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 2E 22 00 |E INFORMATION.".| 00000240: 5F 0A FA 00 99 3A 99 A3 33 29 22 33 2E 20 C1 C4 |_....:..3)"3. ..| 00000250: C4 20 41 20 4E 45 57 20 45 4E 54 52 59 2E 22 00 |. A NEW ENTRY.".| 00000260: 87 0A 04 01 99 3A 99 A3 33 29 22 34 2E 20 C3 C8 |.....:..3)"4. ..| 00000270: C1 CE C7 C5 20 53 4F 4D 45 20 49 4E 46 4F 52 4D |.... SOME INFORM| 00000280: 41 54 49 4F 4E 2E 22 00 A7 0A 0E 01 99 3A 99 A3 |ATION."......:..| 00000290: 33 29 22 35 2E 20 C4 C5 CC C5 D4 C5 20 41 4E 20 |3)"5. ...... AN | 000002A0: 45 4E 54 52 59 2E 22 00 D4 0A 18 01 99 3A 99 A3 |ENTRY."......:..| 000002B0: 33 29 22 36 2E 20 D3 C1 D6 C5 20 54 48 45 20 49 |3)"6. .... THE I| 000002C0: 4E 46 4F 52 4D 41 54 49 4F 4E 20 4F 4E 20 44 49 |NFORMATION ON DI| 000002D0: 53 4B 2E 22 00 F2 0A 22 01 99 3A 99 A3 33 29 22 |SK."..."..:..3)"| 000002E0: 37 2E 20 D0 D2 C9 CE D4 49 4E 47 20 4D 45 4E 55 |7. .....ING MENU| 000002F0: 2E 22 00 21 0B 2C 01 99 3A 99 A3 33 29 22 38 2E |.".!.,..:..3)"8.| 00000300: 20 CD C5 CE D5 20 4F 46 20 4F 54 48 45 52 20 50 | .... OF OTHER P| 00000310: 52 4F 47 52 41 4D 53 20 4F 4E 20 44 49 53 4B 2E |ROGRAMS ON DISK.| 00000320: 22 00 50 0B 30 01 99 22 11 11 11 1D 1D 1D 1D 1D |".P.0.."........| 00000330: 1D 12 C3 C8 CF CF D3 C5 20 C2 D9 20 D0 D2 C5 D3 |........ .. ....| 00000340: D3 C9 CE C7 20 C1 20 CE D5 CD C2 C5 D2 92 22 3B |.... . .......";| 00000350: 00 65 0B 36 01 A1 41 4E 24 3A 8B 41 4E 24 B2 22 |.e.6..AN$:.AN$."| 00000360: 22 A7 33 31 30 00 7F 0B 40 01 8B 41 4E 24 B3 22 |".310...@..AN$."| 00000370: 31 22 B0 41 4E 24 B1 22 38 22 A7 89 33 35 30 00 |1".AN$."8"..350.| 00000380: 8C 0B 4A 01 4D B2 C5 28 41 4E 24 29 00 C0 0B 54 |..J.M..(AN$)...T| 00000390: 01 91 4D 89 32 30 30 30 2C 35 30 30 30 2C 38 30 |..M.2000,5000,80| 000003A0: 30 30 2C 31 31 30 30 30 2C 31 34 30 30 30 2C 31 |00,11000,14000,1| 000003B0: 37 30 30 30 2C 32 30 30 30 30 2C 32 33 30 30 30 |7000,20000,23000| 000003C0: 00 DB 0B 5D 01 8F 2A 2A 49 46 20 57 52 4F 4E 47 |...]..**IF WRONG| 000003D0: 20 4D 45 4E 55 20 49 4E 50 55 54 00 E7 0B 5E 01 | MENU INPUT...^.| 000003E0: 81 54 B2 31 A4 31 30 00 1E 0C 68 01 99 22 05 9D |.T.1.10...h.."..| 000003F0: 9D 9D 9D 9D 9D CE D5 CD C2 C5 D2 22 3B 3A 81 59 |...........";:.Y| 00000400: B2 31 A4 31 35 30 3A 82 59 3A 99 22 96 12 9D 9D |.1.150:.Y:."....| 00000410: 9D 9D 9D 9D CE D5 CD C2 C5 D2 92 05 22 3B 00 2E |............";..| 00000420: 0C 72 01 81 59 B2 31 A4 31 35 30 3A 82 59 00 35 |.r..Y.1.150:.Y.5| 00000430: 0C 7C 01 82 54 00 3E 0C 86 01 89 33 31 30 00 58 |.|..T.>....310.X| 00000440: 0C CF 07 8F 2A 2A 46 52 4F 4D 20 4D 45 4E 55 20 |....**FROM MENU | 00000450: 4F 50 54 49 4F 4E 20 31 00 65 0C D0 07 97 35 33 |OPTION 1.e....53| 00000460: 32 38 30 2C 37 00 86 0C DA 07 99 22 93 11 11 11 |280,7......"....| 00000470: 11 11 11 11 11 11 22 3A 99 A3 31 37 29 22 CC 4F |......":..17)".O| 00000480: 41 44 49 4E 47 22 00 92 0C E4 07 49 B2 30 3A 4A |ADING".....I.0:J| 00000490: B2 30 00 AE 0C EE 07 9F 32 2C 38 2C 32 2C 22 30 |.0......2,8,2,"0| 000004A0: 3A 4E 41 4D 45 46 49 4C 45 2C 53 2C 52 22 00 BD |:NAMEFILE,S,R"..| 000004B0: 0C 0C 08 84 32 2C 41 24 28 49 2C 4A 29 00 CE 0C |....2,A$(I,J)...| 000004C0: 16 08 8B 53 54 B3 B1 30 A7 89 32 31 30 30 00 D8 |...ST..0..2100..| 000004D0: 0C 20 08 4A B2 4A AA 31 00 EB 0C 24 08 8B 4A B1 |. .J.J.1...$..J.| 000004E0: 38 A7 4A B2 30 3A 49 B2 49 AA 31 00 F5 0C 2A 08 |8.J.0:I.I.1...*.| 000004F0: 89 32 30 36 30 00 FC 0C 34 08 A0 32 00 0E 0D 98 |.2060...4..2....| 00000500: 08 58 B2 49 3A 5A 31 B2 31 3A 89 32 30 30 00 28 |.X.I:Z1.1:.200.(| 00000510: 0D 87 13 8F 2A 2A 46 52 4F 4D 20 4D 45 4E 55 20 |....**FROM MENU | 00000520: 4F 50 54 49 4F 4E 20 32 00 33 0D 88 13 89 33 30 |OPTION 2.3....30| 00000530: 30 30 30 00 40 0D 8A 13 99 22 93 22 3A 49 B2 30 |000.@....".":I.0| 00000540: 00 4B 0D 92 13 81 4A B2 30 A4 38 00 62 0D 96 13 |.K....J.0.8.b...| 00000550: 8B 4A B2 30 A7 99 C7 28 31 34 37 29 22 11 11 11 |.J.0...(147)"...| 00000560: 11 22 00 72 0D 9C 13 99 A3 32 29 41 24 28 49 2C |.".r.....2)A$(I,| 00000570: 4A 29 00 7F 0D 9E 13 8B 4A B2 36 A7 99 00 88 0D |J)......J.6.....| 00000580: A0 13 8B 4A B2 37 A7 99 00 8F 0D A6 13 82 4A 00 |...J.7........J.| 00000590: 9E 0D AB 13 8B 49 B2 58 A7 89 35 31 30 30 00 C0 |.....I.X..5100..| 000005A0: 0D B0 13 99 A3 31 34 29 22 11 11 C1 4E 4F 54 48 |.....14)"...NOTH| 000005B0: 45 52 20 45 4E 54 52 59 3F 20 28 59 2F 4E 29 22 |ER ENTRY? (Y/N)"| 000005C0: 00 D6 0D BA 13 A1 41 4E 24 3A 8B 41 4E 24 B2 22 |......AN$:.AN$."| 000005D0: 22 A7 35 30 35 30 00 F7 0D C4 13 8B 41 4E 24 B2 |".5050......AN$.| 000005E0: 22 59 22 B0 41 4E 24 B2 22 D9 22 A7 49 B2 49 AA |"Y".AN$.".".I.I.| 000005F0: 31 3A 89 35 30 31 30 00 00 0E CE 13 89 32 30 30 |1:.5010......200| 00000600: 00 33 0E EC 13 99 22 11 11 11 11 CC 41 53 54 20 |.3....".....AST | 00000610: 45 4E 54 52 59 2E 20 D0 52 45 53 53 20 C6 31 20 |ENTRY. .RESS .1 | 00000620: 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D 45 4E |TO RETURN TO MEN| 00000630: 55 22 3B 00 4B 0E F6 13 A1 41 4E 24 3A 8B 41 4E |U";.K....AN$:.AN| 00000640: 24 B3 B1 22 85 22 A7 35 31 31 30 00 54 0E 00 14 |$..".".5110.T...| 00000650: 89 32 30 30 00 6E 0E 3F 1F 8F 2A 2A 46 52 4F 4D |.200.n.?..**FROM| 00000660: 20 4D 45 4E 55 20 4F 50 54 49 4F 4E 20 33 00 83 | MENU OPTION 3..| 00000670: 0E 40 1F 99 C7 28 31 34 37 29 3A 97 35 33 32 38 |.@...(147):.5328| 00000680: 30 2C 35 00 A0 0E 4A 1F 99 3A 99 A3 31 33 29 22 |0,5...J..:..13)"| 00000690: C1 C4 C4 C9 CE C7 20 C1 20 D2 C5 C3 CF D2 C4 22 |...... . ......"| 000006A0: 00 BD 0E 54 1F 99 A3 31 33 29 22 A3 A3 A3 A3 A3 |...T...13)".....| 000006B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3A 99 00 D8 0E |..........":....| 000006C0: 5E 1F 81 54 B2 30 A4 38 3A 99 22 20 22 3B 48 24 |^..T.0.8:." ";H$| 000006D0: 28 54 29 3A 99 3A 82 54 00 EB 0E 63 1F 8B 5A B2 |(T):.:.T...c..Z.| 000006E0: 31 A7 4A B2 30 3A 89 38 30 35 30 00 05 0F 65 1F |1.J.0:.8050...e.| 000006F0: 8B 5A 31 B2 31 A7 49 B2 49 AA 31 3A 4A B2 30 3A |.Z1.1.I.I.1:J.0:| 00000700: 89 38 30 35 30 00 11 0F 68 1F 49 B2 30 3A 4A B2 |.8050...h.I.0:J.| 00000710: 30 00 20 0F 72 1F 99 22 13 11 11 11 11 11 22 3B |0. .r.."......";| 00000720: 00 48 0F 7C 1F 85 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.H.|..".........| 00000730: 1D 1D 1D 1D 1D 2A 9D 9D 9D 22 3B 41 24 28 49 2C |.....*...";A$(I,| 00000740: 4A 29 3A 89 38 35 30 30 00 6D 0F 86 1F 99 A3 31 |J):.8500.m.....1| 00000750: 31 29 22 11 12 C1 4E 4F 54 48 45 52 20 52 45 43 |1)"...NOTHER REC| 00000760: 4F 52 44 3F 20 28 59 2F 4E 29 92 22 3B 00 83 0F |ORD? (Y/N).";...| 00000770: 90 1F A1 41 4E 24 3A 8B 41 4E 24 B2 22 22 A7 38 |...AN$:.AN$."".8| 00000780: 30 38 30 00 A1 0F 9A 1F 8B 41 4E 24 B2 22 4E 22 |080......AN$."N"| 00000790: B0 41 4E 24 B2 22 CE 22 A7 58 B2 49 3A 89 32 30 |.AN$.".".X.I:.20| 000007A0: 30 00 B9 0F A4 1F 49 B2 49 AA 31 3A 4A B2 30 3A |0.....I.I.1:J.0:| 000007B0: 5A B2 31 3A 89 38 30 30 30 00 D8 0F 34 21 99 A3 |Z.1:.8000...4!..| 000007C0: 31 33 29 22 9E C5 4E 54 52 59 20 CF 2E CB 2E 3F |13)"..NTRY ....?| 000007D0: 20 28 59 2F 4E 29 05 22 00 EE 0F 3E 21 A1 41 4E | (Y/N)."...>!.AN| 000007E0: 24 3A 8B 41 4E 24 B2 22 22 A7 38 35 31 30 00 0D |$:.AN$."".8510..| 000007F0: 10 48 21 8B 41 4E 24 B2 22 4E 22 B0 41 4E 24 B2 |.H!.AN$."N".AN$.| 00000800: 22 CE 22 A7 5A B2 31 3A 89 38 30 30 30 00 17 10 |".".Z.1:.8000...| 00000810: 52 21 4A B2 4A AA 31 00 2A 10 5C 21 8B 4A B1 38 |R!J.J.1.*.\!.J.8| 00000820: A7 4A B2 38 3A 89 38 30 37 30 00 34 10 66 21 89 |.J.8:.8070.4.f!.| 00000830: 38 30 36 30 00 4E 10 F7 2A 8F 2A 2A 46 52 4F 4D |8060.N..*.**FROM| 00000840: 20 4D 45 4E 55 20 4F 50 54 49 4F 4E 20 34 00 5B | MENU OPTION 4.[| 00000850: 10 F8 2A 97 35 33 32 38 30 2C 37 00 7C 10 02 2B |..*.53280,7.|..+| 00000860: 99 22 93 11 11 22 3B A3 31 32 29 22 96 C3 C8 C1 |."...";.12)"....| 00000870: CE C7 C5 20 CF D0 D4 C9 CF CE D3 22 00 97 10 0C |... ......."....| 00000880: 2B 99 A3 31 32 29 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 |+..12)".........| 00000890: B7 B7 B7 B7 B7 05 22 00 B9 10 16 2B 99 A3 38 29 |......"....+..8)| 000008A0: 22 11 11 31 2E 20 D2 45 56 49 45 57 20 41 4E 44 |"..1. .EVIEW AND| 000008B0: 20 43 48 41 4E 47 45 2E 22 00 DC 10 20 2B 99 A3 | CHANGE."... +..| 000008C0: 38 29 22 11 11 11 32 2E 20 D3 45 41 52 43 48 20 |8)"...2. .EARCH | 000008D0: 41 4E 44 20 43 48 41 4E 47 45 2E 22 00 01 11 2A |AND CHANGE."...*| 000008E0: 2B 99 A3 38 29 22 11 11 11 33 2E 20 D2 45 54 55 |+..8)"...3. .ETU| 000008F0: 52 4E 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 2E |RN TO MAIN MENU.| 00000900: 22 00 33 11 34 2B 99 A3 36 29 22 11 11 11 11 11 |".3.4+..6)".....| 00000910: 11 11 11 11 12 C3 C8 CF CF D3 C5 A0 C2 D9 A0 D0 |................| 00000920: D2 C5 D3 D3 C9 CE C7 A0 C1 A0 CE D5 CD C2 C5 D2 |................| 00000930: 92 22 3B 00 4A 11 3E 2B A1 41 4E 24 3A 8B 41 4E |.";.J.>+.AN$:.AN| 00000940: 24 B2 22 22 A7 31 31 30 37 30 00 66 11 48 2B 8B |$."".11070.f.H+.| 00000950: 41 4E 24 B3 22 31 22 B0 41 4E 24 B1 22 33 22 A7 |AN$."1".AN$."3".| 00000960: 89 31 31 31 31 30 00 73 11 52 2B 4D B2 C5 28 41 |.11110.s.R+M..(A| 00000970: 4E 24 29 00 8A 11 5C 2B 91 4D 89 31 31 31 36 30 |N$)...\+.M.11160| 00000980: 2C 31 31 35 30 30 2C 32 30 30 00 A5 11 65 2B 8F |,11500,200...e+.| 00000990: 2A 2A 49 46 20 57 52 4F 4E 47 20 4D 45 4E 55 20 |**IF WRONG MENU | 000009A0: 49 4E 50 55 54 00 B1 11 66 2B 81 54 B2 31 A4 31 |INPUT...f+.T.1.1| 000009B0: 30 00 E6 11 70 2B 99 22 9E 9D 9D 9D 9D 9D 9D CE |0...p+."........| 000009C0: D5 CD C2 C5 D2 22 3B 3A 81 59 B2 31 A4 31 35 30 |.....";:.Y.1.150| 000009D0: 3A 82 59 3A 99 22 1C 9D 9D 9D 9D 9D 9D CE D5 CD |:.Y:."..........| 000009E0: C2 C5 D2 05 22 3B 00 F6 11 7A 2B 81 59 B2 31 A4 |....";...z+.Y.1.| 000009F0: 31 35 30 3A 82 59 00 FD 11 84 2B 82 54 00 08 12 |150:.Y....+.T...| 00000A00: 8E 2B 89 31 31 30 37 30 00 2B 12 97 2B 8F 2A 2A |.+.11070.+..+.**| 00000A10: 46 52 4F 4D 20 43 48 41 4E 47 49 4E 47 20 4D 45 |FROM CHANGING ME| 00000A20: 4E 55 20 4F 50 54 49 4F 4E 20 31 00 3D 12 98 2B |NU OPTION 1.=..+| 00000A30: 99 22 13 22 3A 49 B2 30 3A 43 53 B2 30 00 48 12 |.".":I.0:CS.0.H.| 00000A40: A2 2B 81 4A B2 30 A4 38 00 5F 12 AC 2B 8B 4A B2 |.+.J.0.8._..+.J.| 00000A50: 30 A7 99 C7 28 31 34 37 29 22 11 11 11 11 22 00 |0...(147)"....".| 00000A60: 79 12 B6 2B 99 A3 36 29 22 9E 22 3B 4A 3B 22 05 |y..+..6)".";J;".| 00000A70: 22 3B 41 24 28 49 2C 4A 29 00 84 12 C0 2B 8B 4A |";A$(I,J)....+.J| 00000A80: B2 36 A7 99 00 8F 12 CA 2B 8B 4A B2 37 A7 99 00 |.6......+.J.7...| 00000A90: 96 12 D4 2B 82 4A 00 BF 12 DE 2B 99 A3 38 29 22 |...+.J....+..8)"| 00000AA0: 11 11 96 12 C3 C8 C1 CE C7 C5 92 05 20 54 48 49 |............ THI| 00000AB0: 53 20 45 4E 54 52 59 3F 20 28 59 2F 4E 29 22 00 |S ENTRY? (Y/N)".| 00000AC0: D6 12 E8 2B A1 41 4E 24 3A 8B 41 4E 24 B2 22 22 |...+.AN$:.AN$.""| 00000AD0: A7 31 31 32 34 30 00 F2 12 F2 2B 8B 41 4E 24 B2 |.11240....+.AN$.| 00000AE0: 22 59 22 B0 41 4E 24 B2 22 D9 22 A7 89 31 31 33 |"Y".AN$."."..113| 00000AF0: 31 30 00 01 13 FC 2B 8B 49 B2 58 A7 89 35 31 30 |10....+.I.X..510| 00000B00: 30 00 22 13 06 2C 99 A3 31 34 29 22 11 C1 4E 4F |0."..,..14)"..NO| 00000B10: 54 48 45 52 20 45 4E 54 52 59 3F 20 28 59 2F 4E |THER ENTRY? (Y/N| 00000B20: 29 22 00 39 13 10 2C A1 41 4E 24 3A 8B 41 4E 24 |)".9..,.AN$:.AN$| 00000B30: B2 22 22 A7 31 31 32 38 30 00 5B 13 1A 2C 8B 41 |."".11280.[..,.A| 00000B40: 4E 24 B2 22 59 22 B0 41 4E 24 B2 22 D9 22 A7 49 |N$."Y".AN$.".".I| 00000B50: B2 49 AA 31 3A 89 31 31 33 30 32 00 64 13 24 2C |.I.1:.11302.d.$,| 00000B60: 89 32 30 30 00 75 13 26 2C 8B 43 53 B2 31 A7 89 |.200.u.&,.CS.1..| 00000B70: 31 34 35 30 30 00 80 13 28 2C 89 31 31 31 37 30 |14500...(,.11170| 00000B80: 00 B0 13 2E 2C 99 22 91 1D 1D C5 4E 54 45 52 20 |....,."....NTER | 00000B90: 9E CE D5 CD C2 C5 D2 05 20 4F 46 20 4C 49 4E 45 |........ OF LINE| 00000BA0: 20 54 4F 20 42 45 20 43 48 41 4E 47 45 44 2E 22 | TO BE CHANGED."| 00000BB0: 00 C7 13 38 2C A1 41 4E 24 3A 8B 41 4E 24 B2 22 |...8,.AN$:.AN$."| 00000BC0: 22 A7 31 31 33 32 30 00 E8 13 42 2C 8B 41 4E 24 |".11320...B,.AN$| 00000BD0: B3 22 30 22 B0 41 4E 24 B1 22 38 22 A7 99 22 11 |."0".AN$."8"..".| 00000BE0: 22 3A 89 31 31 33 31 30 00 FD 13 4C 2C 4A B2 C5 |":.11310...L,J..| 00000BF0: 28 41 4E 24 29 3A 99 C7 28 31 39 29 3B 00 20 14 |(AN$):..(19);. .| 00000C00: 56 2C 44 4E 24 B2 22 11 11 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 22 |..............."| 00000C20: 00 3C 14 60 2C 8B 4A B2 37 A7 99 C8 28 44 4E 24 |.<.`,.J.7...(DN$| 00000C30: 2C 31 33 29 3B 3A 89 31 31 33 39 30 00 58 14 6A |,13);:.11390.X.j| 00000C40: 2C 8B 4A B2 38 A7 99 C8 28 44 4E 24 2C 31 35 29 |,.J.8...(DN$,15)| 00000C50: 3B 3A 89 31 31 33 39 30 00 69 14 74 2C 99 C8 28 |;:.11390.i.t,..(| 00000C60: 44 4E 24 2C 4A AA 35 29 3B 00 8D 14 7E 2C 99 A3 |DN$,J.5);...~,..| 00000C70: 39 29 22 20 20 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 22 00 A5 14 | "...| 00000C90: 88 2C 85 22 91 1D 1D 1D 1D 1D 1D 1D 22 3B 41 24 |.,."........";A$| 00000CA0: 28 49 2C 4A 29 00 E5 14 92 2C 99 C7 28 31 39 29 |(I,J)....,..(19)| 00000CB0: 3B C8 28 44 4E 24 2C 31 38 29 3B A3 32 29 3B 22 |;.(DN$,18);.2);"| 00000CC0: 20 20 20 20 20 20 C3 48 41 4E 47 45 20 41 4E 4F | .HANGE ANO| 00000CD0: 54 48 45 52 20 4C 49 4E 45 3F 20 28 59 2F 4E 29 |THER LINE? (Y/N)| 00000CE0: 20 20 20 20 22 00 FC 14 9C 2C A1 41 4E 24 3A 8B | "....,.AN$:.| 00000CF0: 41 4E 24 B2 22 22 A7 31 31 34 32 30 00 18 15 A6 |AN$."".11420....| 00000D00: 2C 8B 41 4E 24 B2 22 59 22 B0 41 4E 24 B2 22 D9 |,.AN$."Y".AN$.".| 00000D10: 22 A7 89 31 31 33 31 30 00 23 15 B0 2C 89 31 31 |"..11310.#..,.11| 00000D20: 32 37 30 00 46 15 EB 2C 8F 2A 2A 46 52 4F 4D 20 |270.F..,.**FROM | 00000D30: 43 48 41 4E 47 49 4E 47 20 4D 45 4E 55 20 4F 50 |CHANGING MENU OP| 00000D40: 54 49 4F 4E 20 32 00 4F 15 EC 2C 43 53 B2 31 00 |TION 2.O..,CS.1.| 00000D50: 5A 15 F6 2C 89 31 34 35 30 30 00 74 15 AF 36 8F |Z..,.14500.t..6.| 00000D60: 2A 2A 46 52 4F 4D 20 4D 45 4E 55 20 4F 50 54 49 |**FROM MENU OPTI| 00000D70: 4F 4E 20 35 00 86 15 B0 36 97 35 33 32 38 30 2C |ON 5....6.53280,| 00000D80: 32 3A 44 53 B2 30 00 A9 15 BA 36 99 22 93 11 11 |2:DS.0....6."...| 00000D90: 22 3B A3 31 32 29 22 9E C4 C5 CC C5 D4 C9 CE C7 |";.12)".........| 00000DA0: 20 CF D0 D4 C9 CF CE D3 22 00 C6 15 C4 36 99 A3 | ......."....6..| 00000DB0: 31 32 29 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |12)"............| 00000DC0: B7 B7 B7 B7 05 22 00 E8 15 CE 36 99 A3 38 29 22 |....."....6..8)"| 00000DD0: 11 11 31 2E 20 D2 45 56 49 45 57 20 41 4E 44 20 |..1. .EVIEW AND | 00000DE0: 44 45 4C 45 54 45 2E 22 00 0B 16 D8 36 99 A3 38 |DELETE."....6..8| 00000DF0: 29 22 11 11 11 32 2E 20 D3 45 41 52 43 48 20 41 |)"...2. .EARCH A| 00000E00: 4E 44 20 44 45 4C 45 54 45 2E 22 00 30 16 E2 36 |ND DELETE.".0..6| 00000E10: 99 A3 38 29 22 11 11 11 33 2E 20 D2 45 54 55 52 |..8)"...3. .ETUR| 00000E20: 4E 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 2E 22 |N TO MAIN MENU."| 00000E30: 00 62 16 EC 36 99 A3 36 29 22 11 11 11 11 11 11 |.b..6..6)"......| 00000E40: 11 11 11 12 C3 C8 CF CF D3 C5 A0 C2 D9 A0 D0 D2 |................| 00000E50: C5 D3 D3 C9 CE C7 A0 C1 A0 CE D5 CD C2 C5 D2 92 |................| 00000E60: 22 3B 00 79 16 F6 36 A1 41 4E 24 3A 8B 41 4E 24 |";.y..6.AN$:.AN$| 00000E70: B2 22 22 A7 31 34 30 37 30 00 95 16 00 37 8B 41 |."".14070....7.A| 00000E80: 4E 24 B3 22 31 22 B0 41 4E 24 B1 22 33 22 A7 89 |N$."1".AN$."3"..| 00000E90: 31 34 31 31 30 00 A2 16 0A 37 4D B2 C5 28 41 4E |14110....7M..(AN| 00000EA0: 24 29 00 B9 16 14 37 91 4D 89 31 34 31 36 30 2C |$)....7.M.14160,| 00000EB0: 31 34 35 30 30 2C 32 30 30 00 D4 16 1D 37 8F 2A |14500,200....7.*| 00000EC0: 2A 49 46 20 57 52 4F 4E 47 20 4D 45 4E 55 20 49 |*IF WRONG MENU I| 00000ED0: 4E 50 55 54 00 E0 16 1E 37 81 54 B2 31 A4 31 30 |NPUT....7.T.1.10| 00000EE0: 00 15 17 28 37 99 22 9E 9D 9D 9D 9D 9F 9D CE D5 |...(7.".........| 00000EF0: CD C2 C5 D2 22 3B 3A 81 59 B2 31 A4 31 35 30 3A |....";:.Y.1.150:| 00000F00: 82 59 3A 99 22 1C 9D 9D 9D 9D 9D 9D CE D5 CD C2 |.Y:."...........| 00000F10: C5 D2 05 22 3B 00 25 17 32 37 81 59 B2 31 A4 31 |...";.%.27.Y.1.1| 00000F20: 35 30 3A 82 59 00 2C 17 3C 37 82 54 00 37 17 46 |50:.Y.,.<7.T.7.F| 00000F30: 37 89 31 34 30 37 30 00 5B 17 4F 37 8F 2A 2A 46 |7.14070.[.O7.**F| 00000F40: 52 4F 4D 20 44 45 4C 45 54 49 4E 47 20 4D 45 4E |ROM DELETING MEN| 00000F50: 55 20 4F 50 54 49 4F 4E 20 31 2E 00 68 17 50 37 |U OPTION 1..h.P7| 00000F60: 99 22 13 22 3A 49 B2 30 00 73 17 5A 37 81 4A B2 |.".":I.0.s.Z7.J.| 00000F70: 30 A4 38 00 8A 17 64 37 8B 4A B2 30 A7 99 C7 28 |0.8...d7.J.0...(| 00000F80: 31 34 37 29 22 11 11 11 11 22 00 9A 17 6E 37 99 |147)"...."...n7.| 00000F90: A3 37 29 41 24 28 49 2C 4A 29 00 A5 17 78 37 8B |.7)A$(I,J)...x7.| 00000FA0: 4A B2 36 A7 99 00 B0 17 82 37 8B 4A B2 37 A7 99 |J.6......7.J.7..| 00000FB0: 00 B7 17 8C 37 82 4A 00 E0 17 96 37 99 A3 38 29 |....7.J....7..8)| 00000FC0: 22 11 11 9E 12 C4 C5 CC C5 D4 C5 92 05 20 54 48 |"............ TH| 00000FD0: 49 53 20 45 4E 54 52 59 3F 20 28 59 2F 4E 29 22 |IS ENTRY? (Y/N)"| 00000FE0: 00 F7 17 A0 37 A1 41 4E 24 3A 8B 41 4E 24 B2 22 |....7.AN$:.AN$."| 00000FF0: 22 A7 31 34 32 34 30 00 13 18 AA 37 8B 41 4E 24 |".14240....7.AN$| 00001000: B2 22 59 22 B0 41 4E 24 B2 22 D9 22 A7 89 31 34 |."Y".AN$."."..14| 00001010: 33 31 30 00 22 18 B4 37 8B 49 B2 58 A7 89 35 31 |310."..7.I.X..51| 00001020: 30 30 00 43 18 BE 37 99 A3 31 34 29 22 11 C1 4E |00.C..7..14)"..N| 00001030: 4F 54 48 45 52 20 45 4E 54 52 59 3F 20 28 59 2F |OTHER ENTRY? (Y/| 00001040: 4E 29 22 00 5A 18 C8 37 A1 41 4E 24 3A 8B 41 4E |N)".Z..7.AN$:.AN| 00001050: 24 B2 22 22 A7 31 34 32 38 30 00 7C 18 D2 37 8B |$."".14280.|..7.| 00001060: 41 4E 24 B2 22 59 22 B0 41 4E 24 B2 22 D9 22 A7 |AN$."Y".AN$.".".| 00001070: 49 B2 49 AA 31 3A 89 31 34 33 30 32 00 85 18 DC |I.I.1:.14302....| 00001080: 37 89 32 30 30 00 96 18 DE 37 8B 44 53 B2 31 A7 |7.200....7.DS.1.| 00001090: 89 31 34 35 32 30 00 A1 18 E0 37 89 31 34 31 37 |.14520....7.1417| 000010A0: 30 00 B0 18 E6 37 58 B2 58 AB 31 3A 44 45 B2 49 |0....7X.X.1:DE.I| 000010B0: 00 C3 18 F0 37 81 49 B2 44 45 A4 58 3A 81 4A B2 |....7.I.DE.X:.J.| 000010C0: 30 A4 38 00 D9 18 FA 37 41 24 28 49 2C 4A 29 B2 |0.8....7A$(I,J).| 000010D0: 41 24 28 49 AA 31 2C 4A 29 00 E3 18 04 38 82 4A |A$(I.1,J)....8.J| 000010E0: 3A 82 49 00 12 19 0E 38 99 A3 38 29 22 91 9E C4 |:.I....8..8)"...| 000010F0: C5 CC C5 D4 C5 C4 92 20 41 53 20 52 45 51 55 45 |....... AS REQUE| 00001100: 53 54 45 44 2E 20 20 20 20 20 20 20 20 20 20 20 |STED. | 00001110: 05 22 00 1D 19 18 38 89 31 34 32 36 30 00 41 19 |."....8.14260.A.| 00001120: 71 38 8F 2A 2A 46 52 4F 4D 20 44 45 4C 45 54 49 |q8.**FROM DELETI| 00001130: 4E 47 20 4D 45 4E 55 20 4F 50 54 49 4F 4E 20 32 |NG MENU OPTION 2| 00001140: 2E 00 5B 19 A4 38 85 22 93 11 11 D3 45 41 52 43 |..[..8."....EARC| 00001150: 48 20 57 4F 52 44 22 3B 44 45 24 00 7D 19 A6 38 |H WORD";DE$.}..8| 00001160: 99 A3 36 29 22 11 11 D0 4C 45 41 53 45 20 57 41 |..6)"...LEASE WA| 00001170: 49 54 20 41 20 4D 4F 4D 45 4E 54 2E 22 00 85 19 |IT A MOMENT."...| 00001180: AE 38 49 B2 30 00 90 19 B8 38 81 4A B2 30 A4 38 |.8I.0....8.J.0.8| 00001190: 00 A1 19 C2 38 41 B2 C3 28 41 24 28 49 2C 4A 29 |....8A..(A$(I,J)| 000011A0: 29 00 AF 19 CC 38 81 44 45 B2 31 A4 41 AB 33 00 |)....8.DE.1.A.3.| 000011B0: D4 19 D6 38 8B C8 28 44 45 24 2C 34 29 B2 CA 28 |...8..(DE$,4)..(| 000011C0: 41 24 28 49 2C 4A 29 2C 44 45 2C 34 29 A7 89 31 |A$(I,J),DE,4)..1| 000011D0: 34 36 34 30 00 DF 19 E0 38 82 44 45 3A 82 4A 00 |4640....8.DE:.J.| 000011E0: E9 19 EA 38 49 B2 49 AA 31 00 FB 19 F4 38 8B 49 |...8I.I.1....8.I| 000011F0: B2 58 AA 31 A7 89 31 34 36 30 30 00 06 1A FE 38 |.X.1..14600....8| 00001200: 89 31 34 35 32 30 00 21 1A 08 39 99 22 11 11 D3 |.14520.!..9."...| 00001210: 45 41 52 43 48 20 43 4F 4D 50 4C 45 54 45 44 2E |EARCH COMPLETED.| 00001220: 22 00 46 1A 12 39 99 22 12 D0 52 45 53 53 20 C6 |".F..9."..RESS .| 00001230: 31 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D |1 TO RETURN TO M| 00001240: 45 4E 55 2E 92 22 00 5F 1A 1C 39 A1 41 4E 24 3A |ENU.."._..9.AN$:| 00001250: 8B 41 4E 24 B3 B1 22 85 22 A7 31 34 36 32 30 00 |.AN$..".".14620.| 00001260: 70 1A 1E 39 8B 43 53 B2 31 A7 89 31 31 30 31 30 |p..9.CS.1..11010| 00001270: 00 81 1A 20 39 8B 52 56 B2 31 A7 89 33 30 30 30 |... 9.RV.1..3000| 00001280: 30 00 8C 1A 26 39 89 31 34 30 31 30 00 95 1A 30 |0...&9.14010...0| 00001290: 39 44 53 B2 31 00 A6 1A 32 39 8B 43 53 B2 31 A7 |9DS.1...29.CS.1.| 000012A0: 89 31 31 31 37 30 00 B1 1A 34 39 89 31 34 31 37 |.11170...49.1417| 000012B0: 30 00 CB 1A 67 42 8F 2A 2A 46 52 4F 4D 20 4D 45 |0...gB.**FROM ME| 000012C0: 4E 55 20 4F 50 54 49 4F 4E 20 36 00 D9 1A 68 42 |NU OPTION 6...hB| 000012D0: 97 35 33 32 38 30 2C 31 30 00 04 1B 72 42 99 22 |.53280,10...rB."| 000012E0: 93 11 11 11 11 11 11 11 11 11 22 3A 99 A3 39 29 |..........":..9)| 000012F0: 22 D3 41 56 49 4E 47 20 4E 45 57 20 52 45 43 4F |".AVING NEW RECO| 00001300: 52 44 53 22 00 21 1B 90 42 9F 32 2C 38 2C 32 2C |RDS".!..B.2,8,2,| 00001310: 22 40 30 3A 4E 41 4D 45 46 49 4C 45 2C 53 2C 57 |"@0:NAMEFILE,S,W| 00001320: 22 00 2D 1B 9A 42 49 B2 30 3A 4A B2 30 00 3C 1B |".-..BI.0:J.0.<.| 00001330: AE 42 98 32 2C 41 24 28 49 2C 4A 29 00 46 1B B8 |.B.2,A$(I,J).F..| 00001340: 42 4A B2 4A AA 31 00 59 1B C2 42 8B 4A B1 38 A7 |BJ.J.1.Y..B.J.8.| 00001350: 4A B2 30 3A 49 B2 49 AA 31 00 6B 1B C6 42 8B 49 |J.0:I.I.1.k..B.I| 00001360: B2 58 AA 31 A7 89 31 37 31 31 30 00 76 1B CC 42 |.X.1..17110.v..B| 00001370: 89 31 37 30 37 30 00 7D 1B D6 42 A0 32 00 86 1B |.17070.}..B.2...| 00001380: E0 42 89 32 30 30 00 A0 1B 1F 4E 8F 2A 2A 46 52 |.B.200....N.**FR| 00001390: 4F 4D 20 4D 45 4E 55 20 4F 50 54 49 4F 4E 20 37 |OM MENU OPTION 7| 000013A0: 00 AD 1B 20 4E 97 35 33 32 38 30 2C 34 00 D0 1B |... N.53280,4...| 000013B0: 2A 4E 99 22 93 11 11 11 22 3B A3 31 32 29 22 D0 |*N."....";.12)".| 000013C0: D2 C9 CE D4 C9 CE C7 20 CF D0 D4 C9 CF CE D3 22 |....... ......."| 000013D0: 00 EC 1B 34 4E 99 A3 31 32 29 22 B7 B7 B7 B7 B7 |...4N..12)".....| 000013E0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 0E 1C 3E |..........."...>| 000013F0: 4E 99 A3 36 29 22 11 11 31 2E 20 D0 52 49 4E 54 |N..6)"..1. .RINT| 00001400: 20 41 4C 4C 20 45 4E 54 52 49 45 53 2E 22 00 2F | ALL ENTRIES."./| 00001410: 1C 48 4E 99 A3 36 29 22 11 11 32 2E 20 D3 45 41 |.HN..6)"..2. .EA| 00001420: 52 43 48 20 41 4E 44 20 50 52 49 4E 54 2E 22 00 |RCH AND PRINT.".| 00001430: 53 1C 52 4E 99 A3 36 29 22 11 11 33 2E 20 D2 45 |S.RN..6)"..3. .E| 00001440: 54 55 52 4E 20 54 4F 20 4D 41 49 4E 20 4D 45 4E |TURN TO MAIN MEN| 00001450: 55 2E 22 00 86 1C 5C 4E 99 A3 37 29 22 11 11 11 |U."...\N..7)"...| 00001460: 11 11 11 11 11 11 11 12 C3 C8 CF CF D3 C5 20 C2 |.............. .| 00001470: D9 20 D0 D2 C5 D3 D3 C9 CE C7 20 C1 20 CE D5 CD |. ........ . ...| 00001480: C2 C5 D2 92 22 3B 00 9D 1C 66 4E A1 41 4E 24 3A |....";...fN.AN$:| 00001490: 8B 41 4E 24 B2 22 22 A7 32 30 30 37 30 00 B9 1C |.AN$."".20070...| 000014A0: 70 4E 8B 41 4E 24 B3 22 31 22 B0 41 4E 24 B1 22 |pN.AN$."1".AN$."| 000014B0: 33 22 A7 89 32 30 31 31 30 00 C6 1C 7A 4E 4D B2 |3"..20110...zNM.| 000014C0: C5 28 41 4E 24 29 00 DD 1C 84 4E 91 4D 89 32 30 |.(AN$)....N.M.20| 000014D0: 31 36 30 2C 32 30 35 30 30 2C 32 30 30 00 F8 1C |160,20500,200...| 000014E0: 8D 4E 8F 2A 2A 49 46 20 57 52 4F 4E 47 20 4D 45 |.N.**IF WRONG ME| 000014F0: 4E 55 20 49 4E 50 55 54 00 04 1D 8E 4E 81 54 B2 |NU INPUT....N.T.| 00001500: 31 A4 31 30 00 39 1D 98 4E 99 22 9E 9D 9D 9D 9D |1.10.9..N.".....| 00001510: 9D 9D CE D5 CD C2 C5 D2 22 3B 3A 81 59 B2 31 A4 |........";:.Y.1.| 00001520: 31 35 30 3A 82 59 3A 99 22 1C 9D 9D 9D 9D 9D 9D |150:.Y:.".......| 00001530: CE D5 CD C2 C5 D2 05 22 3B 00 49 1D A2 4E 81 59 |.......";.I..N.Y| 00001540: B2 31 A4 31 35 30 3A 82 59 00 50 1D AC 4E 82 54 |.1.150:.Y.P..N.T| 00001550: 00 5B 1D B6 4E 89 32 30 30 37 30 00 67 1D C0 4E |.[..N.20070.g..N| 00001560: 49 B2 30 3A 4A B2 30 00 75 1D CA 4E 9F 34 2C 34 |I.0:J.0.u..N.4,4| 00001570: 2C 37 3A 9D 34 00 8D 1D DE 4E 99 22 20 20 20 20 |,7:.4....N." | 00001580: 20 20 20 20 22 3B 41 24 28 49 2C 4A 29 00 98 1D | ";A$(I,J)...| 00001590: E8 4E 8B 4A B2 36 A7 99 00 A3 1D F2 4E 8B 4A B2 |.N.J.6......N.J.| 000015A0: 37 A7 99 00 B2 1D FC 4E 8B 4A B2 38 A7 99 3A 99 |7......N.J.8..:.| 000015B0: 3A 99 00 BC 1D 06 4F 4A B2 4A AA 31 00 CD 1D 10 |:.....OJ.J.1....| 000015C0: 4F 8B 4A B2 B3 38 A7 89 32 30 31 39 30 00 D7 1D |O.J..8..20190...| 000015D0: 24 4F 98 34 3A A0 34 00 06 1E 2E 4F 99 22 93 22 |$O.4:.4....O."."| 000015E0: 3B A3 39 29 3B 22 11 11 11 11 11 11 11 11 11 11 |;.9);"..........| 000015F0: 05 C1 4E 4F 54 48 45 52 20 45 4E 54 52 59 3F 20 |..NOTHER ENTRY? | 00001600: 28 59 2F 4E 29 22 00 1D 1E 38 4F A1 41 4E 24 3A |(Y/N)"...8O.AN$:| 00001610: 8B 41 4E 24 B2 22 22 A7 32 30 32 38 30 00 39 1E |.AN$."".20280.9.| 00001620: 42 4F 8B 41 4E 24 B2 22 4E 22 B0 41 4E 24 B2 22 |BO.AN$."N".AN$."| 00001630: CE 22 A7 89 32 30 30 30 30 00 54 1E 43 4F 49 B2 |."..20000.T.COI.| 00001640: 49 AA 31 3A 4A B2 30 3A 8B 49 B2 58 AA 31 A7 89 |I.1:J.0:.I.X.1..| 00001650: 35 31 30 30 00 63 1F 44 4F 8B 50 54 A7 89 32 30 |5100.c.DO.PT..20| 00001660: 35 32 30 00 6E 1E 46 4F 89 32 30 31 37 30 00 7E |520.n.FO.20170.~| 00001670: 1E 4C 4F 98 34 3A A0 34 3A 89 35 31 30 30 00 9D |.LO.4:.4:.5100..| 00001680: 1E E1 4F 8F 2A 2A 46 52 4F 4D 20 50 52 49 4E 54 |..O.**FROM PRINT| 00001690: 49 4E 47 20 4F 50 54 49 4F 4E 20 32 2E 00 B7 1E |ING OPTION 2....| 000016A0: 14 50 85 22 93 11 11 D3 45 41 52 43 48 20 57 4F |.P."....EARCH WO| 000016B0: 52 44 22 3B 53 45 24 00 EA 1E 16 50 99 22 11 11 |RD";SE$....P."..| 000016C0: 11 1D 1D 1D 1D 9E D0 4C 45 41 53 45 20 57 41 49 |.......LEASE WAI| 000016D0: 54 20 41 20 4D 49 4E 55 54 45 2E 05 22 3A 8B 50 |T A MINUTE..":.P| 000016E0: 54 B2 31 A7 89 32 30 35 32 30 00 F2 1E 1E 50 49 |T.1..20520....PI| 000016F0: B2 30 00 FD 1E 28 50 81 4A B2 30 A4 38 00 0E 1F |.0...(P.J.0.8...| 00001700: 32 50 41 B2 C3 28 41 24 28 49 2C 4A 29 29 00 1C |2PA..(A$(I,J))..| 00001710: 1F 3C 50 81 53 45 B2 31 A4 41 AB 33 00 4A 1F 46 |.<P.SE.1.A.3.J.F| 00001720: 50 8B C8 28 53 45 24 2C 34 29 B2 CA 28 41 24 28 |P..(SE$,4)..(A$(| 00001730: 49 2C 4A 29 2C 53 45 2C 34 29 A7 50 54 B2 31 3A |I,J),SE,4).PT.1:| 00001740: 4A B2 30 3A 89 32 30 31 37 30 00 55 1F 50 50 82 |J.0:.20170.U.PP.| 00001750: 53 45 3A 82 4A 00 5F 1F 5A 50 49 B2 49 AA 31 00 |SE:.J._.ZPI.I.1.| 00001760: 71 1F 64 50 8B 49 B2 58 AA 31 A7 89 32 30 36 30 |q.dP.I.X.1..2060| 00001770: 30 00 7C 1F 6E 50 89 32 30 35 32 30 00 97 1F 78 |0.|.nP.20520...x| 00001780: 50 99 22 11 11 D3 45 41 52 43 48 20 43 4F 4D 50 |P."...EARCH COMP| 00001790: 4C 45 54 45 44 2E 22 00 BC 1F 82 50 99 22 12 D0 |LETED."....P."..| 000017A0: 52 45 53 53 20 C6 31 20 54 4F 20 52 45 54 55 52 |RESS .1 TO RETUR| 000017B0: 4E 20 54 4F 20 4D 45 4E 55 2E 92 22 00 D5 1F 8C |N TO MENU.."....| 000017C0: 50 A1 41 4E 24 3A 8B 41 4E 24 B3 B1 22 85 22 A7 |P.AN$:.AN$..".".| 000017D0: 32 30 36 32 30 00 E0 1F 96 50 89 32 30 30 31 30 |20620....P.20010| 000017E0: 00 FA 1F D7 59 8F 2A 2A 46 52 4F 4D 20 4D 45 4E |....Y.**FROM MEN| 000017F0: 55 20 4F 50 54 49 4F 4E 20 38 00 29 20 D8 59 99 |U OPTION 8.) .Y.| 00001800: C7 28 31 34 32 29 22 93 11 11 11 11 4C 4F 41 44 |.(142)".....LOAD| 00001810: 22 C7 28 33 34 29 22 4D 45 4E 55 22 C7 28 33 34 |".(34)"MENU".(34| 00001820: 29 22 2C 38 11 11 11 11 22 00 41 20 E2 59 99 22 |)",8....".A .Y."| 00001830: 52 55 4E 22 3A 99 22 91 91 91 91 91 91 91 91 91 |RUN":.".........| 00001840: 22 00 5E 20 EC 59 97 36 33 31 2C 31 33 3A 97 36 |".^ .Y.631,13:.6| 00001850: 33 32 2C 31 33 3A 97 31 39 38 2C 32 3A 80 00 6F |32,13:.198,2:..o| 00001860: 20 2F 75 8F 2A 2A 46 52 4F 4D 20 35 30 30 30 00 | /u.**FROM 5000.| 00001870: 97 20 30 75 52 56 B2 31 3A 99 22 93 22 3B A3 31 |. 0uRV.1:.".";.1| 00001880: 32 29 22 11 11 D2 C5 D6 C9 C5 D7 C9 CE C7 A0 CF |2)".............| 00001890: D0 D4 C9 CF CE D3 22 00 B4 20 3A 75 99 A3 31 32 |......".. :u..12| 000018A0: 29 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |)"..............| 000018B0: B7 B7 B7 22 00 CF 20 44 75 99 A3 36 29 22 11 11 |...".. Du..6)"..| 000018C0: 31 2E 20 D2 45 56 49 45 57 20 41 4C 4C 2E 22 00 |1. .EVIEW ALL.".| 000018D0: F2 20 4E 75 99 A3 36 29 22 11 11 11 32 2E 20 D3 |. Nu..6)"...2. .| 000018E0: 45 41 52 43 48 20 41 4E 44 20 52 45 56 49 45 57 |EARCH AND REVIEW| 000018F0: 2E 22 00 17 21 58 75 99 A3 36 29 22 11 11 11 33 |."..!Xu..6)"...3| 00001900: 2E 20 D2 45 54 55 52 4E 20 54 4F 20 4D 41 49 4E |. .ETURN TO MAIN| 00001910: 20 4D 45 4E 55 2E 22 00 49 21 62 75 99 A3 36 29 | MENU.".I!bu..6)| 00001920: 22 11 11 11 11 11 11 11 11 11 12 C3 C8 CF CF D3 |"...............| 00001930: C5 A0 C2 D9 A0 D0 D2 C5 D3 D3 C9 CE C7 A0 C1 A0 |................| 00001940: CE D5 CD C2 C5 D2 92 22 3B 00 60 21 6C 75 A1 41 |.......";.`!lu.A| 00001950: 4E 24 3A 8B 41 4E 24 B2 22 22 A7 33 30 30 36 30 |N$:.AN$."".30060| 00001960: 00 7C 21 76 75 8B 41 4E 24 B3 22 31 22 B0 41 4E |.|!vu.AN$."1".AN| 00001970: 24 B1 22 33 22 A7 89 33 30 30 36 30 00 89 21 80 |$."3"..30060..!.| 00001980: 75 4D B2 C5 28 41 4E 24 29 00 9F 21 8A 75 91 4D |uM..(AN$)..!.u.M| 00001990: 89 35 30 30 32 2C 31 34 35 30 30 2C 32 30 30 00 |.5002,14500,200.| 000019A0: E2 21 50 C3 83 22 CC 41 53 54 20 4E 41 4D 45 3A |.!P..".AST NAME:| 000019B0: 22 2C 22 CF 54 48 45 52 53 3A 22 2C 22 D3 54 52 |",".THERS:",".TR| 000019C0: 45 45 54 3A 22 2C 22 C3 49 54 59 3A 22 2C 22 D3 |EET:",".ITY:",".| 000019D0: 54 41 54 45 3A 22 2C 22 D0 4F 53 54 43 4F 44 45 |TATE:",".OSTCODE| 000019E0: 3A 22 00 07 22 5A C3 83 22 C3 4F 55 4E 54 52 59 |:".."Z..".OUNTRY| 000019F0: 3A 22 2C 22 D0 48 4F 4E 45 3A 22 2C 22 C3 4F 4D |:",".HONE:",".OM| 00001A00: 4D 45 4E 54 53 3A 22 00 00 00 |MENTS:"... |
.......H$(8),A$(100,8).6....G(147);:.532
80,15:.53281,9.N....G(142)".VVVVVVVVVVVV
VVVVVVVVVVVVVVVVVVVVVVVVVVVV";.Z....T.1.
23...(.."V
V";...2..T...<.."VVVVVVVVVVVVVVV
VVVVVVVVVVVVVVVVVVVVVVVV";...F..2023,86:
.56295,7...P.."..........":..14)"ADDRESS
BOOK".7.Z...14)".............".H.D..T.1
.3000:.T.B.W..**READ DATA HEADINGS.W.X..
T.0.8:.H$(T):.T...G..**MAIN MENU...H..53
280,6:.53281,11:.G(14)"....";.K.R...11)"
MENU OF ACTIVITIES".......11)"..........
........".......3)"..1. LOAD THE INFORMA
TION FROM DISK.".?....:..3)"2. REVIEW TH
E INFORMATION."._....:..3)"3. ADD A NEW
ENTRY."......:..3)"4. CHANGE SOME INFORM
ATION."......:..3)"5. DELETE AN ENTRY.".
T....:..3)"6. SAVE THE INFORMATION ON DI
SK."..."..:..3)"7. PRINTING MENU.".!.,..
:..3)"8. MENU OF OTHER PROGRAMS ON DISK.
".P.0.."..........CHOOSE BY PRESSING A N
UMBER.";.E.6..AN$:.AN$."".310..@..AN$."
1".AN$."8"..350...J.M.E(AN$)...T..M.2000
,5000,8000,11000,14000,17000,20000,23000
...]..**IF WRONG MENU INPUT...^..T.1.10.
..H..".......NUMBER";:.Y.1.150:.Y:."....
....NUMBER..";...R..Y.1.150:.Y.5.|..T.>.
...310.X.O..**FROM MENU OPTION 1.E.P..53
280,7...Z.."..........":..17)"LOADING"..
...I.0:J.0......2,8,2,"0:NAMEFILE,S,R"..
....2,A$(I,J).N....ST..0..2100.X. .J.J.1
...$..J.8.J.0:I.I.1...*..2060...4. 2....
.X.I:Z1.1:.200.(....**FROM MENU OPTION 2
.3....30000.@....".":I.0.K....J.0.8.B...
.J.0..G(147)"....".R.....2)A$(I,J).....
J.6..... ..J.7........J......I.X..5100..
.....14)"..ANOTHER ENTRY? (Y/N)".V....AN
$:.AN$."".5050...D..AN$."Y".AN$."Y".I.I.
1:.5010...N..200.3...."....LAST ENTRY. P
RESS F1 TO RETURN TO MENU";.K....AN$:.AN
$..".".5110.T....200.N.?..**FROM MENU OP
TION 3...@..G(147):.53280,5. .J..:..13)"
ADDING A RECORD"...T...13)".............
..":..X.^..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.."......";.H.|..".........
.....*...";A$(I,J):.8500.M.....11)"..ANO
THER RECORD? (Y/N).";......AN$:.AN$."".8
080......AN$."N".AN$."N".X.I:.200.....I.
I.1:J.0:Z.1:.8000.X.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.4.F!.8060.N..*.**FROM MENU OP
TION 4.[..*.53280,7.|..+."...";.12)".CHA
NGE OPTIONS"....+..12)"...............".
...+..8)"..1. REVIEW AND CHANGE."... +..
8)"...2. SEARCH AND CHANGE."...*+..8)"..
.3. RETURN TO MAIN MENU.".3.4+..6)".....
.....CHOOSE BY PRESSING A NUMBER.";.J.>+
.AN$:.AN$."".11070.F.H+.AN$."1".AN$."3".
.11110.S.R+M.E(AN$)...\+.M.11160,11500,2
00...E+.**IF WRONG MENU INPUT...F+.T.1.1
0...P+.".......NUMBER";:.Y.1.150:.Y:."..
.....NUMBER.";...Z+.Y.1.150:.Y....+.T...
.+.11070.+..+.**FROM CHANGING MENU OPTIO
N 1.=..+.".":I.0:CS.0.H..+.J.0.8._..+.J.
0..G(147)"....".Y..+..6)".";J;".";A$(I,J
)....+.J.6.....J+.J.7.....T+.J....+..8)"
....CHANGE.. THIS ENTRY? (Y/N)".V..+.AN$
:.AN$."".11240....+.AN$."Y".AN$."Y"..113
10....+.I.X..5100."..,..14)".ANOTHER ENT
RY? (Y/N)".9..,.AN$:.AN$."".11280.[..,.A
N$."Y".AN$."Y".I.I.1:.11302.D.$,.200.U.&
,.CS.1..14500...(,.11170....,."...ENTER
.NUMBER. OF LINE TO BE CHANGED.".G.8,.AN
$:.AN$."".11320...B,.AN$."0".AN$."8"..".
":.11310...L,J.E(AN$):.G(19);. .V,DN$.".
.......................".<.`,.J.7..H(DN$
,13);:.11390.X.J,.J.8..H(DN$,15);:.11390
.I.T,.H(DN$,J.5);...~,..9)"
"....,."........";A$(I,J)...
.,.G(19);H(DN$,18);.2);" CHANGE ANO
THER LINE? (Y/N) "....,.AN$:.AN$."".1
1420....,.AN$."Y".AN$."Y"..11310.#..,.11
270.F..,.**FROM CHANGING MENU OPTION 2.O
..,CS.1.Z..,.14500.T..6.**FROM MENU OPTI
ON 5....6.53280,2:DS.0....6."...";.12)".
DELETING OPTIONS".F.D6..12)"............
....."...N6..8)"..1. REVIEW AND DELETE."
...X6..8)"...2. SEARCH AND DELETE.".0..6
..8)"...3. RETURN TO MAIN MENU.".B..6..6
)"..........CHOOSE BY PRESSING A NUMBER.
";.Y..6.AN$:.AN$."".14070....7.AN$."1".A
N$."3"..14110....7M.E(AN$)....7.M.14160,
14500,200.T..7.**IF WRONG MENU INPUT....
7.T.1.10...(7.".......NUMBER";:.Y.1.150:
.Y:.".......NUMBER.";.%.27.Y.1.150:.Y.,.
<7.T.7.F7.14070.[.O7.**FROM DELETING MEN
U OPTION 1..H.P7.".":I.0.S.Z7.J.0.8...D7
.J.0..G(147)"...."...N7..7)A$(I,J)...X7.
J.6......7.J.7......7.J....7..8)"....DEL
ETE.. THIS ENTRY? (Y/N)"... 7.AN$:.AN$."
".14240....7.AN$."Y".AN$."Y"..14310."..7
.I.X..5100.C..7..14)".ANOTHER ENTRY? (Y/
N)".Z.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.C..7.I.
DE.X:.J.0.8.Y..7A$(I,J).A$(I.1,J)....8.J
:.I....8..8)"..DELETED. AS REQUESTED.
."....8.14260.A.Q8.**FROM DELETI
NG 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.D
E.1.A.3.T.V8.H(DE$,4).J(A$(I,J),DE,4)..1
4640....8.DE:.J....8I.I.1....8.I.X.1..14
600....8.14520.!..9."..SEARCH COMPLETED.
".F..9.".PRESS F1 TO RETURN TO MENU.."._
..9.AN$:.AN$..".".14620.P..9.CS.1..11010
... 9.RV.1..30000...&9.14010...09DS.1...
29.CS.1..11170...49.14170.K.GB.**FROM ME
NU OPTION 6.Y.HB.53280,10...RB."........
..":..9)"SAVING NEW RECORDS".!..B.2,8,2,
"@0:NAMEFILE,S,W".-..BI.0:J.0.<..B.2,A$(
I,J).F..BJ.J.1.Y.BB.J.8.J.0:I.I.1.K.FB.I
.X.1..17110.V.LB.17070.}.VB 2....B.200.
..N.**FROM MENU OPTION 7... N.53280,4.P.
*N."....";.12)"PRINTING OPTIONS"...4N..1
2)"................"...>N..6)"..1. PRINT
ALL ENTRIES."./.HN..6)"..2. SEARCH AND
PRINT.".S.RN..6)"..3. RETURN TO MAIN MEN
U."...\N..7)"...........CHOOSE BY PRESSI
NG A NUMBER.";...FN.AN$:.AN$."".20070...
PN.AN$."1".AN$."3"..20110.F.ZNM.E(AN$)..
..N.M.20160,20500,200....N.**IF WRONG ME
NU INPUT....N.T.1.10.9..N.".......NUMBER
";:.Y.1.150:.Y:.".......NUMBER.";.I..N.Y
.1.150:.Y.P..N.T.[..N.20070.G..NI.0:J.0.
U.JN.4,4,7:.4....N." ";A$(I,J)...
.N.J.6......N.J.7......N.J.8..:.:.....OJ
.J.1.M..O.J..8..20190.W.$O.4: 4....O."."
;.9);"...........ANOTHER ENTRY? (Y/N)"..
.8O.AN$:.AN$."".20280.9.BO.AN$."N".AN$."
N"..20000.T.COI.I.1:J.0:.I.X.1..5100.C.D
O.PT..20520.N.FO.20170.~.LO.4: 4:.5100..
..O.**FROM PRINTING OPTION 2.....P."...S
EARCH WORD";SE$....P."........PLEASE WAI
T A MINUTE..":.PT.1..20520....PI.0...(P.
J.0.8...2PA.C(A$(I,J))...<P.SE.1.A.3.J.F
P.H(SE$,4).J(A$(I,J),SE,4).PT.1:J.0:.201
70.U.PP.SE:.J._.ZPI.I.1.Q.DP.I.X.1..2060
0.|.NP.20520...XP."..SEARCH COMPLETED.".
...P.".PRESS F1 TO RETURN TO MENU..".U..
P.AN$:.AN$..".".20620....P.20010...WY.**
FROM MENU OPTION 8.) XY.G(142)".....LOAD
"G(34)"MENU"G(34)",8....".A .Y."RUN":.".
........".^ .Y.631,13:.632,13:.198,2:..O
/U.**FROM 5000.. 0URV.1:.".";.12)"..REV
IEWING OPTIONS".. :U..12)"..............
...".O DU..6)"..1. REVIEW ALL.".. NU..6)
"...2. SEARCH AND REVIEW."..!XU..6)"...3
. RETURN TO MAIN MENU.".I!BU..6)".......
...CHOOSE BY PRESSING A NUMBER.";.`!LU.A
N$:.AN$."".30060.|!VU.AN$."1".AN$."3"..3
0060..!.UM.E(AN$)..!.U.M.5002,14500,200.
.!PC."LAST NAME:","OTHERS:","STREET:","C
ITY:","STATE:","POSTCODE:".."ZC."COUNTRY
:","PHONE:","COMMENTS:"...
> CLICK IMAGE PREVIEW FOR FULL MODAL