ADDRESS MANAGER
FILE INFORMATION
FILENAME(S): ADDRESS MANAGER
FILE TYPE(S): PRG
FILE SIZE: 10.1K
FIRST SEEN: 2025-11-30 15:51:57
APPEARS ON: 1 disk(s)
FILE HASH
f44512f5932261a9a5bf912035d66a24a63b5ce97b2aa4880a5647e3a40df5c0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ACOM | ADDRESS MANAGER | PRG | Belgium | 2 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 40 08 0A 00 8F 20 2A 41 44 44 52 45 53 53 |..@.... *ADDRESS|
00000010: 20 4D 41 4E 41 47 45 52 2A 20 42 59 20 42 45 52 | MANAGER* BY BER|
00000020: 4E 41 52 44 20 48 41 42 45 54 20 28 43 29 20 31 |NARD HABET (C) 1|
00000030: 39 38 33 20 20 41 42 52 41 53 43 4F 20 4C 54 44 |983 ABRASCO LTD|
00000040: 00 93 08 50 00 43 4F 24 B2 22 1D 1D 1D 1D 1D 1D |...P.CO$."......|
00000050: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000060: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000070: 1D 1D 22 3A 4C 4E 24 B2 22 11 11 11 11 11 11 11 |..":LN$.".......|
00000080: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000090: 11 11 22 00 C8 08 55 00 99 22 93 22 3A 97 35 33 |.."...U..".":.53|
000000A0: 32 38 30 2C 36 3A 97 35 33 32 37 32 2C 32 33 3A |280,6:.53272,23:|
000000B0: 99 C7 28 38 29 3A 97 35 34 32 39 36 2C 31 35 3A |..(8):.54296,15:|
000000C0: 97 35 34 32 37 37 2C 30 00 FE 08 8C 00 97 35 34 |.54277,0......54|
000000D0: 32 37 38 2C 32 34 30 3A 86 4E 24 28 35 30 2C 31 |278,240:.N$(50,1|
000000E0: 30 29 2C 53 24 28 35 30 2C 31 30 29 2C 41 24 28 |0),S$(50,10),A$(|
000000F0: 31 30 29 2C 43 28 31 30 29 3A 89 32 34 30 00 12 |10),C(10):.240..|
00000100: 09 96 00 8D 39 30 30 30 3A 8B 50 36 B2 32 A7 32 |....9000:.P6.2.2|
00000110: 34 30 00 5F 09 9B 00 99 22 93 D0 4C 45 41 53 45 |40._...."..LEASE|
00000120: 20 45 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 46 | ENTER NAME OF F|
00000130: 49 4C 45 20 54 4F 20 42 45 20 4C 4F 41 44 45 44 |ILE TO BE LOADED|
00000140: 22 3A 99 22 11 28 CD 41 58 20 12 31 36 92 20 4C |":.".(.AX .16. L|
00000150: 45 54 54 45 52 53 29 20 22 3B 3A 50 34 B2 31 00 |ETTERS) ";:P4.1.|
00000160: 80 09 A0 00 50 33 B2 31 36 3A 8D 33 30 30 30 30 |....P3.16:.30000|
00000170: 3A 8D 35 35 30 30 3A 8B 50 36 B2 32 A7 31 35 35 |:.5500:.P6.2.155|
00000180: 00 CB 09 A5 00 99 22 11 11 D0 4C 45 41 53 45 20 |......"...LEASE |
00000190: 4C 4F 41 44 20 59 4F 55 52 20 44 41 54 41 20 44 |LOAD YOUR DATA D|
000001A0: 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 22 3A |ISK IN DRIVE 0":|
000001B0: 99 22 11 12 C8 49 54 20 41 4E 59 20 4B 45 59 22 |."...IT ANY KEY"|
000001C0: 3A 8D 31 30 30 30 30 3A 49 B2 30 00 11 0A AA 00 |:.10000:I.0.....|
000001D0: 99 22 11 11 D0 4C 45 41 53 45 20 48 4F 4C 44 20 |."...LEASE HOLD |
000001E0: 57 48 49 4C 45 20 4C 4F 41 44 49 4E 47 20 44 41 |WHILE LOADING DA|
000001F0: 54 41 22 3A 9F 31 2C 38 2C 32 2C 50 24 3A 8D 39 |TA":.1,8,2,P$:.9|
00000200: 35 30 30 3A 8B 50 36 B2 31 A7 A0 31 3A 89 32 34 |500:.P6.1..1:.24|
00000210: 30 00 1E 0A B4 00 81 20 4A B2 30 A4 35 30 00 51 |0...... J.0.50.Q|
00000220: 0A C8 00 84 31 2C 4E 24 28 4A 2C 49 29 3A 8B 4E |....1,N$(J,I):.N|
00000230: 24 28 4A 2C 49 29 B2 22 5E 22 A7 4E 24 28 4A 2C |$(J,I)."^".N$(J,|
00000240: 49 29 B2 22 22 3A 43 28 49 29 B2 4A 3A 89 32 33 |I)."":C(I).J:.23|
00000250: 30 00 72 0A D2 00 84 31 2C 53 24 28 4A 2C 49 29 |0.r....1,S$(J,I)|
00000260: 3A 8B 53 24 28 4A 2C 49 29 B3 B1 22 2A 22 A7 32 |:.S$(J,I).."*".2|
00000270: 32 30 00 97 0A D4 00 A1 23 31 2C 41 24 3A 8B 41 |20......#1,A$:.A|
00000280: 24 B2 C7 28 31 33 29 A7 53 24 28 4A 2C 49 29 B2 |$..(13).S$(J,I).|
00000290: 42 24 3A 89 32 32 30 00 A9 0A D6 00 42 24 B2 42 |B$:.220.....B$.B|
000002A0: 24 AA 41 24 3A 89 32 31 32 00 B1 0A DC 00 82 20 |$.A$:.212...... |
000002B0: 4A 00 C6 0A E6 00 49 B2 49 AA 31 3A 8B 49 B3 B2 |J.....I.I.1:.I..|
000002C0: 31 30 A7 31 38 30 00 D8 0A EB 00 A0 31 3A A0 31 |10.180......1:.1|
000002D0: 35 3A 8D 32 30 30 30 30 00 1D 0B F0 00 99 22 93 |5:.20000......".|
000002E0: 22 3B 3A 8D 33 35 35 30 30 3A 99 22 12 81 20 20 |";:.35500:.".. |
000002F0: 20 20 C1 A0 C4 A0 C4 A0 D2 A0 C5 A0 D3 A0 D3 A0 | ..............|
00000300: A0 A0 CD A0 C1 A0 CE A0 C1 A0 C7 A0 C5 A0 D2 20 |............... |
00000310: 20 20 20 92 9A 22 3A 8D 33 35 35 30 30 00 4D 0B | ..":.35500.M.|
00000320: FA 00 99 22 11 11 1D 1D 1D 12 81 20 D0 52 45 53 |..."....... .RES|
00000330: 53 20 92 9A 20 43 4F 52 52 45 53 50 4F 4E 44 49 |S .. CORRESPONDI|
00000340: 4E 47 20 4E 55 4D 42 45 52 20 54 4F 22 00 97 0B |NG NUMBER TO"...|
00000350: 0E 01 99 22 1D 1D 1D 41 43 43 45 53 53 20 54 48 |..."...ACCESS TH|
00000360: 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 46 41 43 49 |E FOLLOWING FACI|
00000370: 4C 49 54 49 45 53 22 3A 99 A3 35 29 22 11 11 81 |LITIES":..5)"...|
00000380: 12 20 31 20 92 9A 20 20 C1 44 44 20 41 4E 20 41 |. 1 .. .DD AN A|
00000390: 44 44 52 45 53 53 22 00 E3 0B 2C 01 99 A3 35 29 |DDRESS"...,...5)|
000003A0: 22 11 81 12 20 32 20 92 9A 20 20 C3 48 41 4E 47 |"... 2 .. .HANG|
000003B0: 45 20 41 4E 20 41 44 44 52 45 53 53 22 3A 99 A3 |E AN ADDRESS":..|
000003C0: 35 29 22 11 81 12 20 33 20 92 9A 20 20 D3 45 41 |5)"... 3 .. .EA|
000003D0: 52 43 48 20 46 4F 52 20 41 4E 20 41 44 44 52 45 |RCH FOR AN ADDRE|
000003E0: 53 53 22 00 32 0C 40 01 99 A3 35 29 22 11 81 12 |SS".2.@...5)"...|
000003F0: 20 34 20 92 9A 20 20 CE 41 4D 45 20 44 49 53 50 | 4 .. .AME DISP|
00000400: 4C 41 59 20 42 59 20 4C 45 54 54 45 52 22 3A 99 |LAY BY LETTER":.|
00000410: A3 35 29 22 11 81 12 20 35 20 92 9A 20 20 CC 4F |.5)"... 5 .. .O|
00000420: 41 44 20 44 41 54 41 20 46 52 4F 4D 20 44 49 53 |AD DATA FROM DIS|
00000430: 4B 22 00 78 0C 59 01 99 A3 35 29 22 11 81 12 20 |K".x.Y...5)"... |
00000440: 36 20 92 9A 20 20 D0 52 49 4E 54 20 41 44 44 52 |6 .. .RINT ADDR|
00000450: 45 53 53 45 53 22 3A 99 A3 35 29 22 11 12 81 20 |ESSES":..5)"... |
00000460: 37 20 92 9A 20 20 C3 48 45 43 4B 20 46 52 45 45 |7 .. .HECK FREE|
00000470: 20 4D 45 4D 4F 52 59 22 00 A3 0C 5B 01 99 22 11 | MEMORY"...[..".|
00000480: 1D 1D 1D 1D 1D 81 12 20 38 20 92 9A 20 20 D3 41 |....... 8 .. .A|
00000490: 56 45 20 44 41 54 41 20 2F 20 D3 49 47 4E 2D 4F |VE DATA / .IGN-O|
000004A0: 46 46 22 00 C5 0C 5C 01 49 45 B2 30 3A 4E 53 B2 |FF"...\.IE.0:NS.|
000004B0: 30 3A 46 37 B2 30 3A 46 36 B2 30 3A 46 35 B2 30 |0:F7.0:F6.0:F5.0|
000004C0: 3A 46 34 B2 30 00 02 0D 5E 01 8D 31 30 30 30 30 |:F4.0...^..10000|
000004D0: 3A 91 C5 28 41 24 29 89 35 31 35 2C 31 32 30 30 |:..(A$).515,1200|
000004E0: 2C 32 30 30 30 2C 32 31 30 30 2C 31 35 30 2C 32 |,2000,2100,150,2|
000004F0: 35 30 30 2C 34 35 30 30 2C 31 30 30 30 3A 89 33 |500,4500,1000:.3|
00000500: 35 30 00 16 0D 03 02 8D 39 30 30 30 3A 8B 50 36 |50......9000:.P6|
00000510: B2 32 A7 32 34 30 00 35 0D 04 02 99 22 93 22 3B |.2.240.5....".";|
00000520: 3A 8B B8 28 30 29 B3 35 30 30 A7 8D 35 30 30 30 |:..(0).500..5000|
00000530: 3A 89 32 34 30 00 51 0D 05 02 81 4E B2 30 A4 31 |:.240.Q....N.0.1|
00000540: 30 3A 41 24 28 4E 29 B2 22 22 3A 82 3A 49 45 B2 |0:A$(N)."":.:IE.|
00000550: 30 00 81 0D 08 02 99 22 93 D0 4C 45 41 53 45 20 |0......"..LEASE |
00000560: 45 4E 54 45 52 20 54 48 45 20 46 4F 4C 4C 4F 57 |ENTER THE FOLLOW|
00000570: 49 4E 47 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 3A |ING INFORMATION:|
00000580: 22 00 B4 0D 09 02 8B 49 45 B2 31 A7 99 22 C8 49 |"......IE.1..".I|
00000590: 54 20 12 20 43 55 52 53 4F 52 20 44 4F 57 4E 20 |T . CURSOR DOWN |
000005A0: 92 20 54 4F 20 53 4B 49 50 20 4C 49 4E 45 22 3A |. TO SKIP LINE":|
000005B0: 89 35 32 33 00 BA 0D 0A 02 99 00 EC 0D 0B 02 99 |.523............|
000005C0: 22 C8 49 54 20 12 20 4E 20 92 20 49 46 20 49 4E |".IT . N . IF IN|
000005D0: 46 4F 52 4D 41 54 49 4F 4E 20 49 53 20 12 4E 4F |FORMATION IS .NO|
000005E0: 54 20 41 56 41 49 4C 41 42 4C 45 22 00 2E 0E 0D |T AVAILABLE"....|
000005F0: 02 99 22 C8 49 54 20 12 20 5F 20 92 20 4F 4E 43 |..".IT . _ . ONC|
00000600: 45 20 46 49 4E 49 53 48 45 44 20 45 4E 54 45 52 |E FINISHED ENTER|
00000610: 49 4E 47 20 41 20 20 50 41 52 41 2D 22 3A 99 22 |ING A PARA-":."|
00000620: 20 20 20 20 20 20 20 20 47 52 41 50 48 22 00 5D | GRAPH".]|
00000630: 0E 0F 02 99 22 11 D3 D5 D2 CE C1 CD C5 20 20 3A |...."........ :|
00000640: 20 20 22 3B 3A 4E B2 30 3A 4E 55 B2 31 39 3A 99 | ";:N.0:NU.19:.|
00000650: 41 24 28 30 29 3B 3A 8D 33 35 30 30 30 00 85 0E |A$(0);:.35000...|
00000660: 12 02 99 22 CE C1 CD C5 20 20 20 20 20 3A 20 20 |...".... : |
00000670: 22 3B 3A 4E B2 31 3A 99 41 24 28 31 29 3B 3A 8D |";:N.1:.A$(1);:.|
00000680: 33 35 30 30 30 00 C5 0E 16 02 99 22 11 11 C1 C4 |35000......"....|
00000690: C4 D2 C5 D3 D3 20 20 3A 20 20 22 3B 3A 8B 41 24 |..... : ";:.A$|
000006A0: 28 32 29 B2 22 4E 22 A7 99 22 CE 4F 54 20 C1 56 |(2)."N"..".OT .V|
000006B0: 41 49 4C 41 42 4C 45 22 3B 3A 8D 33 34 30 30 30 |AILABLE";:.34000|
000006C0: 3A 89 35 33 37 00 E2 0E 17 02 4E B2 32 3A 4E 55 |:.537.....N.2:NU|
000006D0: B2 32 37 3A 99 41 24 28 32 29 3B 3A 8D 33 35 30 |.27:.A$(2);:.350|
000006E0: 30 30 00 08 0F 19 02 4E 55 B2 32 37 3A 81 4E B2 |00.....NU.27:.N.|
000006F0: 33 A4 38 3A 99 A3 31 32 29 41 24 28 4E 29 3B 3A |3.8:..12)A$(N);:|
00000700: 8D 33 35 30 30 30 3A 82 00 48 0F 1C 02 99 22 11 |.35000:..H....".|
00000710: 11 D4 C5 CC C5 D0 C8 CF CE C5 3A 20 20 22 3B 3A |..........: ";:|
00000720: 8B 41 24 28 39 29 B2 22 4E 22 A7 99 22 CE 4F 54 |.A$(9)."N"..".OT|
00000730: 20 C1 56 41 49 4C 41 42 4C 45 22 3B 3A 8D 33 34 | .VAILABLE";:.34|
00000740: 30 30 30 3A 89 35 34 33 00 5F 0F 1D 02 4E B2 39 |000:.543._...N.9|
00000750: 3A 99 41 24 28 39 29 3B 3A 8D 33 35 30 30 30 00 |:.A$(9);:.35000.|
00000760: 7C 0F 1F 02 4E B2 31 30 3A 99 A3 31 32 29 41 24 ||...N.10:..12)A$|
00000770: 28 31 30 29 3B 3A 8D 33 35 30 30 30 00 91 0F 23 |(10);:.35000...#|
00000780: 02 8B 49 45 B2 31 A7 43 4F B2 31 32 3A 89 35 35 |..IE.1.CO.12:.55|
00000790: 37 00 C9 0F 26 02 43 4F B2 31 32 3A 4C 4E B2 37 |7...&.CO.12:LN.7|
000007A0: 3A 8D 32 39 38 30 30 3A 50 33 B2 31 39 3A 50 34 |:.29800:P3.19:P4|
000007B0: B2 33 3A 8D 33 30 30 30 30 3A 8D 33 30 33 33 30 |.3:.30000:.30330|
000007C0: 3A 41 24 28 30 29 B2 50 24 00 F6 0F 27 02 41 B2 |:A$(0).P$...'.A.|
000007D0: C6 28 41 24 28 30 29 AA C7 28 30 29 29 3A 8B 41 |.(A$(0)..(0)):.A|
000007E0: B3 31 39 33 B0 41 B1 32 31 38 A7 99 22 91 91 91 |.193.A.218.."...|
000007F0: 22 3A 89 35 35 30 00 2D 10 28 02 99 A3 31 31 29 |":.550.-.(...11)|
00000800: 3B 3A 50 34 B2 31 3A 8D 33 30 30 30 30 3A 8D 33 |;:P4.1:.30000:.3|
00000810: 30 33 33 30 3A 41 24 28 31 29 B2 50 24 3A 41 B2 |0330:A$(1).P$:A.|
00000820: C6 28 41 24 28 31 29 AA C7 28 30 29 29 00 49 10 |.(A$(1)..(0)).I.|
00000830: 2B 02 8B 41 B3 31 39 33 B0 41 B1 32 31 38 A7 99 |+..A.193.A.218..|
00000840: 22 91 91 22 3A 89 35 35 32 00 65 10 2C 02 41 24 |"..":.552.e.,.A$|
00000850: 28 31 29 B2 41 24 28 30 29 AA C7 28 33 32 29 AA |(1).A$(0)..(32).|
00000860: 41 24 28 31 29 00 95 10 2D 02 4C 4E B2 31 31 3A |A$(1)...-.LN.11:|
00000870: 8D 32 39 38 30 30 3A 50 33 B2 32 37 3A 50 34 B2 |.29800:P3.27:P4.|
00000880: 31 3A 8D 32 39 39 30 30 3A 8B 50 24 B3 B1 22 4E |1:.29900:.P$.."N|
00000890: 22 A7 35 36 30 00 DE 10 2F 02 41 24 28 32 29 B2 |".560.../.A$(2).|
000008A0: 22 4E 22 3A 99 A3 31 32 29 22 91 CE 4F 54 20 C1 |"N":..12)"..OT .|
000008B0: 56 41 49 4C 41 42 4C 45 22 3A 81 4E B2 33 A4 38 |VAILABLE":.N.3.8|
000008C0: 3A 41 24 28 4E 29 B2 22 22 3A 99 A3 31 32 29 3B |:A$(N)."":..12);|
000008D0: 3A 8D 33 35 30 30 30 3A 82 3A 89 35 36 37 00 F1 |:.35000:.:.567..|
000008E0: 10 30 02 8B 50 24 B2 22 11 22 A7 99 3A 89 35 36 |.0..P$."."..:.56|
000008F0: 33 00 08 11 31 02 41 24 28 32 29 B2 50 24 3A 8B |3...1.A$(2).P$:.|
00000900: 50 36 B2 31 A7 35 36 37 00 3B 11 33 02 50 34 B2 |P6.1.567.;.3.P4.|
00000910: 30 3A 81 4E B2 33 A4 38 3A 99 A3 31 31 29 3B 3A |0:.N.3.8:..11);:|
00000920: 8D 32 39 39 30 30 3A 8B 50 24 B2 22 11 22 AF 41 |.29900:.P$.".".A|
00000930: 24 28 4E 29 B2 22 22 A7 35 36 37 00 58 11 34 02 |$(N)."".567.X.4.|
00000940: 8B 50 24 B2 22 11 22 AF 41 24 28 4E 29 B3 B1 22 |.P$.".".A$(N).."|
00000950: 22 A7 99 3A 89 35 36 36 00 6F 11 35 02 41 24 28 |"..:.566.o.5.A$(|
00000960: 4E 29 B2 50 24 3A 8B 50 36 B2 31 A7 35 36 37 00 |N).P$:.P6.1.567.|
00000970: 76 11 36 02 82 4E 00 96 11 37 02 4E B2 32 3A 4D |v.6..N...7.N.2:M|
00000980: B2 38 3A 8D 32 38 30 30 30 3A 8D 33 30 33 34 30 |.8:.28000:.30340|
00000990: 3A 53 24 B2 50 24 00 C0 11 3A 02 4C 4E B2 32 30 |:S$.P$...:.LN.20|
000009A0: 3A 8D 32 39 38 30 30 3A 50 34 B2 31 3A 8D 32 39 |:.29800:P4.1:.29|
000009B0: 39 30 30 3A 8B 50 24 B3 B1 22 4E 22 A7 35 37 34 |900:.P$.."N".574|
000009C0: 00 01 12 3C 02 41 24 28 39 29 B2 22 4E 22 3A 99 |...<.A$(9)."N":.|
000009D0: A3 31 32 29 22 91 CE 4F 54 20 C1 56 41 49 4C 41 |.12)"..OT .VAILA|
000009E0: 42 4C 45 22 3A 41 24 28 31 30 29 B2 22 22 3A 99 |BLE":A$(10)."":.|
000009F0: A3 31 32 29 3B 3A 8D 33 35 30 30 30 3A 89 35 39 |.12);:.35000:.59|
00000A00: 30 00 14 12 3E 02 8B 50 24 B2 22 11 22 A7 99 3A |0...>..P$."."..:|
00000A10: 89 35 37 38 00 2B 12 40 02 41 24 28 39 29 B2 50 |.578.+.@.A$(9).P|
00000A20: 24 3A 8B 50 36 B2 31 A7 35 39 30 00 57 12 42 02 |$:.P6.1.590.W.B.|
00000A30: 50 34 B2 30 3A 99 A3 31 31 29 3A 8D 32 39 39 30 |P4.0:..11):.2990|
00000A40: 30 3A 8B 50 24 B2 22 11 22 AF 41 24 28 31 30 29 |0:.P$.".".A$(10)|
00000A50: B2 22 22 A7 35 39 30 00 75 12 44 02 8B 50 24 B2 |."".590.u.D..P$.|
00000A60: 22 11 22 AF 41 24 28 31 30 29 B3 B1 22 22 A7 99 |".".A$(10)..""..|
00000A70: 3A 89 35 39 30 00 83 12 46 02 41 24 28 31 30 29 |:.590...F.A$(10)|
00000A80: B2 50 24 00 9E 12 4E 02 4E B2 39 3A 4D B2 31 30 |.P$...N.N.9:M.10|
00000A90: 3A 8D 32 38 30 30 30 3A 8D 33 30 33 34 30 00 BA |:.28000:.30340..|
00000AA0: 12 53 02 53 24 B2 53 24 AA 22 5F 22 AA 50 24 3A |.S.S$.S$."_".P$:|
00000AB0: 8B 49 45 B2 31 A7 31 36 33 30 00 DC 12 5D 02 99 |.IE.1.1630...]..|
00000AC0: 3A 99 22 41 43 43 45 50 54 22 3B 3A 8D 31 31 30 |:."ACCEPT";:.110|
00000AD0: 30 30 3A 8B 50 36 B2 32 A7 35 31 37 00 1A 13 62 |00:.P6.2.517...b|
00000AE0: 02 99 22 93 C8 41 4E 47 2D 4F 4E 20 57 48 49 4C |.."..ANG-ON WHIL|
00000AF0: 45 20 50 4F 53 54 49 4E 47 22 3A 49 B2 B5 28 28 |E POSTING":I..((|
00000B00: C6 28 41 24 28 31 29 29 AB 31 39 33 29 AD 32 29 |.(A$(1)).193).2)|
00000B10: 3A 8B 49 B1 39 A7 49 B2 31 30 00 30 13 6C 02 4A |:.I.9.I.10.0.l.J|
00000B20: B2 43 28 49 29 3A 8B 4A B1 B2 35 30 A7 36 35 30 |.C(I):.J..50.650|
00000B30: 00 53 13 76 02 4E 24 28 4A 2C 49 29 B2 41 24 28 |.S.v.N$(J,I).A$(|
00000B40: 31 29 3A 43 28 49 29 B2 43 28 49 29 AA 31 3A 89 |1):C(I).C(I).1:.|
00000B50: 36 38 30 00 84 13 8A 02 8D 32 30 30 30 30 3A 99 |680......20000:.|
00000B60: 22 93 D3 4F 52 52 59 20 2D 20 D4 48 49 53 20 50 |"..ORRY - .HIS P|
00000B70: 41 47 45 20 49 53 20 46 55 4C 4C 2D 55 50 22 3A |AGE IS FULL-UP":|
00000B80: 89 37 30 35 00 A1 13 A8 02 53 24 28 4A 2C 49 29 |.705.....S$(J,I)|
00000B90: B2 53 24 3A 46 31 B2 31 3A 8B 4A B2 30 A7 37 30 |.S$:F1.1:.J.0.70|
00000BA0: 30 00 BD 13 B8 02 8B 20 4E 24 28 4A 2C 49 29 B3 |0...... N$(J,I).|
00000BB0: 4E 24 28 4A AB 31 2C 49 29 A7 37 35 30 00 FC 13 |N$(J.1,I).750...|
00000BC0: BC 02 8D 32 30 30 30 30 3A 99 22 11 11 CF CB 22 |...20000:."...."|
00000BD0: 3A 99 22 11 11 12 22 35 31 AB 43 28 49 29 22 9D |:."..."51.C(I)".|
00000BE0: 20 C5 4E 54 52 49 45 53 20 4C 45 46 54 20 49 4E | .NTRIES LEFT IN|
00000BF0: 20 54 48 49 53 20 50 41 47 45 92 22 00 27 14 C1 | THIS PAGE.".'..|
00000C00: 02 99 22 11 11 C1 4E 59 20 4F 54 48 45 52 20 45 |.."...NY OTHER E|
00000C10: 4E 54 52 59 22 3B 3A 8D 31 31 30 30 30 3A 8B 50 |NTRY";:.11000:.P|
00000C20: 36 B2 31 A7 35 31 35 00 30 14 C6 02 89 32 34 30 |6.1.515.0....240|
00000C30: 00 5A 14 EE 02 53 B2 4A 3A 81 4A B2 53 A4 31 A9 |.Z...S.J:.J.S.1.|
00000C40: AB 31 3A 8B 4E 24 28 4A 2C 49 29 B1 B2 4E 24 28 |.1:.N$(J,I)..N$(|
00000C50: 4A AB 31 2C 49 29 A7 37 30 30 00 6C 14 07 03 8D |J.1,I).700.l....|
00000C60: 20 39 30 30 3A 82 4A 3A 89 37 30 30 00 9A 14 84 | 900:.J:.700....|
00000C70: 03 42 24 B2 4E 24 28 4A AB 31 2C 49 29 3A 4E 24 |.B$.N$(J.1,I):N$|
00000C80: 28 4A AB 31 2C 49 29 B2 4E 24 28 4A 2C 49 29 3A |(J.1,I).N$(J,I):|
00000C90: 4E 24 28 4A 2C 49 29 B2 42 24 00 CA 14 8E 03 42 |N$(J,I).B$.....B|
00000CA0: 24 B2 53 24 28 4A AB 31 2C 49 29 3A 53 24 28 4A |$.S$(J.1,I):S$(J|
00000CB0: AB 31 2C 49 29 B2 53 24 28 4A 2C 49 29 3A 53 24 |.1,I).S$(J,I):S$|
00000CC0: 28 4A 2C 49 29 B2 42 24 3A 8E 00 D9 14 E8 03 8B |(J,I).B$:.......|
00000CD0: 46 31 B2 31 A7 31 30 31 35 00 E8 14 ED 03 99 22 |F1.1.1015......"|
00000CE0: 93 22 3A 89 31 31 37 30 00 26 15 F2 03 99 C7 28 |.":.1170.&.....(|
00000CF0: 39 29 3A 97 35 33 32 37 32 2C 32 31 3A 97 35 33 |9):.53272,21:.53|
00000D00: 32 38 30 2C 31 34 3A 99 22 93 11 22 A3 38 29 22 |280,14:."..".8)"|
00000D10: 4F 4B 2C 20 4E 4F 57 20 53 49 47 4E 49 4E 47 2D |OK, NOW SIGNING-|
00000D20: 4F 46 46 22 3A 80 00 72 15 F7 03 99 22 93 D9 4F |OFF":..r...."..O|
00000D30: 55 20 48 41 56 45 20 4D 41 44 45 20 53 4F 4D 45 |U HAVE MADE SOME|
00000D40: 20 41 4C 54 45 52 41 54 49 4F 4E 53 22 3A 99 22 | ALTERATIONS":."|
00000D50: 11 C4 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 |..O YOU WISH TO |
00000D60: 53 41 56 45 20 54 48 45 4D 22 3B 3A 8D 31 31 30 |SAVE THEM";:.110|
00000D70: 30 30 00 81 15 FA 03 8B 50 36 B2 32 A7 31 31 37 |00......P6.2.117|
00000D80: 30 00 C8 15 03 04 99 22 93 D0 4C 45 41 53 45 20 |0......"..LEASE |
00000D90: 45 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 46 49 |ENTER NAME OF FI|
00000DA0: 4C 45 20 54 4F 20 42 45 20 53 41 56 45 44 22 3A |LE TO BE SAVED":|
00000DB0: 99 22 11 28 CD 41 58 20 12 31 36 92 20 4C 45 54 |.".(.AX .16. LET|
00000DC0: 54 45 52 53 29 20 22 3B 00 EF 15 04 04 50 34 B2 |TERS) ";.....P4.|
00000DD0: 31 3A 50 33 B2 31 36 3A 8D 33 30 30 30 30 3A 8D |1:P3.16:.30000:.|
00000DE0: 35 35 30 30 3A 8B 50 36 B2 32 A7 31 30 32 37 00 |5500:.P6.2.1027.|
00000DF0: 23 16 06 04 42 24 B2 50 24 3A 99 22 11 D0 4C 45 |#...B$.P$:."..LE|
00000E00: 41 53 45 20 4C 4F 41 44 20 59 4F 55 52 20 44 41 |ASE LOAD YOUR DA|
00000E10: 54 41 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 |TA DISK IN DRIVE|
00000E20: 20 30 22 00 6E 16 15 04 99 22 11 12 C8 49 54 20 | 0".n...."...IT |
00000E30: 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 |ANY KEY TO CONTI|
00000E40: 4E 55 45 92 11 22 3A 8D 31 30 30 30 30 3A 99 22 |NUE..":.10000:."|
00000E50: D0 4C 45 41 53 45 20 48 4F 4C 44 20 57 48 49 4C |.LEASE HOLD WHIL|
00000E60: 45 20 53 41 56 49 4E 47 20 44 41 54 41 22 00 A1 |E SAVING DATA"..|
00000E70: 16 2E 04 49 B2 30 3A 9F 31 2C 38 2C 32 2C 22 40 |...I.0:.1,8,2,"@|
00000E80: 30 3A 22 AA 42 24 AA 22 2C 53 2C 57 22 3A 8D 39 |0:".B$.",S,W":.9|
00000E90: 35 30 30 3A 8B 50 36 B2 31 A7 A0 31 3A 89 32 34 |500:.P6.1..1:.24|
00000EA0: 30 00 AD 16 31 04 81 4A B2 30 A4 35 30 00 CA 16 |0...1..J.0.50...|
00000EB0: 33 04 8B 4E 24 28 4A 2C 49 29 B2 22 22 A7 98 31 |3..N$(J,I).""..1|
00000EC0: 2C 22 5E 22 3A 89 31 31 32 30 00 F0 16 38 04 98 |,"^":.1120...8..|
00000ED0: 31 2C 4E 24 28 4A 2C 49 29 3A 8B C3 28 53 24 28 |1,N$(J,I):..(S$(|
00000EE0: 4A 2C 49 29 29 B1 B2 37 39 A7 98 31 2C 22 2A 22 |J,I))..79..1,"*"|
00000EF0: 00 02 17 42 04 98 31 2C 53 24 28 4A 2C 49 29 3A |...B..1,S$(J,I):|
00000F00: 82 4A 00 18 17 60 04 49 B2 49 AA 31 3A 8B 49 B3 |.J...`.I.I.1:.I.|
00000F10: B2 31 30 A7 31 30 37 33 00 23 17 6A 04 A0 31 3A |.10.1073.#.j..1:|
00000F20: A0 31 35 00 64 17 7E 04 8D 32 30 30 30 30 3A 99 |.15.d.~..20000:.|
00000F30: 22 11 C4 4F 20 59 4F 55 20 57 49 53 48 20 54 4F |"..O YOU WISH TO|
00000F40: 20 53 41 56 45 20 54 48 45 4D 20 41 47 41 49 4E | SAVE THEM AGAIN|
00000F50: 22 3B 3A 8D 31 31 30 30 30 3A 8B 50 36 B2 31 A7 |";:.11000:.P6.1.|
00000F60: 31 30 32 37 00 98 17 92 04 99 22 11 C4 4F 20 59 |1027......"..O Y|
00000F70: 4F 55 20 57 49 53 48 20 54 4F 20 53 49 47 4E 2D |OU WISH TO SIGN-|
00000F80: 4F 46 46 20 22 3B 3A 8D 31 31 30 30 30 3A 8B 50 |OFF ";:.11000:.P|
00000F90: 36 B2 31 A7 31 30 31 30 00 A1 17 A1 04 89 32 34 |6.1.1010......24|
00000FA0: 30 00 B5 17 B0 04 8D 39 30 30 30 3A 8B 50 36 B2 |0......9000:.P6.|
00000FB0: 32 A7 32 34 30 00 D4 17 B3 04 99 22 93 22 3B 3A |2.240......".";:|
00000FC0: 8B B8 28 30 29 B3 35 30 30 A7 8D 35 30 30 30 3A |..(0).500..5000:|
00000FD0: 89 32 34 30 00 07 18 B5 04 99 22 93 C5 4E 54 45 |.240......"..NTE|
00000FE0: 52 20 12 D3 55 52 4E 41 4D 45 20 26 20 CE 41 4D |R ..URNAME & .AM|
00000FF0: 45 92 20 46 4F 52 20 41 4C 54 45 52 41 54 49 4F |E. FOR ALTERATIO|
00001000: 4E 22 3A 4E 53 B2 30 00 49 18 BA 04 46 33 B2 30 |N":NS.0.I...F3.0|
00001010: 3A 50 33 B2 33 36 3A 50 34 B2 32 3A 8D 33 30 30 |:P3.36:P4.2:.300|
00001020: 30 30 3A 41 24 B2 50 24 3A 41 B2 C6 28 41 24 29 |00:A$.P$:A..(A$)|
00001030: 3A 8B 41 B3 31 39 33 B0 41 B1 32 31 38 A7 99 22 |:.A.193.A.218.."|
00001040: 91 22 3B 3A 89 31 32 31 30 00 66 18 C4 04 49 B2 |.";:.1210.f...I.|
00001050: B5 28 28 41 AB 31 39 33 29 AD 32 29 3A 8B 49 B1 |.((A.193).2):.I.|
00001060: 39 A7 49 B2 31 30 00 85 18 CE 04 81 4A B2 30 A4 |9.I.10......J.0.|
00001070: 43 28 49 29 3A 8B 4E 24 28 4A 2C 49 29 B2 41 24 |C(I):.N$(J,I).A$|
00001080: A7 31 34 39 30 00 8C 18 D5 04 82 4A 00 DB 18 D8 |.1490......J....|
00001090: 04 99 22 11 CE 4F 20 52 45 43 4F 52 44 20 4F 46 |.."..O RECORD OF|
000010A0: 20 54 48 49 53 20 4E 41 4D 45 22 3A 8D 32 30 30 | THIS NAME":.200|
000010B0: 30 30 3A 99 22 CE 4F 57 20 53 45 41 52 43 48 49 |00:.".OW SEARCHI|
000010C0: 4E 47 20 46 4F 52 20 50 4F 53 53 49 42 4C 45 20 |NG FOR POSSIBLE |
000010D0: 41 4C 54 45 52 4E 41 54 49 56 45 00 F3 18 EC 04 |ALTERNATIVE.....|
000010E0: 5A 42 B2 30 3A 5A 54 B2 30 3A 81 4A B2 30 A4 43 |ZB.0:ZT.0:.J.0.C|
000010F0: 28 49 29 00 21 19 00 05 8B C8 28 4E 24 28 4A 2C |(I).!.....(N$(J,|
00001100: 49 29 2C C3 28 41 24 29 29 B2 41 24 A7 5A 42 B2 |I),.(A$)).A$.ZB.|
00001110: 4A 3A 5A 54 B2 4A 3A 46 33 B2 31 3A 89 31 32 39 |J:ZT.J:F3.1:.129|
00001120: 33 00 34 19 0A 05 82 4A 3A 8B 46 33 B3 B1 31 A7 |3.4....J:.F3..1.|
00001130: 31 32 39 36 00 4A 19 0D 05 4A B2 4A AA 31 3A 8B |1296.J...J.J.1:.|
00001140: 4A B1 B2 35 31 A7 31 32 39 38 00 71 19 0E 05 8B |J..51.1298.q....|
00001150: C8 28 4E 24 28 4A 2C 49 29 2C C3 28 41 24 29 29 |.(N$(J,I),.(A$))|
00001160: B2 41 24 A7 5A 54 B2 5A 54 AA 31 3A 89 31 32 39 |.A$.ZT.ZT.1:.129|
00001170: 33 00 7B 19 0F 05 89 31 32 39 38 00 A3 19 10 05 |3.{....1298.....|
00001180: 99 22 D3 4F 52 52 59 20 4E 4F 54 48 49 4E 47 20 |.".ORRY NOTHING |
00001190: 43 4C 4F 53 45 22 3A 8B 46 34 B2 31 A7 46 34 B2 |CLOSE":.F4.1.F4.|
000011A0: 32 3A 8E 00 B1 19 11 05 99 3A 99 3A 89 31 38 37 |2:.......:.:.187|
000011B0: 30 00 E0 19 12 05 99 22 C9 20 C8 41 56 45 20 46 |0......". .AVE F|
000011C0: 4F 55 4E 44 20 54 48 45 20 46 4F 4C 4C 4F 57 49 |OUND THE FOLLOWI|
000011D0: 4E 47 3A 22 3A 8D 32 30 30 30 30 3A 4E B2 5A 42 |NG:":.20000:N.ZB|
000011E0: 00 0D 1A 1E 05 99 22 11 D2 C5 C3 CF D2 C4 20 CE |......"....... .|
000011F0: 4F 22 2C 22 CE C1 CD C5 22 3A 99 22 A3 A3 A3 A3 |O","....":."....|
00001200: A3 A3 A3 A3 A3 22 2C 22 A3 A3 A3 A3 22 00 1B 1A |.....","...."...|
00001210: 46 05 81 4D B2 4E A4 4E AA 31 35 00 2A 1A 4B 05 |F..M.N.N.15.*.K.|
00001220: 8B 4D B1 5A 54 A7 31 33 38 32 00 42 1A 5A 05 99 |.M.ZT.1382.B.Z..|
00001230: 22 1D 1D 22 4D AA 31 2C 4E 24 28 4D 2C 49 29 3A |".."M.1,N$(M,I):|
00001240: 82 4D 00 75 1A 66 05 99 22 11 D0 52 45 53 53 20 |.M.u.f.."..RESS |
00001250: 12 20 43 20 92 20 54 4F 20 43 4F 4E 54 49 4E 55 |. C . TO CONTINU|
00001260: 45 20 53 43 41 4E 20 12 20 53 20 92 20 54 4F 20 |E SCAN . S . TO |
00001270: 53 54 4F 50 22 00 A7 1A 68 05 99 22 12 20 52 20 |STOP"...h..". R |
00001280: 92 20 54 4F 20 52 45 53 54 41 52 54 20 53 43 41 |. TO RESTART SCA|
00001290: 4E 20 4F 52 20 12 20 43 4F 52 52 45 53 50 4F 4E |N OR . CORRESPON|
000012A0: 44 49 4E 47 20 92 22 00 D7 1A 6A 05 99 22 4E 55 |DING ."...j.."NU|
000012B0: 4D 42 45 52 20 54 4F 20 41 43 43 45 53 53 20 50 |MBER TO ACCESS P|
000012C0: 4F 54 45 4E 54 49 41 4C 20 52 45 43 4F 52 44 22 |OTENTIAL RECORD"|
000012D0: 3A 8D 32 30 30 30 30 00 16 1B 6E 05 99 22 11 45 |:.20000...n..".E|
000012E0: 4E 54 45 52 20 4E 4F 57 3A 20 22 3B 3A 50 33 B2 |NTER NOW: ";:P3.|
000012F0: 32 3A 50 34 B2 31 3A 8D 33 30 30 30 30 3A 8B 50 |2:P4.1:.30000:.P|
00001300: 24 B2 22 52 22 A7 4E B2 5A 42 3A 99 22 93 22 3B |$."R".N.ZB:.".";|
00001310: 3A 89 31 33 31 30 00 38 1B 82 05 8B 50 24 B2 22 |:.1310.8....P$."|
00001320: 43 22 AF 4D B3 B2 5A 54 A7 4E B2 4D 3A 99 22 93 |C".M..ZT.N.M:.".|
00001330: 22 3B 3A 89 31 33 31 30 00 48 1B 87 05 8B 50 24 |";:.1310.H....P$|
00001340: B2 22 53 22 A7 32 34 30 00 6B 1B 89 05 58 B2 C5 |."S".240.k...X..|
00001350: 28 50 24 29 3A 8B 58 B3 B2 30 B0 58 B1 4D A7 99 |(P$):.X..0.X.M..|
00001360: 22 91 91 91 22 3A 89 31 33 39 30 00 75 1B 8C 05 |"...":.1390.u...|
00001370: 4A B2 58 AB 31 00 7D 1B D2 05 45 B2 30 00 B6 1B |J.X.1.}...E.0...|
00001380: DC 05 99 22 93 22 A3 31 30 29 22 D2 45 43 4F 52 |...".".10)".ECOR|
00001390: 44 20 CE 55 4D 42 45 52 3A 22 4A AA 31 3A 99 A3 |D .UMBER:"J.1:..|
000013A0: 31 30 29 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |10)"............|
000013B0: A3 A3 A3 A3 A3 22 00 CC 1B E8 05 8D 32 37 30 30 |....."......2700|
000013C0: 30 3A 8B 46 35 B2 31 A7 31 35 31 34 00 FC 1B E9 |0:.F5.1.1514....|
000013D0: 05 58 B2 B5 28 32 30 AB 4C 4C AD 32 29 3A 99 A3 |.X..(20.LL.2):..|
000013E0: 58 29 4E 54 24 3A 99 A3 58 29 3A 81 58 B2 31 A4 |X)NT$:..X):.X.1.|
000013F0: 4C 4C 3A 99 22 2D 22 3B 3A 82 3A 99 00 22 1C EA |LL:."-";:.:.."..|
00001400: 05 8D 32 37 31 30 30 3A 41 24 B2 22 CE 4F 54 20 |..27100:A$.".OT |
00001410: C1 56 41 49 4C 41 42 4C 45 22 3A 8B 46 35 B2 31 |.VAILABLE":.F5.1|
00001420: A7 8E 00 58 1C F0 05 99 22 11 12 81 C1 44 44 52 |...X...."....DDR|
00001430: 45 53 53 3A 92 9A 22 3A 99 22 2D 2D 2D 2D 2D 2D |ESS:..":."------|
00001440: 2D 2D 22 3A 8B 41 24 28 32 29 B2 22 4E 22 A7 99 |--":.A$(2)."N"..|
00001450: 41 24 3A 89 31 35 32 36 00 63 1C F3 05 99 41 24 |A$:.1526.c....A$|
00001460: 28 32 29 00 9D 1C F6 05 99 22 11 12 81 D4 45 4C |(2)......"....EL|
00001470: 45 50 48 4F 4E 45 3A 92 9A 22 3A 99 22 2D 2D 2D |EPHONE:..":."---|
00001480: 2D 2D 2D 2D 2D 2D 2D 22 3A 8B 41 24 28 33 29 B2 |-------":.A$(3).|
00001490: 22 4E 22 A7 99 41 24 3A 89 31 35 32 39 00 A8 1C |"N"..A$:.1529...|
000014A0: F8 05 99 41 24 28 33 29 00 DA 1C F9 05 99 A3 38 |...A$(3).......8|
000014B0: 29 22 11 2A 2A 2A 20 20 C5 4E 44 20 D2 45 43 4F |)".*** .ND .ECO|
000014C0: 52 44 20 20 2A 2A 2A 22 3A 8D 32 30 30 30 30 3A |RD ***":.20000:|
000014D0: 8B 49 45 B2 31 A7 31 35 37 30 00 EA 1C FF 05 8B |.IE.1.1570......|
000014E0: 4A B1 B2 35 30 A7 31 35 36 37 00 07 1D 04 06 8B |J..50.1567......|
000014F0: 4E 24 28 4A 2C 49 29 B3 B1 4E 24 28 4A AA 31 2C |N$(J,I)..N$(J.1,|
00001500: 49 29 A7 31 35 36 37 00 53 1D 0E 06 99 22 11 1D |I).1567.S...."..|
00001510: 1D D4 48 45 52 45 20 49 53 20 41 4E 4F 54 48 45 |..HERE IS ANOTHE|
00001520: 52 20 52 45 43 4F 52 44 20 49 4E 20 54 48 41 54 |R RECORD IN THAT|
00001530: 20 4E 41 4D 45 22 3A 99 A3 31 30 29 22 12 48 49 | NAME":..10)".HI|
00001540: 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 56 49 45 |T ANY KEY TO VIE|
00001550: 57 92 22 00 87 1D 15 06 99 A3 31 30 29 22 12 4F |W.".......10)".O|
00001560: 52 20 48 49 54 20 20 53 20 20 54 4F 20 20 53 54 |R HIT S TO ST|
00001570: 4F 50 22 3A 8D 31 30 30 30 30 3A 8B 41 24 B2 22 |OP":.10000:.A$."|
00001580: 53 22 A7 31 35 36 37 00 97 1D 1D 06 4A B2 4A AA |S".1567.....J.J.|
00001590: 31 3A 89 31 35 30 30 00 A6 1D 1F 06 8B 4E 53 B2 |1:.1500......NS.|
000015A0: 31 A7 32 30 32 30 00 B2 1D 20 06 8B 46 34 B2 31 |1.2020... ..F4.1|
000015B0: A7 8E 00 ED 1D 22 06 99 22 11 C9 53 20 41 4C 54 |.....".."..S ALT|
000015C0: 45 52 41 54 49 4F 4E 2F 44 45 4C 45 54 49 4F 4E |ERATION/DELETION|
000015D0: 20 52 45 51 55 49 52 45 44 22 3B 3A 8D 31 31 30 | REQUIRED";:.110|
000015E0: 30 30 3A 8B 50 36 B2 32 A7 31 38 32 30 00 FB 1D |00:.P6.2.1820...|
000015F0: 41 06 8B 4A B2 30 A7 31 36 30 37 00 18 1E 42 06 |A..J.0.1607...B.|
00001600: 8B 4E 24 28 4A 2C 49 29 B3 B1 4E 24 28 4A AB 31 |.N$(J,I)..N$(J.1|
00001610: 2C 49 29 A7 31 36 30 37 00 51 1E 43 06 99 22 11 |,I).1607.Q.C..".|
00001620: C5 4E 54 45 52 20 D2 45 43 4F 52 44 20 CE 4F 2E |.NTER .ECORD .O.|
00001630: 20 54 4F 20 42 45 20 41 4C 54 45 52 45 44 22 3B | TO BE ALTERED";|
00001640: 3A 50 33 B2 32 3A 50 34 B2 31 3A 8D 33 30 30 30 |:P3.2:P4.1:.3000|
00001650: 30 00 77 1E 44 06 8B C5 28 50 24 29 B3 B2 30 B0 |0.w.D...(P$)..0.|
00001660: C5 28 50 24 29 B1 43 28 49 29 A7 99 22 91 91 91 |.(P$).C(I).."...|
00001670: 22 3A 89 31 36 30 33 00 85 1E 45 06 4A B2 C5 28 |":.1603...E.J..(|
00001680: 50 24 29 AB 31 00 B8 1E 47 06 99 22 91 C8 49 54 |P$).1...G.."..IT|
00001690: 20 12 20 44 20 92 20 54 4F 20 44 45 4C 45 54 45 | . D . TO DELETE|
000016A0: 2C 20 CF 54 48 45 52 57 49 53 45 20 48 49 54 20 |, .THERWISE HIT |
000016B0: 41 4E 59 20 4B 45 59 22 00 EC 1E 4D 06 8D 31 30 |ANY KEY"...M..10|
000016C0: 30 30 30 3A 8B 41 24 B2 22 44 22 A7 99 22 11 C8 |000:.A$."D".."..|
000016D0: 41 4E 47 20 4F 4E 20 57 48 49 4C 45 20 44 45 4C |ANG ON WHILE DEL|
000016E0: 45 54 49 4E 47 22 3A 89 31 37 35 30 00 29 1F 4F |ETING":.1750.).O|
000016F0: 06 99 22 93 22 3B 3A 8D 32 37 30 30 30 3A 8D 32 |..".";:.27000:.2|
00001700: 37 31 30 30 3A 53 24 B2 41 24 28 32 29 3A 54 24 |7100:S$.A$(2):T$|
00001710: B2 41 24 28 33 29 3A 81 4E B2 32 A4 31 30 3A 41 |.A$(3):.N.2.10:A|
00001720: 24 28 4E 29 B2 22 22 3A 82 00 5D 1F 54 06 51 B2 |$(N)."":..].T.Q.|
00001730: 32 3A 50 24 B2 53 24 3A 8D 32 37 32 30 30 3A 51 |2:P$.S$:.27200:Q|
00001740: B2 39 3A 50 24 B2 54 24 3A 8D 32 37 32 30 30 3A |.9:P$.T$:.27200:|
00001750: 45 B2 31 3A 49 45 B2 31 3A 89 35 32 30 00 77 1F |E.1:IE.1:.520.w.|
00001760: 5E 06 53 24 28 4A 2C 49 29 B2 53 24 3A 46 31 B2 |^.S$(J,I).S$:F1.|
00001770: 31 3A 89 31 35 30 30 00 9D 1F D6 06 53 B2 4A 3A |1:.1500.....S.J:|
00001780: 46 31 B2 31 3A 81 4A B2 53 A4 35 30 3A 8B 4E 24 |F1.1:.J.S.50:.N$|
00001790: 28 4A 2C 49 29 B2 22 22 A7 31 38 31 33 00 C3 1F |(J,I)."".1813...|
000017A0: EF 06 8B 4A B2 35 30 A7 4E 24 28 4A 2C 49 29 B2 |...J.50.N$(J,I).|
000017B0: 22 22 3A 53 24 28 4A 2C 49 29 B2 22 22 3A 89 31 |"":S$(J,I)."":.1|
000017C0: 38 31 33 00 EE 1F F4 06 4E 24 28 4A 2C 49 29 B2 |813.....N$(J,I).|
000017D0: 4E 24 28 4A AA 31 2C 49 29 3A 53 24 28 4A 2C 49 |N$(J.1,I):S$(J,I|
000017E0: 29 B2 53 24 28 4A AA 31 2C 49 29 3A 82 4A 00 1C |).S$(J.1,I):.J..|
000017F0: 20 15 07 43 28 49 29 B2 43 28 49 29 AB 31 3A 99 | ..C(I).C(I).1:.|
00001800: 22 1D CF CB 2C 20 46 49 4C 45 20 44 45 4C 45 54 |"..., FILE DELET|
00001810: 45 44 22 3A 8D 32 30 30 30 30 3A 99 00 4C 20 1C |ED":.20000:..L .|
00001820: 07 99 22 11 C1 4E 59 20 4F 54 48 45 52 20 41 4C |.."..NY OTHER AL|
00001830: 54 45 52 41 54 49 4F 4E 22 3B 3A 8D 31 31 30 30 |TERATION";:.1100|
00001840: 30 3A 8B 50 36 B2 31 A7 31 32 30 30 00 55 20 26 |0:.P6.1.1200.U &|
00001850: 07 89 32 34 30 00 64 20 4E 07 8B 4E 53 B2 31 A7 |..240.d N..NS.1.|
00001860: 32 30 32 30 00 73 20 58 07 8B 4E 53 B2 30 A7 31 |2020.s X..NS.0.1|
00001870: 38 32 30 00 87 20 D0 07 8D 39 30 30 30 3A 8B 50 |820.. ...9000:.P|
00001880: 36 B2 32 A7 32 34 30 00 C1 20 DA 07 99 22 93 C5 |6.2.240.. ..."..|
00001890: 4E 54 45 52 20 12 D3 55 52 4E 41 4D 45 20 26 20 |NTER ..URNAME & |
000018A0: CE 41 4D 45 92 20 54 4F 20 46 49 4E 44 20 41 44 |.AME. TO FIND AD|
000018B0: 44 52 45 53 53 22 3A 4E 53 B2 31 3A 89 31 32 31 |DRESS":NS.1:.121|
000018C0: 30 00 FC 20 E4 07 4E 53 B2 30 3A 99 22 11 C1 4E |0.. ..NS.0:."..N|
000018D0: 59 20 4F 54 48 45 52 20 41 44 44 52 45 53 53 20 |Y OTHER ADDRESS |
000018E0: 52 45 51 55 49 52 45 44 22 3B 3A 8D 31 31 30 30 |REQUIRED";:.1100|
000018F0: 30 3A 8B 50 36 B2 31 A7 32 30 30 30 00 05 21 0C |0:.P6.1.2000..!.|
00001900: 08 89 32 34 30 00 3A 21 34 08 99 22 93 C5 4E 54 |..240.:!4.."..NT|
00001910: 45 52 20 4C 45 54 54 45 52 20 46 4F 52 20 57 48 |ER LETTER FOR WH|
00001920: 49 43 48 20 50 41 47 45 20 52 45 51 55 49 52 45 |ICH PAGE REQUIRE|
00001930: 44 3A 22 3A 8D 31 30 30 30 30 00 56 21 43 08 41 |D:":.10000.V!C.A|
00001940: B2 C6 28 41 24 29 3A 8B 41 B3 36 35 B0 41 B1 39 |..(A$):.A.65.A.9|
00001950: 30 A7 32 31 30 30 00 72 21 48 08 49 B2 B5 28 28 |0.2100.r!H.I..((|
00001960: 41 AB 36 35 29 AD 32 29 3A 8B 49 B1 39 A7 49 B2 |A.65).2):.I.9.I.|
00001970: 31 30 00 97 21 4D 08 41 24 B2 C7 28 32 AC 49 AA |10..!M.A$..(2.I.|
00001980: 31 39 33 29 3A 8B 49 B2 31 30 A7 43 24 B2 22 DA |193):.I.10.C$.".|
00001990: 22 3A 89 32 31 33 30 00 A9 21 4F 08 43 24 B2 C7 |":.2130..!O.C$..|
000019A0: 28 32 AC 49 AA 31 39 34 29 00 F5 21 52 08 99 22 |(2.I.194)..!R.."|
000019B0: 93 D0 41 47 45 20 12 20 22 41 24 22 20 2D 20 22 |..AGE . "A$" - "|
000019C0: 43 24 22 20 92 20 43 4F 4E 54 41 49 4E 53 20 12 |C$" . CONTAINS .|
000019D0: 22 43 28 49 29 22 9D 20 92 20 45 4E 54 52 49 45 |"C(I)". . ENTRIE|
000019E0: 53 3A 22 3A 81 4E B2 31 A4 33 34 3A 99 22 A3 22 |S:":.N.1.34:."."|
000019F0: 3B 3A 82 3A 99 00 23 22 61 08 4D B2 30 3A 8B 4E |;:.:..#"a.M.0:.N|
00001A00: 24 28 30 2C 49 29 B2 22 22 A7 99 22 12 11 11 1D |$(0,I)."".."....|
00001A10: 1D D0 41 47 45 20 45 4D 50 54 59 11 22 3A 89 32 |..AGE EMPTY.":.2|
00001A20: 32 33 30 00 3F 22 66 08 81 4A B2 4D A4 32 30 AA |230.?"f..J.M.20.|
00001A30: 4D 3A 8B 4A B1 B2 43 28 49 29 A7 32 32 33 30 00 |M:.J..C(I).2230.|
00001A40: 87 22 75 08 99 4E 24 28 4A 2C 49 29 3A 82 3A 99 |."u..N$(J,I):.:.|
00001A50: 22 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 |".RESS ANY KEY T|
00001A60: 4F 20 43 4F 4E 54 49 4E 55 45 20 53 43 41 4E 22 |O CONTINUE SCAN"|
00001A70: 3A 8D 31 30 30 30 30 3A 4D B2 4A 3A 99 22 93 22 |:.10000:M.J:."."|
00001A80: 3B 3A 89 32 31 35 30 00 B1 22 B6 08 99 22 11 C1 |;:.2150.."..."..|
00001A90: 4E 59 20 4F 54 48 45 52 20 53 43 41 4E 22 3B 3A |NY OTHER SCAN";:|
00001AA0: 8D 31 31 30 30 30 3A 8B 50 36 B2 31 A7 32 31 30 |.11000:.P6.1.210|
00001AB0: 30 00 BA 22 DE 08 89 32 34 30 00 F9 22 C4 09 99 |0.."...240.."...|
00001AC0: 22 93 22 A3 31 33 29 22 D0 D2 C9 CE D4 20 CD C5 |".".13)"..... ..|
00001AD0: CE D5 22 3A 99 A3 31 33 29 22 A3 A3 A3 A3 A3 A3 |..":..13)"......|
00001AE0: A3 A3 A3 A3 22 3A 46 37 B2 30 3A 46 36 B2 30 3A |....":F7.0:F6.0:|
00001AF0: 46 35 B2 30 3A 46 34 B2 30 00 3D 23 D8 09 99 A3 |F5.0:F4.0.=#....|
00001B00: 38 29 22 11 12 D0 52 45 53 53 20 4F 50 54 49 4F |8)"...RESS OPTIO|
00001B10: 4E 20 4E 55 4D 42 45 52 22 3A 99 A3 38 29 22 11 |N NUMBER":..8)".|
00001B20: 11 11 12 20 31 20 92 20 D0 52 49 4E 54 20 53 49 |... 1 . .RINT SI|
00001B30: 4E 47 4C 45 20 41 44 44 52 45 53 53 22 00 7E 23 |NGLE ADDRESS".~#|
00001B40: E2 09 99 A3 38 29 22 11 11 12 20 32 20 92 20 D0 |....8)"... 2 . .|
00001B50: 52 49 4E 54 20 41 4C 4C 20 41 44 44 52 45 53 53 |RINT ALL ADDRESS|
00001B60: 45 53 22 3A 99 A3 38 29 22 11 11 12 20 33 20 92 |ES":..8)"... 3 .|
00001B70: 20 C2 41 43 4B 20 54 4F 20 4D 45 4E 55 22 00 A4 | .ACK TO MENU"..|
00001B80: 23 F6 09 8D 31 30 30 30 30 3A 91 C5 28 41 24 29 |#...10000:..(A$)|
00001B90: 89 32 35 37 30 2C 32 36 37 30 2C 32 34 30 3A 89 |.2570,2670,240:.|
00001BA0: 32 35 35 30 00 E8 23 0A 0A 99 22 93 C5 4E 54 45 |2550..#..."..NTE|
00001BB0: 52 20 12 D3 55 52 4E 41 4D 45 2F CE 41 4D 45 92 |R ..URNAME/.AME.|
00001BC0: 20 54 4F 20 46 49 4E 44 20 41 44 44 52 45 53 53 | TO FIND ADDRESS|
00001BD0: 3A 22 3A 46 34 B2 31 3A 8D 31 32 31 30 3A 8B 46 |:":F4.1:.1210:.F|
00001BE0: 34 B2 32 A7 32 36 33 30 00 18 24 1E 0A 99 22 11 |4.2.2630..$...".|
00001BF0: C4 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 50 |.O YOU WISH TO P|
00001C00: 52 49 4E 54 22 3B 3A 8D 31 31 30 30 30 3A 8B 50 |RINT";:.11000:.P|
00001C10: 36 B2 32 A7 32 35 30 30 00 33 24 3C 0A 8D 32 38 |6.2.2500.3$<..28|
00001C20: 30 30 3A 81 4D B2 31 A4 54 54 3A 8D 32 39 30 30 |00:.M.1.TT:.2900|
00001C30: 3A 82 4D 00 6C 24 46 0A 46 34 B2 30 3A 99 22 11 |:.M.l$F.F4.0:.".|
00001C40: CF CB 2C 20 41 4E 59 20 4F 54 48 45 52 22 3B 3A |.., ANY OTHER";:|
00001C50: 8D 31 31 30 30 30 3A 8B 50 36 B2 32 A7 46 34 B2 |.11000:.P6.2.F4.|
00001C60: 30 3A 46 36 B2 30 3A 89 32 35 30 30 00 76 24 64 |0:F6.0:.2500.v$d|
00001C70: 0A 89 32 35 37 30 00 BC 24 6E 0A 99 22 93 11 11 |..2570..$n.."...|
00001C80: 11 11 11 11 22 A3 39 29 22 C4 4F 20 59 4F 55 20 |....".9)".O YOU |
00001C90: 57 49 53 48 20 54 4F 20 50 52 49 4E 54 3A 22 3A |WISH TO PRINT:":|
00001CA0: 99 A3 39 29 22 11 12 20 31 20 92 20 D0 45 52 20 |..9)".. 1 . .ER |
00001CB0: 4C 49 53 54 20 46 4F 52 4D 41 54 22 00 FD 24 78 |LIST FORMAT"..$x|
00001CC0: 0A 99 A3 39 29 22 11 12 20 32 20 92 20 D0 45 52 |...9)".. 2 . .ER|
00001CD0: 20 4C 41 42 45 4C 20 46 4F 52 4D 41 54 22 3A 99 | LABEL FORMAT":.|
00001CE0: 3A 99 A3 39 29 22 11 12 D0 52 45 53 53 20 4F 50 |:..9)"...RESS OP|
00001CF0: 54 49 4F 4E 20 4E 55 4D 42 45 52 92 22 00 1B 25 |TION NUMBER."..%|
00001D00: 82 0A A1 41 24 3A 8B 41 24 B3 B1 22 31 22 AF 41 |...A$:.A$.."1".A|
00001D10: 24 B3 B1 22 32 22 A7 32 36 39 30 00 2C 25 8C 0A |$.."2".2690.,%..|
00001D20: 8B 41 24 B2 22 32 22 A7 32 37 32 30 00 54 25 96 |.A$."2".2720.T%.|
00001D30: 0A 8D 32 38 32 30 3A 46 37 B2 31 3A 54 54 B2 31 |..2820:F7.1:TT.1|
00001D40: 3A 4C 46 B2 31 3A 49 B2 30 3A 46 35 B2 31 3A 89 |:LF.1:I.0:F5.1:.|
00001D50: 32 37 32 35 00 67 25 A0 0A 8D 32 38 30 30 3A 49 |2725.g%...2800:I|
00001D60: B2 30 3A 46 35 B2 31 00 9A 25 A5 0A 99 22 11 D0 |.0:F5.1..%..."..|
00001D70: 4C 45 41 53 45 20 41 4C 49 47 4E 20 50 41 50 45 |LEASE ALIGN PAPE|
00001D80: 52 20 54 48 45 4E 20 48 49 54 20 41 4E 59 20 4B |R THEN HIT ANY K|
00001D90: 45 59 22 3A 8D 31 30 30 30 30 00 B7 25 AA 0A 81 |EY":.10000..%...|
00001DA0: 4A B2 30 A4 35 30 3A 8B 4E 24 28 4A 2C 49 29 B2 |J.0.50:.N$(J,I).|
00001DB0: 22 22 A7 32 37 36 30 00 D5 25 B4 0A 8D 31 35 30 |"".2760..%...150|
00001DC0: 30 3A 81 4D B2 31 A4 54 54 3A 8D 32 39 30 30 3A |0:.M.1.TT:.2900:|
00001DD0: 82 4D 3A 82 4A 00 EB 25 C8 0A 49 B2 49 AA 31 3A |.M:.J..%..I.I.1:|
00001DE0: 8B 49 B3 B2 31 30 A7 32 37 33 30 00 04 26 D2 0A |.I..10.2730..&..|
00001DF0: 46 37 B2 30 3A 46 36 B2 30 3A 46 35 B2 30 3A 89 |F7.0:F6.0:F5.0:.|
00001E00: 32 35 30 30 00 4C 26 F0 0A 99 22 11 C8 4F 57 20 |2500.L&..."..OW |
00001E10: 4D 41 4E 59 20 54 49 4D 45 53 20 44 4F 20 59 4F |MANY TIMES DO YO|
00001E20: 55 20 57 49 53 48 20 54 4F 20 50 52 49 4E 54 3F |U WISH TO PRINT?|
00001E30: 22 3B 3A 50 33 B2 33 3A 50 34 B2 31 3A 8D 33 30 |";:P3.3:P4.1:.30|
00001E40: 30 30 30 3A 54 54 B2 C5 28 50 24 29 00 65 26 FA |000:TT..(P$).e&.|
00001E50: 0A 8B 54 54 B3 B2 30 A7 99 22 91 91 91 91 22 3A |..TT..0.."....":|
00001E60: 89 32 38 30 30 00 AD 26 FC 0A 99 22 11 48 4F 57 |.2800..&...".HOW|
00001E70: 20 4D 41 4E 59 20 4C 49 4E 45 2D 46 45 45 44 53 | MANY LINE-FEEDS|
00001E80: 20 42 45 54 57 45 45 4E 20 41 44 44 52 45 53 53 | BETWEEN ADDRESS|
00001E90: 45 53 22 3A 50 33 B2 32 3A 50 34 B2 31 3A 8D 33 |ES":P3.2:P4.1:.3|
00001EA0: 30 30 30 30 3A 4C 46 B2 C5 28 50 24 29 00 C6 26 |0000:LF..(P$)..&|
00001EB0: FE 0A 8B 4C 46 B3 B2 30 A7 99 22 91 91 91 91 22 |...LF..0.."...."|
00001EC0: 3A 89 32 38 31 32 00 04 27 04 0B 99 22 11 C4 4F |:.2812..'..."..O|
00001ED0: 20 59 4F 55 20 57 49 53 48 20 54 45 4C 45 50 48 | YOU WISH TELEPH|
00001EE0: 4F 4E 45 20 CE 4F 20 50 52 49 4E 54 45 44 22 3B |ONE .O PRINTED";|
00001EF0: 3A 8D 31 31 30 30 30 3A 8B 50 36 B2 32 A7 46 36 |:.11000:.P6.2.F6|
00001F00: B2 31 3A 8E 00 0A 27 22 0B 8E 00 28 27 54 0B 9F |.1:...'"...('T..|
00001F10: 31 2C 34 2C 37 3A 97 35 33 32 36 35 2C 31 31 3A |1,4,7:.53265,11:|
00001F20: 98 31 2C C7 28 31 35 29 00 53 27 5E 0B 8B 46 37 |.1,.(15).S'^..F7|
00001F30: B2 31 A7 98 31 2C C7 28 31 37 29 4E 54 24 3B 3A |.1..1,.(17)NT$;:|
00001F40: 98 31 2C C7 28 31 36 29 22 34 30 22 3B 3A 89 33 |.1,.(16)"40";:.3|
00001F50: 30 31 33 00 63 27 B8 0B 98 31 2C C7 28 31 37 29 |013.c'...1,.(17)|
00001F60: 4E 54 24 00 88 27 C5 0B 41 24 B2 41 24 28 32 29 |NT$..'..A$.A$(2)|
00001F70: 3A 8B 46 36 B2 31 A7 4C 54 B2 4C 46 3A 8D 33 35 |:.F6.1.LT.LF:.35|
00001F80: 30 30 3A 89 33 30 33 30 00 C0 27 CF 0B 4C 54 B2 |00:.3030..'..LT.|
00001F90: 32 3A 8D 33 35 30 30 3A 41 24 B2 41 24 28 33 29 |2:.3500:A$.A$(3)|
00001FA0: 3A 8B 46 37 B2 31 A7 98 31 2C C7 28 31 36 29 22 |:.F7.1..1,.(16)"|
00001FB0: 34 30 22 3B 3A 8D 33 35 30 30 3A 89 33 30 33 30 |40";:.3500:.3030|
00001FC0: 00 DF 27 D1 0B 98 31 2C C7 28 31 37 29 22 D4 45 |..'...1,.(17)".E|
00001FD0: 4C 45 50 48 4F 4E 45 3A 22 3A 8D 33 35 30 30 00 |LEPHONE:":.3500.|
00001FE0: F5 27 D6 0B 98 31 3A A0 31 3A 97 35 33 32 36 35 |.'...1:.1:.53265|
00001FF0: 2C 32 37 3A 8E 00 05 28 AC 0D 81 4E B2 31 A4 20 |,27:...(...N.1. |
00002000: C3 28 41 24 29 00 37 28 B1 0D 8B CA 28 41 24 2C |.(A$).7(....(A$,|
00002010: 4E 2C 31 29 B2 C7 28 31 34 31 29 AF 46 37 B2 31 |N,1)..(141).F7.1|
00002020: A7 98 31 3A 98 31 2C C7 28 31 36 29 22 34 30 22 |..1:.1,.(16)"40"|
00002030: 3B 3A 89 33 35 32 30 00 56 28 B3 0D 8B CA 28 41 |;:.3520.V(....(A|
00002040: 24 2C 4E 2C 31 29 B2 C7 28 31 34 31 29 A7 98 31 |$,N,1)..(141)..1|
00002050: 3A 89 33 35 32 30 00 6D 28 B6 0D 98 31 2C C7 28 |:.3520.m(...1,.(|
00002060: 31 37 29 CA 28 41 24 2C 4E 2C 31 29 3B 00 84 28 |17).(A$,N,1);..(|
00002070: C0 0D 82 4E 3A 81 4E B2 31 A4 4C 54 3A 98 31 3A |...N:.N.1.LT:.1:|
00002080: 82 4E 3A 8E 00 9A 28 94 11 99 22 93 11 11 22 3A |.N:...(..."...":|
00002090: 8D 35 30 31 30 3A 89 32 34 30 00 B6 28 88 13 99 |.5010:.240..(...|
000020A0: 22 93 20 20 20 20 20 20 12 C1 D4 D4 C5 CE D4 C9 |". ........|
000020B0: CF CE 92 3A 20 22 00 DE 28 92 13 99 22 11 11 20 |...: "..(...".. |
000020C0: 20 20 20 20 20 D9 4F 55 20 48 41 56 45 22 B8 28 | .OU HAVE".(|
000020D0: 30 29 22 42 59 54 45 53 20 46 52 45 45 22 00 12 |0)"BYTES FREE"..|
000020E0: 29 9C 13 99 22 11 11 11 20 20 20 20 20 20 12 C8 |)..."... ..|
000020F0: 49 54 20 41 4E 59 20 20 4B 45 59 20 54 4F 20 20 |IT ANY KEY TO |
00002100: 43 4F 4E 54 49 4E 55 45 22 3A 8D 31 30 30 30 30 |CONTINUE":.10000|
00002110: 3A 8E 00 58 29 7C 15 50 36 B2 31 3A 41 B2 C6 28 |:..X)|.P6.1:A..(|
00002120: 50 24 29 3A 8B 28 41 B3 36 35 B0 41 B1 39 30 29 |P$):.(A.65.A.90)|
00002130: B0 50 24 B2 22 4E 22 B0 50 24 B2 22 56 22 B0 50 |.P$."N".P$."V".P|
00002140: 24 B2 22 43 22 B0 50 24 B2 22 53 22 B0 50 24 B2 |$."C".P$."S".P$.|
00002150: 22 49 22 A7 50 36 B2 32 00 5E 29 86 15 8E 00 7D |"I".P6.2.^)....}|
00002160: 29 28 23 99 22 93 C1 52 45 20 59 4F 55 20 53 55 |)(#."..RE YOU SU|
00002170: 52 45 22 3B 3A 8D 31 31 30 30 30 3A 8E 00 A4 29 |RE";:.11000:...)|
00002180: 1C 25 50 36 B2 30 3A 9F 31 35 2C 38 2C 31 35 3A |.%P6.0:.15,8,15:|
00002190: 84 31 35 2C 45 52 2C 45 52 24 3A 8B 45 52 B3 32 |.15,ER,ER$:.ER.2|
000021A0: 30 A7 20 8E 00 DE 29 26 25 99 22 11 12 C4 49 53 |0. ...)&%."...IS|
000021B0: 4B 20 45 52 52 4F 52 3A 92 20 22 45 52 22 20 22 |K ERROR:. "ER" "|
000021C0: 45 52 24 3A 99 22 11 12 C8 49 54 20 41 4E 59 20 |ER$:."...IT ANY |
000021D0: 4B 45 59 20 46 4F 52 20 4D 45 4E 55 92 22 00 F4 |KEY FOR MENU."..|
000021E0: 29 30 25 8D 31 30 30 30 30 3A A0 31 35 3A 50 36 |)0%.10000:.15:P6|
000021F0: B2 31 3A 8E 00 09 2A 10 27 A1 41 24 3A 8B 41 24 |.1:...*.'.A$:.A$|
00002200: B2 22 22 A7 31 30 30 30 30 00 0F 2A 1A 27 8E 00 |."".10000..*.'..|
00002210: 27 2A F8 2A 99 22 20 12 81 59 9A 92 45 53 2F 12 |'*.*." ..Y..ES/.|
00002220: 81 4E 9A 92 4F 3F 22 00 46 2A 02 2B A1 41 24 3A |.N..O?".F*.+.A$:|
00002230: 8B 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 |.A$.."Y".A$.."N"|
00002240: A7 31 31 30 31 30 00 59 2A 0C 2B 8B 41 24 B2 22 |.11010.Y*.+.A$."|
00002250: 59 22 A7 50 36 B2 31 3A 8E 00 64 2A 16 2B 50 36 |Y".P6.1:..d*.+P6|
00002260: B2 32 3A 8E 00 9D 2A 20 4E 97 35 34 32 37 33 2C |.2:...* N.54273,|
00002270: 38 36 3A 97 35 34 32 37 32 2C 31 30 35 3A 97 35 |86:.54272,105:.5|
00002280: 34 32 37 36 2C 31 37 3A 81 54 B2 30 A4 32 35 30 |4276,17:.T.0.250|
00002290: 3A 82 3A 97 35 34 32 37 36 2C 30 3A 8E 00 D3 2A |:.:.54276,0:...*|
000022A0: 78 69 4C 4C B2 C3 28 4E 24 28 4A 2C 49 29 29 3A |xiLL..(N$(J,I)):|
000022B0: 81 4D B2 31 A4 4C 4C 3A 8B CA 28 4E 24 28 4A 2C |.M.1.LL:..(N$(J,|
000022C0: 49 29 2C 4D 2C 31 29 B2 C7 28 33 32 29 A7 32 37 |I),M,1)..(32).27|
000022D0: 30 32 30 00 DA 2A 82 69 82 4D 00 1F 2B 8C 69 41 |020..*.i.M..+.iA|
000022E0: 24 28 31 29 B2 C9 28 4E 24 28 4A 2C 49 29 2C 4C |$(1)..(N$(J,I),L|
000022F0: 4C AB 4D 29 3A 41 24 28 30 29 B2 C8 28 4E 24 28 |L.M):A$(0)..(N$(|
00002300: 4A 2C 49 29 2C 4D AB 31 29 3A 4E 54 24 B2 41 24 |J,I),M.1):NT$.A$|
00002310: 28 31 29 AA 22 20 22 AA 41 24 28 30 29 3A 8E 00 |(1)." ".A$(0):..|
00002320: 56 2B DC 69 4C 4C B2 C3 28 53 24 28 4A 2C 49 29 |V+.iLL..(S$(J,I)|
00002330: 29 3A 81 58 B2 4C 4C A4 31 A9 AB 31 3A 8B CA 28 |):.X.LL.1..1:..(|
00002340: 53 24 28 4A 2C 49 29 2C 58 2C 31 29 B2 22 5F 22 |S$(J,I),X,1)."_"|
00002350: A7 32 37 31 32 30 00 5D 2B E6 69 82 58 00 8E 2B |.27120.]+.i.X..+|
00002360: F0 69 41 24 28 32 29 B2 C8 28 53 24 28 4A 2C 49 |.iA$(2)..(S$(J,I|
00002370: 29 2C 58 AB 31 29 3A 41 24 28 33 29 B2 C9 28 53 |),X.1):A$(3)..(S|
00002380: 24 28 4A 2C 49 29 2C 4C 4C AB 58 29 3A 8E 00 9B |$(J,I),LL.X):...|
00002390: 2B 40 6A 8B 50 24 B2 22 22 A7 8E 00 B3 2B 45 6A |+@j.P$.""....+Ej|
000023A0: 8B C3 28 50 24 29 B2 31 A7 41 24 28 51 29 B2 50 |..(P$).1.A$(Q).P|
000023B0: 24 3A 8E 00 DA 2B 4A 6A 81 4E B2 31 A4 C3 28 50 |$:...+Jj.N.1..(P|
000023C0: 24 29 3A 8B CA 28 50 24 2C 4E 2C 31 29 B2 C7 28 |$):..(P$,N,1)..(|
000023D0: 31 34 31 29 A7 32 37 32 33 30 00 E1 2B 54 6A 82 |141).27230..+Tj.|
000023E0: 4E 00 F9 2B 59 6A 8B 4E B1 C3 28 50 24 29 A7 41 |N..+Yj.N..(P$).A|
000023F0: 24 28 51 29 B2 50 24 3A 8E 00 0B 2C 5E 6A 8D 32 |$(Q).P$:...,^j.2|
00002400: 37 32 35 30 3A 89 32 37 32 30 30 00 38 2C 72 6A |7250:.27200.8,rj|
00002410: 41 24 28 51 29 B2 C8 28 50 24 2C 4E AB 31 29 3A |A$(Q)..(P$,N.1):|
00002420: 50 24 B2 C9 28 50 24 2C C3 28 50 24 29 AB 4E 29 |P$..(P$,.(P$).N)|
00002430: 3A 51 B2 51 AA 31 3A 8E 00 5E 2C 60 6D 50 24 B2 |:Q.Q.1:..^,`mP$.|
00002440: 41 24 28 4E 29 3A 81 51 B2 4E AA 31 A4 4D 3A 8B |A$(N):.Q.N.1.M:.|
00002450: 41 24 28 51 29 B2 22 22 A7 32 38 30 33 30 00 75 |A$(Q)."".28030.u|
00002460: 2C 6A 6D 50 24 B2 50 24 AA C7 28 31 34 31 29 AA |,jmP$.P$..(141).|
00002470: 41 24 28 51 29 00 7C 2C 74 6D 82 51 00 82 2C 7E |A$(Q).|,tm.Q..,~|
00002480: 6D 8E 00 A0 2C 68 74 99 22 13 22 3B 3A 8B 43 4F |m...,ht.".";:.CO|
00002490: B1 31 A7 99 C8 28 43 4F 24 2C 43 4F AB 31 29 3B |.1...(CO$,CO.1);|
000024A0: 00 B8 2C 72 74 8B 4C 4E B1 31 A7 99 C8 28 4C 4E |..,rt.LN.1...(LN|
000024B0: 24 2C 4C 4E AB 31 29 3B 00 BE 2C 7C 74 8E 00 C8 |$,LN.1);..,|t...|
000024C0: 2C CC 74 99 22 3E 22 3B 00 E6 2C D6 74 A1 41 24 |,.t.">";..,.t.A$|
000024D0: 3A 8B 41 24 B2 22 22 B0 41 24 B2 C7 28 31 33 29 |:.A$."".A$..(13)|
000024E0: A7 32 39 39 31 30 00 07 2D E0 74 8B 41 24 B2 22 |.29910..-.t.A$."|
000024F0: 11 22 AF 49 45 B2 31 A7 50 24 B2 22 11 22 3A 99 |.".IE.1.P$.".":.|
00002500: 22 9D 20 22 3B 3A 8E 00 19 2D EA 74 8B 41 24 B2 |". ";:...-.t.A$.|
00002510: 22 11 22 A7 32 39 39 31 30 00 4D 2D F4 74 81 51 |".".29910.M-.t.Q|
00002520: B2 31 A4 50 33 3A 99 22 A4 22 3B 3A 82 3A 81 51 |.1.P3:.".";:.:.Q|
00002530: B2 31 A4 50 33 3A 99 22 9D 22 3B 3A 82 3A 50 24 |.1.P3:.".";:.:P$|
00002540: B2 22 22 3A 50 58 B2 30 3A 50 36 B2 30 00 5E 2D |."":PX.0:P6.0.^-|
00002550: FE 74 8B 41 24 B2 22 22 A7 33 30 31 36 30 00 69 |.t.A$."".30160.i|
00002560: 2D 08 75 89 33 30 31 37 30 00 A3 2D 30 75 99 22 |-.u.30170..-0u."|
00002570: 3E 22 3B 3A 50 24 B2 22 22 3A 50 58 B2 30 3A 50 |>";:P$."":PX.0:P|
00002580: 36 B2 30 3A 81 51 B2 31 A4 50 33 3A 99 22 A4 22 |6.0:.Q.1.P3:."."|
00002590: 3B 3A 82 3A 81 51 B2 31 A4 50 33 3A 99 22 9D 22 |;:.:.Q.1.P3:."."|
000025A0: 3B 3A 82 00 B8 2D D0 75 A1 41 24 3A 8B 41 24 B2 |;:...-.u.A$:.A$.|
000025B0: 22 22 A7 33 30 31 36 30 00 D7 2D DA 75 41 B2 C6 |"".30160..-.uA..|
000025C0: 28 41 24 29 3A 8B 41 B1 31 39 32 AF 41 B3 32 31 |(A$):.A.192.A.21|
000025D0: 39 A7 33 30 32 30 30 00 16 2E E4 75 8B 28 41 B1 |9.30200....u.(A.|
000025E0: 33 31 AF 41 B3 B1 34 34 AF 41 B3 B1 33 34 AF 41 |31.A..44.A..34.A|
000025F0: B3 B1 35 38 AF 41 B3 B1 35 39 AF 41 B3 39 37 29 |..58.A..59.A.97)|
00002600: B0 41 B2 31 33 B0 41 B2 32 30 B0 41 B2 31 35 37 |.A.13.A.20.A.157|
00002610: A7 33 30 32 30 30 00 21 2E EE 75 89 33 30 31 36 |.30200.!..u.3016|
00002620: 30 00 38 2E F8 75 8B 41 B2 31 33 AF 50 24 B3 B1 |0.8..u.A.13.P$..|
00002630: 22 22 A7 33 30 33 32 30 00 48 2E FB 75 8B 41 B2 |"".30320.H..u.A.|
00002640: 31 33 A7 33 30 31 36 30 00 5E 2E FD 75 8B 41 B2 |13.30160.^..u.A.|
00002650: 39 35 A7 50 36 B2 31 3A 89 33 30 33 32 30 00 6E |95.P6.1:.30320.n|
00002660: 2E 0C 76 8B 41 B2 32 30 A7 33 30 32 35 30 00 80 |..v.A.20.30250..|
00002670: 2E 16 76 8B 41 B3 B1 31 35 37 A7 33 30 32 38 30 |..v.A..157.30280|
00002680: 00 A7 2E 1B 76 50 58 B2 C3 28 50 24 29 3A 81 51 |....vPX..(P$):.Q|
00002690: B2 31 A4 50 58 AA 31 3A 99 22 9D 22 3B 3A 82 51 |.1.PX.1:.".";:.Q|
000026A0: 3A 89 33 30 30 30 30 00 B8 2E 2A 76 8B 50 24 B2 |:.30000...*v.P$.|
000026B0: 22 22 A7 33 30 31 36 30 00 E5 2E 34 76 50 24 B2 |"".30160...4vP$.|
000026C0: C8 28 50 24 2C C3 28 50 24 29 AB 31 29 3A 41 24 |.(P$,.(P$).1):A$|
000026D0: B2 22 9D A4 9D 22 3A 50 58 B2 50 58 AB 31 3A 89 |."...":PX.PX.1:.|
000026E0: 33 30 33 30 30 00 F9 2E 48 76 8B C3 28 50 24 29 |30300...Hv..(P$)|
000026F0: B2 50 33 A7 33 30 31 36 30 00 0F 2F 52 76 50 24 |.P3.30160../RvP$|
00002700: B2 50 24 AA 41 24 3A 50 58 B2 C3 28 50 24 29 00 |.P$.A$:PX..(P$).|
00002710: 1F 2F 5C 76 99 41 24 3B 3A 89 33 30 31 36 30 00 |./\v.A$;:.30160.|
00002720: 39 2F 70 76 8B C3 28 50 24 29 B3 50 34 A7 50 36 |9/pv..(P$).P4.P6|
00002730: B2 30 3A 89 33 30 31 36 30 00 5C 2F 75 76 81 51 |.0:.30160.\/uv.Q|
00002740: B2 31 A4 C3 28 50 24 29 AA 31 3A 99 22 9D 22 3B |.1..(P$).1:.".";|
00002750: 3A 82 3A 99 22 20 22 3B 3A 99 3A 8E 00 85 2F 7A |:.:." ";:.:.../z|
00002760: 76 8B C8 28 50 24 2C 31 29 B2 22 20 22 A7 50 24 |v..(P$,1)." ".P$|
00002770: B2 C9 28 50 24 2C C3 28 50 24 29 AB 31 29 3A 89 |..(P$,.(P$).1):.|
00002780: 33 30 33 33 30 00 BD 2F 84 76 8B C9 28 50 24 2C |30330../.v..(P$,|
00002790: 31 29 B2 22 20 22 B0 C9 28 50 24 2C 31 29 B2 C7 |1)." "..(P$,1)..|
000027A0: 28 31 34 31 29 A7 50 24 B2 C8 28 50 24 2C C3 28 |(141).P$..(P$,.(|
000027B0: 50 24 29 AB 31 29 3A 89 33 30 33 34 30 00 C3 2F |P$).1):.30340../|
000027C0: 8E 76 8E 00 DC 2F D0 84 81 51 B2 31 A4 31 34 3A |.v.../...Q.1.14:|
000027D0: 99 22 A4 22 3B 3A 82 51 3A 99 3A 8E 00 F1 2F B8 |.".";:.Q:.:.../.|
000027E0: 88 8B 4E 55 B2 C3 28 41 24 28 4E 29 29 A7 99 3A |..NU..(A$(N))..:|
000027F0: 8E 00 13 30 C2 88 81 51 B2 31 A4 4E 55 AB C3 28 |...0...Q.1.NU..(|
00002800: 41 24 28 4E 29 29 3A 99 22 A4 22 3B 3A 82 51 3A |A$(N)):.".";:.Q:|
00002810: 99 3A 8E 00 2B 30 AC 8A 81 51 B2 31 A4 33 37 3A |.:..+0...Q.1.37:|
00002820: 99 22 C0 22 3B 3A 82 3A 99 3A 8E 00 3A 30 03 D9 |.".";:.:.:..:0..|
00002830: 8F 20 20 56 32 2E 30 28 44 29 00 00 00 DD |. V2.0(D).... |
..@.... *ADDRESS MANAGER* BY BERNARD HAB
ET (C) 1983 ABRASCO LTD...P.CO$."......
..................................":LN$.
".........................".H.U..".":.53
280,6:.53272,23:.G(8):.54296,15:.54277,0
......54278,240:.N$(50,10),S$(50,10),A$(
10),C(10):.240......9000:.P6.2.240._....
".PLEASE ENTER NAME OF FILE TO BE LOADED
":.".(MAX .16. LETTERS) ";:P4.1... .P3.1
6:.30000:.5500:.P6.2.155.K...."..PLEASE
LOAD YOUR DATA DISK IN DRIVE 0":."..HIT
ANY KEY":.10000:I.0......"..PLEASE HOLD
WHILE LOADING DATA":.1,8,2,P$:.9500:.P6.
1. 1:.240...... J.0.50.Q.H..1,N$(J,I):.N
$(J,I)."^".N$(J,I)."":C(I).J:.230.R.R..1
,S$(J,I):.S$(J,I).."*".220...T..#1,A$:.A
$.G(13).S$(J,I).B$:.220...V.B$.B$.A$:.21
2...... J.F...I.I.1:.I..10.180.X... 1: 1
5:.20000......".";:.35500:.".. A D D
R E S S M A N A G E R ..":.35500.M.
..."....... PRESS .. CORRESPONDING NUMBE
R TO"......"...ACCESS THE FOLLOWING FACI
LITIES":..5)".... 1 .. ADD AN ADDRESS".
..,...5)"... 2 .. CHANGE AN ADDRESS":..
5)"... 3 .. SEARCH FOR AN ADDRESS".2.@.
..5)"... 4 .. NAME DISPLAY BY LETTER":.
.5)"... 5 .. LOAD DATA FROM DISK".X.Y..
.5)"... 6 .. PRINT ADDRESSES":..5)"...
7 .. CHECK FREE MEMORY"...[.."........
8 .. SAVE DATA / SIGN-OFF".E.\.IE.0:NS.
0:F7.0:F6.0:F5.0:F4.0...^..10000:.E(A$).
515,1200,2000,2100,150,2500,4500,1000:.3
50......9000:.P6.2.240.5....".";:..(0).5
00..5000:.240.Q....N.0.10:A$(N)."":.:IE.
0......".PLEASE ENTER THE FOLLOWING INFO
RMATION:"......IE.1.."HIT . CURSOR DOWN
. TO SKIP LINE":.523............"HIT . N
. IF INFORMATION IS .NOT AVAILABLE"....
.."HIT . _ . ONCE FINISHED ENTERING A P
ARA-":." GRAPH".]....".SURNAME :
";:N.0:NU.19:.A$(0);:.35000......"NAME
: ";:N.1:.A$(1);:.35000.E...."..AD
DRESS : ";:.A$(2)."N".."NOT AVAILABLE"
;:.34000:.537.....N.2:NU.27:.A$(2);:.350
00.....NU.27:.N.3.8:..12)A$(N);:.35000:.
.H...."..TELEPHONE: ";:.A$(9)."N".."NOT
AVAILABLE";:.34000:.543._...N.9:.A$(9);
:.35000.|...N.10:..12)A$(10);:.35000...#
..IE.1.CO.12:.557.I.&.CO.12:LN.7:.29800:
P3.19:P4.3:.30000:.30330:A$(0).P$...'.A.
F(A$(0).G(0)):.A.193.A.218.."...":.550.-
.(...11);:P4.1:.30000:.30330:A$(1).P$:A.
F(A$(1).G(0)).I.+..A.193.A.218.."..":.55
2.E.,.A$(1).A$(0).G(32).A$(1)...-.LN.11:
.29800:P3.27:P4.1:.29900:.P$.."N".560...
/.A$(2)."N":..12)".NOT AVAILABLE":.N.3.8
:A$(N)."":..12);:.35000:.:.567...0..P$."
."..:.563...1.A$(2).P$:.P6.1.567.;.3.P4.
0:.N.3.8:..11);:.29900:.P$.".".A$(N)."".
567.X.4..P$.".".A$(N)..""..:.566.O.5.A$(
N).P$:.P6.1.567.V.6..N...7.N.2:M.8:.2800
0:.30340:S$.P$...:.LN.20:.29800:P4.1:.29
900:.P$.."N".574...<.A$(9)."N":..12)".NO
T AVAILABLE":A$(10)."":..12);:.35000:.59
0...>..P$."."..:.578.+.@.A$(9).P$:.P6.1.
590.W.B.P4.0:..11):.29900:.P$.".".A$(10)
."".590.U.D..P$.".".A$(10)..""..:.590...
F.A$(10).P$...N.N.9:M.10:.28000:.30340..
.S.S$.S$."_".P$:.IE.1.1630...]..:."ACCEP
T";:.11000:.P6.2.517...B..".HANG-ON WHIL
E POSTING":I..((F(A$(1)).193).2):.I.9.I.
10.0.L.J.C(I):.J..50.650.S.V.N$(J,I).A$(
1):C(I).C(I).1:.680......20000:.".SORRY
- THIS PAGE IS FULL-UP":.705.....S$(J,I)
.S$:F1.1:.J.0.700...... N$(J,I).N$(J.1,I
).750......20000:."..OK":."..."51.C(I)".
ENTRIES LEFT IN THIS PAGE.".'.A.."..ANY
OTHER ENTRY";:.11000:.P6.1.515.0.F..240
.Z...S.J:.J.S.1..1:.N$(J,I)..N$(J.1,I).7
00.L.... 900:.J:.700.....B$.N$(J.1,I):N$
(J.1,I).N$(J,I):N$(J,I).B$.J...B$.S$(J.1
,I):S$(J.1,I).S$(J,I):S$(J,I).B$:..Y....
F1.1.1015......".":.1170.&....G(9):.5327
2,21:.53280,14:."..".8)"OK, NOW SIGNING-
OFF":..R....".YOU HAVE MADE SOME ALTERAT
IONS":.".DO YOU WISH TO SAVE THEM";:.110
00......P6.2.1170.H....".PLEASE ENTER NA
ME OF FILE TO BE SAVED":.".(MAX .16. LET
TERS) ";.....P4.1:P3.16:.30000:.5500:.P6
.2.1027.#...B$.P$:.".PLEASE LOAD YOUR DA
TA DISK IN DRIVE 0".N...."..HIT ANY KEY
TO CONTINUE..":.10000:."PLEASE HOLD WHIL
E SAVING DATA".....I.0:.1,8,2,"@0:".B$."
,S,W":.9500:.P6.1. 1:.240...1..J.0.50.J.
3..N$(J,I).""..1,"^":.1120...8..1,N$(J,I
):.C(S$(J,I))..79..1,"*"...B..1,S$(J,I):
.J...`.I.I.1:.I..10.1073.#.J. 1: 15.D.~.
.20000:.".DO YOU WISH TO SAVE THEM AGAIN
";:.11000:.P6.1.1027......".DO YOU WISH
TO SIGN-OFF ";:.11000:.P6.1.1010......24
0......9000:.P6.2.240.T....".";:..(0).50
0..5000:.240......".ENTER .SURNAME & NAM
E. FOR ALTERATION":NS.0.I...F3.0:P3.36:P
4.2:.30000:A$.P$:A.F(A$):.A.193.A.218.."
.";:.1210.F.D.I..((A.193).2):.I.9.I.10..
.N..J.0.C(I):.N$(J,I).A$.1490...U..J...X
..".NO RECORD OF THIS NAME":.20000:."NOW
SEARCHING FOR POSSIBLE ALTERNATIVE.....
ZB.0:ZT.0:.J.0.C(I).!....H(N$(J,I),C(A$)
).A$.ZB.J:ZT.J:F3.1:.1293.4....J:.F3..1.
1296.J...J.J.1:.J..51.1298.Q....H(N$(J,I
),C(A$)).A$.ZT.ZT.1:.1293.{....1298.....
."SORRY NOTHING CLOSE":.F4.1.F4.2:......
.:.:.1870......"I HAVE FOUND THE FOLLOWI
NG:":.20000:N.ZB......".RECORD NO","NAME
":.".........","...."...F..M.N.N.15.*.K.
.M.ZT.1382.B.Z..".."M.1,N$(M,I):.M.U.F..
".PRESS . C . TO CONTINUE SCAN . S . TO
STOP"...H..". R . TO RESTART SCAN OR . C
ORRESPONDING .".W.J.."NUMBER TO ACCESS P
OTENTIAL RECORD":.20000...N..".ENTER NOW
: ";:P3.2:P4.1:.30000:.P$."R".N.ZB:.".";
:.1310.8....P$."C".M..ZT.N.M:.".";:.1310
.H....P$."S".240.K...X.E(P$):.X..0.X.M..
"...":.1390.U...J.X.1.}.R.E.0......".".1
0)"RECORD NUMBER:"J.1:..10)"............
.....".L....27000:.F5.1.1514.....X..(20.
LL.2):..X)NT$:..X):.X.1.LL:."-";:.:.."..
..27100:A$."NOT AVAILABLE":.F5.1...X....
"...ADDRESS:..":."--------":.A$(2)."N"..
A$:.1526.C....A$(2)......"...TELEPHONE:.
.":."----------":.A$(3)."N"..A$:.1529...
...A$(3).Z.....8)".*** END RECORD ***"
:.20000:.IE.1.1570......J..50.1567......
N$(J,I)..N$(J.1,I).1567.S...."...THERE I
S ANOTHER RECORD IN THAT NAME":..10)".HI
T ANY KEY TO VIEW.".......10)".OR HIT S
TO STOP":.10000:.A$."S".1567.....J.J.
1:.1500......NS.1.2020... ..F4.1....."..
".IS ALTERATION/DELETION REQUIRED";:.110
00:.P6.2.1820...A..J.0.1607...B..N$(J,I)
..N$(J.1,I).1607.Q.C..".ENTER RECORD NO.
TO BE ALTERED";:P3.2:P4.1:.30000.W.D..E
(P$)..0.E(P$).C(I).."...":.1603...E.J.E(
P$).1...G..".HIT . D . TO DELETE, OTHERW
ISE HIT ANY KEY"...M..10000:.A$."D"..".H
ANG ON WHILE DELETING":.1750.).O..".";:.
27000:.27100:S$.A$(2):T$.A$(3):.N.2.10:A
$(N)."":..].T.Q.2:P$.S$:.27200:Q.9:P$.T$
:.27200:E.1:IE.1:.520.W.^.S$(J,I).S$:F1.
1:.1500...V.S.J:F1.1:.J.S.50:.N$(J,I).""
.1813.C....J.50.N$(J,I)."":S$(J,I)."":.1
813.....N$(J,I).N$(J.1,I):S$(J,I).S$(J.1
,I):.J.. ..C(I).C(I).1:.".OK, FILE DELET
ED":.20000:..L ...".ANY OTHER ALTERATION
";:.11000:.P6.1.1200.U &..240.D N..NS.1.
2020.S X..NS.0.1820.. P..9000:.P6.2.240.
A Z..".ENTER .SURNAME & NAME. TO FIND AD
DRESS":NS.1:.1210.. ..NS.0:.".ANY OTHER
ADDRESS REQUIRED";:.11000:.P6.1.2000..!.
..240.:!4..".ENTER LETTER FOR WHICH PAGE
REQUIRED:":.10000.V!C.A.F(A$):.A.65.A.9
0.2100.R!H.I..((A.65).2):.I.9.I.10..!M.A
$.G(2.I.193):.I.10.C$."Z":.2130..!O.C$.G
(2.I.194)..!R..".PAGE . "A$" - "C$" . CO
NTAINS ."C(I)". . ENTRIES:":.N.1.34:."."
;:.:..#"A.M.0:.N$(0,I).""..".....PAGE EM
PTY.":.2230.?"F..J.M.20.M:.J..C(I).2230.
."U..N$(J,I):.:."PRESS ANY KEY TO CONTIN
UE SCAN":.10000:M.J:.".";:.2150.."...".A
NY OTHER SCAN";:.11000:.P6.1.2100.."...2
40.."D..".".13)"PRINT MENU":..13)"......
....":F7.0:F6.0:F5.0:F4.0.=#X...8)"..PRE
SS OPTION NUMBER":..8)".... 1 . PRINT SI
NGLE ADDRESS".~#....8)"... 2 . PRINT ALL
ADDRESSES":..8)"... 3 . BACK TO MENU"..
#...10000:.E(A$).2570,2670,240:.2550..#.
..".ENTER .SURNAME/NAME. TO FIND ADDRESS
:":F4.1:.1210:.F4.2.2630..$...".DO YOU W
ISH TO PRINT";:.11000:.P6.2.2500.3$<..28
00:.M.1.TT:.2900:.M.L$F.F4.0:.".OK, ANY
OTHER";:.11000:.P6.2.F4.0:F6.0:.2500.V$D
..2570..$N..".......".9)"DO YOU WISH TO
PRINT:":..9)".. 1 . PER LIST FORMAT"..$X
...9)".. 2 . PER LABEL FORMAT":.:..9)"..
PRESS OPTION NUMBER."..%...A$:.A$.."1".A
$.."2".2690.,%...A$."2".2720.T%...2820:F
7.1:TT.1:LF.1:I.0:F5.1:.2725.G% ..2800:I
.0:F5.1..%...".PLEASE ALIGN PAPER THEN H
IT ANY KEY":.10000..%...J.0.50:.N$(J,I).
"".2760.U%...1500:.M.1.TT:.2900:.M:.J..%
H.I.I.1:.I..10.2730..&R.F7.0:F6.0:F5.0:.
2500.L&...".HOW MANY TIMES DO YOU WISH T
O PRINT?";:P3.3:P4.1:.30000:TT.E(P$).E&.
..TT..0.."....":.2800..&...".HOW MANY LI
NE-FEEDS BETWEEN ADDRESSES":P3.2:P4.1:.3
0000:LF.E(P$).F&...LF..0.."....":.2812..
'...".DO YOU WISH TELEPHONE NO PRINTED";
:.11000:.P6.2.F6.1:...'"...('T..1,4,7:.5
3265,11:.1,G(15).S'^..F7.1..1,G(17)NT$;:
.1,G(16)"40";:.3013.C'...1,G(17)NT$..'E.
A$.A$(2):.F6.1.LT.LF:.3500:.3030..'O.LT.
2:.3500:A$.A$(3):.F7.1..1,G(16)"40";:.35
00:.3030..'Q..1,G(17)"TELEPHONE:":.3500.
.'V..1: 1:.53265,27:...(...N.1. C(A$).7(
...J(A$,N,1).G(141).F7.1..1:.1,G(16)"40"
;:.3520.V(...J(A$,N,1).G(141)..1:.3520.M
(...1,G(17)J(A$,N,1);..(...N:.N.1.LT:.1:
.N:...(..."...":.5010:.240..(...".
.ATTENTION.: "..(...".. YOU HAVE".(
0)"BYTES FREE"..)..."... .HIT ANY
KEY TO CONTINUE":.10000:..X)|.P6.1:A.F(
P$):.(A.65.A.90).P$."N".P$."V".P$."C".P$
."S".P$."I".P6.2.^)....})(#.".ARE YOU SU
RE";:.11000:...).%P6.0:.15,8,15:.15,ER,E
R$:.ER.20. ...)&%."..DISK ERROR:. "ER" "
ER$:."..HIT ANY KEY FOR MENU."..)0%.1000
0: 15:P6.1:...*.'.A$:.A$."".10000..*.'..
'*.*." ..Y..ES/..N..O?".F*.+.A$:.A$.."Y"
.A$.."N".11010.Y*.+.A$."Y".P6.1:..D*.+P6
.2:...* N.54273,86:.54272,105:.54276,17:
.T.0.250:.:.54276,0:..S*XILL.C(N$(J,I)):
.M.1.LL:.J(N$(J,I),M,1).G(32).27020.Z*.I
.M..+.IA$(1).I(N$(J,I),LL.M):A$(0).H(N$(
J,I),M.1):NT$.A$(1)." ".A$(0):..V+.ILL.C
(S$(J,I)):.X.LL.1..1:.J(S$(J,I),X,1)."_"
.27120.]+.I.X..+.IA$(2).H(S$(J,I),X.1):A
$(3).I(S$(J,I),LL.X):...+@J.P$.""....+EJ
.C(P$).1.A$(Q).P$:..Z+JJ.N.1.C(P$):.J(P$
,N,1).G(141).27230..+TJ.N..+YJ.N.C(P$).A
$(Q).P$:...,^J.27250:.27200.8,RJA$(Q).H(
P$,N.1):P$.I(P$,C(P$).N):Q.Q.1:..^,`MP$.
A$(N):.Q.N.1.M:.A$(Q)."".28030.U,JMP$.P$
.G(141).A$(Q).|,TM.Q..,~M.. ,HT.".";:.CO
.1..H(CO$,CO.1);..,RT.LN.1..H(LN$,LN.1);
..,|T..H,LT.">";..,VT.A$:.A$."".A$.G(13)
.29910..-.T.A$.".".IE.1.P$.".":.". ";:..
.-.T.A$.".".29910.M-.T.Q.1.P3:.".";:.:.Q
.1.P3:.".";:.:P$."":PX.0:P6.0.^-.T.A$.""
.30160.I-.U.30170..-0U.">";:P$."":PX.0:P
6.0:.Q.1.P3:.".";:.:.Q.1.P3:.".";:...-PU
.A$:.A$."".30160.W-ZUA.F(A$):.A.192.A.21
9.30200....U.(A.31.A..44.A..34.A..58.A..
59.A.97).A.13.A.20.A.157.30200.!..U.3016
0.8..U.A.13.P$.."".30320.H..U.A.13.30160
.^..U.A.95.P6.1:.30320.N..V.A.20.30250..
..V.A..157.30280....VPX.C(P$):.Q.1.PX.1:
.".";:.Q:.30000...*V.P$."".30160...4VP$.
H(P$,C(P$).1):A$."...":PX.PX.1:.30300...
HV.C(P$).P3.30160../RVP$.P$.A$:PX.C(P$).
./\V.A$;:.30160.9/PV.C(P$).P4.P6.0:.3016
0.\/UV.Q.1.C(P$).1:.".";:.:." ";:.:.../Z
V.H(P$,1)." ".P$.I(P$,C(P$).1):.30330../
.V.I(P$,1)." ".I(P$,1).G(141).P$.H(P$,C(
P$).1):.30340.C/.V.../P..Q.1.14:.".";:.Q
:.:.../...NU.C(A$(N))..:...0B..Q.1.NU.C(
A$(N)):.".";:.Q:.:..+0...Q.1.37:.".";:.:
.:..:0.Y. V2.0(D)....
> CLICK IMAGE PREVIEW FOR FULL MODAL