NAME ADDRESS-128

00000000: 01 1C 19 1C 01 00 FE 25  3A 99 22 9E 22 3A 99 C7  |.......%:.".":..|
00000010: 28 31 34 29 3A 89 33 35  30 00 24 1C 05 00 81 43  |(14):.350.$....C|
00000020: B2 31 A4 5A 00 2F 1C 07  00 81 58 B2 31 A4 37 00  |.1.Z./....X.1.7.|
00000030: 66 1C 0A 00 8B D4 28 4E  41 24 28 43 2C 58 29 2C  |f.....(NA$(C,X),|
00000040: CA 28 53 24 2C 32 2C C3  28 53 24 29 AB 32 29 29  |.(S$,2,.(S$).2))|
00000050: B3 B1 30 A7 4C B2 4C AA  31 3A 4C 4F 43 28 4C 29  |..0.L.L.1:LOC(L)|
00000060: B2 43 3A 58 B2 37 00 6C  1C 0F 00 82 00 72 1C 14  |.C:X.7.l.....r..|
00000070: 00 82 00 78 1C 19 00 8E  00 83 1C 32 00 81 43 B2  |...x.......2..C.|
00000080: 31 A4 5A 00 8E 1C 37 00  81 58 B2 31 A4 37 00 C8  |1.Z...7..X.1.7..|
00000090: 1C 3C 00 8B C9 28 4E 41  24 28 43 2C 58 29 2C C3  |.<...(NA$(C,X),.|
000000A0: 28 53 24 29 AB 31 29 B2  C9 28 53 24 2C C3 28 53  |(S$).1)..(S$,.(S|
000000B0: 24 29 AB 31 29 A7 4C B2  4C AA 31 3A 4C 4F 43 28  |$).1).L.L.1:LOC(|
000000C0: 4C 29 B2 43 3A 58 B2 37  00 CE 1C 41 00 82 00 D4  |L).C:X.7...A....|
000000D0: 1C 46 00 82 00 DA 1C 4B  00 8E 00 E5 1C 64 00 81  |.F.....K.....d..|
000000E0: 43 B2 31 A4 5A 00 F0 1C  69 00 81 58 B2 31 A4 37  |C.1.Z...i..X.1.7|
000000F0: 00 2A 1D 78 00 8B C8 28  4E 41 24 28 43 2C 58 29  |.*.x...(NA$(C,X)|
00000100: 2C C3 28 53 24 29 AB 31  29 B2 C8 28 53 24 2C C3  |,.(S$).1)..(S$,.|
00000110: 28 53 24 29 AB 31 29 A7  4C B2 4C AA 31 3A 4C 4F  |(S$).1).L.L.1:LO|
00000120: 43 28 4C 29 B2 43 3A 58  B2 37 00 30 1D 7D 00 82  |C(L).C:X.7.0.}..|
00000130: 00 36 1D 82 00 82 00 3C  1D 87 00 8E 00 6F 1D 8C  |.6.....<.....o..|
00000140: 00 81 43 B2 31 A4 5A 3A  81 58 B2 31 A4 37 3A 8B  |..C.1.Z:.X.1.7:.|
00000150: 53 24 B2 22 2A 22 A7 4C  B2 4C AA 31 3A 4C 4F 43  |S$."*".L.L.1:LOC|
00000160: 28 4C 29 B2 43 3A 58 B2  37 3A 82 3A 82 3A 8E 00  |(L).C:X.7:.:.:..|
00000170: 7B 1D C8 00 81 20 43 B2  31 A4 5A 00 86 1D CD 00  |{.... C.1.Z.....|
00000180: 81 58 B2 31 A4 37 00 AA  1D D2 00 8B 4E 41 24 28  |.X.1.7......NA$(|
00000190: 43 2C 58 29 B2 53 24 A7  4C B2 4C AA 31 3A 4C 4F  |C,X).S$.L.L.1:LO|
000001A0: 43 28 4C 29 B2 43 3A 58  B2 37 00 B0 1D D7 00 82  |C(L).C:X.7......|
000001B0: 00 B6 1D DC 00 82 00 BC  1D E1 00 8E 00 D1 1D 5E  |...............^|
000001C0: 01 99 22 93 CC 4F 41 44  49 4E 47 20 C6 49 4C 45  |.."..OADING .ILE|
000001D0: 22 00 EB 1D 68 01 86 4E  41 24 28 33 35 30 2C 37  |"...h..NA$(350,7|
000001E0: 29 3A 86 4C 4F 43 28 33  35 30 29 00 03 1E 7C 01  |):.LOC(350)...|.|
000001F0: FE 0D 23 31 2C 22 4E 41  4D 45 2F 41 44 44 52 45  |..#1,"NAME/ADDRE|
00000200: 53 53 22 00 1B 1E 7E 01  FE 0D 23 32 2C 22 52 45  |SS"...~...#2,"RE|
00000210: 43 4F 52 44 20 43 4F 55  4E 54 22 00 2A 1E 7F 01  |CORD COUNT".*...|
00000220: 8B 44 53 B1 31 A7 89 34  35 30 00 33 1E 80 01 84  |.DS.1..450.3....|
00000230: 32 2C 5A 00 3C 1E 81 01  41 31 B2 31 00 49 1E 82  |2,Z.<...A1.1.I..|
00000240: 01 81 43 B2 31 A4 5A A9  32 00 E3 1E 86 01 84 31  |..C.1.Z.2......1|
00000250: 2C 4E 41 24 28 43 2C 31  29 2C 4E 41 24 28 43 2C  |,NA$(C,1),NA$(C,|
00000260: 32 29 2C 4E 41 24 28 43  2C 33 29 2C 4E 41 24 28  |2),NA$(C,3),NA$(|
00000270: 43 2C 34 29 2C 4E 41 24  28 43 2C 35 29 2C 4E 41  |C,4),NA$(C,5),NA|
00000280: 24 28 43 2C 36 29 2C 4E  41 24 28 43 2C 37 29 2C  |$(C,6),NA$(C,7),|
00000290: 4E 41 24 28 43 AA 41 31  2C 31 29 2C 4E 41 24 28  |NA$(C.A1,1),NA$(|
000002A0: 43 AA 41 31 2C 32 29 2C  4E 41 24 28 43 AA 41 31  |C.A1,2),NA$(C.A1|
000002B0: 2C 33 29 2C 4E 41 24 28  43 AA 41 31 2C 34 29 2C  |,3),NA$(C.A1,4),|
000002C0: 4E 41 24 28 43 AA 41 31  2C 35 29 2C 4E 41 24 28  |NA$(C.A1,5),NA$(|
000002D0: 43 AA 41 31 2C 36 29 2C  4E 41 24 28 43 AA 41 31  |C.A1,6),NA$(C.A1|
000002E0: 2C 37 29 00 E9 1E A4 01  82 00 F0 1E C2 01 FE 0F  |,7).............|
000002F0: 00 25 1F CC 01 99 22 93  1D 1D 1D 1D 1D 1D 1D 1D  |.%....".........|
00000300: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000310: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D CD 41 49 4E 20  |............AIN |
00000320: CD 45 4E 55 22 00 41 1F  D6 01 99 22 11 11 11 11  |.ENU".A...."....|
00000330: 28 31 29 20 D6 49 45 57  20 D2 45 43 4F 52 44 53  |(1) .IEW .ECORDS|
00000340: 22 00 60 1F E0 01 99 22  11 11 28 32 29 20 C1 44  |".`...."..(2) .D|
00000350: 44 20 D2 45 43 4F 52 44  53 22 3A 99 C7 28 37 29  |D .ECORDS":..(7)|
00000360: 00 8F 1F EA 01 85 22 13  11 11 11 11 11 11 11 11  |......".........|
00000370: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 C5  |................|
00000380: 4E 54 45 52 20 CF 50 54  49 4F 4E 22 3B 58 24 00  |NTER .PTION";X$.|
00000390: 9F 1F F4 01 8B 58 24 B2  22 31 22 A7 37 30 30 00  |.....X$."1".700.|
000003A0: B0 1F FE 01 8B 58 24 B3  B1 22 32 22 A7 34 36 30  |.....X$.."2".460|
000003B0: 00 BA 1F 03 02 43 B2 5A  AA 31 00 F4 1F 08 02 99  |.....C.Z.1......|
000003C0: 22 93 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |"...............|
000003D0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
000003E0: D7 4F 52 4B 49 4E 47 20  CF 4E 20 C9 54 45 4D 20  |.ORKING .N .TEM |
000003F0: 23 22 3B 43 00 2C 20 0A  02 99 22 1D 1D 1D 1D 1D  |#";C., ...".....|
00000400: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000410: 1D 1D 1D 1D 1D 1D 1D 1D  1D C9 46 20 C6 49 4E 49  |..........F .INI|
00000420: 53 48 45 44 20 D4 59 50  45 20 39 39 00 6D 20 0D  |SHED .YPE 99.m .|
00000430: 02 99 22 11 11 11 C5 4E  54 45 52 20 CE 41 4D 45  |.."....NTER .AME|
00000440: 22 C7 28 31 34 32 29 3B  3A 85 4E 41 24 28 43 2C  |".(142);:.NA$(C,|
00000450: 31 29 3A 99 C7 28 31 34  29 3B 3A 8B 4E 41 24 28  |1):..(14);:.NA$(|
00000460: 43 2C 31 29 B2 22 39 39  22 A7 35 38 30 00 9B 20  |C,1)."99".580.. |
00000470: 12 02 99 22 C5 4E 54 45  52 20 C1 44 44 52 45 53  |...".NTER .DDRES|
00000480: 53 22 C7 28 31 34 32 29  3B 3A 85 4E 41 24 28 43  |S".(142);:.NA$(C|
00000490: 2C 32 29 3A 99 C7 28 31  34 29 3B 00 C6 20 17 02  |,2):..(14);.. ..|
000004A0: 99 22 C5 4E 54 45 52 20  C3 49 54 59 22 C7 28 31  |.".NTER .ITY".(1|
000004B0: 34 32 29 3B 3A 85 4E 41  24 28 43 2C 33 29 3A 99  |42);:.NA$(C,3):.|
000004C0: C7 28 31 34 29 3B 00 F2  20 1C 02 99 22 C5 4E 54  |.(14);.. ...".NT|
000004D0: 45 52 20 D3 54 41 54 45  22 C7 28 31 34 32 29 3B  |ER .TATE".(142);|
000004E0: 3A 85 4E 41 24 28 43 2C  34 29 3A 99 C7 28 31 34  |:.NA$(C,4):..(14|
000004F0: 29 3B 00 21 21 21 02 99  22 C5 4E 54 45 52 20 DA  |);.!!!..".NTER .|
00000500: 49 50 20 C3 4F 44 45 22  C7 28 31 34 32 29 3B 3A  |IP .ODE".(142);:|
00000510: 85 4E 41 24 28 43 2C 35  29 3A 99 C7 28 31 34 29  |.NA$(C,5):..(14)|
00000520: 3B 00 4F 21 26 02 99 22  C5 4E 54 45 52 20 D0 48  |;.O!&..".NTER .H|
00000530: 4F 4E 45 20 23 22 C7 28  31 34 32 29 3B 3A 85 4E  |ONE #".(142);:.N|
00000540: 41 24 28 43 2C 36 29 3A  99 C7 28 31 34 29 3B 00  |A$(C,6):..(14);.|
00000550: 7D 21 28 02 99 22 C5 4E  54 45 52 20 C3 41 54 41  |}!(..".NTER .ATA|
00000560: 47 4F 52 59 22 C7 28 31  34 32 29 3B 3A 85 4E 41  |GORY".(142);:.NA|
00000570: 24 28 43 2C 37 29 3A 99  C7 28 31 34 29 00 AD 21  |$(C,7):..(14)..!|
00000580: 2B 02 58 24 B2 22 22 3A  85 22 13 11 11 11 11 11  |+.X$."":."......|
00000590: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000005A0: 11 11 C3 4F 52 52 45 43  54 22 3B 58 24 00 BD 21  |...ORRECT";X$..!|
000005B0: 30 02 8B 58 24 B2 22 4E  22 A7 35 32 30 00 CE 21  |0..X$."N".520..!|
000005C0: 35 02 8B 58 24 B3 B1 22  59 22 A7 35 35 35 00 DD  |5..X$.."Y".555..|
000005D0: 21 37 02 8B 58 24 B2 22  22 A7 35 35 35 00 E7 21  |!7..X$."".555..!|
000005E0: 3A 02 43 B2 43 AA 31 00  F1 21 3F 02 89 20 35 32  |:.C.C.1..!?.. 52|
000005F0: 30 00 FB 21 44 02 43 B2  43 AB 31 00 40 22 49 02  |0..!D.C.C.1.@"I.|
00000600: 4E 5A B2 43 3A 8B 4E 5A  B2 5A A7 85 22 93 CE 4F  |NZ.C:.NZ.Z.."..O|
00000610: 20 CE 45 57 20 C9 4E 46  4F 52 4D 41 54 49 4F 4E  | .EW .NFORMATION|
00000620: 20 C5 4E 54 45 52 45 44  2E 20 20 D0 52 45 53 53  | .NTERED.  .RESS|
00000630: 20 C5 4E 54 45 52 22 3B  46 55 24 3A 89 34 36 30  | .NTER";FU$:.460|
00000640: 00 54 22 4B 02 99 22 93  D0 4C 45 41 53 45 20 D7  |.T"K.."..LEASE .|
00000650: 41 49 54 22 00 6F 22 4E  02 FE 0D 23 32 2C 22 40  |AIT".o"N...#2,"@|
00000660: 52 45 43 4F 52 44 20 43  4F 55 4E 54 22 2C 57 00  |RECORD COUNT",W.|
00000670: 92 22 50 02 8B 44 53 B1  31 A7 FE 0F 3A FE 0D 23  |."P..DS.1...:..#|
00000680: 32 2C 22 52 45 43 4F 52  44 20 43 4F 55 4E 54 22  |2,"RECORD COUNT"|
00000690: 2C 57 00 9C 22 58 02 98  32 2C 4E 5A 00 B4 22 62  |,W.."X..2,NZ.."b|
000006A0: 02 FE 0E 23 31 2C 22 4E  41 4D 45 2F 41 44 44 52  |...#1,"NAME/ADDR|
000006B0: 45 53 53 22 00 D7 22 63  02 8B 44 53 B1 31 A7 FE  |ESS".."c..DS.1..|
000006C0: 0F 3A FE 0D 23 31 2C 22  4E 41 4D 45 2F 41 44 44  |.:..#1,"NAME/ADD|
000006D0: 52 45 53 53 22 2C 57 00  E3 22 64 02 99 C7 28 31  |RESS",W.."d...(1|
000006E0: 34 32 29 00 F1 22 67 02  81 43 B2 5A AA 31 A4 4E  |42).."g..C.Z.1.N|
000006F0: 5A 00 49 23 6C 02 98 31  2C 4E 41 24 28 43 2C 31  |Z.I#l..1,NA$(C,1|
00000700: 29 3A 98 31 2C 4E 41 24  28 43 2C 32 29 3A 98 31  |):.1,NA$(C,2):.1|
00000710: 2C 4E 41 24 28 43 2C 33  29 3A 98 31 2C 4E 41 24  |,NA$(C,3):.1,NA$|
00000720: 28 43 2C 34 29 3A 98 31  2C 4E 41 24 28 43 2C 35  |(C,4):.1,NA$(C,5|
00000730: 29 3A 98 31 2C 4E 41 24  28 43 2C 36 29 3A 98 31  |):.1,NA$(C,6):.1|
00000740: 2C 4E 41 24 28 43 2C 37  29 00 4F 23 71 02 82 00  |,NA$(C,7).O#q...|
00000750: 5A 23 72 02 99 C7 28 31  34 29 00 61 23 73 02 FE  |Z#r...(14).a#s..|
00000760: 0F 00 6A 23 75 02 5A B2  4E 5A 00 73 23 76 02 89  |..j#u.Z.NZ.s#v..|
00000770: 34 36 30 00 7D 23 BC 02  99 22 93 22 3B 00 B0 23  |460.}#...".";..#|
00000780: C6 02 53 24 B2 22 22 3A  99 22 11 11 11 C5 4E 54  |..S$."":."....NT|
00000790: 45 52 20 D3 45 41 52 43  48 20 C3 4F 4D 4D 41 4E  |ER .EARCH .OMMAN|
000007A0: 44 22 3B 3A 99 C7 28 31  34 32 29 3B 3A 85 53 24  |D";:..(142);:.S$|
000007B0: 00 C8 23 D0 02 8B 53 24  B2 22 22 A7 20 99 C7 28  |..#...S$."". ..(|
000007C0: 31 34 29 3A 89 34 36 30  00 D0 23 DA 02 4C B2 30  |14):.460..#..L.0|
000007D0: 00 E6 23 EF 02 8B 53 24  B2 22 2A 22 A7 8D 31 34  |..#...S$."*"..14|
000007E0: 30 3A 89 38 30 30 00 0B  24 F0 02 8B C8 28 53 24  |0:.800..$....(S$|
000007F0: 2C 31 29 B2 22 2A 22 AF  C9 28 53 24 2C 31 29 B2  |,1)."*"..(S$,1).|
00000800: 22 2A 22 A7 8D 35 3A 89  38 30 30 00 25 24 F1 02  |"*"..5:.800.%$..|
00000810: 8B C8 28 53 24 2C 31 29  B2 22 2A 22 A7 8D 35 30  |..(S$,1)."*"..50|
00000820: 3A 89 38 30 30 00 40 24  F3 02 8B C9 28 53 24 2C  |:.800.@$....(S$,|
00000830: 31 29 B2 22 2A 22 A7 8D  31 30 30 3A 89 38 30 30  |1)."*"..100:.800|
00000840: 00 49 24 F8 02 8D 32 30  30 00 5C 24 20 03 4C 31  |.I$...200.\$ .L1|
00000850: B2 4C 3A 8B 4C B3 B1 30  A7 38 35 30 00 96 24 2A  |.L:.L..0.850..$*|
00000860: 03 99 C7 28 31 34 29 3B  3A 99 22 11 11 11 11 11  |...(14);:.".....|
00000870: D4 48 45 20 C6 49 45 4C  44 20 D9 4F 55 20 C5 4E  |.HE .IELD .OU .N|
00000880: 54 45 52 45 44 20 C1 50  50 45 41 52 53 22 4C 22  |TERED .PPEARS"L"|
00000890: D4 49 4D 45 53 22 00 AC  24 34 03 99 22 11 D0 52  |.IMES"..$4.."..R|
000008A0: 45 53 53 20 C1 4E 59 20  CB 45 59 22 00 BF 24 3E  |ESS .NY .EY"..$>|
000008B0: 03 A1 58 24 3A 8B 58 24  B2 22 22 A7 38 33 30 00  |..X$:.X$."".830.|
000008C0: CF 24 48 03 8B 4C B2 30  A7 20 89 20 37 30 30 00  |.$H..L.0. . 700.|
000008D0: D7 24 52 03 4C B2 31 00  4F 25 5C 03 99 C7 28 31  |.$R.L.1.O%\...(1|
000008E0: 34 32 29 3B 3A 99 22 93  22 3A 99 4E 41 24 28 4C  |42);:.".":.NA$(L|
000008F0: 4F 43 28 4C 29 2C 31 29  3A 99 4E 41 24 28 4C 4F  |OC(L),1):.NA$(LO|
00000900: 43 28 4C 29 2C 32 29 3A  99 4E 41 24 28 4C 4F 43  |C(L),2):.NA$(LOC|
00000910: 28 4C 29 2C 33 29 22 2C  20 22 3B 3A 99 4E 41 24  |(L),3)", ";:.NA$|
00000920: 28 4C 4F 43 28 4C 29 2C  34 29 22 20 20 22 3B 3A  |(LOC(L),4)"  ";:|
00000930: 99 4E 41 24 28 4C 4F 43  28 4C 29 2C 35 29 3A 99  |.NA$(LOC(L),5):.|
00000940: 3A 99 4E 41 24 28 4C 4F  43 28 4C 29 2C 36 29 00  |:.NA$(LOC(L),6).|
00000950: 64 25 5D 03 99 3A 99 4E  41 24 28 4C 4F 43 28 4C  |d%]..:.NA$(LOC(L|
00000960: 29 2C 37 29 00 70 25 5F  03 99 C7 28 31 34 29 3B  |),7).p%_...(14);|
00000970: 00 A1 25 63 03 99 22 13  1D 1D 1D 1D 1D 1D 1D 1D  |..%c..".........|
00000980: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000990: 1D 1D 1D 1D 1D 1D 1D 1D  1D 22 4C 22 4F 46 22 4C  |........."L"OF"L|
000009A0: 31 00 D0 25 66 03 99 22  11 11 11 11 11 11 11 11  |1..%f.."........|
000009B0: 11 12 CE 92 45 58 54 20  20 20 12 D0 92 52 45 56  |....EXT   ...REV|
000009C0: 49 4F 55 53 20 20 20 12  C5 92 53 43 41 50 45 22  |IOUS   ...SCAPE"|
000009D0: 00 E9 25 68 03 99 3A 99  22 12 D4 92 4F 50 20 20  |..%h..:."...OP  |
000009E0: 20 12 D3 92 45 41 52 43  48 00 02 26 6F 03 58 24  | ...EARCH..&o.X$|
000009F0: B2 22 22 3A A1 58 24 3A  8B 58 24 B2 22 22 A7 38  |."":.X$:.X$."".8|
00000A00: 37 39 00 26 26 70 03 8B  20 58 24 B2 22 4E 22 A7  |79.&&p.. X$."N".|
00000A10: 4C B2 4C AA 31 3A 8B 4C  B1 4C 31 A7 4C B2 4C AB  |L.L.1:.L.L1.L.L.|
00000A20: 31 3A 89 38 36 30 00 47  26 7A 03 8B 20 58 24 B2  |1:.860.G&z.. X$.|
00000A30: 22 50 22 A7 4C B2 4C AB  31 3A 8B 4C B3 31 A7 4C  |"P".L.L.1:.L.1.L|
00000A40: B2 31 3A 89 38 36 30 00  5F 26 84 03 8B 20 58 24  |.1:.860._&... X$|
00000A50: B2 22 45 22 A7 53 24 B2  22 22 3A 89 34 36 30 00  |."E".S$."":.460.|
00000A60: 71 26 86 03 8B 20 58 24  B2 22 54 22 A7 89 38 35  |q&... X$."T"..85|
00000A70: 30 00 88 26 88 03 8B 58  24 B2 22 53 22 A7 58 24  |0..&...X$."S".X$|
00000A80: B2 22 22 3A 89 37 30 30  00 91 26 8E 03 89 38 36  |."":.700..&...86|
00000A90: 30 00 00 00                                       |0...            |

.......%:.".":.G(14):.350.$....C.1.Z./..
..X.1.7.F....T(NA$(C,X),J(S$,2,C(S$).2))
..0.L.L.1:LOC(L).C:X.7.L.....R.....X....
...2..C.1.Z...7..X.1.7.H.<..I(NA$(C,X),C
(S$).1).I(S$,C(S$).1).L.L.1:LOC(L).C:X.7
.N.A...T.F...Z.K.....D..C.1.Z...I..X.1.7
.*.X..H(NA$(C,X),C(S$).1).H(S$,C(S$).1).
L.L.1:LOC(L).C:X.7.0.}...6.....<.....O..
..C.1.Z:.X.1.7:.S$."*".L.L.1:LOC(L).C:X.
7:.:.:..{.H.. C.1.Z...M..X.1.7...R..NA$(
C,X).S$.L.L.1:LOC(L).C:X.7...W..........
.....Q.^..".LOADING FILE"...H..NA$(350,7
):.LOC(350)...|...#1,"NAME/ADDRESS"...~.
..#2,"RECORD COUNT".*...DS.1..450.3....
2,Z.<...A1.1.I....C.1.Z.2......1,NA$(C,1
),NA$(C,2),NA$(C,3),NA$(C,4),NA$(C,5),NA
$(C,6),NA$(C,7),NA$(C.A1,1),NA$(C.A1,2),
NA$(C.A1,3),NA$(C.A1,4),NA$(C.A1,5),NA$(
C.A1,6),NA$(C.A1,7).........B....%.L..".
...................................MAIN 
MENU".A.V.."....(1) VIEW RECORDS".`...."
..(2) ADD RECORDS":.G(7)......".........
...............ENTER OPTION";X$......X$.
"1".700......X$.."2".460.....C.Z.1......
"...............................WORKING 
ON ITEM #";C., ...".....................
.........IF FINISHED TYPE 99.M ..."...EN
TER NAME"G(142);:.NA$(C,1):.G(14);:.NA$(
C,1)."99".580.. ..."ENTER ADDRESS"G(142)
;:.NA$(C,2):.G(14);.F ..."ENTER CITY"G(1
42);:.NA$(C,3):.G(14);.. ..."ENTER STATE
"G(142);:.NA$(C,4):.G(14);.!!!.."ENTER Z
IP CODE"G(142);:.NA$(C,5):.G(14);.O!&.."
ENTER PHONE #"G(142);:.NA$(C,6):.G(14);.
}!(.."ENTER CATAGORY"G(142);:.NA$(C,7):.
G(14)..!+.X$."":."......................
..CORRECT";X$..!0..X$."N".520.N!5..X$.."
Y".555..!7..X$."".555..!:.C.C.1..!?.. 52
0..!D.C.C.1.@"I.NZ.C:.NZ.Z..".NO NEW INF
ORMATION ENTERED.  PRESS ENTER";FU$:.460
.T"K..".PLEASE WAIT".O"N...#2,"@RECORD C
OUNT",W.."P..DS.1...:..#2,"RECORD COUNT"
,W.."X..2,NZ.."B...#1,"NAME/ADDRESS".W"C
..DS.1...:..#1,"NAME/ADDRESS",W.."D..G(1
42).."G..C.Z.1.NZ.I#L..1,NA$(C,1):.1,NA$
(C,2):.1,NA$(C,3):.1,NA$(C,4):.1,NA$(C,5
):.1,NA$(C,6):.1,NA$(C,7).O#Q...Z#R..G(1
4).A#S....J#U.Z.NZ.S#V..460.}#...".";..#
F.S$."":."...ENTER SEARCH COMMAND";:.G(1
42);:.S$.H#P..S$."". .G(14):.460.P#Z.L.0
..#...S$."*"..140:.800..$...H(S$,1)."*".
I(S$,1)."*"..5:.800.%$...H(S$,1)."*"..50
:.800.@$...I(S$,1)."*"..100:.800.I$...20
0.\$ .L1.L:.L..0.850..$*..G(14);:.".....
THE FIELD YOU ENTERED APPEARS"L"TIMES"..
$4..".PRESS ANY KEY"..$>..X$:.X$."".830.
O$H..L.0. . 700.W$R.L.1.O%\..G(142);:.".
":.NA$(LOC(L),1):.NA$(LOC(L),2):.NA$(LOC
(L),3)", ";:.NA$(LOC(L),4)"  ";:.NA$(LOC
(L),5):.:.NA$(LOC(L),6).D%]..:.NA$(LOC(L
),7).P%_..G(14);..%C..".................
................."L"OF"L1.P%F.."........
..N.EXT   .P.REVIOUS   .E.SCAPE"..%H..:.
".T.OP   .S.EARCH..&O.X$."":.X$:.X$."".8
79.&&P.. X$."N".L.L.1:.L.L1.L.L.1:.860.G
&Z.. X$."P".L.L.1:.L.1.L.1:.860._&... X$
."E".S$."":.460.Q&... X$."T"..850..&...X
$."S".X$."":.700..&...860...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL