VIC-20 WEDGE

00000000: 31 30 29 22 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |10)"............|
00000010: A3 A3 A3 A3 A3 22 00 06  1B E8 05 8D 32 37 30 30  |....."......2700|
00000020: 30 3A 8B 46 35 B2 31 A7  31 35 31 34 00 36 1B E9  |0:.F5.1.1514.6..|
00000030: 05 58 B2 B5 28 32 30 AB  4C 4C AD 32 29 3A 99 A3  |.X..(20.LL.2):..|
00000040: 58 29 4E 54 24 3A 99 A3  58 29 3A 81 58 B2 31 A4  |X)NT$:..X):.X.1.|
00000050: 4C 4C 3A 99 22 2D 22 3B  3A 82 3A 99 00 5C 1B EA  |LL:."-";:.:..\..|
00000060: 05 8D 32 37 31 30 30 3A  41 24 B2 22 CE 4F 54 20  |..27100:A$.".OT |
00000070: C1 56 41 49 4C 41 42 4C  45 22 3A 8B 46 35 B2 31  |.VAILABLE":.F5.1|
00000080: A7 8E 00 92 1B F0 05 99  22 11 12 81 C1 44 44 52  |........"....DDR|
00000090: 45 53 53 3A 92 9A 22 3A  99 22 2D 2D 2D 2D 2D 2D  |ESS:..":."------|
000000A0: 2D 2D 22 3A 8B 41 24 28  32 29 B2 22 4E 22 A7 99  |--":.A$(2)."N"..|
000000B0: 41 24 3A 89 31 35 32 36  00 9D 1B F3 05 99 41 24  |A$:.1526......A$|
000000C0: 28 32 29 00 D7 1B F6 05  99 22 11 12 81 D4 45 4C  |(2)......"....EL|
000000D0: 45 50 48 4F 4E 45 3A 92  9A 22 3A 99 22 2D 2D 2D  |EPHONE:..":."---|
000000E0: 2D 2D 2D 2D 2D 2D 2D 22  3A 8B 41 24 28 33 29 B2  |-------":.A$(3).|
000000F0: 22 4E 22 A7 99 41 24 3A  89 31 35 32 39 00 E2 1B  |"N"..A$:.1529...|
00000100: F8 05 99 41 24 28 33 29  00 14 1C F9 05 99 A3 38  |...A$(3).......8|
00000110: 29 22 11 2A 2A 2A 20 20  C5 4E 44 20 D2 45 43 4F  |)".***  .ND .ECO|
00000120: 52 44 20 20 2A 2A 2A 22  3A 8D 32 30 30 30 30 3A  |RD  ***":.20000:|
00000130: 8B 49 45 B2 31 A7 31 35  37 30 00 24 1C FF 05 8B  |.IE.1.1570.$....|
00000140: 4A B1 B2 35 30 A7 31 35  36 37 00 41 1C 04 06 8B  |J..50.1567.A....|
00000150: 4E 24 28 4A 2C 49 29 B3  B1 4E 24 28 4A AA 31 2C  |N$(J,I)..N$(J.1,|
00000160: 49 29 A7 31 35 36 37 00  8D 1C 0E 06 99 22 11 1D  |I).1567......"..|
00000170: 1D D4 48 45 52 45 20 49  53 20 41 4E 4F 54 48 45  |..HERE IS ANOTHE|
00000180: 52 20 52 45 43 4F 52 44  20 49 4E 20 54 48 41 54  |R RECORD IN THAT|
00000190: 20 4E 41 4D 45 22 3A 99  A3 31 30 29 22 12 48 49  | NAME":..10)".HI|
000001A0: 54 20 41 4E 59 20 4B 45  59 20 54 4F 20 56 49 45  |T ANY KEY TO VIE|
000001B0: 57 92 22 00 C1 1C 15 06  99 A3 31 30 29 22 12 4F  |W.".......10)".O|
000001C0: 52 20 48 49 54 20 20 53  20 20 54 4F 20 20 53 54  |R HIT  S  TO  ST|
000001D0: 4F 50 22 3A 8D 31 30 30  30 30 3A 8B 41 24 B2 22  |OP":.10000:.A$."|
000001E0: 53 22 A7 31 35 36 37 00  D1 1C 1D 06 4A B2 4A AA  |S".1567.....J.J.|
000001F0: 31 3A 89 31 35 30 30 00  E0 1C 1F 06 8B 4E 53 B2  |1:.1500......NS.|
00000200: 31 A7 32 30 32 30 00 EC  1C 20 06 8B 46 34 B2 31  |1.2020... ..F4.1|
00000210: A7 8E 00 27 1D 22 06 99  22 11 C9 53 20 41 4C 54  |...'.".."..S ALT|
00000220: 45 52 41 54 49 4F 4E 2F  44 45 4C 45 54 49 4F 4E  |ERATION/DELETION|
00000230: 20 52 45 51 55 49 52 45  44 22 3B 3A 8D 31 31 30  | REQUIRED";:.110|
00000240: 30 30 3A 8B 50 36 B2 32  A7 31 38 32 30 00 35 1D  |00:.P6.2.1820.5.|
00000250: 41 06 8B 4A B2 30 A7 31  36 30 37 00 52 1D 42 06  |A..J.0.1607.R.B.|
00000260: 8B 4E 24 28 4A 2C 49 29  B3 B1 4E 24 28 4A AB 31  |.N$(J,I)..N$(J.1|
00000270: 2C 49 29 A7 31 36 30 37  00 8B 1D 43 06 99 22 11  |,I).1607...C..".|
00000280: C5 4E 54 45 52 20 D2 45  43 4F 52 44 20 CE 4F 2E  |.NTER .ECORD .O.|
00000290: 20 54 4F 20 42 45 20 41  4C 54 45 52 45 44 22 3B  | TO BE ALTERED";|
000002A0: 3A 50 33 B2 32 3A 50 34  B2 31 3A 8D 33 30 30 30  |:P3.2:P4.1:.3000|
000002B0: 30 00 B1 1D 44 06 8B C5  28 50 24 29 B3 B2 30 B0  |0...D...(P$)..0.|
000002C0: C5 28 50 24 29 B1 43 28  49 29 A7 99 22 91 91 91  |.(P$).C(I).."...|
000002D0: 22 3A 89 31 36 30 33 00  BF 1D 45 06 4A B2 C5 28  |":.1603...E.J..(|
000002E0: 50 24 29 AB 31 00 F2 1D  47 06 99 22 91 C8 49 54  |P$).1...G.."..IT|
000002F0: 20 12 20 44 20 92 20 54  4F 20 44 45 4C 45 54 45  | . D . TO DELETE|
00000300: 2C 20 CF 54 48 45 52 57  49 53 45 20 48 49 54 20  |, .THERWISE HIT |
00000310: 41 4E 59 20 4B 45 59 22  00 26 1E 4D 06 8D 31 30  |ANY KEY".&.M..10|
00000320: 30 30 30 3A 8B 41 24 B2  22 44 22 A7 99 22 11 C8  |000:.A$."D".."..|
00000330: 41 4E 47 20 4F 4E 20 57  48 49 4C 45 20 44 45 4C  |ANG ON WHILE DEL|
00000340: 45 54 49 4E 47 22 3A 89  31 37 35 30 00 63 1E 4F  |ETING":.1750.c.O|
00000350: 06 99 22 93 22 3B 3A 8D  32 37 30 30 30 3A 8D 32  |..".";:.27000:.2|
00000360: 37 31 30 30 3A 53 24 B2  41 24 28 32 29 3A 54 24  |7100:S$.A$(2):T$|
00000370: B2 41 24 28 33 29 3A 81  4E B2 32 A4 31 30 3A 41  |.A$(3):.N.2.10:A|
00000380: 24 28 4E 29 B2 22 22 3A  82 00 97 1E 54 06 51 B2  |$(N)."":....T.Q.|
00000390: 32 3A 50 24 B2 53 24 3A  8D 32 37 32 30 30 3A 51  |2:P$.S$:.27200:Q|
000003A0: B2 39 3A 50 24 B2 54 24  3A 8D 32 37 32 30 30 3A  |.9:P$.T$:.27200:|
000003B0: 45 B2 31 3A 49 45 B2 31  3A 89 35 32 30 00 B1 1E  |E.1:IE.1:.520...|
000003C0: 5E 06 53 24 28 4A 2C 49  29 B2 53 24 3A 46 31 B2  |^.S$(J,I).S$:F1.|
000003D0: 31 3A 89 31 35 30 30 00  D7 1E D6 06 53 B2 4A 3A  |1:.1500.....S.J:|
000003E0: 46 31 B2 31 3A 81 4A B2  53 A4 35 30 3A 8B 4E 24  |F1.1:.J.S.50:.N$|
000003F0: 28 4A 2C 49 29 B2 22 22  A7 31 38 31 33 00 FD 1E  |(J,I)."".1813...|
00000400: EF 06 8B 4A B2 35 30 A7  4E 24 28 4A 2C 49 29 B2  |...J.50.N$(J,I).|
00000410: 22 22 3A 53 24 28 4A 2C  49 29 B2 22 22 3A 89 31  |"":S$(J,I)."":.1|
00000420: 38 31 33 00 28 1F F4 06  4E 24 28 4A 2C 49 29 B2  |813.(...N$(J,I).|
00000430: 4E 24 28 4A AA 31 2C 49  29 3A 53 24 28 4A 2C 49  |N$(J.1,I):S$(J,I|
00000440: 29 B2 53 24 28 4A AA 31  2C 49 29 3A 82 4A 00 56  |).S$(J.1,I):.J.V|
00000450: 1F 15 07 43 28 49 29 B2  43 28 49 29 AB 31 3A 99  |...C(I).C(I).1:.|
00000460: 22 1D CF CB 2C 20 46 49  4C 45 20 44 45 4C 45 54  |"..., FILE DELET|
00000470: 45 44 22 3A 8D 32 30 30  30 30 3A 99 00 86 1F 1C  |ED":.20000:.....|
00000480: 07 99 22 11 C1 4E 59 20  4F 54 48 45 52 20 41 4C  |.."..NY OTHER AL|
00000490: 54 45 52 41 54 49 4F 4E  22 3B 3A 8D 31 31 30 30  |TERATION";:.1100|
000004A0: 30 3A 8B 50 36 B2 31 A7  31 32 30 30 00 8F 1F 26  |0:.P6.1.1200...&|
000004B0: 07 89 32 34 30 00 9E 1F  4E 07 8B 4E 53 B2 31 A7  |..240...N..NS.1.|
000004C0: 32 30 32 30 00 AD 1F 58  07 8B 4E 53 B2 30 A7 31  |2020...X..NS.0.1|
000004D0: 38 32 30 00 C1 1F D0 07  8D 39 30 30 30 3A 8B 50  |820......9000:.P|
000004E0: 36 B2 32 A7 32 34 30 00  FB 1F DA 07 99 22 93 C5  |6.2.240......"..|
000004F0: 4E 54 45 52 20 12 D3 55  52 4E 41 4D 45 20 26 20  |NTER ..URNAME & |
00000500: CE 41 4D 45 92 20 54 4F  20 46 49 4E 44 20 41 44  |.AME. TO FIND AD|
00000510: 44 52 45 53 53 22 3A 4E  53 B2 31 3A 89 31 32 31  |DRESS":NS.1:.121|
00000520: 30 00 36 20 E4 07 4E 53  B2 30 3A 99 22 11 C1 4E  |0.6 ..NS.0:."..N|
00000530: 59 20 4F 54 48 45 52 20  41 44 44 52 45 53 53 20  |Y OTHER ADDRESS |
00000540: 52 45 51 55 49 52 45 44  22 3B 3A 8D 31 31 30 30  |REQUIRED";:.1100|
00000550: 30 3A 8B 50 36 B2 31 A7  32 30 30 30 00 3F 20 0C  |0:.P6.1.2000.? .|
00000560: 08 89 32 34 30 00 74 20  34 08 99 22 93 C5 4E 54  |..240.t 4.."..NT|
00000570: 45 52 20 4C 45 54 54 45  52 20 46 4F 52 20 57 48  |ER LETTER FOR WH|
00000580: 49 43 48 20 50 41 47 45  20 52 45 51 55 49 52 45  |ICH PAGE REQUIRE|
00000590: 44 3A 22 3A 8D 31 30 30  30 30 00 90 20 43 08 41  |D:":.10000.. C.A|
000005A0: B2 C6 28 41 24 29 3A 8B  41 B3 36 35 B0 41 B1 39  |..(A$):.A.65.A.9|
000005B0: 30 A7 32 31 30 30 00 AC  20 48 08 49 B2 B5 28 28  |0.2100.. H.I..((|
000005C0: 41 AB 36 35 29 AD 32 29  3A 8B 49 B1 39 A7 49 B2  |A.65).2):.I.9.I.|
000005D0: 31 30 00 D1 20 4D 08 41  24 B2 C7 28 32 AC 49 AA  |10.. M.A$..(2.I.|
000005E0: 31 39 33 29 3A 8B 49 B2  31 30 A7 43 24 B2 22 DA  |193):.I.10.C$.".|
000005F0: 22 3A 89 32 31 33 30 00  E3 20 4F 08 43 24 B2 C7  |":.2130.. O.C$..|
00000600: 28 32 AC 49 AA 31 39 34  29 00 2F 21 52 08 99 22  |(2.I.194)./!R.."|
00000610: 93 D0 41 47 45 20 12 20  22 41 24 22 20 2D 20 22  |..AGE . "A$" - "|
00000620: 43 24 22 20 92 20 43 4F  4E 54 41 49 4E 53 20 12  |C$" . CONTAINS .|
00000630: 22 43 28 49 29 22 9D 20  92 20 45 4E 54 52 49 45  |"C(I)". . ENTRIE|
00000640: 53 3A 22 3A 81 4E B2 31  A4 33 34 3A 99 22 A3 22  |S:":.N.1.34:."."|
00000650: 3B 3A 82 3A 99 00 5D 21  61 08 4D B2 30 3A 8B 4E  |;:.:..]!a.M.0:.N|
00000660: 24 28 30 2C 49 29 B2 22  22 A7 99 22 12 11 11 1D  |$(0,I)."".."....|
00000670: 1D D0 41 47 45 20 45 4D  50 54 59 11 22 3A 89 32  |..AGE EMPTY.":.2|
00000680: 32 33 30 00 79 21 66 08  81 4A B2 4D A4 32 30 AA  |230.y!f..J.M.20.|
00000690: 4D 3A 8B 4A B1 B2 43 28  49 29 A7 32 32 33 30 00  |M:.J..C(I).2230.|
000006A0: C1 21 75 08 99 4E 24 28  4A 2C 49 29 3A 82 3A 99  |.!u..N$(J,I):.:.|
000006B0: 22 D0 52 45 53 53 20 41  4E 59 20 4B 45 59 20 54  |".RESS ANY KEY T|
000006C0: 4F 20 43 4F 4E 54 49 4E  55 45 20 53 43 41 4E 22  |O CONTINUE SCAN"|
000006D0: 3A 8D 31 30 30 30 30 3A  4D B2 4A 3A 99 22 93 22  |:.10000:M.J:."."|
000006E0: 3B 3A 89 32 31 35 30 00  EB 21 B6 08 99 22 11 C1  |;:.2150..!..."..|
000006F0: 4E 59 20 4F 54 48 45 52  20 53 43 41 4E 22 3B 3A  |NY OTHER SCAN";:|
00000700: 8D 31 31 30 30 30 3A 8B  50 36 B2 31 A7 32 31 30  |.11000:.P6.1.210|
00000710: 30 00 F4 21 DE 08 89 32  34 30 00 33 22 C4 09 99  |0..!...240.3"...|
00000720: 22 93 22 A3 31 33 29 22  D0 D2 C9 CE D4 20 CD C5  |".".13)"..... ..|
00000730: CE D5 22 3A 99 A3 31 33  29 22 A3 A3 A3 A3 A3 A3  |..":..13)"......|
00000740: A3 A3 A3 A3 22 3A 46 37  B2 30 3A 46 36 B2 30 3A  |....":F7.0:F6.0:|
00000750: 46 35 B2 30 3A 46 34 B2  30 00 77 22 D8 09 99 A3  |F5.0:F4.0.w"....|
00000760: 38 29 22 11 12 D0 52 45  53 53 20 4F 50 54 49 4F  |8)"...RESS OPTIO|
00000770: 4E 20 4E 55 4D 42 45 52  22 3A 99 A3 38 29 22 11  |N NUMBER":..8)".|
00000780: 11 11 12 20 31 20 92 20  D0 52 49 4E 54 20 53 49  |... 1 . .RINT SI|
00000790: 4E 47 4C 45 20 41 44 44  52 45 53 53 22 00 B8 22  |NGLE ADDRESS".."|
000007A0: E2 09 99 A3 38 29 22 11  11 12 20 32 20 92 20 D0  |....8)"... 2 . .|
000007B0: 52 49 4E 54 20 41 4C 4C  20 41 44 44 52 45 53 53  |RINT ALL ADDRESS|
000007C0: 45 53 22 3A 99 A3 38 29  22 11 11 12 20 33 20 92  |ES":..8)"... 3 .|
000007D0: 20 C2 41 43 4B 20 54 4F  20 4D 45 4E 55 22 00 DE  | .ACK TO MENU"..|
000007E0: 22 F6 09 8D 31 30 30 30  30 3A 91 C5 28 41 24 29  |"...10000:..(A$)|
000007F0: 89 32 35 37 30 2C 32 36  37 30 2C 32 34 30 3A 89  |.2570,2670,240:.|
00000800: 32 35 35 30 00 22 23 0A  0A 99 22 93 C5 4E 54 45  |2550."#..."..NTE|
00000810: 52 20 12 D3 55 52 4E 41  4D 45 2F CE 41 4D 45 92  |R ..URNAME/.AME.|
00000820: 20 54 4F 20 46 49 4E 44  20 41 44 44 52 45 53 53  | TO FIND ADDRESS|
00000830: 3A 22 3A 46 34 B2 31 3A  8D 31 32 31 30 3A 8B 46  |:":F4.1:.1210:.F|
00000840: 34 B2 32 A7 32 36 33 30  00 52 23 1E 0A 99 22 11  |4.2.2630.R#...".|
00000850: C4 4F 20 59 4F 55 20 57  49 53 48 20 54 4F 20 50  |.O YOU WISH TO P|
00000860: 52 49 4E 54 22 3B 3A 8D  31 31 30 30 30 3A 8B 50  |RINT";:.11000:.P|
00000870: 36 B2 32 A7 32 35 30 30  00 6D 23 3C 0A 8D 32 38  |6.2.2500.m#<..28|
00000880: 30 30 3A 81 4D B2 31 A4  54 54 3A 8D 32 39 30 30  |00:.M.1.TT:.2900|
00000890: 3A 82 4D 00 A6 23 46 0A  46 34 B2 30 3A 99 22 11  |:.M..#F.F4.0:.".|
000008A0: CF CB 2C 20 41 4E 59 20  4F 54 48 45 52 22 3B 3A  |.., ANY OTHER";:|
000008B0: 8D 31 31 30 30 30 3A 8B  50 36 B2 32 A7 46 34 B2  |.11000:.P6.2.F4.|
000008C0: 30 3A 46 36 B2 30 3A 89  32 35 30 30 00 B0 23 64  |0:F6.0:.2500..#d|
000008D0: 0A 89 32 35 37 30 00 F6  23 6E 0A 99 22 93 11 11  |..2570..#n.."...|
000008E0: 11 11 11 11 22 A3 39 29  22 C4 4F 20 59 4F 55 20  |....".9)".O YOU |
000008F0: 57 49 53 48 20 54 4F 20  50 52 49 4E 54 3A 22 3A  |WISH TO PRINT:":|
00000900: 99 A3 39 29 22 11 12 20  31 20 92 20 D0 45 52 20  |..9)".. 1 . .ER |
00000910: 4C 49 53 54 20 46 4F 52  4D 41 54 22 00 37 24 78  |LIST FORMAT".7$x|
00000920: 0A 99 A3 39 29 22 11 12  20 32 20 92 20 D0 45 52  |...9)".. 2 . .ER|
00000930: 20 4C 41 42 45 4C 20 46  4F 52 4D 41 54 22 3A 99  | LABEL FORMAT":.|
00000940: 3A 99 A3 39 29 22 11 12  D0 52 45 53 53 20 4F 50  |:..9)"...RESS OP|
00000950: 54 49 4F 4E 20 4E 55 4D  42 45 52 92 22 00 55 24  |TION NUMBER.".U$|
00000960: 82 0A A1 41 24 3A 8B 41  24 B3 B1 22 31 22 AF 41  |...A$:.A$.."1".A|
00000970: 24 B3 B1 22 32 22 A7 32  36 39 30 00 66 24 8C 0A  |$.."2".2690.f$..|
00000980: 8B 41 24 B2 22 32 22 A7  32 37 32 30 00 8E 24 96  |.A$."2".2720..$.|
00000990: 0A 8D 32 38 32 30 3A 46  37 B2 31 3A 54 54 B2 31  |..2820:F7.1:TT.1|
000009A0: 3A 4C 46 B2 31 3A 49 B2  30 3A 46 35 B2 31 3A 89  |:LF.1:I.0:F5.1:.|
000009B0: 32 37 32 35 00 A1 24 A0  0A 8D 32 38 30 30 3A 49  |2725..$...2800:I|
000009C0: B2 30 3A 46 35 B2 31 00  D4 24 A5 0A 99 22 11 D0  |.0:F5.1..$..."..|
000009D0: 4C 45 41 53 45 20 41 4C  49 47 4E 20 50 41 50 45  |LEASE ALIGN PAPE|
000009E0: 52 20 54 48 45 4E 20 48  49 54 20 41 4E 59 20 4B  |R THEN HIT ANY K|
000009F0: 45 59 22 3A 8D 31 30 30  30 30 00 F1 24 AA 0A 81  |EY":.10000..$...|
00000A00: 4A B2 30 A4 35 30 3A 8B  4E 24 28 4A 2C 49 29 B2  |J.0.50:.N$(J,I).|
00000A10: 22 22 A7 32 37 36 30 00  0F 25 B4 0A 8D 31 35 30  |"".2760..%...150|
00000A20: 30 3A 81 4D B2 31 A4 54  54 3A 8D 32 39 30 30 3A  |0:.M.1.TT:.2900:|
00000A30: 82 4D 3A 82 4A 00 25 25  C8 0A 49 B2 49 AA 31 3A  |.M:.J.%%..I.I.1:|
00000A40: 8B 49 B3 B2 31 30 A7 32  37 33 30 00 3E 25 D2 0A  |.I..10.2730.>%..|
00000A50: 46 37 B2 30 3A 46 36 B2  30 3A 46 35 B2 30 3A 89  |F7.0:F6.0:F5.0:.|
00000A60: 32 35 30 30 00 86 25 F0  0A 99 22 11 C8 4F 57 20  |2500..%..."..OW |
00000A70: 4D 41 4E 59 20 54 49 4D  45 53 20 44 4F 20 59 4F  |MANY TIMES DO YO|
00000A80: 55 20 57 49 53 48 20 54  4F 20 50 52 49 4E 54 3F  |U WISH TO PRINT?|
00000A90: 22 3B 3A 50 33 B2 33 3A  50 34 B2 31 3A 8D 33 30  |";:P3.3:P4.1:.30|
00000AA0: 30 30 30 3A 54 54 B2 C5  28 50 24 29 00 9F 25 FA  |000:TT..(P$)..%.|
00000AB0: 0A 8B 54 54 B3 B2 30 A7  99 22 91 91 91 91 22 3A  |..TT..0.."....":|
00000AC0: 89 32 38 30 30 00 E7 25  FC 0A 99 22 11 48 4F 57  |.2800..%...".HOW|
00000AD0: 20 4D 41 4E 59 20 4C 49  4E 45 2D 46 45 45 44 53  | MANY LINE-FEEDS|
00000AE0: 20 42 45 54 57 45 45 4E  20 41 44 44 52 45 53 53  | BETWEEN ADDRESS|
00000AF0: 45 53 22 3A 50 33 B2 32  3A 50 34 B2 31 3A 8D 33  |ES":P3.2:P4.1:.3|
00000B00: 30 30 30 30 3A 4C 46 B2  C5 28 50 24 29 00 00 26  |0000:LF..(P$)..&|
00000B10: FE 0A 8B 4C 46 B3 B2 30  A7 99 22 91 91 91 91 22  |...LF..0.."...."|
00000B20: 3A 89 32 38 31 32 00 3E  26 04 0B 99 22 11 C4 4F  |:.2812.>&..."..O|
00000B30: 20 59 4F 55 20 57 49 53  48 20 54 45 4C 45 50 48  | YOU WISH TELEPH|
00000B40: 4F 4E 45 20 CE 4F 20 50  52 49 4E 54 45 44 22 3B  |ONE .O PRINTED";|
00000B50: 3A 8D 31 31 30 30 30 3A  8B 50 36 B2 32 A7 46 36  |:.11000:.P6.2.F6|
00000B60: B2 31 3A 8E 00 44 26 22  0B 8E 00 62 26 54 0B 9F  |.1:..D&"...b&T..|
00000B70: 31 2C 34 2C 37 3A 97 35  33 32 36 35 2C 31 31 3A  |1,4,7:.53265,11:|
00000B80: 98 31 2C C7 28 31 35 29  00 8D 26 5E 0B 8B 46 37  |.1,.(15)..&^..F7|
00000B90: B2 31 A7 98 31 2C C7 28  31 37 29 4E 54 24 3B 3A  |.1..1,.(17)NT$;:|
00000BA0: 98 31 2C C7 28 31 36 29  22 34 30 22 3B 3A 89 33  |.1,.(16)"40";:.3|
00000BB0: 30 31 33 00 9D 26 B8 0B  98 31 2C C7 28 31 37 29  |013..&...1,.(17)|
00000BC0: 4E 54 24 00 C2 26 C5 0B  41 24 B2 41 24 28 32 29  |NT$..&..A$.A$(2)|
00000BD0: 3A 8B 46 36 B2 31 A7 4C  54 B2 4C 46 3A 8D 33 35  |:.F6.1.LT.LF:.35|
00000BE0: 30 30 3A 89 33 30 33 30  00 FA 26 CF 0B 4C 54 B2  |00:.3030..&..LT.|
00000BF0: 32 3A 8D 33 35 30 30 3A  41 24 B2 41 24 28 33 29  |2:.3500:A$.A$(3)|
00000C00: 3A 8B 46 37 B2 31 A7 98  31 2C C7 28 31 36 29 22  |:.F7.1..1,.(16)"|
00000C10: 34 30 22 3B 3A 8D 33 35  30 30 3A 89 33 30 33 30  |40";:.3500:.3030|
00000C20: 00 19 27 D1 0B 98 31 2C  C7 28 31 37 29 22 D4 45  |..'...1,.(17)".E|
00000C30: 4C 45 50 48 4F 4E 45 3A  22 3A 8D 33 35 30 30 00  |LEPHONE:":.3500.|
00000C40: 2F 27 D6 0B 98 31 3A A0  31 3A 97 35 33 32 36 35  |/'...1:.1:.53265|
00000C50: 2C 32 37 3A 8E 00 3F 27  AC 0D 81 4E B2 31 A4 20  |,27:..?'...N.1. |
00000C60: C3 28 41 24 29 00 71 27  B1 0D 8B CA 28 41 24 2C  |.(A$).q'....(A$,|
00000C70: 4E 2C 31 29 B2 C7 28 31  34 31 29 AF 46 37 B2 31  |N,1)..(141).F7.1|
00000C80: A7 98 31 3A 98 31 2C C7  28 31 36 29 22 34 30 22  |..1:.1,.(16)"40"|
00000C90: 3B 3A 89 33 35 32 30 00  90 27 B3 0D 8B CA 28 41  |;:.3520..'....(A|
00000CA0: 24 2C 4E 2C 31 29 B2 C7  28 31 34 31 29 A7 98 31  |$,N,1)..(141)..1|
00000CB0: 3A 89 33 35 32 30 00 A7  27 B6 0D 98 31 2C C7 28  |:.3520..'...1,.(|
00000CC0: 31 37 29 CA 28 41 24 2C  4E 2C 31 29 3B 00 BE 27  |17).(A$,N,1);..'|
00000CD0: C0 0D 82 4E 3A 81 4E B2  31 A4 4C 54 3A 98 31 3A  |...N:.N.1.LT:.1:|
00000CE0: 82 4E 3A 8E 00 D4 27 94  11 99 22 93 11 11 22 3A  |.N:...'..."...":|
00000CF0: 8D 35 30 31 30 3A 89 32  34 30 00 F0 27 88 13 99  |.5010:.240..'...|
00000D00: 22 93 20 20 20 20 20 20  12 C1 D4 D4 C5 CE D4 C9  |".      ........|
00000D10: CF CE 92 3A 20 22 00 18  28 92 13 99 22 11 11 20  |...: "..(...".. |
00000D20: 20 20 20 20 20 D9 4F 55  20 48 41 56 45 22 B8 28  |     .OU HAVE".(|
00000D30: 30 29 22 42 59 54 45 53  20 46 52 45 45 22 00 4C  |0)"BYTES FREE".L|
00000D40: 28 9C 13 99 22 11 11 11  20 20 20 20 20 20 12 C8  |(..."...      ..|
00000D50: 49 54 20 41 4E 59 20 20  4B 45 59 20 54 4F 20 20  |IT ANY  KEY TO  |
00000D60: 43 4F 4E 54 49 4E 55 45  22 3A 8D 31 30 30 30 30  |CONTINUE":.10000|
00000D70: 3A 8E 00 6B 28 28 23 99  22 93 C1 52 45 20 59 4F  |:..k((#."..RE YO|
00000D80: 55 20 53 55 52 45 22 3B  3A 8D 31 31 30 30 30 3A  |U SURE";:.11000:|
00000D90: 8E 00 80 28 10 27 A1 41  24 3A 8B 41 24 B2 22 22  |...(.'.A$:.A$.""|
00000DA0: A7 31 30 30 30 30 00 86  28 1A 27 8E 00 9E 28 F8  |.10000..(.'...(.|
00000DB0: 2A 99 22 20 12 81 59 9A  92 45 53 2F 12 81 4E 9A  |*." ..Y..ES/..N.|
00000DC0: 92 4F 3F 22 00 BD 28 02  2B A1 41 24 3A 8B 41 24  |.O?"..(.+.A$:.A$|
00000DD0: B3 B1 22 59 22 AF 41 24  B3 B1 22 4E 22 A7 31 31  |.."Y".A$.."N".11|
00000DE0: 30 31 30 00 D0 28 0C 2B  8B 41 24 B2 22 59 22 A7  |010..(.+.A$."Y".|
00000DF0: 50 36 B2 31 3A 8E 00 DB  28 16 2B 50 36 B2 32 3A  |P6.1:...(.+P6.2:|
00000E00: 8E 00 14 29 20 4E 97 35  34 32 37 33 2C 38 36 3A  |...) N.54273,86:|
00000E10: 97 35 34 32 37 32 2C 31  30 35 3A 97 35 34 32 37  |.54272,105:.5427|
00000E20: 36 2C 31 37 3A 81 54 B2  30 A4 32 35 30 3A 82 3A  |6,17:.T.0.250:.:|
00000E30: 97 35 34 32 37 36 2C 30  3A 8E 00 4A 29 78 69 4C  |.54276,0:..J)xiL|
00000E40: 4C B2 C3 28 4E 24 28 4A  2C 49 29 29 3A 81 4D B2  |L..(N$(J,I)):.M.|
00000E50: 31 A4 4C 4C 3A 8B CA 28  4E 24 28 4A 2C 49 29 2C  |1.LL:..(N$(J,I),|
00000E60: 4D 2C 31 29 B2 C7 28 33  32 29 A7 32 37 30 32 30  |M,1)..(32).27020|
00000E70: 00 51 29 82 69 82 4D 00  96 29 8C 69 41 24 28 31  |.Q).i.M..).iA$(1|
00000E80: 29 B2 C9 28 4E 24 28 4A  2C 49 29 2C 4C 4C AB 4D  |)..(N$(J,I),LL.M|
00000E90: 29 3A 41 24 28 30 29 B2  C8 28 4E 24 28 4A 2C 49  |):A$(0)..(N$(J,I|
00000EA0: 29 2C 4D AB 31 29 3A 4E  54 24 B2 41 24 28 31 29  |),M.1):NT$.A$(1)|
00000EB0: AA 22 20 22 AA 41 24 28  30 29 3A 8E 00 CD 29 DC  |." ".A$(0):...).|
00000EC0: 69 4C 4C B2 C3 28 53 24  28 4A 2C 49 29 29 3A 81  |iLL..(S$(J,I)):.|
00000ED0: 58 B2 4C 4C A4 31 A9 AB  31 3A 8B CA 28 53 24 28  |X.LL.1..1:..(S$(|
00000EE0: 4A 2C 49 29 2C 58 2C 31  29 B2 22 5F 22 A7 32 37  |J,I),X,1)."_".27|
00000EF0: 31 32 30 00 D4 29 E6 69  82 58 00 05 2A F0 69 41  |120..).i.X..*.iA|
00000F00: 24 28 32 29 B2 C8 28 53  24 28 4A 2C 49 29 2C 58  |$(2)..(S$(J,I),X|
00000F10: AB 31 29 3A 41 24 28 33  29 B2 C9 28 53 24 28 4A  |.1):A$(3)..(S$(J|
00000F20: 2C 49 29 2C 4C 4C AB 58  29 3A 8E 00 12 2A 40 6A  |,I),LL.X):...*@j|
00000F30: 8B 50 24 B2 22 22 A7 8E  00 2A 2A 45 6A 8B C3 28  |.P$.""...**Ej..(|
00000F40: 50 24 29 B2 31 A7 41 24  28 51 29 B2 50 24 3A 8E  |P$).1.A$(Q).P$:.|
00000F50: 00 51 2A 4A 6A 81 4E B2  31 A4 C3 28 50 24 29 3A  |.Q*Jj.N.1..(P$):|
00000F60: 8B CA 28 50 24 2C 4E 2C  31 29 B2 C7 28 31 34 31  |..(P$,N,1)..(141|
00000F70: 29 A7 32 37 32 33 30 00  58 2A 54 6A 82 4E 00 70  |).27230.X*Tj.N.p|
00000F80: 2A 59 6A 8B 4E B1 C3 28  50 24 29 A7 41 24 28 51  |*Yj.N..(P$).A$(Q|
00000F90: 29 B2 50 24 3A 8E 00 82  2A 5E 6A 8D 32 37 32 35  |).P$:...*^j.2725|
00000FA0: 30 3A 89 32 37 32 30 30  00 AF 2A 72 6A 41 24 28  |0:.27200..*rjA$(|
00000FB0: 51 29 B2 C8 28 50 24 2C  4E AB 31 29 3A 50 24 B2  |Q)..(P$,N.1):P$.|
00000FC0: C9 28 50 24 2C C3 28 50  24 29 AB 4E 29 3A 51 B2  |.(P$,.(P$).N):Q.|
00000FD0: 51 AA 31 3A 8E 00 D5 2A  60 6D 50 24 B2 41 24 28  |Q.1:...*`mP$.A$(|
00000FE0: 4E 29 3A 81 51 B2 4E AA  31 A4 4D 3A 8B 41 24 28  |N):.Q.N.1.M:.A$(|
00000FF0: 51 29 B2 22 22 A7 32 38  30 33 30 00 EC 2A 6A 6D  |Q)."".28030..*jm|
00001000: 50 24 B2 50 24 AA C7 28  31 34 31 29 AA 41 24 28  |P$.P$..(141).A$(|
00001010: 51 29 00 F3 2A 74 6D 82  51 00 F9 2A 7E 6D 8E 00  |Q)..*tm.Q..*~m..|
00001020: 17 2B 68 74 99 22 13 22  3B 3A 8B 43 4F B1 31 A7  |.+ht.".";:.CO.1.|
00001030: 99 C8 28 43 4F 24 2C 43  4F AB 31 29 3B 00 2F 2B  |..(CO$,CO.1);./+|
00001040: 72 74 8B 4C 4E B1 31 A7  99 C8 28 4C 4E 24 2C 4C  |rt.LN.1...(LN$,L|
00001050: 4E AB 31 29 3B 00 35 2B  7C 74 8E 00 3F 2B CC 74  |N.1);.5+|t..?+.t|
00001060: 99 22 3E 22 3B 00 5D 2B  D6 74 A1 41 24 3A 8B 41  |.">";.]+.t.A$:.A|
00001070: 24 B2 22 22 B0 41 24 B2  C7 28 31 33 29 A7 32 39  |$."".A$..(13).29|
00001080: 39 31 30 00 7E 2B E0 74  8B 41 24 B2 22 11 22 AF  |910.~+.t.A$.".".|
00001090: 49 45 B2 31 A7 50 24 B2  22 11 22 3A 99 22 9D 20  |IE.1.P$.".":.". |
000010A0: 22 3B 3A 8E 00 90 2B EA  74 8B 41 24 B2 22 11 22  |";:...+.t.A$."."|
000010B0: A7 32 39 39 31 30 00 C4  2B F4 74 81 51 B2 31 A4  |.29910..+.t.Q.1.|
000010C0: 50 33 3A 99 22 A4 22 3B  3A 82 3A 81 51 B2 31 A4  |P3:.".";:.:.Q.1.|
000010D0: 50 33 3A 99 22 9D 22 3B  3A 82 3A 50 24 B2 22 22  |P3:.".";:.:P$.""|
000010E0: 3A 50 58 B2 30 3A 50 36  B2 30 00 D5 2B FE 74 8B  |:PX.0:P6.0..+.t.|
000010F0: 41 24 B2 22 22 A7 33 30  31 36 30 00 E0 2B 08 75  |A$."".30160..+.u|
00001100: 89 33 30 31 37 30 00 1A  2C 30 75 99 22 3E 22 3B  |.30170..,0u.">";|
00001110: 3A 50 24 B2 22 22 3A 50  58 B2 30 3A 50 36 B2 30  |:P$."":PX.0:P6.0|
00001120: 3A 81 51 B2 31 A4 50 33  3A 99 22 A4 22 3B 3A 82  |:.Q.1.P3:.".";:.|
00001130: 3A 81 51 B2 31 A4 50 33  3A 99 22 9D 22 3B 3A 82  |:.Q.1.P3:.".";:.|
00001140: 00 2F 2C D0 75 A1 41 24  3A 8B 41 24 B2 22 22 A7  |./,.u.A$:.A$."".|
00001150: 33 30 31 36 30 00 4E 2C  DA 75 41 B2 C6 28 41 24  |30160.N,.uA..(A$|
00001160: 29 3A 8B 41 B1 31 39 32  AF 41 B3 32 31 39 A7 33  |):.A.192.A.219.3|
00001170: 30 32 30 30 00 8D 2C E4  75 8B 28 41 B1 33 31 AF  |0200..,.u.(A.31.|
00001180: 41 B3 B1 34 34 AF 41 B3  B1 33 34 AF 41 B3 B1 35  |A..44.A..34.A..5|
00001190: 38 AF 41 B3 B1 35 39 AF  41 B3 39 37 29 B0 41 B2  |8.A..59.A.97).A.|
000011A0: 31 33 B0 41 B2 32 30 B0  41 B2 31 35 37 A7 33 30  |13.A.20.A.157.30|
000011B0: 32 30 30 00 98 2C EE 75  89 33 30 31 36 30 00 AF  |200..,.u.30160..|
000011C0: 2C F8 75 8B 41 B2 31 33  AF 50 24 B3 B1 22 22 A7  |,.u.A.13.P$.."".|
000011D0: 33 30 33 32 30 00 BF 2C  FB 75 8B 41 B2 31 33 A7  |30320..,.u.A.13.|
000011E0: 33 30 31 36 30 00 D5 2C  FD 75 8B 41 B2 39 35 A7  |30160..,.u.A.95.|
000011F0: 50 36 B2 31 3A 89 33 30  33 32 30 00 E5 2C 0C 76  |P6.1:.30320..,.v|
00001200: 8B 41 B2 32 30 A7 33 30  32 35 30 00 F7 2C 16 76  |.A.20.30250..,.v|
00001210: 8B 41 B3 B1 31 35 37 A7  33 30 32 38 30 00 1E 2D  |.A..157.30280..-|
00001220: 1B 76 50 58 B2 C3 28 50  24 29 3A 81 51 B2 31 A4  |.vPX..(P$):.Q.1.|
00001230: 50 58 AA 31 3A 99 22 9D  22 3B 3A 82 51 3A 89 33  |PX.1:.".";:.Q:.3|
00001240: 30 30 30 30 00 2F 2D 2A  76 8B 50 24 B2 22 22 A7  |0000./-*v.P$."".|
00001250: 33 30 31 36 30 00 5C 2D  34 76 50 24 B2 C8 28 50  |30160.\-4vP$..(P|
00001260: 24 2C C3 28 50 24 29 AB  31 29 3A 41 24 B2 22 9D  |$,.(P$).1):A$.".|
00001270: A4 9D 22 3A 50 58 B2 50  58 AB 31 3A 89 33 30 33  |..":PX.PX.1:.303|
00001280: 30 30 00 70 2D 48 76 8B  C3 28 50 24 29 B2 50 33  |00.p-Hv..(P$).P3|
00001290: A7 33 30 31 36 30 00 86  2D 52 76 50 24 B2 50 24  |.30160..-RvP$.P$|
000012A0: AA 41 24 3A 50 58 B2 C3  28 50 24 29 00 96 2D 5C  |.A$:PX..(P$)..-\|
000012B0: 76 99 41 24 3B 3A 89 33  30 31 36 30 00 B0 2D 70  |v.A$;:.30160..-p|
000012C0: 76 8B C3 28 50 24 29 B3  50 34 A7 50 36 B2 30 3A  |v..(P$).P4.P6.0:|
000012D0: 89 33 30 31 36 30 00 D3  2D 75 76 81 51 B2 31 A4  |.30160..-uv.Q.1.|
000012E0: C3 28 50 24 29 AA 31 3A  99 22 9D 22 3B 3A 82 3A  |.(P$).1:.".";:.:|
000012F0: 99 22 20 22 3B 3A 99 3A  8E 00 FC 2D 7A 76 8B C8  |." ";:.:...-zv..|
00001300: 28 50 24 2C 31 29 B2 22  20 22 A7 50 24 B2 C9 28  |(P$,1)." ".P$..(|
00001310: 50 24 2C C3 28 50 24 29  AB 31 29 3A 89 33 30 33  |P$,.(P$).1):.303|
00001320: 33 30 00 34 2E 84 76 8B  C9 28 50 24 2C 31 29 B2  |30.4..v..(P$,1).|
00001330: 22 20 22 B0 C9 28 50 24  2C 31 29 B2 C7 28 31 34  |" "..(P$,1)..(14|
00001340: 31 29 A7 50 24 B2 C8 28  50 24 2C C3 28 50 24 29  |1).P$..(P$,.(P$)|
00001350: AB 31 29 3A 89 33 30 33  34 30 00 3A 2E 8E 76 8E  |.1):.30340.:..v.|
00001360: 00 53 2E D0 84 81 51 B2  31 A4 31 34 3A 99 22 A4  |.S....Q.1.14:.".|
00001370: 22 3B 3A 82 51 3A 99 3A  8E 00 68 2E B8 88 8B 4E  |";:.Q:.:..h....N|
00001380: 55 B2 C3 28 41 24 28 4E  29 29 A7 99 3A 8E 00 8A  |U..(A$(N))..:...|
00001390: 2E C2 88 81 51 B2 31 A4  4E 55 AB C3 28 41 24 28  |....Q.1.NU..(A$(|
000013A0: 4E 29 29 3A 99 22 A4 22  3B 3A 82 51 3A 99 3A 8E  |N)):.".";:.Q:.:.|
000013B0: 00 A2 2E AC 8A 81 51 B2  31 A4 33 37 3A 99 22 C0  |......Q.1.37:.".|
000013C0: 22 3B 3A 82 3A 99 3A 8E  00 B1 2E 50 C3 8F 20 56  |";:.:.:....P.. V|
000013D0: 32 2E                                             |2.              |

10)"................."......27000:.F5.1.
1514.6...X..(20.LL.2):..X)NT$:..X):.X.1.
LL:."-";:.:..\....27100:A$."NOT AVAILABL
E":.F5.1........"...ADDRESS:..":."------
--":.A$(2)."N"..A$:.1526......A$(2).W...
."...TELEPHONE:..":."----------":.A$(3).
"N"..A$:.1529......A$(3).......8)".***  
END RECORD  ***":.20000:.IE.1.1570.$....
J..50.1567.A....N$(J,I)..N$(J.1,I).1567.
....."...THERE IS ANOTHER RECORD IN THAT
 NAME":..10)".HIT ANY KEY TO VIEW.".A...
..10)".OR HIT  S  TO  STOP":.10000:.A$."
S".1567.Q...J.J.1:.1500......NS.1.2020..
. ..F4.1...'."..".IS ALTERATION/DELETION
 REQUIRED";:.11000:.P6.2.1820.5.A..J.0.1
607.R.B..N$(J,I)..N$(J.1,I).1607...C..".
ENTER RECORD NO. TO BE ALTERED";:P3.2:P4
.1:.30000...D..E(P$)..0.E(P$).C(I).."...
":.1603...E.J.E(P$).1...G..".HIT . D . T
O DELETE, OTHERWISE HIT ANY KEY".&.M..10
000:.A$."D"..".HANG ON WHILE DELETING":.
1750.C.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...
^.S$(J,I).S$:F1.1:.1500.W.V.S.J:F1.1:.J.
S.50:.N$(J,I)."".1813......J.50.N$(J,I).
"":S$(J,I)."":.1813.(...N$(J,I).N$(J.1,I
):S$(J,I).S$(J.1,I):.J.V...C(I).C(I).1:.
".OK, FILE DELETED":.20000:.......".ANY 
OTHER ALTERATION";:.11000:.P6.1.1200...&
..240...N..NS.1.2020...X..NS.0.1820.A.P.
.9000:.P6.2.240...Z..".ENTER .SURNAME & 
NAME. TO FIND ADDRESS":NS.1:.1210.6 ..NS
.0:.".ANY OTHER ADDRESS REQUIRED";:.1100
0:.P6.1.2000.? ...240.T 4..".ENTER LETTE
R FOR WHICH PAGE REQUIRED:":.10000.. C.A
.F(A$):.A.65.A.90.2100.. H.I..((A.65).2)
:.I.9.I.10.Q M.A$.G(2.I.193):.I.10.C$."Z
":.2130.. O.C$.G(2.I.194)./!R..".PAGE . 
"A$" - "C$" . CONTAINS ."C(I)". . ENTRIE
S:":.N.1.34:.".";:.:..]!A.M.0:.N$(0,I)."
"..".....PAGE EMPTY.":.2230.Y!F..J.M.20.
M:.J..C(I).2230.A!U..N$(J,I):.:."PRESS A
NY KEY TO CONTINUE SCAN":.10000:M.J:."."
;:.2150..!...".ANY OTHER SCAN";:.11000:.
P6.1.2100..!...240.3"D..".".13)"PRINT ME
NU":..13)"..........":F7.0:F6.0:F5.0:F4.
0.W"X...8)"..PRESS OPTION NUMBER":..8)".
... 1 . PRINT SINGLE ADDRESS".."....8)".
.. 2 . PRINT ALL ADDRESSES":..8)"... 3 .
 BACK TO MENU".."...10000:.E(A$).2570,26
70,240:.2550."#...".ENTER .SURNAME/NAME.
 TO FIND ADDRESS:":F4.1:.1210:.F4.2.2630
.R#...".DO YOU WISH TO PRINT";:.11000:.P
6.2.2500.M#<..2800:.M.1.TT:.2900:.M..#F.
F4.0:.".OK, ANY OTHER";:.11000:.P6.2.F4.
0:F6.0:.2500..#D..2570..#N..".......".9)
"DO YOU WISH TO PRINT:":..9)".. 1 . PER 
LIST FORMAT".7$X...9)".. 2 . PER LABEL F
ORMAT":.:..9)"..PRESS OPTION NUMBER.".U$
...A$:.A$.."1".A$.."2".2690.F$...A$."2".
2720..$...2820:F7.1:TT.1:LF.1:I.0:F5.1:.
2725..$ ..2800:I.0:F5.1.T$...".PLEASE AL
IGN PAPER THEN HIT ANY KEY":.10000..$...
J.0.50:.N$(J,I)."".2760..%...1500:.M.1.T
T:.2900:.M:.J.%%H.I.I.1:.I..10.2730.>%R.
F7.0:F6.0:F5.0:.2500..%...".HOW MANY TIM
ES DO YOU WISH TO PRINT?";:P3.3:P4.1:.30
000:TT.E(P$)..%...TT..0.."....":.2800..%
...".HOW MANY LINE-FEEDS BETWEEN ADDRESS
ES":P3.2:P4.1:.30000:LF.E(P$)..&...LF..0
.."....":.2812.>&...".DO YOU WISH TELEPH
ONE NO PRINTED";:.11000:.P6.2.F6.1:..D&"
...B&T..1,4,7:.53265,11:.1,G(15)..&^..F7
.1..1,G(17)NT$;:.1,G(16)"40";:.3013..&..
.1,G(17)NT$.B&E.A$.A$(2):.F6.1.LT.LF:.35
00:.3030..&O.LT.2:.3500:A$.A$(3):.F7.1..
1,G(16)"40";:.3500:.3030..'Q..1,G(17)"TE
LEPHONE:":.3500./'V..1: 1:.53265,27:..?'
...N.1. C(A$).Q'...J(A$,N,1).G(141).F7.1
..1:.1,G(16)"40";:.3520..'...J(A$,N,1).G
(141)..1:.3520..'...1,G(17)J(A$,N,1);..'
...N:.N.1.LT:.1:.N:..T'..."...":.5010:.2
40..'...".      .ATTENTION.: "..(...".. 
     YOU HAVE".(0)"BYTES FREE".L(..."...
      .HIT ANY  KEY TO  CONTINUE":.10000
:..K((#.".ARE YOU SURE";:.11000:...(.'.A
$:.A$."".10000..(.'...(.*." ..Y..ES/..N.
.O?"..(.+.A$:.A$.."Y".A$.."N".11010.P(.+
.A$."Y".P6.1:...(.+P6.2:...) N.54273,86:
.54272,105:.54276,17:.T.0.250:.:.54276,0
:..J)XILL.C(N$(J,I)):.M.1.LL:.J(N$(J,I),
M,1).G(32).27020.Q).I.M..).IA$(1).I(N$(J
,I),LL.M):A$(0).H(N$(J,I),M.1):NT$.A$(1)
." ".A$(0):..M).ILL.C(S$(J,I)):.X.LL.1..
1:.J(S$(J,I),X,1)."_".27120.T).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$:.
.Q*JJ.N.1.C(P$):.J(P$,N,1).G(141).27230.
X*TJ.N.P*YJ.N.C(P$).A$(Q).P$:...*^J.2725
0:.27200..*RJA$(Q).H(P$,N.1):P$.I(P$,C(P
$).N):Q.Q.1:..U*`MP$.A$(N):.Q.N.1.M:.A$(
Q)."".28030..*JMP$.P$.G(141).A$(Q)..*TM.
Q..*~M...+HT.".";:.CO.1..H(CO$,CO.1);./+
RT.LN.1..H(LN$,LN.1);.5+|T..?+LT.">";.]+
VT.A$:.A$."".A$.G(13).29910.~+.T.A$.".".
IE.1.P$.".":.". ";:...+.T.A$.".".29910.D
+.T.Q.1.P3:.".";:.:.Q.1.P3:.".";:.:P$.""
:PX.0:P6.0.U+.T.A$."".30160..+.U.30170..
,0U.">";:P$."":PX.0:P6.0:.Q.1.P3:.".";:.
:.Q.1.P3:.".";:../,PU.A$:.A$."".30160.N,
ZUA.F(A$):.A.192.A.219.30200..,.U.(A.31.
A..44.A..34.A..58.A..59.A.97).A.13.A.20.
A.157.30200..,.U.30160..,.U.A.13.P$.."".
30320..,.U.A.13.30160.U,.U.A.95.P6.1:.30
320..,.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.P-HV.C(P$).P3.30160..
-RVP$.P$.A$:PX.C(P$)..-\V.A$;:.30160..-P
V.C(P$).P4.P6.0:.30160.S-UV.Q.1.C(P$).1:
.".";:.:." ";:.:...-ZV.H(P$,1)." ".P$.I(
P$,C(P$).1):.30330.4..V.I(P$,1)." ".I(P$
,1).G(141).P$.H(P$,C(P$).1):.30340.:..V.
.S.P..Q.1.14:.".";:.Q:.:..H....NU.C(A$(N
))..:....B..Q.1.NU.C(A$(N)):.".";:.Q:.:.
......Q.1.37:.".";:.:.:....PC. V2.

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL