_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

COULDVE BEEN.SAL

FILE INFORMATION

FILENAME(S): COULDVE BEEN.SAL

FILE TYPE(S): DEL

FILE SIZE: 12.3K

FIRST SEEN: 2025-11-30 17:31:23

APPEARS ON: 1 disk(s)

FILE HASH

4dbf0fa7687926d724662c98055b699ed446c462ca5470b7902f9abab9c4fd15

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PB DOMAIN 0012BU COULDVE BEEN.SAL DEL UK CD 17 17 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 29 29 00 A9 16 48 01 99  4A 3B 22 20 20 22 3B C8  |))...H..J;"  ";.|
00000010: 28 41 24 28 49 AA 4A 29  2C 4E 4C AB 36 35 29 3A  |(A$(I.J),NL.65):|
00000020: 8B 49 AA 4A B2 4E 54 A7  33 33 32 00 B0 16 4A 01  |.I.J.NT.332...J.|
00000030: 82 4A 00 FB 16 4C 01 99  22 11 11 11 20 20 20 20  |.J...L.."...    |
00000040: 20 20 53 45 4C 45 43 54  20 41 20 4E 55 4D 42 45  |  SELECT A NUMBE|
00000050: 52 20 4F 52 20 50 52 45  53 53 20 20 20 20 20 20  |R OR PRESS      |
00000060: 11 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00000070: 54 48 45 20 53 50 41 43  45 20 42 41 52 00 11 17  |THE SPACE BAR...|
00000080: 4E 01 A1 51 41 24 3A 8B  51 41 24 B2 22 20 22 A7  |N..QA$:.QA$." ".|
00000090: 33 34 30 00 2C 17 50 01  8B 28 51 41 24 B3 22 30  |340.,.P..(QA$."0|
000000A0: 22 B0 51 41 24 B1 22 39  22 29 A7 33 33 34 00 35  |".QA$."9").334.5|
000000B0: 17 52 01 89 33 34 34 00  48 17 54 01 8B 28 49 AA  |.R..344.H.T..(I.|
000000C0: 4A AB 31 29 B3 4E 54 A7  82 49 00 51 17 56 01 89  |J.1).NT..I.Q.V..|
000000D0: 31 30 38 00 6B 17 58 01  49 44 B2 49 AA C5 28 51  |108.k.X.ID.I..(Q|
000000E0: 41 24 29 3A 8B 49 44 B1  4E A7 31 30 38 00 8D 17  |A$):.ID.N.108...|
000000F0: 5A 01 4C 24 B2 C9 28 41  24 28 49 44 29 2C 37 29  |Z.L$..(A$(ID),7)|
00000100: 3A 99 22 93 11 11 11 11  11 11 11 22 3B 49 44 00  |:."........";ID.|
00000110: B0 17 5C 01 81 4A B2 31  A4 37 3A 4C 28 4A 29 B2  |..\..J.1.7:L(J).|
00000120: C6 28 CA 28 4C 24 2C 4A  2C 31 29 29 AB 36 35 3A  |.(.(L$,J,1)).65:|
00000130: 82 4A 00 BF 17 5E 01 58  B2 31 3A 4C 28 30 29 B2  |.J...^.X.1:L(0).|
00000140: 30 00 EF 17 60 01 81 4A  B2 31 A4 37 3A 58 B2 58  |0...`..J.1.7:X.X|
00000150: AA 4C 28 4A AB 31 29 3A  99 22 20 20 22 3B CA 28  |.L(J.1):."  ";.(|
00000160: 41 24 28 49 44 29 2C 58  2C 4C 28 4A 29 29 3A 82  |A$(ID),X,L(J)):.|
00000170: 4A 00 F5 17 62 01 8E 00  14 18 64 01 8F 12 2A 2A  |J...b.....d...**|
00000180: 2A 2A 2A 44 45 4C 45 54  45 20 52 45 43 4F 52 44  |***DELETE RECORD|
00000190: 2A 2A 2A 2A 2A 2A 00 1D  18 66 01 8D 32 39 34 00  |******...f..294.|
000001A0: 64 18 68 01 99 22 11 11  11 20 20 44 4F 20 59 4F  |d.h.."...  DO YO|
000001B0: 55 20 57 49 53 48 20 54  4F 20 44 45 4C 45 54 45  |U WISH TO DELETE|
000001C0: 20 54 48 49 53 20 4E 41  4D 45 20 46 52 4F 4D 20  | THIS NAME FROM |
000001D0: 11 20 20 20 54 48 45 20  4C 49 53 54 3F 20 28 59  |.   THE LIST? (Y|
000001E0: 20 4F 52 20 4E 29 00 7A  18 6A 01 A1 51 42 24 3A  | OR N).z.j..QB$:|
000001F0: 8B 51 42 24 B2 22 4E 22  A7 31 30 38 00 8C 18 6C  |.QB$."N".108...l|
00000200: 01 8B 51 42 24 B3 B1 22  59 22 A7 33 36 32 00 BF  |..QB$.."Y".362..|
00000210: 18 6E 01 81 49 B2 49 44  A4 4E AB 31 3A 41 24 28  |.n..I.ID.N.1:A$(|
00000220: 49 29 B2 41 24 28 49 AA  31 29 3A 82 49 3A 41 24  |I).A$(I.1):.I:A$|
00000230: 28 4E 29 B2 22 22 3A 4E  B2 4E AB 31 3A 89 31 30  |(N)."":N.N.1:.10|
00000240: 38 00 DF 18 70 01 8F 12  2A 2A 2A 2A 2A 2A 2A 2A  |8...p...********|
00000250: 2A 54 41 50 45 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |*TAPE***********|
00000260: 2A 00 0E 19 72 01 99 22  93 11 11 1D 1D 1D 1D 1D  |*...r.."........|
00000270: 1D 1D 1D 1D 1D 1C 50 52  45 53 53 20 12 20 41 20  |......PRESS . A |
00000280: 92 20 54 4F 20 41 42 4F  52 54 22 3A 99 22 1F 22  |. TO ABORT":."."|
00000290: 00 39 19 74 01 99 22 11  11 11 11 11 11 11 11 22  |.9.t.."........"|
000002A0: A6 38 29 22 20 31 3A 53  41 56 45 20 41 20 4E 41  |.8)" 1:SAVE A NA|
000002B0: 4D 45 20 4C 49 53 54 22  3A 99 22 00 57 19 76 01  |ME LIST":.".W.v.|
000002C0: 99 A6 38 29 22 20 32 3A  4C 4F 41 44 20 41 20 4E  |..8)" 2:LOAD A N|
000002D0: 41 4D 45 20 4C 49 53 54  22 00 76 19 78 01 99 A6  |AME LIST".v.x...|
000002E0: 38 29 22 11 11 11 20 20  20 53 45 4C 45 43 54 20  |8)"...   SELECT |
000002F0: 41 20 4E 55 4D 42 45 52  00 9C 19 7A 01 A1 51 24  |A NUMBER...z..Q$|
00000300: 3A 8B 28 51 24 B2 22 31  22 B0 51 24 B2 22 32 22  |:.(Q$."1".Q$."2"|
00000310: 29 A7 97 53 AA 32 34 2C  30 3A 89 33 38 36 00 B5  |)..S.24,0:.386..|
00000320: 19 7C 01 8B 51 24 B2 22  41 22 A7 97 53 AA 32 34  |.|..Q$."A"..S.24|
00000330: 2C 30 3A 89 31 30 38 00  C3 19 7E 01 8D 37 32 38  |,0:.108...~..728|
00000340: 3A 89 33 37 38 00 DD 19  80 01 8B C5 28 4D 24 29  |:.378.......(M$)|
00000350: B2 34 A7 97 53 AA 32 34  2C 30 3A 89 34 38 32 00  |.4..S.24,0:.482.|
00000360: F6 19 82 01 8B 51 24 B2  22 32 22 A7 97 53 AA 32  |.....Q$."2"..S.2|
00000370: 34 2C 30 3A 89 34 31 36  00 13 1A 84 01 8F 12 2A  |4,0:.416.......*|
00000380: 2A 2A 2A 2A 54 41 50 45  20 20 57 52 49 54 45 2A  |****TAPE  WRITE*|
00000390: 2A 2A 2A 2A 2A 00 21 1A  86 01 8B 4E B2 30 A7 89  |*****.!....N.0..|
000003A0: 38 30 30 00 32 1A 88 01  8B C5 28 4D 24 29 B2 34  |800.2.....(M$).4|
000003B0: A7 34 35 34 00 71 1A 8A  01 99 22 93 11 11 11 11  |.454.q....".....|
000003C0: 11 11 11 11 11 11 1D 1D  1C 52 45 57 49 4E 44 20  |.........REWIND |
000003D0: 44 41 54 41 20 54 41 50  45 11 11 11 11 11 1F 41  |DATA TAPE......A|
000003E0: 4E 59 20 4B 45 59 20 54  4F 20 43 4F 4E 54 49 4E  |NY KEY TO CONTIN|
000003F0: 55 45 22 00 85 1A 8C 01  A1 41 24 3A 8B 41 24 B2  |UE"......A$:.A$.|
00000400: 22 22 A7 89 33 39 36 00  AF 1A 8E 01 99 22 93 11  |""..396......"..|
00000410: 11 11 11 11 11 11 11 11  11 1D 1D 1D 1D 22 3A 9F  |.............":.|
00000420: 31 2C 31 2C 31 2C 22 4E  41 4D 45 20 46 49 4C 45  |1,1,1,"NAME FILE|
00000430: 22 00 B8 1A 90 01 98 31  2C 4E 00 E3 1A 92 01 81  |"......1,N......|
00000440: 49 B2 31 A4 4E 3A 4C 41  B2 C3 28 41 24 28 49 29  |I.1.N:LA..(A$(I)|
00000450: 29 3A 4C 4C B2 B5 28 4C  41 AD 32 29 3A 4C 52 B2  |):LL..(LA.2):LR.|
00000460: 4C 41 AB 4C 4C 00 08 1B  94 01 98 31 2C C8 28 41  |LA.LL......1,.(A|
00000470: 24 28 49 29 2C 4C 4C 29  3A 98 31 2C C9 28 41 24  |$(I),LL):.1,.(A$|
00000480: 28 49 29 2C 4C 52 29 3A  82 49 00 0F 1B 96 01 A0  |(I),LR):.I......|
00000490: 31 00 3A 1B 98 01 99 22  93 11 11 11 11 11 11 11  |1.:...."........|
000004A0: 11 11 11 20 20 20 20 20  20 20 20 20 20 20 20 20  |...             |
000004B0: 20 20 20 46 49 4E 49 53  48 45 44 22 00 67 1B 9A  |   FINISHED".g..|
000004C0: 01 99 22 11 11 1D 1D 1D  1D 1C 20 20 20 20 20 20  |..".......      |
000004D0: 20 20 50 52 45 53 53 20  53 54 4F 50 20 42 55 54  |  PRESS STOP BUT|
000004E0: 54 4F 4E 22 3A 99 22 1F  22 00 92 1B 9C 01 85 22  |TON":."."......"|
000004F0: 11 20 20 20 20 20 20 20  20 20 20 20 20 20 20 50  |.              P|
00000500: 52 45 53 53 20 52 45 54  55 52 4E 22 3B 51 24 3A  |RESS RETURN";Q$:|
00000510: 89 31 30 38 00 AD 1B 9E  01 8F 12 2A 2A 2A 2A 2A  |.108.......*****|
00000520: 54 41 50 45 20 52 45 41  44 2A 2A 2A 2A 2A 2A 00  |TAPE READ******.|
00000530: BE 1B A0 01 8B C5 28 4D  24 29 B2 34 A7 34 38 32  |......(M$).4.482|
00000540: 00 CB 1B A2 01 8B 4E B2  30 A7 34 33 30 00 00 1C  |......N.0.430...|
00000550: A4 01 99 22 93 11 11 11  11 11 11 11 11 11 20 20  |..."..........  |
00000560: 20 54 48 45 52 45 20 49  53 20 41 20 4C 49 53 54  | THERE IS A LIST|
00000570: 20 41 4C 52 45 41 44 59  20 49 4E 20 4D 45 4D 4F  | ALREADY IN MEMO|
00000580: 52 59 00 30 1C A6 01 99  22 11 20 20 20 44 4F 20  |RY.0....".   DO |
00000590: 59 4F 55 20 57 41 4E 54  20 54 4F 20 43 4C 45 41  |YOU WANT TO CLEA|
000005A0: 52 20 49 54 20 4F 55 54  3F 20 28 59 20 4F 52 20  |R IT OUT? (Y OR |
000005B0: 4E 29 00 49 1C A8 01 A1  51 24 3A 8B 51 24 B2 22  |N).I....Q$:.Q$."|
000005C0: 22 A7 8D 37 32 38 3A 89  34 32 34 00 62 1C AA 01  |"..728:.424.b...|
000005D0: 8B 51 24 B2 22 4E 22 A7  97 53 AA 32 34 2C 30 3A  |.Q$."N"..S.24,0:|
000005E0: 89 31 30 38 00 73 1C AC  01 8B 51 24 B3 B1 22 59  |.108.s....Q$.."Y|
000005F0: 22 A7 34 32 34 00 B2 1C  AE 01 99 22 93 1C 11 11  |".424......"....|
00000600: 11 11 11 11 11 11 11 11  20 20 52 45 57 49 4E 44  |........  REWIND|
00000610: 20 44 41 54 41 20 54 41  50 45 2D 2D 41 4E 59 20  | DATA TAPE--ANY |
00000620: 4B 45 59 20 54 4F 20 53  54 41 52 54 22 3A 92 31  |KEY TO START":.1|
00000630: 39 38 2C 31 00 BE 1C B0  01 97 53 AA 32 34 2C 30  |98,1......S.24,0|
00000640: 00 CD 1C B2 01 9C 3A 86  41 24 28 31 35 30 29 00  |......:.A$(150).|
00000650: DE 1C B4 01 8B C5 28 4D  24 29 B2 34 A7 34 38 32  |......(M$).4.482|
00000660: 00 F5 1C B6 01 9F 31 2C  31 2C 30 2C 22 4E 41 4D  |......1,1,0,"NAM|
00000670: 45 20 46 49 4C 45 22 00  FE 1C B8 01 84 31 2C 4E  |E FILE"......1,N|
00000680: 00 1E 1D BA 01 81 49 B2  31 A4 4E 3A 84 31 2C 4C  |......I.1.N:.1,L|
00000690: 24 2C 52 24 3A 41 24 28  49 29 B2 4C 24 AA 52 24  |$,R$:A$(I).L$.R$|
000006A0: 00 25 1D BC 01 82 49 00  2C 1D BE 01 A0 31 00 5E  |.%....I.,....1.^|
000006B0: 1D C0 01 99 22 93 11 11  11 11 11 11 11 11 11 11  |...."...........|
000006C0: 20 20 20 20 20 20 52 45  41 44 20 46 52 4F 4D 20  |      READ FROM |
000006D0: 54 41 50 45 20 49 53 20  46 49 4E 49 53 48 45 44  |TAPE IS FINISHED|
000006E0: 00 8A 1D C2 01 99 22 11  11 1C 20 20 20 20 20 20  |......"...      |
000006F0: 20 20 20 20 20 50 52 45  53 53 20 53 54 4F 50 20  |     PRESS STOP |
00000700: 42 55 54 54 4F 4E 22 3A  99 22 1F 22 00 C1 1D C4  |BUTTON":."."....|
00000710: 01 99 22 11 11 20 20 20  20 20 20 20 20 20 20 20  |.."..           |
00000720: 20 20 50 52 45 53 53 20  41 4E 59 20 4B 45 59 22  |  PRESS ANY KEY"|
00000730: 3A 97 31 39 38 2C 30 3A  92 31 39 38 2C 31 3A 89  |:.198,0:.198,1:.|
00000740: 31 30 38 00 CF 1D C6 01  8B 4E B2 30 A7 89 38 30  |108......N.0..80|
00000750: 30 00 0B 1E C8 01 99 22  93 11 11 11 11 11 11 11  |0......"........|
00000760: 11 11 1C 49 4E 53 45 52  54 20 44 41 54 41 20 44  |...INSERT DATA D|
00000770: 49 53 4B 11 11 11 11 11  1F 41 4E 59 20 4B 45 59  |ISK......ANY KEY|
00000780: 20 54 4F 20 43 4F 4E 54  49 4E 55 45 22 00 34 1E  | TO CONTINUE".4.|
00000790: CA 01 97 31 39 38 2C 30  3A 92 31 39 38 2C 31 3A  |...198,0:.198,1:|
000007A0: 97 31 39 38 2C 30 3A 8D  38 33 32 3A 8B 44 4B B2  |.198,0:.832:.DK.|
000007B0: 31 A7 89 31 30 38 00 3D  1E CC 01 8D 38 37 38 00  |1..108.=....878.|
000007C0: 5D 1E CE 01 9F 31 35 2C  38 2C 31 35 2C 22 53 30  |]....15,8,15,"S0|
000007D0: 3A 4E 41 4D 45 20 46 49  4C 45 22 3A A0 31 35 00  |:NAME FILE":.15.|
000007E0: 7A 1E D0 01 9F 38 2C 38  2C 38 2C 22 30 3A 4E 41  |z....8,8,8,"0:NA|
000007F0: 4D 45 20 46 49 4C 45 2C  53 2C 57 22 00 83 1E D2  |ME FILE,S,W"....|
00000800: 01 98 38 2C 4E 00 AE 1E  D4 01 81 49 B2 31 A4 4E  |..8,N......I.1.N|
00000810: 3A 4C 41 B2 C3 28 41 24  28 49 29 29 3A 4C 4C B2  |:LA..(A$(I)):LL.|
00000820: B5 28 4C 41 AD 32 29 3A  4C 52 B2 4C 41 AB 4C 4C  |.(LA.2):LR.LA.LL|
00000830: 00 D3 1E D6 01 98 38 2C  C8 28 41 24 28 49 29 2C  |......8,.(A$(I),|
00000840: 4C 4C 29 3A 98 38 2C C9  28 41 24 28 49 29 2C 4C  |LL):.8,.(A$(I),L|
00000850: 52 29 3A 82 49 00 DA 1E  D8 01 A0 38 00 EA 1E DA  |R):.I......8....|
00000860: 01 81 4C B2 30 A4 35 30  30 3A 82 4C 00 15 1F DC  |..L.0.500:.L....|
00000870: 01 9F 31 35 2C 38 2C 31  35 2C 22 49 30 22 3A 81  |..15,8,15,"I0":.|
00000880: 4C B2 30 A4 35 30 30 3A  82 4C 3A 98 31 35 2C 22  |L.0.500:.L:.15,"|
00000890: 56 30 22 3A A0 31 35 00  3F 1F DE 01 99 22 93 11  |V0":.15.?...."..|
000008A0: 11 11 11 11 11 11 11 11  11 20 20 20 20 20 20 20  |.........       |
000008B0: 20 20 20 20 20 20 20 20  46 49 4E 49 53 48 45 44  |        FINISHED|
000008C0: 22 00 74 1F E0 01 99 22  11 20 20 20 20 20 20 20  |".t....".       |
000008D0: 20 20 20 20 20 20 50 52  45 53 53 20 52 45 54 55  |      PRESS RETU|
000008E0: 52 4E 22 3A 97 31 39 38  2C 30 3A 92 31 39 38 2C  |RN":.198,0:.198,|
000008F0: 31 3A 89 31 30 38 00 81  1F E2 01 8B 4E B2 30 A7  |1:.108......N.0.|
00000900: 34 39 30 00 8F 1F E4 01  8B 4E B3 B1 30 A7 34 38  |490......N..0.48|
00000910: 36 00 C8 1F E6 01 99 22  93 11 11 11 11 11 11 11  |6......"........|
00000920: 11 11 11 1D 1D 1D 45 52  41 53 45 20 54 48 45 20  |......ERASE THE |
00000930: 4C 49 53 54 20 49 4E 20  4D 45 4D 4F 52 59 3F 20  |LIST IN MEMORY? |
00000940: 20 28 59 20 4F 52 20 4E  29 22 00 E7 1F E8 01 A1  | (Y OR N)"......|
00000950: 51 24 3A 8B 51 24 B2 22  22 A7 34 38 38 3A 8B 51  |Q$:.Q$."".488:.Q|
00000960: 24 B2 22 59 22 A7 34 39  30 00 F7 1F EA 01 8B 51  |$."Y".490......Q|
00000970: 24 B2 22 4E 22 A7 31 30  38 00 34 20 EC 01 99 22  |$."N".108.4 ..."|
00000980: 93 11 11 11 11 11 11 11  11 11 11 1C 49 4E 53 45  |............INSE|
00000990: 52 54 20 44 41 54 41 20  44 49 53 4B 11 11 11 11  |RT DATA DISK....|
000009A0: 11 1F 41 4E 59 20 4B 45  59 20 54 4F 20 43 4F 4E  |..ANY KEY TO CON|
000009B0: 54 49 4E 55 45 22 00 5D  20 EE 01 97 31 39 38 2C  |TINUE".] ...198,|
000009C0: 30 3A 92 31 39 38 2C 31  3A 97 31 39 38 2C 30 3A  |0:.198,1:.198,0:|
000009D0: 8D 38 33 32 3A 8B 44 4B  B2 31 A7 89 31 30 38 00  |.832:.DK.1..108.|
000009E0: 83 20 F0 01 9C 3A 86 41  24 28 31 31 30 29 3A 9F  |. ...:.A$(110):.|
000009F0: 38 2C 38 2C 38 2C 22 4E  41 4D 45 20 46 49 4C 45  |8,8,8,"NAME FILE|
00000A00: 2C 53 2C 52 22 00 8C 20  F2 01 84 38 2C 4E 00 AC  |,S,R".. ...8,N..|
00000A10: 20 F4 01 81 49 B2 31 A4  4E 3A 84 38 2C 4C 24 2C  | ...I.1.N:.8,L$,|
00000A20: 52 24 3A 41 24 28 49 29  B2 4C 24 AA 52 24 00 B3  |R$:A$(I).L$.R$..|
00000A30: 20 F6 01 82 49 00 BA 20  F8 01 A0 38 00 EC 20 FA  | ...I.. ...8.. .|
00000A40: 01 99 22 93 11 11 11 11  11 11 11 11 11 11 20 20  |.."...........  |
00000A50: 20 20 20 52 45 41 44 20  46 52 4F 4D 20 44 49 53  |   READ FROM DIS|
00000A60: 4B 20 49 53 20 46 49 4E  49 53 48 45 44 22 00 24  |K IS FINISHED".$|
00000A70: 21 FC 01 99 22 11 11 11  11 11 20 20 20 20 20 20  |!...".....      |
00000A80: 20 20 20 20 20 20 50 52  45 53 53 20 52 45 54 55  |      PRESS RETU|
00000A90: 52 4E 22 3A 97 31 39 38  2C 30 3A 92 31 39 38 2C  |RN":.198,0:.198,|
00000AA0: 31 3A 89 31 30 38 00 45  21 FE 01 8F 12 2A 2A 2A  |1:.108.E!....***|
00000AB0: 2A 2A 2A 2A 2A 50 52 49  4E 54 45 52 2A 2A 2A 2A  |*****PRINTER****|
00000AC0: 2A 2A 2A 2A 2A 2A 2A 00  59 21 00 02 8D 38 35 36  |*******.Y!...856|
00000AD0: 3A 8B 50 54 B2 31 A7 89  31 30 38 00 8F 21 02 02  |:.PT.1..108..!..|
00000AE0: 99 22 93 11 11 11 11 11  11 11 11 11 11 11 11 1D  |."..............|
00000AF0: 1D 1D 1D 1D 1D 1D 49 53  20 50 52 49 4E 54 45 52  |......IS PRINTER|
00000B00: 20 52 45 41 44 59 20 20  28 59 20 4F 52 20 4E 29  | READY  (Y OR N)|
00000B10: 22 00 B9 21 04 02 99 22  11 11 11 11 1D 1D 1D 1D  |"..!..."........|
00000B20: 1D 1D 1D 1D 1D 1D 1D 12  20 53 45 54 20 54 4F 50  |........ SET TOP|
00000B30: 20 4F 46 20 46 4F 52 4D  20 92 22 00 D2 21 06 02  | OF FORM ."..!..|
00000B40: A1 41 24 3A 8B 41 24 B2  22 22 A7 8D 37 32 38 3A  |.A$:.A$.""..728:|
00000B50: 89 35 31 38 00 DE 21 08  02 97 53 AA 32 34 2C 30  |.518..!...S.24,0|
00000B60: 00 F0 21 0A 02 8B 41 24  B3 B1 22 59 22 A7 89 31  |..!...A$.."Y"..1|
00000B70: 30 38 00 FF 21 0C 02 8B  4E B3 B1 30 A7 89 35 32  |08..!...N..0..52|
00000B80: 38 00 3F 22 0E 02 99 22  93 11 11 11 11 11 11 11  |8.?"..."........|
00000B90: 11 11 11 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 4E 4F 20  |.............NO |
00000BA0: 4C 49 53 54 20 49 4E 20  4D 45 4D 4F 52 59 22 3A  |LIST IN MEMORY":|
00000BB0: 81 4C B2 30 A4 32 30 30  30 3A 82 4C 3A 89 31 30  |.L.0.2000:.L:.10|
00000BC0: 38 00 48 22 10 02 9F 33  2C 34 00 68 22 12 02 81  |8.H"...3,4.h"...|
00000BD0: 49 B2 31 A4 4E 3A 8B 41  24 28 49 29 B2 22 22 A7  |I.1.N:.A$(I)."".|
00000BE0: 98 33 3A A0 33 3A 89 31  30 38 00 87 22 14 02 5A  |.3:.3:.108.."..Z|
00000BF0: 51 24 B2 22 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |Q$."------------|
00000C00: 2D 2D 2D 2D 2D 2D 2D 2D  22 00 A2 22 16 02 4C 24  |--------".."..L$|
00000C10: B2 C9 28 41 24 28 49 29  2C 37 29 3A 98 33 2C 49  |..(A$(I),7):.3,I|
00000C20: 3B 5A 51 24 00 C5 22 18  02 81 4A B2 31 A4 37 3A  |;ZQ$.."...J.1.7:|
00000C30: 4C 28 4A 29 B2 C6 28 CA  28 4C 24 2C 4A 2C 31 29  |L(J)..(.(L$,J,1)|
00000C40: 29 AB 36 35 3A 82 4A 00  E6 22 1A 02 58 B2 31 3A  |).65:.J.."..X.1:|
00000C50: 4C 28 30 29 B2 30 3A 81  4A B2 31 A4 37 3A 58 B2  |L(0).0:.J.1.7:X.|
00000C60: 58 AA 4C 28 4A AB 31 29  00 13 23 1C 02 98 33 2C  |X.L(J.1)..#...3,|
00000C70: 22 20 20 22 3B CA 28 41  24 28 49 29 2C 58 2C 4C  |"  ";.(A$(I),X,L|
00000C80: 28 4A 29 29 3A 82 4A 3A  82 49 3A 98 33 3A A0 33  |(J)):.J:.I:.3:.3|
00000C90: 3A 89 31 30 38 00 34 23  1E 02 8F 12 2A 2A 2A 2A  |:.108.4#....****|
00000CA0: 2A 53 45 41 52 43 48 20  46 4F 52 20 4E 41 4D 45  |*SEARCH FOR NAME|
00000CB0: 2A 2A 2A 2A 2A 2A 00 3D  23 20 02 8D 32 39 34 00  |******.=# ..294.|
00000CC0: 63 23 22 02 99 22 11 11  11 20 20 20 20 20 20 20  |c#".."...       |
00000CD0: 20 20 20 20 20 50 52 45  53 53 20 53 50 41 43 45  |     PRESS SPACE|
00000CE0: 20 42 41 52 22 00 7A 23  24 02 A1 53 42 24 3A 8B  | BAR".z#$..SB$:.|
00000CF0: 53 42 24 B3 B1 22 20 22  A7 35 34 38 00 83 23 26  |SB$.." ".548..#&|
00000D00: 02 89 31 30 38 00 BB 23  28 02 99 22 93 11 11 11  |..108..#(.."....|
00000D10: 11 11 11 11 54 59 50 45  20 42 49 52 54 48 20 4D  |....TYPE BIRTH M|
00000D20: 4F 4E 54 48 20 54 4F 20  46 49 4E 44 20 28 4A 41  |ONTH TO FIND (JA|
00000D30: 4E 3D 30 31 20 46 45 42  3D 30 32 29 22 00 C9 23  |N=01 FEB=02)"..#|
00000D40: 2A 02 85 44 41 24 3A 49  44 B2 30 00 D4 23 2C 02  |*..DA$:ID.0..#,.|
00000D50: 81 49 B2 31 A4 4E 00 F7  23 2E 02 8B C8 28 44 41  |.I.1.N..#....(DA|
00000D60: 24 2C 32 29 B2 C8 28 C9  28 41 24 28 49 29 2C 31  |$,2)..(.(A$(I),1|
00000D70: 35 29 2C 32 29 A7 35 36  32 00 00 24 30 02 89 35  |5),2).562..$0..5|
00000D80: 36 36 00 0E 24 32 02 49  44 B2 49 3A 8D 33 34 36  |66..$2.ID.I:.346|
00000D90: 00 28 24 34 02 85 22 11  20 20 50 52 45 53 53 20  |.($4..".  PRESS |
00000DA0: 52 45 54 55 52 4E 22 3B  51 24 00 3B 24 36 02 82  |RETURN";Q$.;$6..|
00000DB0: 49 3A 8B 49 44 B3 B1 30  A7 89 31 30 38 00 78 24  |I:.ID..0..108.x$|
00000DC0: 38 02 8B 49 44 B2 30 A7  99 22 93 11 11 11 11 11  |8..ID.0.."......|
00000DD0: 11 11 11 11 11 1D 1D 1D  1D 1D 1D 1D 1D 4E 4F 20  |.............NO |
00000DE0: 42 49 52 54 48 44 41 59  53 20 46 4F 52 20 54 48  |BIRTHDAYS FOR TH|
00000DF0: 49 53 20 4D 4F 4E 54 48  21 22 00 8E 24 3A 02 81  |IS MONTH!"..$:..|
00000E00: 4C B2 30 A4 31 30 30 30  3A 82 4C 3A 89 31 30 38  |L.0.1000:.L:.108|
00000E10: 00 C4 24 3C 02 99 22 93  11 11 11 11 11 1D 1D 1D  |..$<..".........|
00000E20: 1D 1D 1D 1D 1D 1D 1C 41  52 45 20 59 4F 55 20 53  |.......ARE YOU S|
00000E30: 55 52 45 3F 20 20 28 59  20 4F 52 20 4E 29 22 3A  |URE?  (Y OR N)":|
00000E40: 97 36 34 36 2C 36 00 F7  24 3E 02 99 22 11 11 20  |.646,6..$>..".. |
00000E50: 20 53 41 56 45 20 59 4F  55 52 20 4C 49 53 54 20  | SAVE YOUR LIST |
00000E60: 42 45 46 4F 52 45 20 53  45 4C 45 43 54 49 4E 47  |BEFORE SELECTING|
00000E70: 20 12 20 59 20 92 22 3A  99 00 26 25 40 02 99 22  | . Y .":..&%@.."|
00000E80: 55 4E 4C 45 53 53 20 59  4F 55 20 44 4F 4E 27 54  |UNLESS YOU DON'T|
00000E90: 20 57 41 4E 54 20 54 48  45 20 4C 49 53 54 20 49  | WANT THE LIST I|
00000EA0: 4E 20 4D 45 4D 4F 52 59  00 55 25 42 02 99 22 20  |N MEMORY.U%B.." |
00000EB0: 1C 2A 3D 3D 3D 3D 3D 3D  3D 4D 45 4D 4F 52 59 20  |.*=======MEMORY |
00000EC0: 57 49 4C 4C 20 42 45 20  45 52 41 53 45 44 3D 3D  |WILL BE ERASED==|
00000ED0: 3D 3D 3D 3D 3D 2A 22 00  6E 25 44 02 A1 41 24 3A  |=====*".n%D..A$:|
00000EE0: 8B 41 24 B2 22 22 A7 8D  37 32 38 3A 89 35 38 30  |.A$.""..728:.580|
00000EF0: 00 7A 25 46 02 97 53 AA  32 34 2C 30 00 8B 25 48  |.z%F..S.24,0..%H|
00000F00: 02 8B 41 24 B2 22 4E 22  A7 89 31 30 38 00 95 25  |..A$."N"..108..%|
00000F10: 4A 02 89 31 32 30 30 00  B3 25 4C 02 8F 12 2A 2A  |J..1200..%L...**|
00000F20: 2A 2A 2A 50 52 49 4E 54  20 4C 41 42 45 4C 53 2A  |***PRINT LABELS*|
00000F30: 2A 2A 2A 2A 2A 00 C7 25  4E 02 8D 38 35 36 3A 8B  |*****..%N..856:.|
00000F40: 50 54 B2 31 A7 89 31 30  38 00 FA 25 50 02 99 22  |PT.1..108..%P.."|
00000F50: 93 11 11 1D 1D 1D 1D 1D  1D 1D 1D 1C 20 20 20 20  |............    |
00000F60: 50 52 45 53 53 20 12 20  41 20 92 20 54 4F 20 41  |PRESS . A . TO A|
00000F70: 42 4F 52 54 22 3A 97 36  34 36 2C 36 00 28 26 52  |BORT":.646,6.(&R|
00000F80: 02 99 22 11 11 11 11 1D  1D 1D 1D 1D 1D 1D 1D 4D  |.."............M|
00000F90: 41 4B 45 20 53 55 52 45  20 50 52 49 4E 54 45 52  |AKE SURE PRINTER|
00000FA0: 20 49 53 20 52 45 41 44  59 22 00 5D 26 54 02 99  | IS READY".]&T..|
00000FB0: 22 11 11 11 11 12 1D 1D  4D 41 4B 45 20 53 55 52  |".......MAKE SUR|
00000FC0: 45 20 4C 41 42 45 4C 53  20 41 52 45 20 41 4C 49  |E LABELS ARE ALI|
00000FD0: 47 4E 45 44 20 50 52 4F  50 45 52 4C 59 92 22 00  |GNED PROPERLY.".|
00000FE0: 8E 26 56 02 99 22 11 11  1D 1D 41 52 45 20 59 4F  |.&V.."....ARE YO|
00000FF0: 55 52 20 4C 41 42 45 4C  53 20 32 20 41 43 52 4F  |UR LABELS 2 ACRO|
00001000: 53 53 20 4F 52 20 31 20  41 43 52 4F 53 53 3F 22  |SS OR 1 ACROSS?"|
00001010: 00 A8 26 58 02 99 22 11  22 A6 31 34 29 22 28 20  |..&X..".".14)"( |
00001020: 20 31 20 4F 52 20 32 20  29 22 00 C6 26 5A 02 99  | 1 OR 2 )"..&Z..|
00001030: 22 11 22 A6 31 33 29 22  12 53 45 4C 45 43 54 20  |".".13)".SELECT |
00001040: 4E 55 4D 42 45 52 92 22  00 DF 26 5C 02 A1 51 24  |NUMBER."..&\..Q$|
00001050: 3A 8B 51 24 B2 22 22 A7  8D 37 32 38 3A 89 36 30  |:.Q$.""..728:.60|
00001060: 34 00 F8 26 5E 02 8B 51  24 B2 22 41 22 A7 97 53  |4..&^..Q$."A"..S|
00001070: AA 32 34 2C 30 3A 89 31  30 38 00 0F 27 60 02 8B  |.24,0:.108..'`..|
00001080: 51 24 B3 22 31 22 B0 51  24 B1 22 32 22 A7 36 30  |Q$."1".Q$."2".60|
00001090: 34 00 23 27 62 02 57 B2  32 3A 8B 51 24 B2 22 31  |4.#'b.W.2:.Q$."1|
000010A0: 22 A7 57 B2 31 00 2F 27  64 02 97 53 AA 32 34 2C  |".W.1./'d..S.24,|
000010B0: 30 00 3E 27 66 02 8B 4E  B3 B1 30 A7 89 36 31 38  |0.>'f..N..0..618|
000010C0: 00 7C 27 68 02 99 22 93  11 11 11 11 11 11 11 11  |.|'h..".........|
000010D0: 11 11 1D 1D 1D 1D 1D 1D  1D 1D 4E 4F 20 4C 49 53  |..........NO LIS|
000010E0: 54 20 49 4E 20 4D 45 4D  4F 52 59 22 3A 81 4C B2  |T IN MEMORY":.L.|
000010F0: 30 A4 32 30 30 30 3A 82  4C 3A 89 31 30 38 00 85  |0.2000:.L:.108..|
00001100: 27 6A 02 9F 33 2C 34 00  9E 27 6C 02 8B 4E AD 32  |'j..3,4..'l..N.2|
00001110: B2 B5 28 4E AD 32 29 A7  4D B2 4E 3A 89 36 32 36  |..(N.2).M.N:.626|
00001120: 00 E0 27 6E 02 4D B2 4E  AA 31 3A 41 24 28 4D 29  |..'n.M.N.1:A$(M)|
00001130: B2 22 41 4C 4C 20 54 48  41 54 53 20 20 20 20 20  |."ALL THATS     |
00001140: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00001150: 3A 41 24 28 4D 29 B2 41  24 28 4D 29 AA C7 28 37  |:A$(M).A$(M)..(7|
00001160: 34 29 00 00 28 70 02 81  4B B2 31 A4 36 3A 41 24  |4)..(p..K.1.6:A$|
00001170: 28 4D 29 B2 41 24 28 4D  29 AA C7 28 36 36 29 3A  |(M).A$(M)..(66):|
00001180: 82 4B 00 2C 28 72 02 81  49 B2 31 A4 4E A9 57 3A  |.K.,(r..I.1.N.W:|
00001190: 4C 24 B2 C9 28 41 24 28  49 29 2C 37 29 3A 4C 4C  |L$..(A$(I),7):LL|
000011A0: 24 B2 C9 28 41 24 28 49  AA 31 29 2C 37 29 00 69  |$..(A$(I.1),7).i|
000011B0: 28 74 02 81 4A B2 31 A4  35 3A 41 4C 28 4A 29 B2  |(t..J.1.5:AL(J).|
000011C0: C6 28 CA 28 4C 24 2C 4A  2C 31 29 29 AB 36 35 3A  |.(.(L$,J,1)).65:|
000011D0: 8B 57 B2 32 A7 42 4C 28  4A 29 B2 C6 28 CA 28 4C  |.W.2.BL(J)..(.(L|
000011E0: 4C 24 2C 4A 2C 31 29 29  AB 36 35 00 70 28 76 02  |L$,J,1)).65.p(v.|
000011F0: 82 4A 00 9C 28 78 02 4E  41 24 B2 C8 28 41 24 28  |.J..(x.NA$..(A$(|
00001200: 49 29 2C 41 4C 28 31 29  29 3A 4E 42 24 B2 C8 28  |I),AL(1)):NB$..(|
00001210: 41 24 28 49 AA 31 29 2C  42 4C 28 31 29 29 00 C7  |A$(I.1),BL(1))..|
00001220: 28 7A 02 81 4A 41 B2 31  A4 41 4C 28 31 29 3A 43  |(z..JA.1.AL(1):C|
00001230: 24 B2 CA 28 4E 41 24 2C  4A 41 2C 31 29 3A 8B 43  |$..(NA$,JA,1):.C|
00001240: 24 B2 22 20 22 A7 36 33  38 00 D8 28 7C 02 82 4A  |$." ".638..(|..J|
00001250: 41 3A 8B 57 B2 31 A7 36  34 32 00 03 29 7E 02 81  |A:.W.1.642..)~..|
00001260: 4A 42 B2 31 A4 42 4C 28  31 29 3A 43 24 B2 CA 28  |JB.1.BL(1):C$..(|
00001270: 4E 42 24 2C 4A 42 2C 31  29 3A 8B 43 24 B2 22 20  |NB$,JB,1):.C$." |
00001280: 22 A7 36 34 32 00 0B 29  80 02 82 4A 42 00 33 29  |".642..)...JB.3)|
00001290: 82 02 4E 31 24 B2 C9 28  4E 41 24 2C 41 4C 28 31  |..N1$..(NA$,AL(1|
000012A0: 29 AB 4A 41 29 AA 22 20  22 AA C8 28 4E 41 24 2C  |).JA)." "..(NA$,|
000012B0: 4A 41 AB 31 29 00 60 29  84 02 8B 57 B2 32 A7 4E  |JA.1).`)...W.2.N|
000012C0: 32 24 B2 C9 28 4E 42 24  2C 42 4C 28 31 29 AB 4A  |2$..(NB$,BL(1).J|
000012D0: 42 29 AA 22 20 22 AA C8  28 4E 42 24 2C 4A 42 AB  |B)." "..(NB$,JB.|
000012E0: 31 29 00 79 29 86 02 8B  57 B2 31 A7 98 33 2C A3  |1).y)...W.1..3,.|
000012F0: 33 29 3B 4E 31 24 3A 89  36 35 30 00 98 29 88 02  |3);N1$:.650..)..|
00001300: 98 33 2C A3 33 29 3B 4E  31 24 3B A3 33 38 AB C3  |.3,.3);N1$;.38..|
00001310: 28 4E 31 24 29 29 3B 4E  32 24 00 B7 29 8A 02 4E  |(N1$));N2$..)..N|
00001320: 31 24 B2 CA 28 41 24 28  49 29 2C 31 AA 41 4C 28  |1$..(A$(I),1.AL(|
00001330: 31 29 2C 41 4C 28 32 29  29 00 D8 29 8C 02 4E 32  |1),AL(2))..)..N2|
00001340: 24 B2 CA 28 41 24 28 49  AA 31 29 2C 31 AA 42 4C  |$..(A$(I.1),1.BL|
00001350: 28 31 29 2C 42 4C 28 32  29 29 00 F1 29 8E 02 8B  |(1),BL(2))..)...|
00001360: 57 B2 31 A7 98 33 2C A3  33 29 3B 4E 31 24 3A 89  |W.1..3,.3);N1$:.|
00001370: 36 35 38 00 10 2A 90 02  98 33 2C A3 33 29 3B 4E  |658..*...3,.3);N|
00001380: 31 24 3B A3 33 38 AB C3  28 4E 31 24 29 29 3B 4E  |1$;.38..(N1$));N|
00001390: 32 24 00 3B 2A 92 02 4E  31 24 B2 22 22 3A 4E 41  |2$.;*..N1$."":NA|
000013A0: B2 31 AA 41 4C 28 31 29  3A 81 4B B2 33 A4 35 3A  |.1.AL(1):.K.3.5:|
000013B0: 4E 41 B2 4E 41 AA 41 4C  28 4B AB 31 29 00 5D 2A  |NA.NA.AL(K.1).]*|
000013C0: 94 02 4E 31 24 B2 4E 31  24 AA CA 28 41 24 28 49  |..N1$.N1$..(A$(I|
000013D0: 29 2C 4E 41 2C 41 4C 28  4B 29 29 AA 22 20 22 00  |),NA,AL(K))." ".|
000013E0: 64 2A 96 02 82 4B 00 8F  2A 98 02 4E 32 24 B2 22  |d*...K..*..N2$."|
000013F0: 22 3A 4E 42 B2 31 AA 42  4C 28 31 29 3A 81 4B B2  |":NB.1.BL(1):.K.|
00001400: 33 A4 35 3A 4E 42 B2 4E  42 AA 42 4C 28 4B AB 31  |3.5:NB.NB.BL(K.1|
00001410: 29 00 B3 2A 9A 02 4E 32  24 B2 4E 32 24 AA CA 28  |)..*..N2$.N2$..(|
00001420: 41 24 28 49 AA 31 29 2C  4E 42 2C 42 4C 28 4B 29  |A$(I.1),NB,BL(K)|
00001430: 29 AA 22 20 22 00 BA 2A  9C 02 82 4B 00 D3 2A 9E  |)." "..*...K..*.|
00001440: 02 8B 57 B2 31 A7 98 33  2C A3 33 29 3B 4E 31 24  |..W.1..3,.3);N1$|
00001450: 3A 89 36 37 34 00 F2 2A  A0 02 98 33 2C A3 33 29  |:.674..*...3,.3)|
00001460: 3B 4E 31 24 3B A3 33 38  AB C3 28 4E 31 24 29 29  |;N1$;.38..(N1$))|
00001470: 3B 4E 32 24 00 1A 2B A2  02 81 4B B2 31 A4 33 3A  |;N2$..+...K.1.3:|
00001480: 98 33 3A 82 4B 3A A1 51  24 3A 8B 51 24 B2 22 41  |.3:.K:.Q$:.Q$."A|
00001490: 22 A7 98 33 3A A0 33 3A  89 31 30 38 00 21 2B A4  |"..3:.3:.108.!+.|
000014A0: 02 82 49 00 2B 2B A6 02  98 33 3A A0 33 00 34 2B  |..I.++...3:.3.4+|
000014B0: A8 02 89 31 30 38 00 51  2B AA 02 8F 12 2A 2A 2A  |...108.Q+....***|
000014C0: 2A 2A 46 4F 52 4D 41 54  20 44 49 53 4B 2A 2A 2A  |**FORMAT DISK***|
000014D0: 2A 2A 2A 00 6D 2B AC 02  8D 31 33 30 30 3A 9F 31  |***.m+...1300:.1|
000014E0: 35 2C 38 2C 31 35 3A 98  31 35 2C 22 49 30 22 00  |5,8,15:.15,"I0".|
000014F0: 81 2B AE 02 84 31 35 2C  41 24 2C 42 24 2C 43 24  |.+...15,A$,B$,C$|
00001500: 2C 44 24 00 A3 2B B0 02  8B 41 24 B2 22 32 31 22  |,D$..+...A$."21"|
00001510: A7 84 31 35 2C 41 24 2C  42 24 2C 43 24 2C 44 24  |..15,A$,B$,C$,D$|
00001520: 3A 89 37 31 32 00 B6 2B  B2 02 8B 42 24 B3 B1 22  |:.712..+...B$.."|
00001530: 4F 4B 22 A7 89 37 31 32  00 E2 2B B4 02 99 22 93  |OK"..712..+...".|
00001540: 11 11 11 11 1D 1D 1D 1D  1D 44 4F 53 20 48 41 53  |.........DOS HAS|
00001550: 20 52 45 41 44 20 59 4F  55 52 20 44 49 53 4B 20  | READ YOUR DISK |
00001560: 41 4E 44 22 00 0A 2C B6  02 99 22 46 4F 55 4E 44  |AND"..,..."FOUND|
00001570: 20 49 54 20 54 4F 20 42  45 20 46 4F 52 4D 41 54  | IT TO BE FORMAT|
00001580: 54 45 44 20 41 4C 52 45  41 44 59 22 00 30 2C B8  |TED ALREADY".0,.|
00001590: 02 99 22 49 54 20 4D 49  47 48 54 20 48 41 56 45  |.."IT MIGHT HAVE|
000015A0: 20 44 41 54 41 20 4F 4E  20 49 54 2E 2E 2E 2E 2E  | DATA ON IT.....|
000015B0: 2E 22 00 3B 2C BA 02 97  36 34 36 2C 36 00 6C 2C  |.".;,...646,6.l,|
000015C0: BC 02 99 22 11 11 1D 1D  44 4F 20 59 4F 55 20 53  |..."....DO YOU S|
000015D0: 54 49 4C 4C 20 57 41 4E  54 20 54 4F 20 46 4F 52  |TILL WANT TO FOR|
000015E0: 4D 41 54 3F 20 28 59 20  4F 52 20 4E 29 22 00 77  |MAT? (Y OR N)".w|
000015F0: 2C BE 02 97 36 34 36 2C  36 00 90 2C C0 02 A1 41  |,...646,6..,...A|
00001600: 24 3A 8B 41 24 B2 22 22  A7 8D 37 32 38 3A 89 37  |$:.A$.""..728:.7|
00001610: 30 34 00 9C 2C C2 02 97  53 AA 32 34 2C 30 00 AC  |04..,...S.24,0..|
00001620: 2C C4 02 8B 41 24 B2 22  59 22 A7 37 31 32 00 CA  |,...A$."Y".712..|
00001630: 2C C6 02 8B 41 24 B2 22  4E 22 A7 98 31 35 2C 22  |,...A$."N"..15,"|
00001640: 49 30 22 3A A0 31 35 3A  89 31 30 38 00 FB 2C C8  |I0":.15:.108..,.|
00001650: 02 99 22 93 11 11 11 11  11 11 11 11 1D 1D 1D 1D  |..".............|
00001660: 1D 1D 1D 1D 1D 1D 1D 1D  46 4F 52 4D 41 54 54 49  |........FORMATTI|
00001670: 4E 47 20 44 49 53 4B 2E  2E 2E 2E 2E 22 00 22 2D  |NG DISK....."."-|
00001680: CA 02 98 31 35 2C 22 49  30 22 3A 98 31 35 2C 22  |...15,"I0":.15,"|
00001690: 4E 30 3A 4D 41 49 4C 20  43 41 4C 4C 2C 46 44 22  |N0:MAIL CALL,FD"|
000016A0: 3A A0 31 35 00 42 2D CC  02 9F 31 2C 38 2C 31 2C  |:.15.B-...1,8,1,|
000016B0: 22 30 3A 4E 41 4D 45 20  46 49 4C 45 2C 53 2C 57  |"0:NAME FILE,S,W|
000016C0: 22 3A A0 31 00 5D 2D CE  02 9F 31 2C 38 2C 31 2C  |":.1.]-...1,8,1,|
000016D0: 22 30 3A 54 45 53 54 2C  53 2C 57 22 3A A0 31 00  |"0:TEST,S,W":.1.|
000016E0: 8E 2D D0 02 99 22 93 11  11 11 11 11 11 11 11 1D  |.-..."..........|
000016F0: 1D 1D 1D 1D 59 4F 55 52  20 44 49 53 4B 20 48 41  |....YOUR DISK HA|
00001700: 53 20 42 45 45 4E 20 46  4F 52 4D 41 54 54 45 44  |S BEEN FORMATTED|
00001710: 00 BC 2D D2 02 99 22 54  48 45 20 43 4F 52 52 45  |..-..."THE CORRE|
00001720: 43 54 20 44 41 54 41 20  46 49 4C 45 20 48 41 53  |CT DATA FILE HAS|
00001730: 20 42 45 45 4E 20 43 52  45 41 54 45 44 22 00 D2  | BEEN CREATED"..|
00001740: 2D D4 02 81 4C B2 30 A4  35 30 30 30 3A 82 4C 3A  |-...L.0.5000:.L:|
00001750: 89 31 30 38 00 F1 2D D6  02 8F 12 2A 2A 2A 2A 2A  |.108..-....*****|
00001760: 52 49 4E 47 20 54 48 45  20 42 45 4C 4C 2A 2A 2A  |RING THE BELL***|
00001770: 2A 2A 2A 00 2D 2E D8 02  53 B2 35 34 32 37 32 3A  |***.-...S.54272:|
00001780: 97 53 AA 32 34 2C 31 35  3A 97 53 AA 31 2C 31 31  |.S.24,15:.S.1,11|
00001790: 30 3A 97 53 AA 35 2C 39  3A 97 53 AA 36 2C 39 3A  |0:.S.5,9:.S.6,9:|
000017A0: 97 53 AA 34 2C 31 37 3A  97 53 AA 34 2C 31 36 00  |.S.4,17:.S.4,16.|
000017B0: 3D 2E DA 02 81 4C B2 30  A4 39 30 30 3A 82 4C 00  |=....L.0.900:.L.|
000017C0: 43 2E DC 02 8E 00 62 2E  DE 02 8F 12 2A 2A 2A 2A  |C.....b.....****|
000017D0: 2A 46 52 41 4D 45 20 52  4F 55 54 49 4E 45 2A 2A  |*FRAME ROUTINE**|
000017E0: 2A 2A 2A 2A 00 7F 2E E0  02 97 35 33 32 38 30 2C  |****......53280,|
000017F0: 30 3A 97 35 33 32 38 31  2C 30 3A 97 36 34 36 2C  |0:.53281,0:.646,|
00001800: 38 00 8A 2E E2 02 46 24  B2 22 DA 22 00 A9 2E E4  |8.....F$."."....|
00001810: 02 99 22 93 22 3B 3A 81  49 B2 31 A4 33 39 3A 99  |..".";:.I.1.39:.|
00001820: 46 24 3B 3A 82 49 3A 99  22 91 22 00 C2 2E E6 02  |F$;:.I:.".".....|
00001830: 81 49 B2 31 A4 32 33 3A  99 46 24 A3 33 38 29 46  |.I.1.23:.F$.38)F|
00001840: 24 3A 82 49 00 DB 2E E8  02 81 49 B2 31 A4 33 39  |$:.I......I.1.39|
00001850: 3A 99 46 24 3B 3A 82 49  3A 99 22 13 22 00 E7 2E  |:.F$;:.I:."."...|
00001860: EA 02 81 4C B2 31 A4 34  35 00 F3 2E EC 02 99 22  |...L.1.45......"|
00001870: 11 11 11 11 22 00 13 2F  EE 02 97 36 34 36 2C BB  |...."../...646,.|
00001880: 28 31 29 AC 31 35 3A 97  35 33 32 38 30 2C BB 28  |(1).15:.53280,.(|
00001890: 31 29 AC 31 35 00 31 2F  F0 02 41 24 B2 22 2A 2A  |1).15.1/..A$."**|
000018A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000018B0: 2A 2A 22 00 47 2F F2 02  99 A3 28 34 30 AB C3 28  |**".G/....(40..(|
000018C0: 41 24 29 29 AD 32 29 41  24 00 65 2F F4 02 41 24  |A$)).2)A$.e/..A$|
000018D0: B2 22 2A 20 20 4D 41 49  4C 20 43 41 4C 4C 20 56  |."*  MAIL CALL V|
000018E0: 33 2E 31 20 20 2A 22 00  76 2F F6 02 97 36 34 36  |3.1  *".v/...646|
000018F0: 2C BB 28 31 29 AC 31 35  00 8C 2F F8 02 99 A3 28  |,.(1).15../....(|
00001900: 34 30 AB C3 28 41 24 29  29 AD 32 29 41 24 00 AA  |40..(A$)).2)A$..|
00001910: 2F FA 02 41 24 B2 22 2A  2A 2A 2A 2A 2A 2A 2A 2A  |/..A$."*********|
00001920: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 22 00 BB 2F FC  |***********"../.|
00001930: 02 97 36 34 36 2C BB 28  31 29 AC 31 35 00 D1 2F  |..646,.(1).15../|
00001940: FE 02 99 A3 28 34 30 AB  C3 28 41 24 29 29 AD 32  |....(40..(A$)).2|
00001950: 29 41 24 00 02 30 00 03  97 36 34 36 2C 37 3A 41  |)A$..0...646,7:A|
00001960: 24 B2 22 57 4F 52 4B 53  20 57 49 54 48 20 42 4F  |$."WORKS WITH BO|
00001970: 54 48 20 54 41 50 45 20  41 4E 44 20 4F 52 20 44  |TH TAPE AND OR D|
00001980: 49 53 4B 22 00 1D 30 02  03 99 22 11 11 22 3B A3  |ISK"..0..."..";.|
00001990: 28 34 30 AB C3 28 41 24  29 29 AD 32 29 41 24 00  |(40..(A$)).2)A$.|
000019A0: 26 30 04 03 99 22 11 22  00 3A 30 06 03 41 24 B2  |&0...".".:0..A$.|
000019B0: 22 57 52 49 54 54 45 4E  20 42 59 22 00 50 30 08  |"WRITTEN BY".P0.|
000019C0: 03 99 A3 28 34 30 AB C3  28 41 24 29 29 AD 32 29  |...(40..(A$)).2)|
000019D0: 41 24 00 66 30 0A 03 41  24 B2 22 52 4F 4E 20 48  |A$.f0..A$."RON H|
000019E0: 41 52 52 49 53 4F 4E 22  00 80 30 0C 03 99 22 11  |ARRISON"..0...".|
000019F0: 22 3B A3 28 34 30 AB C3  28 41 24 29 29 AD 32 29  |";.(40..(A$)).2)|
00001A00: 41 24 00 99 30 0E 03 41  24 B2 22 3C 3C 3C 3C 3C  |A$..0..A$."<<<<<|
00001A10: 20 20 20 20 20 3E 3E 3E  3E 3E 22 00 B3 30 10 03  |     >>>>>"..0..|
00001A20: 99 22 11 22 3B A3 28 34  30 AB C3 28 41 24 29 29  |.".";.(40..(A$))|
00001A30: AD 32 29 41 24 00 BE 30  12 03 97 36 34 36 2C 35  |.2)A$..0...646,5|
00001A40: 00 C8 30 14 03 99 22 11  11 22 00 E8 30 16 03 41  |..0...".."..0..A|
00001A50: 24 B2 22 50 55 42 4C 49  43 20 44 4F 4D 41 49 4E  |$."PUBLIC DOMAIN|
00001A60: 20 46 52 45 45 57 41 52  45 22 00 FE 30 18 03 99  | FREEWARE"..0...|
00001A70: A3 28 34 30 AB C3 28 41  24 29 29 AD 32 29 41 24  |.(40..(A$)).2)A$|
00001A80: 00 07 31 1A 03 99 22 13  22 00 0E 31 1C 03 82 4C  |..1..."."..1...L|
00001A90: 00 14 31 1E 03 8E 00 40  31 20 03 99 22 93 11 11  |..1....@1 .."...|
00001AA0: 11 11 11 11 11 11 11 11  22 3B A3 31 32 29 3B 22  |........";.12);"|
00001AB0: 4E 4F 20 44 41 54 41 20  49 4E 20 4D 45 4D 4F 52  |NO DATA IN MEMOR|
00001AC0: 59 22 00 65 31 22 03 99  22 11 11 1D 1D 1D 1D 1D  |Y".e1"..".......|
00001AD0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 50 52 45 53 53 20  |..........PRESS |
00001AE0: 52 45 54 55 52 4E 22 00  75 31 24 03 92 31 39 38  |RETURN".u1$..198|
00001AF0: 2C 31 3A 89 31 30 38 00  96 31 26 03 8F 3A 47 4F  |,1:.108..1&..:GO|
00001B00: 53 55 42 38 32 36 3A 49  46 44 4B 3D 31 54 48 45  |SUB826:IFDK=1THE|
00001B10: 4E 47 4F 54 4F 31 30 36  00 C1 31 28 03 99 22 93  |NGOTO106..1(..".|
00001B20: 11 11 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1C 50 52  |..............PR|
00001B30: 45 53 53 20 12 20 41 20  92 20 54 4F 20 41 42 4F  |ESS . A . TO ABO|
00001B40: 52 54 22 00 F6 31 2A 03  99 22 1F 11 11 11 11 11  |RT"..1*.."......|
00001B50: 11 11 11 11 11 22 3B A6  37 29 3B 22 49 4E 53 45  |.....";.7);"INSE|
00001B60: 52 54 20 44 49 53 4B 20  54 4F 20 42 45 20 46 4F  |RT DISK TO BE FO|
00001B70: 52 4D 41 54 54 45 44 22  00 1B 32 2C 03 99 A6 38  |RMATTED"..2,...8|
00001B80: 29 22 11 11 11 50 52 45  53 53 20 52 45 54 55 52  |)"...PRESS RETUR|
00001B90: 4E 20 57 48 45 4E 20 52  45 41 44 59 22 00 3D 32  |N WHEN READY".=2|
00001BA0: 2E 03 99 A6 38 29 22 A3  A3 A3 A3 A3 A3 A3 A3 A3  |....8)".........|
00001BB0: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 22 00  |..............".|
00001BC0: 56 32 30 03 A1 41 24 3A  8B 41 24 B2 22 22 A7 8D  |V20..A$:.A$.""..|
00001BD0: 37 32 38 3A 89 38 31 36  00 6F 32 32 03 8B 41 24  |728:.816.o22..A$|
00001BE0: B2 22 41 22 A7 97 53 AA  32 34 2C 30 3A 89 31 30  |."A"..S.24,0:.10|
00001BF0: 38 00 80 32 34 03 97 53  AA 32 34 2C 30 3A 89 36  |8..24..S.24,0:.6|
00001C00: 38 34 00 BB 32 36 03 99  22 93 1C 11 11 11 11 11  |84..26..".......|
00001C10: 11 11 11 11 11 1D 1D 1D  4C 45 53 53 20 54 48 41  |........LESS THA|
00001C20: 4E 20 32 30 30 20 46 52  45 45 20 42 59 54 45 53  |N 200 FREE BYTES|
00001C30: 20 52 45 4D 41 49 4E 49  4E 47 2E 2E 22 00 D0 32  | REMAINING.."..2|
00001C40: 38 03 81 4C B2 30 A4 32  30 30 30 3A 82 4C 3A 4C  |8..L.0.2000:.L:L|
00001C50: B2 30 00 DB 32 3A 03 99  22 1F 22 3A 8E 00 FE 32  |.0..2:..".":...2|
00001C60: 3C 03 8F 12 2A 2A 2A 2A  2A 43 48 45 43 4B 20 49  |<...*****CHECK I|
00001C70: 46 20 44 52 49 56 45 20  4F 4E 2A 2A 2A 2A 2A 2A  |F DRIVE ON******|
00001C80: 00 20 33 3E 03 8F 12 2A  2A 2A 2A 2A 37 36 38 20  |. 3>...*****768 |
00001C90: 45 52 52 4F 52 20 56 45  43 54 4F 52 2A 2A 2A 2A  |ERROR VECTOR****|
00001CA0: 2A 2A 00 31 33 40 03 97  37 36 38 2C 36 31 3A 44  |**.13@..768,61:D|
00001CB0: 4B B2 30 00 42 33 42 03  9F 31 2C 38 2C 31 35 2C  |K.0.B3B..1,8,15,|
00001CC0: 22 49 30 22 00 4D 33 44  03 A0 31 3A A0 31 35 00  |"I0".M3D..1:.15.|
00001CD0: 5A 33 46 03 97 37 36 38  2C 31 33 39 00 6A 33 48  |Z3F..768,139.j3H|
00001CE0: 03 8B 53 54 B3 B1 AB 31  32 38 A7 8E 00 9B 33 4A  |..ST...128....3J|
00001CF0: 03 99 22 93 11 11 11 11  11 11 11 11 11 11 1D 1D  |..".............|
00001D00: 1D 1D 20 20 44 52 49 56  45 20 49 53 20 4E 4F 54  |..  DRIVE IS NOT|
00001D10: 20 54 55 52 4E 45 44 20  4F 4E 20 21 22 00 C0 33  | TURNED ON !"..3|
00001D20: 4C 03 99 22 11 11 1C 1D  1D 1D 1D 1D 1D 1D 1D 50  |L.."...........P|
00001D30: 4C 45 41 53 45 20 43 4F  52 52 45 43 54 20 4E 4F  |LEASE CORRECT NO|
00001D40: 57 1F 00 E4 33 4E 03 99  22 11 11 1D 1D 1D 1D 1D  |W...3N..".......|
00001D50: 1D 1D 1D 41 4E 59 20 4B  45 59 20 54 4F 20 43 4F  |...ANY KEY TO CO|
00001D60: 4E 54 49 4E 55 45 00 ED  33 50 03 44 4B B2 31 00  |NTINUE..3P.DK.1.|
00001D70: FA 33 52 03 92 31 39 38  2C 31 3A 8E 00 1F 34 54  |.3R..198,1:...4T|
00001D80: 03 8F 12 2A 2A 2A 2A 2A  43 48 45 43 4B 20 49 46  |...*****CHECK IF|
00001D90: 20 50 52 49 4E 54 45 52  20 4F 4E 2A 2A 2A 2A 2A  | PRINTER ON*****|
00001DA0: 2A 00 28 34 56 03 50 54  B2 30 00 33 34 58 03 97  |*.(4V.PT.0.34X..|
00001DB0: 37 36 38 2C 31 00 3C 34  5A 03 9F 31 2C 34 00 4B  |768,1.<4Z..1,4.K|
00001DC0: 34 5C 03 98 31 2C C7 28  31 34 35 29 3B 00 52 34  |4\..1,.(145);.R4|
00001DD0: 5E 03 A0 31 00 5F 34 60  03 97 37 36 38 2C 31 33  |^..1._4`..768,13|
00001DE0: 39 00 6F 34 62 03 8B 53  54 B3 B1 AB 31 32 38 A7  |9.o4b..ST...128.|
00001DF0: 8E 00 A2 34 64 03 99 22  93 11 11 11 11 11 11 11  |...4d.."........|
00001E00: 11 11 11 1D 1D 1D 1D 20  20 50 52 49 4E 54 45 52  |.......  PRINTER|
00001E10: 20 49 53 20 4E 4F 54 20  54 55 52 4E 45 44 20 4F  | IS NOT TURNED O|
00001E20: 4E 20 21 22 00 C7 34 66  03 99 22 11 11 1C 1D 1D  |N !"..4f..".....|
00001E30: 1D 1D 1D 1D 1D 1D 50 4C  45 41 53 45 20 43 4F 52  |......PLEASE COR|
00001E40: 52 45 43 54 20 4E 4F 57  1F 00 EB 34 68 03 99 22  |RECT NOW...4h.."|
00001E50: 11 11 1D 1D 1D 1D 1D 1D  1D 1D 41 4E 59 20 4B 45  |..........ANY KE|
00001E60: 59 20 54 4F 20 43 4F 4E  54 49 4E 55 45 00 F4 34  |Y TO CONTINUE..4|
00001E70: 6A 03 50 54 B2 31 00 01  35 6C 03 92 31 39 38 2C  |j.PT.1..5l..198,|
00001E80: 31 3A 8E 00 24 35 6E 03  8F 12 2A 2A 2A 2A 2A 43  |1:..$5n...*****C|
00001E90: 48 45 43 4B 20 46 4F 52  20 57 2F 50 20 54 41 42  |HECK FOR W/P TAB|
00001EA0: 2A 2A 2A 2A 2A 2A 00 31  35 70 03 9F 31 35 2C 38  |******.15p..15,8|
00001EB0: 2C 31 35 00 4A 35 72 03  9F 38 2C 38 2C 38 2C 22  |,15.J5r..8,8,8,"|
00001EC0: 40 30 3A 54 45 53 54 2C  53 2C 57 22 00 61 35 74  |@0:TEST,S,W".a5t|
00001ED0: 03 84 31 35 2C 41 24 2C  42 24 2C 43 24 2C 44 24  |..15,A$,B$,C$,D$|
00001EE0: 2C 45 24 00 73 35 76 03  8B 42 24 B2 22 4F 4B 22  |,E$.s5v..B$."OK"|
00001EF0: A7 89 38 39 34 00 AB 35  78 03 8B 41 24 B2 22 32  |..894..5x..A$."2|
00001F00: 36 22 A7 20 99 22 93 11  11 11 11 11 11 11 11 11  |6". ."..........|
00001F10: 1C 20 20 20 20 20 20 20  20 57 52 49 54 45 20 50  |.        WRITE P|
00001F20: 52 4F 54 45 43 54 20 49  53 20 4F 4E 22 00 DA 35  |ROTECT IS ON"..5|
00001F30: 7A 03 99 22 43 4F 52 52  45 43 54 20 4E 4F 57 20  |z.."CORRECT NOW |
00001F40: 41 4E 44 20 50 52 45 53  53 20 41 20 4B 45 59 20  |AND PRESS A KEY |
00001F50: 54 4F 20 43 4F 4E 54 49  4E 55 45 22 00 04 36 7C  |TO CONTINUE"..6||
00001F60: 03 97 31 39 38 2C 30 3A  92 20 31 39 38 2C 31 3A  |..198,0:. 198,1:|
00001F70: 97 31 39 38 2C 30 3A A0  38 3A A0 31 35 3A 97 36  |.198,0:.8:.15:.6|
00001F80: 34 36 2C 36 3A 8E 00 18  36 7E 03 A0 38 3A A0 31  |46,6:...6~..8:.1|
00001F90: 35 3A 97 36 34 36 2C 36  3A 8E 00 32 36 80 03 8F  |5:.646,6:..26...|
00001FA0: 2A 2A 2A 2A 2A 48 45 4C  50 20 44 41 54 41 2A 2A  |*****HELP DATA**|
00001FB0: 2A 2A 2A 2A 00 54 36 82  03 99 22 93 22 3A 97 35  |****.T6...".":.5|
00001FC0: 33 32 38 31 2C 31 3A 97  35 33 32 38 30 2C 31 3A  |3281,1:.53280,1:|
00001FD0: 97 36 34 36 2C 30 00 6C  36 84 03 87 41 24 3A 8B  |.646,0.l6...A$:.|
00001FE0: 41 24 B3 B1 22 49 4E 46  4F 22 A7 39 30 30 00 74  |A$.."INFO".900.t|
00001FF0: 36 86 03 43 B2 30 00 8B  36 88 03 87 41 24 3A 8B  |6..C.0..6...A$:.|
00002000: 41 24 B2 22 58 58 58 22  A7 89 39 39 32 00 A5 36  |A$."XXX"..992..6|
00002010: 8A 03 99 41 24 3A 43 B2  43 AA 31 3A 8B 43 B2 32  |...A$:C.C.1:.C.2|
00002020: 32 A7 8D 31 30 30 30 00  AE 36 8C 03 89 39 30 34  |2..1000..6...904|
00002030: 00 B8 36 8E 03 83 49 4E  46 4F 00 E5 36 90 03 83  |..6...INFO..6...|
00002040: 22 20 20 20 20 20 4D 41  49 4C 20 43 41 4C 4C 20  |"     MAIL CALL |
00002050: 49 53 20 44 45 53 49 47  4E 45 44 20 54 4F 20 42  |IS DESIGNED TO B|
00002060: 45 20 55 53 45 52 22 00  0F 37 92 03 83 22 46 52  |E USER"..7..."FR|
00002070: 49 45 4E 44 4C 59 2E 20  59 4F 55 20 57 49 4C 4C  |IENDLY. YOU WILL|
00002080: 20 41 4C 57 41 59 53 20  42 45 20 54 41 4B 45 4E  | ALWAYS BE TAKEN|
00002090: 22 00 3C 37 94 03 83 22  42 41 43 4B 20 54 4F 20  |".<7..."BACK TO |
000020A0: 54 48 45 20 4D 41 49 4E  20 4D 45 4E 55 20 57 48  |THE MAIN MENU WH|
000020B0: 45 4E 20 59 4F 55 20 46  49 4E 49 53 48 22 00 68  |EN YOU FINISH".h|
000020C0: 37 96 03 83 22 41 20 54  41 53 4B 2E 20 4D 41 49  |7..."A TASK. MAI|
000020D0: 4C 20 43 41 4C 4C 20 57  49 4C 4C 20 45 41 53 49  |L CALL WILL EASI|
000020E0: 4C 59 20 41 43 43 45 53  53 22 00 91 37 98 03 83  |LY ACCESS"..7...|
000020F0: 22 41 20 44 49 53 4B 20  44 52 49 56 45 20 4F 52  |"A DISK DRIVE OR|
00002100: 20 41 20 54 41 50 45 20  44 52 49 56 45 2E 20 59  | A TAPE DRIVE. Y|
00002110: 4F 55 22 00 BC 37 9A 03  83 22 53 45 4C 45 43 54  |OU"..7..."SELECT|
00002120: 20 57 48 49 43 48 20 44  45 56 49 43 45 20 59 4F  | WHICH DEVICE YO|
00002130: 55 20 57 41 4E 54 20 54  4F 20 55 53 45 22 00 D7  |U WANT TO USE"..|
00002140: 37 9C 03 83 22 46 52 4F  4D 20 54 48 45 20 4D 41  |7..."FROM THE MA|
00002150: 49 4E 20 4D 45 4E 55 2E  22 00 05 38 9E 03 83 22  |IN MENU."..8..."|
00002160: 20 20 20 20 20 46 49 52  53 54 20 59 4F 55 20 4D  |     FIRST YOU M|
00002170: 55 53 54 20 46 4F 52 4D  41 54 20 41 20 44 41 54  |UST FORMAT A DAT|
00002180: 41 20 44 49 53 4B 22 00  30 38 A0 03 83 22 54 48  |A DISK".08..."TH|
00002190: 45 20 4E 45 43 45 53 53  41 52 59 20 46 49 4C 45  |E NECESSARY FILE|
000021A0: 53 20 57 49 4C 4C 20 42  45 20 43 52 45 41 54 45  |S WILL BE CREATE|
000021B0: 44 22 00 5B 38 A2 03 83  22 41 46 54 45 52 20 46  |D".[8..."AFTER F|
000021C0: 4F 52 4D 41 54 20 49 53  20 43 4F 4D 50 4C 45 54  |ORMAT IS COMPLET|
000021D0: 45 2E 20 54 48 49 53 20  4D 55 53 54 22 00 88 38  |E. THIS MUST"..8|
000021E0: A4 03 83 22 42 45 20 44  4F 4E 45 20 46 49 52 53  |..."BE DONE FIRS|
000021F0: 54 20 4F 52 20 54 48 45  20 50 52 4F 47 52 41 4D  |T OR THE PROGRAM|
00002200: 20 57 49 4C 4C 20 4E 4F  54 22 00 B2 38 A6 03 83  | WILL NOT"..8...|
00002210: 22 46 55 4E 43 54 49 4F  4E 20 43 4F 52 52 45 43  |"FUNCTION CORREC|
00002220: 54 4C 59 2E 20 44 4F 20  4E 4F 54 20 55 53 45 20  |TLY. DO NOT USE |
00002230: 54 48 45 22 00 DE 38 A8  03 83 22 50 52 4F 47 52  |THE"..8..."PROGR|
00002240: 41 4D 20 44 49 53 4B 20  46 4F 52 20 46 4F 52 4D  |AM DISK FOR FORM|
00002250: 41 54 54 49 4E 47 20 41  4E 44 20 46 49 4C 45 22  |ATTING AND FILE"|
00002260: 00 09 39 AA 03 83 22 43  52 45 41 54 45 2E 20 41  |..9..."CREATE. A|
00002270: 46 54 45 52 20 59 4F 55  20 44 4F 20 54 48 49 53  |FTER YOU DO THIS|
00002280: 20 4F 4E 20 41 4E 20 4F  4C 44 22 00 35 39 AC 03  | ON AN OLD".59..|
00002290: 83 22 44 49 53 4B 20 4F  52 20 41 20 4E 45 57 20  |."DISK OR A NEW |
000022A0: 55 4E 2D 46 4F 52 4D 41  54 54 45 44 20 44 49 53  |UN-FORMATTED DIS|
000022B0: 4B 2C 20 59 4F 55 22 00  61 39 AE 03 83 22 4D 41  |K, YOU".a9..."MA|
000022C0: 59 20 54 48 45 4E 20 53  41 56 45 20 4D 41 49 4C  |Y THEN SAVE MAIL|
000022D0: 20 43 41 4C 4C 20 54 4F  20 54 48 49 53 20 44 49  | CALL TO THIS DI|
000022E0: 53 4B 22 00 8C 39 B0 03  83 22 53 4F 20 41 53 20  |SK"..9..."SO AS |
000022F0: 54 4F 20 48 41 56 45 20  54 48 45 20 45 4E 54 49  |TO HAVE THE ENTI|
00002300: 52 45 20 55 54 49 4C 49  54 59 20 4F 4E 22 00 9D  |RE UTILITY ON"..|
00002310: 39 B2 03 83 22 4F 4E 45  20 44 49 53 4B 2E 22 00  |9..."ONE DISK.".|
00002320: C8 39 B4 03 83 22 20 20  20 20 20 54 41 50 45 20  |.9..."     TAPE |
00002330: 55 53 45 52 53 20 4D 55  53 54 20 55 53 45 20 41  |USERS MUST USE A|
00002340: 20 53 45 50 41 52 41 54  45 22 00 F2 39 B6 03 83  | SEPARATE"..9...|
00002350: 22 54 41 50 45 20 54 4F  20 53 54 4F 52 45 20 44  |"TAPE TO STORE D|
00002360: 41 54 41 2E 20 44 4F 20  4E 4F 54 20 55 53 45 20  |ATA. DO NOT USE |
00002370: 54 48 45 22 00 1C 3A B8  03 83 22 50 52 4F 47 52  |THE"..:..."PROGR|
00002380: 41 4D 20 54 41 50 45 20  46 4F 52 20 44 41 54 41  |AM TAPE FOR DATA|
00002390: 20 53 54 4F 52 41 47 45  2E 20 59 4F 55 22 00 48  | STORAGE. YOU".H|
000023A0: 3A BA 03 83 22 52 55 4E  20 54 48 45 20 52 49 53  |:..."RUN THE RIS|
000023B0: 4B 20 4F 46 20 4F 56 45  52 57 52 49 54 49 4E 47  |K OF OVERWRITING|
000023C0: 20 54 48 45 20 4D 41 49  4C 22 00 76 3A BC 03 83  | THE MAIL".v:...|
000023D0: 22 43 41 4C 4C 20 50 52  4F 47 52 41 4D 2C 20 41  |"CALL PROGRAM, A|
000023E0: 4E 44 20 54 48 55 53 20  49 54 20 57 49 4C 4C 20  |ND THUS IT WILL |
000023F0: 42 45 20 47 4F 4E 45 22  00 A2 3A BE 03 83 22 46  |BE GONE"..:..."F|
00002400: 4F 52 45 56 45 52 2E 20  54 48 49 53 20 50 52 4F  |OREVER. THIS PRO|
00002410: 47 52 41 4D 20 49 53 20  41 20 56 45 52 59 20 47  |GRAM IS A VERY G|
00002420: 4F 4F 44 22 00 CF 3A C0  03 83 22 41 49 44 20 46  |OOD"..:..."AID F|
00002430: 4F 52 20 43 4C 55 42 53  2C 20 42 42 53 20 4D 45  |OR CLUBS, BBS ME|
00002440: 4D 42 45 52 53 2C 20 43  48 55 52 43 48 45 53 2C  |MBERS, CHURCHES,|
00002450: 22 00 FC 3A C2 03 83 22  53 43 48 4F 4F 4C 53 2C  |"..:..."SCHOOLS,|
00002460: 20 4F 52 20 41 4E 59 54  49 4D 45 20 59 4F 55 20  | OR ANYTIME YOU |
00002470: 4E 45 45 44 20 54 4F 20  53 54 4F 52 45 22 00 29  |NEED TO STORE".)|
00002480: 3B C4 03 83 22 4E 41 4D  45 53 20 41 4E 44 20 41  |;..."NAMES AND A|
00002490: 44 44 52 45 53 53 45 53  20 41 4E 44 20 50 48 4F  |DDRESSES AND PHO|
000024A0: 4E 45 20 4E 55 4D 42 45  52 53 22 00 56 3B C6 03  |NE NUMBERS".V;..|
000024B0: 83 22 46 4F 52 20 4C 41  54 45 52 20 56 49 45 57  |."FOR LATER VIEW|
000024C0: 49 4E 47 20 4F 52 20 50  52 49 4E 54 49 4E 47 20  |ING OR PRINTING |
000024D0: 4D 41 49 4C 49 4E 47 22  00 82 3B C8 03 83 22 4C  |MAILING"..;..."L|
000024E0: 41 42 45 4C 53 2E 20 59  4F 55 20 4D 55 53 54 20  |ABELS. YOU MUST |
000024F0: 46 49 52 53 54 20 43 52  45 41 54 45 20 41 20 44  |FIRST CREATE A D|
00002500: 41 54 41 22 00 AF 3B CA  03 83 22 46 49 4C 45 2C  |ATA"..;..."FILE,|
00002510: 20 28 4E 41 4D 45 53 20  26 20 41 44 44 52 45 53  | (NAMES & ADDRES|
00002520: 53 45 53 29 20 2C 42 45  46 4F 52 45 20 59 4F 55  |SES) ,BEFORE YOU|
00002530: 22 00 DA 3B CC 03 83 22  43 41 4E 20 53 41 56 45  |"..;..."CAN SAVE|
00002540: 20 54 48 45 20 46 49 4C  45 2E 20 20 59 4F 55 20  | THE FILE.  YOU |
00002550: 4D 55 53 54 20 4C 4F 41  44 20 41 22 00 04 3C CE  |MUST LOAD A"..<.|
00002560: 03 83 22 44 41 54 41 20  46 49 4C 45 20 42 45 46  |.."DATA FILE BEF|
00002570: 4F 52 45 20 59 4F 55 20  43 41 4E 20 44 45 4C 45  |ORE YOU CAN DELE|
00002580: 54 45 20 4F 52 22 00 2E  3C D0 03 83 22 4D 41 4B  |TE OR"..<..."MAK|
00002590: 45 20 43 48 41 4E 47 45  53 20 4F 52 20 41 44 44  |E CHANGES OR ADD|
000025A0: 20 54 4F 20 54 48 45 20  41 44 44 52 45 53 53 22  | TO THE ADDRESS"|
000025B0: 00 57 3C D2 03 83 22 46  49 4C 45 2E 20 46 4F 4C  |.W<..."FILE. FOL|
000025C0: 4C 4F 57 20 54 48 45 53  45 20 52 55 4C 45 53 20  |LOW THESE RULES |
000025D0: 41 4E 44 20 59 4F 55 20  22 00 82 3C D4 03 83 22  |AND YOU "..<..."|
000025E0: 57 49 4C 4C 20 48 41 56  45 20 4E 4F 20 50 52 4F  |WILL HAVE NO PRO|
000025F0: 42 4C 45 4D 53 20 49 4E  20 55 53 49 4E 47 20 4D  |BLEMS IN USING M|
00002600: 41 49 4C 22 00 A0 3C D6  03 83 22 43 41 4C 4C 2E  |AIL"..<..."CALL.|
00002610: 20 45 4E 4A 4F 59 20 4D  41 49 4C 20 43 41 4C 4C  | ENJOY MAIL CALL|
00002620: 2E 22 00 C9 3C D8 03 83  22 1C 2A 4E 4F 54 45 2A  |."..<...".*NOTE*|
00002630: 1F 4E 41 4D 45 53 20 41  52 45 20 41 4C 50 48 41  |.NAMES ARE ALPHA|
00002640: 42 45 54 49 5A 45 44 20  41 53 22 00 F1 3C DA 03  |BETIZED AS"..<..|
00002650: 83 22 54 48 45 59 20 41  52 45 20 45 4E 54 45 52  |."THEY ARE ENTER|
00002660: 45 44 2E 20 41 4C 53 4F  20 4D 41 49 4C 20 43 41  |ED. ALSO MAIL CA|
00002670: 4C 4C 22 00 1E 3D DC 03  83 22 57 49 4C 4C 20 53  |LL"..=..."WILL S|
00002680: 54 4F 52 45 20 41 42 4F  55 54 20 32 30 30 20 43  |TORE ABOUT 200 C|
00002690: 4F 4D 50 4C 45 54 45 20  52 45 43 4F 52 44 53 22  |OMPLETE RECORDS"|
000026A0: 00 47 3D DE 03 83 22 44  4F 20 4E 4F 54 20 55 53  |.G=..."DO NOT US|
000026B0: 45 20 12 20 2C 20 3B 20  3A 20 92 20 44 55 52 49  |E . , ; : . DURI|
000026C0: 4E 47 20 49 4E 50 55 54  22 00 52 3D E0 03 83 22  |NG INPUT".R=..."|
000026D0: 58 58 58 22 00 6A 3D E2  03 97 38 30 36 2C 32 30  |XXX".j=...806,20|
000026E0: 32 3A 97 38 30 37 2C 32  34 31 3A 8C 00 80 3D E4  |2:.807,241:...=.|
000026F0: 03 8D 31 30 30 30 3A 8D  31 31 30 30 3A 8D 31 30  |..1000:.1100:.10|
00002700: 30 30 00 A5 3D E6 03 97  35 33 32 38 30 2C 31 32  |00..=...53280,12|
00002710: 3A 97 35 33 32 38 31 2C  31 35 3A 4C B2 30 3A 43  |:.53281,15:L.0:C|
00002720: B2 30 3A 89 31 30 38 00  CA 3D E8 03 99 22 1C 1D  |.0:.108..=..."..|
00002730: 1D 1D 1D 1D 1D 1D 1D 1D  41 4E 59 20 4B 45 59 20  |........ANY KEY |
00002740: 54 4F 20 43 4F 4E 54 49  4E 55 45 22 00 D2 3D EA  |TO CONTINUE"..=.|
00002750: 03 43 B2 30 00 F9 3D EC  03 97 31 39 38 2C 30 3A  |.C.0..=...198,0:|
00002760: 92 31 39 38 2C 31 3A 97  31 39 38 2C 30 3A 97 36  |.198,1:.198,0:.6|
00002770: 34 36 2C 30 3A 99 22 93  22 3A 8E 00 15 3E EE 03  |46,0:.".":...>..|
00002780: 8F 12 2A 2A 2A 2A 2A 4D  45 4E 55 20 46 52 41 4D  |..*****MENU FRAM|
00002790: 45 2A 2A 2A 2A 2A 2A 00  2C 3E F0 03 97 35 33 32  |E******.,>...532|
000027A0: 38 30 2C 31 34 3A 97 35  33 32 38 31 2C 31 00 60  |80,14:.53281,1.`|
000027B0: 3E F2 03 54 31 24 B2 22  B0 22 3A 54 32 24 B2 22  |>..T1$.".":T2$."|
000027C0: AE 22 3A 54 33 24 B2 22  AD 22 3A 54 34 24 B2 22  |.":T3$.".":T4$."|
000027D0: BD 22 3A 54 35 24 B2 22  C0 22 3A 54 36 24 B2 22  |.":T5$.".":T6$."|
000027E0: DD 22 00 84 3E F4 03 53  24 B2 22 13 11 11 11 11  |."..>..S$.".....|
000027F0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00002800: 11 11 11 11 11 22 00 B2  3E F6 03 99 22 93 22 C8  |....."..>...".".|
00002810: 28 53 24 2C 32 29 22 20  12 9A 22 54 31 24 3B 3A  |(S$,2)" .."T1$;:|
00002820: 81 58 B2 31 A4 33 36 3A  99 54 35 24 3B 3A 82 3A  |.X.1.36:.T5$;:.:|
00002830: 99 54 32 24 00 EA 3E F8  03 99 C8 28 53 24 2C 33  |.T2$..>....(S$,3|
00002840: 29 22 20 12 9A 22 54 36  24 22 1F 22 54 31 24 3B  |)" .."T6$"."T1$;|
00002850: 3A 81 58 B2 31 A4 33 34  3A 99 54 35 24 3B 3A 82  |:.X.1.34:.T5$;:.|
00002860: 3A 99 54 32 24 3B 22 9A  22 54 36 24 00 15 3F FA  |:.T2$;"."T6$..?.|
00002870: 03 81 58 B2 31 A4 31 39  3A 99 22 20 12 9A 22 54  |..X.1.19:." .."T|
00002880: 36 24 22 1F 22 54 36 24  A6 33 34 29 54 36 24 22  |6$"."T6$.34)T6$"|
00002890: 9A 22 54 36 24 3A 82 00  46 3F FC 03 99 22 20 12  |."T6$:..F?..." .|
000028A0: 9A 22 54 36 24 22 1F 22  54 33 24 3B 3A 81 58 B2  |."T6$"."T3$;:.X.|
000028B0: 31 A4 33 34 3A 99 54 35  24 3B 3A 82 3A 99 54 34  |1.34:.T5$;:.:.T4|
000028C0: 24 3B 22 9A 22 54 36 24  00 6A 3F FE 03 99 22 20  |$;"."T6$.j?..." |
000028D0: 12 9A 22 54 33 24 3B 3A  81 58 B2 31 A4 33 36 3A  |.."T3$;:.X.1.36:|
000028E0: 99 54 35 24 3B 3A 82 3A  99 54 34 24 00 70 3F 00  |.T5$;:.:.T4$.p?.|
000028F0: 04 8E 00 86 3F 02 04 97  35 33 32 38 30 2C 30 3A  |....?...53280,0:|
00002900: 97 35 33 32 38 31 2C 30  00 BB 3F 04 04 99 22 93  |.53281,0..?...".|
00002910: 11 11 1C 2D 2D 2D 2D 3D  3D 3D 3D 3D 3C 3C 3C 3C  |...----=====<<<<|
00002920: 3C 20 05 4D 41 49 4C 20  43 41 4C 4C 20 1C 3E 3E  |< .MAIL CALL .>>|
00002930: 3E 3E 3E 3D 3D 3D 3D 3D  2D 2D 2D 2D 22 00 E6 3F  |>>>=====----"..?|
00002940: 06 04 99 22 11 11 1D 1D  1D 1D 1D 9C 57 52 49 54  |..."........WRIT|
00002950: 54 45 4E 20 42 59 20 52  4F 4E 20 48 41 52 52 49  |TEN BY RON HARRI|
00002960: 53 4F 4E 20 41 4E 44 22  00 14 40 08 04 99 22 52  |SON AND"..@..."R|
00002970: 45 4C 45 41 53 45 44 20  41 53 20 1E 46 52 45 45  |ELEASED AS .FREE|
00002980: 57 41 52 45 20 1F 41 4E  44 20 55 50 4C 4F 41 44  |WARE .AND UPLOAD|
00002990: 45 44 20 54 4F 22 00 41  40 0A 04 99 22 51 55 41  |ED TO".A@..."QUA|
000029A0: 4E 54 55 4D 2D 4C 49 4E  4B 2E 9E 20 54 48 49 53  |NTUM-LINK.. THIS|
000029B0: 20 50 52 4F 47 52 41 4D  20 49 53 20 50 55 42 4C  | PROGRAM IS PUBL|
000029C0: 49 43 22 00 6D 40 0C 04  99 22 44 4F 4D 41 49 4E  |IC".m@..."DOMAIN|
000029D0: 20 41 4E 44 20 4D 41 59  20 42 45 20 47 49 56 45  | AND MAY BE GIVE|
000029E0: 4E 20 41 57 41 59 20 42  55 54 20 4E 4F 54 22 00  |N AWAY BUT NOT".|
000029F0: 7D 40 0E 04 99 22 53 4F  4C 44 2E 20 22 3A 99 00  |}@..."SOLD. ":..|
00002A00: AB 40 10 04 99 22 1D 1D  1D 1D 1D 9F 49 46 20 54  |.@..."......IF T|
00002A10: 48 49 53 20 50 52 4F 47  52 41 4D 20 4D 45 45 54  |HIS PROGRAM MEET|
00002A20: 53 20 59 4F 55 52 20 4E  45 45 44 53 22 00 D7 40  |S YOUR NEEDS"..@|
00002A30: 12 04 99 22 46 45 45 4C  20 46 52 45 45 20 54 4F  |..."FEEL FREE TO|
00002A40: 20 53 45 4E 44 20 41 20  1C 24 35 2E 30 30 9F 20  | SEND A .$5.00. |
00002A50: 43 48 45 43 4B 20 4F 52  22 00 03 41 14 04 99 22  |CHECK OR"..A..."|
00002A60: 4D 4F 4E 45 59 20 4F 52  44 45 52 20 4F 52 20 43  |MONEY ORDER OR C|
00002A70: 41 53 48 20 54 4F 20 54  48 45 20 46 4F 4C 4C 4F  |ASH TO THE FOLLO|
00002A80: 57 49 4E 47 22 00 14 41  16 04 99 22 41 44 44 52  |WING"..A..."ADDR|
00002A90: 45 53 53 2E 20 22 00 35  41 18 04 99 3A 99 22 1D  |ESS. ".5A...:.".|
00002AA0: 1D 1D 1D 1D 1E 20 20 20  20 20 52 4F 4E 20 48 41  |.....     RON HA|
00002AB0: 52 52 49 53 4F 4E 22 00  59 41 1A 04 99 22 1D 1D  |RRISON".YA..."..|
00002AC0: 1D 1D 1D 20 20 20 20 20  36 32 31 32 20 57 45 53  |...     6212 WES|
00002AD0: 54 20 36 34 20 50 4C 41  43 45 22 00 7F 41 1C 04  |T 64 PLACE"..A..|
00002AE0: 99 22 1D 1D 1D 1D 1D 20  20 20 20 20 43 48 49 43  |.".....     CHIC|
00002AF0: 41 47 4F 2C 20 49 4C 4C  2E 20 20 36 30 36 33 38  |AGO, ILL.  60638|
00002B00: 22 00 AE 41 1E 04 99 3A  99 22 1D 1D 1D 1D 1D 1C  |"..A...:."......|
00002B10: 4D 41 4E 59 20 54 48 41  4E 4B 53 20 54 4F 20 1F  |MANY THANKS TO .|
00002B20: 4E 4F 52 42 45 52 54 20  50 45 4B 41 52 45 4B 22  |NORBERT PEKAREK"|
00002B30: 00 DE 41 20 04 99 22 1C  46 4F 52 20 41 4C 4C 20  |..A ..".FOR ALL |
00002B40: 4F 46 20 48 49 53 20 48  45 4C 50 20 41 4E 44 20  |OF HIS HELP AND |
00002B50: 45 58 50 45 52 54 20 52  4F 55 54 49 4E 45 53 22  |EXPERT ROUTINES"|
00002B60: 00 0C 42 22 04 99 22 49  4E 20 4F 52 44 45 52 20  |..B".."IN ORDER |
00002B70: 54 4F 20 42 52 49 4E 47  20 05 4D 41 49 4C 20 43  |TO BRING .MAIL C|
00002B80: 41 4C 4C 1C 20 54 4F 20  4C 49 46 45 2E 22 00 20  |ALL. TO LIFE.". |
00002B90: 42 24 04 97 31 39 38 2C  30 3A 92 31 39 38 2C 31  |B$..198,0:.198,1|
00002BA0: 3A 8E 00 43 42 26 04 99  22 93 1C 11 11 1D 1D 1D  |:..CB&..".......|
00002BB0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 20 20 57 41 52  |...........  WAR|
00002BC0: 4E 49 4E 47 22 00 74 42  28 04 99 22 11 1D 90 57  |NING".tB(.."...W|
00002BD0: 48 49 4C 45 20 54 59 50  49 4E 47 20 49 4E 20 59  |HILE TYPING IN Y|
00002BE0: 4F 55 52 20 4E 41 4D 45  53 20 26 20 41 44 44 52  |OUR NAMES & ADDR|
00002BF0: 45 53 53 45 53 22 00 9C  42 2A 04 99 22 44 4F 20  |ESSES"..B*.."DO |
00002C00: 4E 4F 54 20 55 53 45 20  43 4F 4D 4D 41 27 53 20  |NOT USE COMMA'S |
00002C10: 4F 52 20 53 45 4D 49 43  4F 4C 4F 4E 53 22 00 C9  |OR SEMICOLONS"..|
00002C20: 42 2C 04 99 22 4F 52 20  43 4F 4C 4F 4E 53 2E 20  |B,.."OR COLONS. |
00002C30: 20 41 4C 53 4F 2C 20 44  4F 20 4E 4F 54 20 50 52  | ALSO, DO NOT PR|
00002C40: 45 53 53 20 52 45 54 55  52 4E 22 00 F8 42 2E 04  |ESS RETURN"..B..|
00002C50: 99 22 41 4E 44 20 44 45  46 41 55 4C 54 20 4F 4E  |."AND DEFAULT ON|
00002C60: 20 41 4E 59 20 4C 49 4E  45 2E 20 20 49 46 20 59  | ANY LINE.  IF Y|
00002C70: 4F 55 20 44 4F 20 4E 4F  54 22 00 29 43 30 04 99  |OU DO NOT".)C0..|
00002C80: 22 57 49 53 48 20 54 4F  20 55 53 45 20 41 20 4C  |"WISH TO USE A L|
00002C90: 49 4E 45 20 54 48 45 4E  20 54 59 50 45 20 41 4E  |INE THEN TYPE AN|
00002CA0: 20 12 20 4E 41 20 92 20  4F 4E 22 00 55 43 32 04  | . NA . ON".UC2.|
00002CB0: 99 22 54 48 41 54 20 50  41 52 54 49 43 55 4C 41  |."THAT PARTICULA|
00002CC0: 52 20 4C 49 4E 45 2E 20  20 49 46 20 59 4F 55 20  |R LINE.  IF YOU |
00002CD0: 44 4F 20 4E 4F 54 22 00  84 43 34 04 99 22 46 4F  |DO NOT"..C4.."FO|
00002CE0: 4C 4C 4F 57 20 54 48 45  53 45 20 52 55 4C 45 53  |LLOW THESE RULES|
00002CF0: 2C 54 48 45 4E 20 59 4F  55 52 20 46 49 4C 45 53  |,THEN YOUR FILES|
00002D00: 20 57 49 4C 4C 22 00 B4  43 36 04 99 22 42 45 20  | WILL"..C6.."BE |
00002D10: 47 41 52 42 4C 45 44 20  41 4E 44 20 54 48 45 20  |GARBLED AND THE |
00002D20: 50 52 4F 47 52 41 4D 20  57 49 4C 4C 20 4E 4F 54  |PROGRAM WILL NOT|
00002D30: 20 57 4F 52 4B 22 00 E5  43 38 04 99 22 20 20 44  | WORK"..C8.."  D|
00002D40: 4F 20 4E 4F 54 20 55 53  45 20 1C 12 20 3F 20 2A  |O NOT USE .. ? *|
00002D50: 20 3A 20 3B 20 2C 20 92  90 20 44 55 52 49 4E 47  | : ; , .. DURING|
00002D60: 20 49 4E 50 55 54 22 00  09 44 3A 04 99 22 11 11  | INPUT"..D:.."..|
00002D70: 1F 1D 1D 1D 1D 1D 1D 1D  1D 20 20 20 20 50 52 45  |.........    PRE|
00002D80: 53 53 20 41 4E 59 20 4B  45 59 22 00 2B 44 3C 04  |SS ANY KEY".+D<.|
00002D90: 97 31 39 38 2C 30 3A 92  31 39 38 2C 31 3A 97 31  |.198,0:.198,1:.1|
00002DA0: 39 38 2C 30 3A 97 36 34  36 2C 30 3A 8E 00 58 44  |98,0:.646,0:..XD|
00002DB0: 4C 04 99 22 93 11 11 20  20 20 20 20 54 48 49 53  |L.."...     THIS|
00002DC0: 20 49 53 20 54 48 45 20  4C 41 54 45 53 54 20 56  | IS THE LATEST V|
00002DD0: 45 52 53 49 4F 4E 20 4F  46 22 00 84 44 51 04 99  |ERSION OF"..DQ..|
00002DE0: 22 4D 41 49 4C 43 41 4C  4C 2E 20 54 48 49 53 20  |"MAILCALL. THIS |
00002DF0: 56 45 52 53 49 4F 4E 20  50 52 49 4E 54 53 20 4C  |VERSION PRINTS L|
00002E00: 41 42 45 4C 53 22 00 AE  44 56 04 99 22 4F 46 20  |ABELS"..DV.."OF |
00002E10: 54 48 45 20 53 54 41 4E  44 41 52 44 20 54 59 50  |THE STANDARD TYP|
00002E20: 45 2E 20 41 4E 44 20 54  48 45 52 45 20 49 53 22  |E. AND THERE IS"|
00002E30: 00 D7 44 60 04 99 22 4E  4F 20 50 52 49 4E 54 45  |..D`.."NO PRINTE|
00002E40: 52 20 42 55 4D 50 2E 20  4C 4F 4F 4B 20 46 4F 52  |R BUMP. LOOK FOR|
00002E50: 20 41 4E 4F 54 48 45 52  22 00 04 45 6A 04 99 22  | ANOTHER"..Ej.."|
00002E60: 56 45 52 53 49 4F 4E 20  53 4F 4F 4E 20 54 48 41  |VERSION SOON THA|
00002E70: 54 20 57 49 4C 4C 20 50  52 49 4E 54 20 41 20 53  |T WILL PRINT A S|
00002E80: 49 4E 47 4C 45 22 00 12  45 74 04 99 22 4C 41 42  |INGLE"..Et.."LAB|
00002E90: 45 4C 2E 22 00 3A 45 7E  04 99 3A 99 22 20 20 20  |EL.".:E~..:."   |
00002EA0: 20 20 55 53 49 4E 47 20  54 4F 4F 20 4D 41 59 20  |  USING TOO MAY |
00002EB0: 27 4E 41 27 20 49 4E 20  54 48 45 22 00 63 45 88  |'NA' IN THE".cE.|
00002EC0: 04 99 22 46 49 45 4C 44  53 20 4D 49 47 48 54 20  |.."FIELDS MIGHT |
00002ED0: 43 41 55 53 45 20 54 48  45 20 50 52 4F 47 52 41  |CAUSE THE PROGRA|
00002EE0: 4D 20 54 4F 22 00 8D 45  92 04 99 22 42 45 43 4F  |M TO"..E..."BECO|
00002EF0: 4D 45 20 43 4F 4E 46 55  53 45 44 20 4F 4E 20 41  |ME CONFUSED ON A|
00002F00: 4C 50 48 41 42 49 54 49  5A 49 4E 47 20 26 22 00  |LPHABITIZING &".|
00002F10: BA 45 9C 04 99 22 43 52  41 53 48 20 57 49 54 48  |.E..."CRASH WITH|
00002F20: 20 41 4E 20 49 4C 4C 45  47 41 4C 20 51 55 41 4E  | AN ILLEGAL QUAN|
00002F30: 54 49 54 59 20 45 52 52  4F 52 2E 22 00 E5 45 9D  |TITY ERROR."..E.|
00002F40: 04 99 22 44 4F 4E 27 54  20 55 53 45 20 54 4F 4F  |.."DON'T USE TOO|
00002F50: 20 4D 41 4E 59 20 27 4E  41 27 53 2E 20 49 46 20  | MANY 'NA'S. IF |
00002F60: 59 4F 55 20 44 4F 22 00  10 46 9E 04 99 22 4E 4F  |YOU DO"..F..."NO|
00002F70: 54 20 4E 45 45 44 20 54  48 45 20 42 49 52 54 48  |T NEED THE BIRTH|
00002F80: 20 44 41 54 45 2C 20 54  48 45 4E 20 49 4E 50 55  | DATE, THEN INPU|
00002F90: 54 22 00 3C 46 9F 04 99  22 12 20 30 30 2F 30 30  |T".<F...". 00/00|
00002FA0: 2F 30 30 20 92 20 41 4E  44 20 59 4F 55 20 57 49  |/00 . AND YOU WI|
00002FB0: 4C 4C 20 42 45 20 46 49  4E 45 2E 22 3A 8E 00 6A  |LL BE FINE.":..j|
00002FC0: 46 B0 04 99 22 93 11 11  11 11 1D 1D 1D 1D 1D 52  |F..."..........R|
00002FD0: 45 53 45 54 20 59 4F 55  52 20 43 4F 4D 50 55 54  |ESET YOUR COMPUT|
00002FE0: 45 52 20 54 4F 20 45 52  41 53 45 22 00 97 46 BA  |ER TO ERASE"..F.|
00002FF0: 04 99 22 50 52 4F 47 52  41 4D 20 49 4E 20 4D 45  |.."PROGRAM IN ME|
00003000: 4D 4F 52 59 20 4F 52 20  49 54 20 57 49 4C 4C 20  |MORY OR IT WILL |
00003010: 52 45 53 54 41 52 54 2E  22 00 C3 46 C4 04 99 22  |RESTART."..F..."|
00003020: 54 55 52 4E 20 54 48 45  20 43 4F 4D 50 55 54 45  |TURN THE COMPUTE|
00003030: 52 20 4F 46 46 20 54 48  45 4E 20 4F 4E 20 41 47  |R OFF THEN ON AG|
00003040: 41 49 4E 2E 22 00 D5 46  CE 04 97 31 39 38 2C 30  |AIN."..F...198,0|
00003050: 3A 92 31 39 38 2C 31 00  E0 46 CF 04 9E 36 34 37  |:.198,1..F...647|
00003060: 33 38 00 02 47 14 05 8F  2A 2A 2A 2A 2A 43 48 45  |38..G...*****CHE|
00003070: 43 4B 20 49 46 20 44 52  49 56 45 20 4F 4E 2A 2A  |CK IF DRIVE ON**|
00003080: 2A 2A 2A 2A 00 13 47 28  05 97 37 36 38 2C 36 31  |****..G(..768,61|
00003090: 3A 44 4B B2 30 00 1F 47  32 05 9F 31 2C 38 2C 31  |:DK.0..G2..1,8,1|
000030A0: 35 00 2A 47 3C 05 A0 31  3A A0 31 35 00 37 47 46  |5.*G<..1:.15.7GF|
000030B0: 05 97 37 36 38 2C 31 33  39 00 47 47 50 05 8B 53  |..768,139.GGP..S|
000030C0: 54 B3 B1 AB 31 32 38 A7  8E 00 78 47 5A 05 99 22  |T...128...xGZ.."|
000030D0: 93 11 11 11 11 11 11 11  11 11 11 1D 1D 1D 1D 20  |............... |
000030E0: 20 44 52 49 56 45 20 49  53 20 4E 4F 54 20 54 55  | DRIVE IS NOT TU|
000030F0: 52 4E 45 44 20 4F 4E 20  21 22 00 9D 47 64 05 99  |RNED ON !"..Gd..|
00003100: 22 11 11 1C 1D 1D 1D 1D  1D 1D 1D 1D 50 4C 45 41  |"...........PLEA|
00003110: 53 45 20 43 4F 52 52 45  43 54 20 4E 4F 57 1F 00  |SE CORRECT NOW..|
00003120: C1 47 6E 05 99 22 11 11  1D 1D 1D 1D 1D 1D 1D 1D  |.Gn.."..........|
00003130: 41 4E 59 20 4B 45 59 20  54 4F 20 43 4F 4E 54 49  |ANY KEY TO CONTI|
00003140: 4E 55 45 00 CA 47 6F 05  44 4B B2 31 00 E2 47 70  |NUE..Go.DK.1..Gp|
00003150: 05 92 31 39 38 2C 31 3A  97 31 39 38 2C 30 3A 89  |..198,1:.198,0:.|
00003160: 31 33 30 30 00 00                                 |1300..          |
))...H..J;"  ";H(A$(I.J),NL.65):.I.J.NT.
332...J..J...L.."...      SELECT A NUMBE
R OR PRESS      .               THE SPAC
E BAR...N..QA$:.QA$." ".340.,.P..(QA$."0
".QA$."9").334.5.R..344.H.T..(I.J.1).NT.
.I.Q.V..108.K.X.ID.I.E(QA$):.ID.N.108...
Z.L$.I(A$(ID),7):."........";ID...\..J.1
.7:L(J).F(J(L$,J,1)).65:.J...^.X.1:L(0).
0...`..J.1.7:X.X.L(J.1):."  ";J(A$(ID),X
,L(J)):.J...B.....D...*****DELETE RECORD
******...F..294.D.H.."...  DO YOU WISH T
O DELETE THIS NAME FROM .   THE LIST? (Y
 OR N).Z.J..QB$:.QB$."N".108...L..QB$.."
Y".362...N..I.ID.N.1:A$(I).A$(I.1):.I:A$
(N)."":N.N.1:.108...P...*********TAPE***
*********...R.."..............PRESS . A 
. TO ABORT":.".".9.T.."........".8)" 1:S
AVE A NAME LIST":.".W.V...8)" 2:LOAD A N
AME LIST".V.X...8)"...   SELECT A NUMBER
...Z..Q$:.(Q$."1".Q$."2")..S.24,0:.386..
.|..Q$."A"..S.24,0:.108.C.~..728:.378...
...E(M$).4..S.24,0:.482......Q$."2"..S.2
4,0:.416.......*****TAPE  WRITE******.!.
...N.0..800.2....E(M$).4.454.Q....".....
.........REWIND DATA TAPE......ANY KEY T
O CONTINUE"......A$:.A$.""..396......"..
.............":.1,1,1,"NAME FILE"......1
,N......I.1.N:LA.C(A$(I)):LL..(LA.2):LR.
LA.LL......1,H(A$(I),LL):.1,I(A$(I),LR):
.I..... 1.:...."...........             
   FINISHED".G....".......        PRESS 
STOP BUTTON":."."......".              P
RESS RETURN";Q$:.108.......*****TAPE REA
D******... ..E(M$).4.482.K....N.0.430...
..."..........   THERE IS A LIST ALREADY
 IN MEMORY.0....".   DO YOU WANT TO CLEA
R IT OUT? (Y OR N).I....Q$:.Q$.""..728:.
424.B....Q$."N"..S.24,0:.108.S....Q$.."Y
".424......"............  REWIND DATA TA
PE--ANY KEY TO START":.198,1......S.24,0
.M....:.A$(150)......E(M$).4.482......1,
1,0,"NAME FILE"......1,N......I.1.N:.1,L
$,R$:A$(I).L$.R$.%....I.,... 1.^...."...
........      READ FROM TAPE IS FINISHED
...B.."...           PRESS STOP BUTTON":
.".".A.D.."..             PRESS ANY KEY"
:.198,0:.198,1:.108.O.F..N.0..800...H.."
...........INSERT DATA DISK......ANY KEY
 TO CONTINUE".4.J..198,0:.198,1:.198,0:.
832:.DK.1..108.=.L..878.].N..15,8,15,"S0
:NAME FILE": 15.Z.P..8,8,8,"0:NAME FILE,
S,W"...R..8,N...T..I.1.N:LA.C(A$(I)):LL.
.(LA.2):LR.LA.LL.S.V..8,H(A$(I),LL):.8,I
(A$(I),LR):.I.Z.X. 8...Z..L.0.500:.L....
..15,8,15,"I0":.L.0.500:.L:.15,"V0": 15.
?...."...........               FINISHED
".T....".             PRESS RETURN":.198
,0:.198,1:.108......N.0.490......N..0.48
6.H...."..............ERASE THE LIST IN 
MEMORY?  (Y OR N)"......Q$:.Q$."".488:.Q
$."Y".490......Q$."N".108.4 ..."........
....INSERT DATA DISK......ANY KEY TO CON
TINUE".] ...198,0:.198,1:.198,0:.832:.DK
.1..108.. ...:.A$(110):.8,8,8,"NAME FILE
,S,R".. ...8,N.. ...I.1.N:.8,L$,R$:A$(I)
.L$.R$.. ...I.. .. 8.. ..."...........  
   READ FROM DISK IS FINISHED".$!..."...
..            PRESS RETURN":.198,0:.198,
1:.108.E!....********PRINTER***********.
Y!...856:.PT.1..108..!..."..............
......IS PRINTER READY  (Y OR N)"..!..."
................ SET TOP OF FORM .".R!..
.A$:.A$.""..728:.518..!...S.24,0..!...A$
.."Y"..108..!...N..0..528.?"..."........
.............NO LIST IN MEMORY":.L.0.200
0:.L:.108.H"...3,4.H"...I.1.N:.A$(I)."".
.3: 3:.108.."..ZQ$."--------------------
".."..L$.I(A$(I),7):.3,I;ZQ$.E"...J.1.7:
L(J).F(J(L$,J,1)).65:.J.."..X.1:L(0).0:.
J.1.7:X.X.L(J.1)..#...3,"  ";J(A$(I),X,L
(J)):.J:.I:.3: 3:.108.4#....*****SEARCH 
FOR NAME******.=# ..294.C#".."...       
     PRESS SPACE BAR".Z#$..SB$:.SB$.." "
.548..#&..108..#(.."........TYPE BIRTH M
ONTH TO FIND (JAN=01 FEB=02)".I#*..DA$:I
D.0.T#,..I.1.N..#...H(DA$,2).H(I(A$(I),1
5),2).562..$0..566..$2.ID.I:.346.($4..".
  PRESS RETURN";Q$.;$6..I:.ID..0..108.X$
8..ID.0.."...................NO BIRTHDAY
S FOR THIS MONTH!"..$:..L.0.1000:.L:.108
.D$<.."................ARE YOU SURE?  (Y
 OR N)":.646,6..$>.."..  SAVE YOUR LIST 
BEFORE SELECTING . Y .":..&%@.."UNLESS Y
OU DON'T WANT THE LIST IN MEMORY.U%B.." 
.*=======MEMORY WILL BE ERASED=======*".
N%D..A$:.A$.""..728:.580.Z%F..S.24,0..%H
..A$."N"..108..%J..1200..%L...*****PRINT
 LABELS******.G%N..856:.PT.1..108..%P.."
............    PRESS . A . TO ABORT":.6
46,6.(&R.."............MAKE SURE PRINTER
 IS READY".]&T..".......MAKE SURE LABELS
 ARE ALIGNED PROPERLY."..&V.."....ARE YO
UR LABELS 2 ACROSS OR 1 ACROSS?"..&X..".
".14)"(  1 OR 2 )".F&Z..".".13)".SELECT 
NUMBER."..&\..Q$:.Q$.""..728:.604..&^..Q
$."A"..S.24,0:.108..'`..Q$."1".Q$."2".60
4.#'B.W.2:.Q$."1".W.1./'D..S.24,0.>'F..N
..0..618.|'H.."...................NO LIS
T IN MEMORY":.L.0.2000:.L:.108..'J..3,4.
.'L..N.2..(N.2).M.N:.626..'N.M.N.1:A$(M)
."ALL THATS                    ":A$(M).A
$(M).G(74)..(P..K.1.6:A$(M).A$(M).G(66):
.K.,(R..I.1.N.W:L$.I(A$(I),7):LL$.I(A$(I
.1),7).I(T..J.1.5:AL(J).F(J(L$,J,1)).65:
.W.2.BL(J).F(J(LL$,J,1)).65.P(V..J..(X.N
A$.H(A$(I),AL(1)):NB$.H(A$(I.1),BL(1)).G
(Z..JA.1.AL(1):C$.J(NA$,JA,1):.C$." ".63
8.X(|..JA:.W.1.642..)~..JB.1.BL(1):C$.J(
NB$,JB,1):.C$." ".642..)...JB.3)..N1$.I(
NA$,AL(1).JA)." ".H(NA$,JA.1).`)...W.2.N
2$.I(NB$,BL(1).JB)." ".H(NB$,JB.1).Y)...
W.1..3,.3);N1$:.650..)...3,.3);N1$;.38.C
(N1$));N2$..)..N1$.J(A$(I),1.AL(1),AL(2)
).X)..N2$.J(A$(I.1),1.BL(1),BL(2))..)...
W.1..3,.3);N1$:.658..*...3,.3);N1$;.38.C
(N1$));N2$.;*..N1$."":NA.1.AL(1):.K.3.5:
NA.NA.AL(K.1).]*..N1$.N1$.J(A$(I),NA,AL(
K))." ".D*...K..*..N2$."":NB.1.BL(1):.K.
3.5:NB.NB.BL(K.1)..*..N2$.N2$.J(A$(I.1),
NB,BL(K))." "..*...K.S*...W.1..3,.3);N1$
:.674..* ..3,.3);N1$;.38.C(N1$));N2$..+.
..K.1.3:.3:.K:.Q$:.Q$."A"..3: 3:.108.!+.
..I.++...3: 3.4+...108.Q+....*****FORMAT
 DISK******.M+...1300:.15,8,15:.15,"I0".
.+...15,A$,B$,C$,D$..+...A$."21"..15,A$,
B$,C$,D$:.712..+...B$.."OK"..712..+...".
.........DOS HAS READ YOUR DISK AND"..,.
.."FOUND IT TO BE FORMATTED ALREADY".0,.
.."IT MIGHT HAVE DATA ON IT......".;,...
646,6.L,..."....DO YOU STILL WANT TO FOR
MAT? (Y OR N)".W,...646,6..,...A$:.A$.""
..728:.704..,B..S.24,0..,D..A$."Y".712.J
,F..A$."N"..15,"I0": 15:.108..,H..".....
................FORMATTING DISK....."."-
J..15,"I0":.15,"N0:MAIL CALL,FD": 15.B-L
..1,8,1,"0:NAME FILE,S,W": 1.]-N..1,8,1,
"0:TEST,S,W": 1..-P.."..............YOUR
 DISK HAS BEEN FORMATTED..-R.."THE CORRE
CT DATA FILE HAS BEEN CREATED".R-T..L.0.
5000:.L:.108..-V...*****RING THE BELL***
***.-.X.S.54272:.S.24,15:.S.1,110:.S.5,9
:.S.6,9:.S.4,17:.S.4,16.=.Z..L.0.900:.L.
C.....B.....*****FRAME ROUTINE******...
..53280,0:.53281,0:.646,8.....F$."Z"....
..".";:.I.1.39:.F$;:.I:.".".B....I.1.23:
.F$.38)F$:.I......I.1.39:.F$;:.I:."."...
...L.1.45......"...."../...646,.(1).15:.
53280,.(1).15.1/..A$."******************
**".G/....(40.C(A$)).2)A$.E/..A$."*  MAI
L CALL V3.1  *".V/...646,.(1).15../....(
40.C(A$)).2)A$../..A$."*****************
***"../...646,.(1).15.Q/....(40.C(A$)).2
)A$..0...646,7:A$."WORKS WITH BOTH TAPE 
AND OR DISK"..0..."..";.(40.C(A$)).2)A$.
&0...".".:0..A$."WRITTEN BY".P0....(40.C
(A$)).2)A$.F0..A$."RON HARRISON"..0...".
";.(40.C(A$)).2)A$..0..A$."<<<<<     >>>
>>"..0...".";.(40.C(A$)).2)A$..0...646,5
.H0...".."..0..A$."PUBLIC DOMAIN FREEWAR
E"..0....(40.C(A$)).2)A$..1..."."..1...L
..1....@1 .."...........";.12);"NO DATA 
IN MEMORY".E1"..".................PRESS 
RETURN".U1$..198,1:.108..1&..:GOSUB826:I
FDK=1THENGOTO106.A1(.."...............PR
ESS . A . TO ABORT"..1*.."...........";.
7);"INSERT DISK TO BE FORMATTED"..2,...8
)"...PRESS RETURN WHEN READY".=2....8)".
......................".V20..A$:.A$.""..
728:.816.O22..A$."A"..S.24,0:.108..24..S
.24,0:.684..26.."...............LESS THA
N 200 FREE BYTES REMAINING..".P28..L.0.2
000:.L:L.0..2:..".":...2<...*****CHECK I
F DRIVE ON******. 3>...*****768 ERROR VE
CTOR******.13@..768,61:DK.0.B3B..1,8,15,
"I0".M3D. 1: 15.Z3F..768,139.J3H..ST...1
28....3J.."...............  DRIVE IS NOT
 TURNED ON !"..3L.."...........PLEASE CO
RRECT NOW...3N.."..........ANY KEY TO CO
NTINUE..3P.DK.1..3R..198,1:...4T...*****
CHECK IF PRINTER ON******.(4V.PT.0.34X..
768,1.<4Z..1,4.K4\..1,G(145);.R4^. 1._4`
..768,139.O4B..ST...128....4D.."........
.......  PRINTER IS NOT TURNED ON !".G4F
.."...........PLEASE CORRECT NOW...4H.."
..........ANY KEY TO CONTINUE..4J.PT.1..
5L..198,1:..$5N...*****CHECK FOR W/P TAB
******.15P..15,8,15.J5R..8,8,8,"@0:TEST,
S,W".A5T..15,A$,B$,C$,D$,E$.S5V..B$."OK"
..894..5X..A$."26". ."...........       
 WRITE PROTECT IS ON".Z5Z.."CORRECT NOW 
AND PRESS A KEY TO CONTINUE"..6|..198,0:
. 198,1:.198,0: 8: 15:.646,6:...6~. 8: 1
5:.646,6:..26...*****HELP DATA******.T6.
..".":.53281,1:.53280,1:.646,0.L6...A$:.
A$.."INFO".900.T6..C.0..6...A$:.A$."XXX"
..992..6...A$:C.C.1:.C.22..1000..6...904
..6...INFO..6..."     MAIL CALL IS DESIG
NED TO BE USER"..7..."FRIENDLY. YOU WILL
 ALWAYS BE TAKEN".<7..."BACK TO THE MAIN
 MENU WHEN YOU FINISH".H7..."A TASK. MAI
L CALL WILL EASILY ACCESS"..7..."A DISK 
DRIVE OR A TAPE DRIVE. YOU"..7..."SELECT
 WHICH DEVICE YOU WANT TO USE".W7..."FRO
M THE MAIN MENU."..8..."     FIRST YOU M
UST FORMAT A DATA DISK".08 .."THE NECESS
ARY FILES WILL BE CREATED".[8..."AFTER F
ORMAT IS COMPLETE. THIS MUST"..8..."BE D
ONE FIRST OR THE PROGRAM WILL NOT"..8...
"FUNCTION CORRECTLY. DO NOT USE THE"..8.
.."PROGRAM DISK FOR FORMATTING AND FILE"
..9..."CREATE. AFTER YOU DO THIS ON AN O
LD".59..."DISK OR A NEW UN-FORMATTED DIS
K, YOU".A9..."MAY THEN SAVE MAIL CALL TO
 THIS DISK"..9..."SO AS TO HAVE THE ENTI
RE UTILITY ON"..9..."ONE DISK.".H9..."  
   TAPE USERS MUST USE A SEPARATE"..9...
"TAPE TO STORE DATA. DO NOT USE THE"..:.
.."PROGRAM TAPE FOR DATA STORAGE. YOU".H
:..."RUN THE RISK OF OVERWRITING THE MAI
L".V:..."CALL PROGRAM, AND THUS IT WILL 
BE GONE"..:..."FOREVER. THIS PROGRAM IS 
A VERY GOOD".O:..."AID FOR CLUBS, BBS ME
MBERS, CHURCHES,"..:B.."SCHOOLS, OR ANYT
IME YOU NEED TO STORE".);D.."NAMES AND A
DDRESSES AND PHONE NUMBERS".V;F.."FOR LA
TER VIEWING OR PRINTING MAILING"..;H.."L
ABELS. YOU MUST FIRST CREATE A DATA"..;J
.."FILE, (NAMES & ADDRESSES) ,BEFORE YOU
".Z;L.."CAN SAVE THE FILE.  YOU MUST LOA
D A"..<N.."DATA FILE BEFORE YOU CAN DELE
TE OR"..<P.."MAKE CHANGES OR ADD TO THE 
ADDRESS".W<R.."FILE. FOLLOW THESE RULES 
AND YOU "..<T.."WILL HAVE NO PROBLEMS IN
 USING MAIL". <V.."CALL. ENJOY MAIL CALL
.".I<X..".*NOTE*.NAMES ARE ALPHABETIZED 
AS"..<Z.."THEY ARE ENTERED. ALSO MAIL CA
LL"..=..."WILL STORE ABOUT 200 COMPLETE 
RECORDS".G=..."DO NOT USE . , ; : . DURI
NG INPUT".R=..."XXX".J=...806,202:.807,2
41:...=...1000:.1100:.1000..=...53280,12
:.53281,15:L.0:C.0:.108.J=..."..........
ANY KEY TO CONTINUE".R=..C.0..=...198,0:
.198,1:.198,0:.646,0:.".":...>....*****M
ENU FRAME******.,>...53280,14:.53281,1.`
>..T1$.".":T2$.".":T3$.".":T4$.".":T5$."
.":T6$."."..>..S$.".....................
....."..>..."."H(S$,2)" .."T1$;:.X.1.36:
.T5$;:.:.T2$..>...H(S$,3)" .."T6$"."T1$;
:.X.1.34:.T5$;:.:.T2$;"."T6$..?...X.1.19
:." .."T6$"."T6$.34)T6$"."T6$:..F?..." .
."T6$"."T3$;:.X.1.34:.T5$;:.:.T4$;"."T6$
.J?..." .."T3$;:.X.1.36:.T5$;:.:.T4$.P?.
....?...53280,0:.53281,0..?..."....----=
====<<<<< .MAIL CALL .>>>>>=====----"..?
..."........WRITTEN BY RON HARRISON AND"
..@..."RELEASED AS .FREEWARE .AND UPLOAD
ED TO".A@..."QUANTUM-LINK.. THIS PROGRAM
 IS PUBLIC".M@..."DOMAIN AND MAY BE GIVE
N AWAY BUT NOT".}@..."SOLD. ":...@..."..
....IF THIS PROGRAM MEETS YOUR NEEDS".W@
..."FEEL FREE TO SEND A .$5.00. CHECK OR
"..A..."MONEY ORDER OR CASH TO THE FOLLO
WING"..A..."ADDRESS. ".5A...:."......   
  RON HARRISON".YA...".....     6212 WES
T 64 PLACE".A...".....     CHICAGO, ILL
.  60638"..A...:."......MANY THANKS TO .
NORBERT PEKAREK"..A ..".FOR ALL OF HIS H
ELP AND EXPERT ROUTINES"..B".."IN ORDER 
TO BRING .MAIL CALL. TO LIFE.". B$..198,
0:.198,1:..CB&.."..................  WAR
NING".TB(.."...WHILE TYPING IN YOUR NAME
S & ADDRESSES"..B*.."DO NOT USE COMMA'S 
OR SEMICOLONS".IB,.."OR COLONS.  ALSO, D
O NOT PRESS RETURN"..B..."AND DEFAULT ON
 ANY LINE.  IF YOU DO NOT".)C0.."WISH TO
 USE A LINE THEN TYPE AN . NA . ON".UC2.
."THAT PARTICULAR LINE.  IF YOU DO NOT".
.C4.."FOLLOW THESE RULES,THEN YOUR FILES
 WILL"..C6.."BE GARBLED AND THE PROGRAM 
WILL NOT WORK"..C8.."  DO NOT USE .. ? *
 : ; , .. DURING INPUT"..D:.."..........
.    PRESS ANY KEY".+D<..198,0:.198,1:.1
98,0:.646,0:..XDL.."...     THIS IS THE 
LATEST VERSION OF"..DQ.."MAILCALL. THIS 
VERSION PRINTS LABELS"..DV.."OF THE STAN
DARD TYPE. AND THERE IS".WD`.."NO PRINTE
R BUMP. LOOK FOR ANOTHER"..EJ.."VERSION 
SOON THAT WILL PRINT A SINGLE"..ET.."LAB
EL.".:E~..:."     USING TOO MAY 'NA' IN 
THE".CE..."FIELDS MIGHT CAUSE THE PROGRA
M TO"..E..."BECOME CONFUSED ON ALPHABITI
ZING &"..E..."CRASH WITH AN ILLEGAL QUAN
TITY ERROR."..E..."DON'T USE TOO MANY 'N
A'S. IF YOU DO"..F..."NOT NEED THE BIRTH
 DATE, THEN INPUT".<F...". 00/00/00 . AN
D YOU WILL BE FINE.":..JF..."..........R
ESET YOUR COMPUTER TO ERASE"..F..."PROGR
AM IN MEMORY OR IT WILL RESTART.".CFD.."
TURN THE COMPUTER OFF THEN ON AGAIN.".UF
N..198,0:.198,1..FO..64738..G...*****CHE
CK IF DRIVE ON******..G(..768,61:DK.0..G
2..1,8,15.*G<. 1: 15.7GF..768,139.GGP..S
T...128...XGZ.."...............  DRIVE I
S NOT TURNED ON !"..GD.."...........PLEA
SE CORRECT NOW..AGN.."..........ANY KEY 
TO CONTINUE.JGO.DK.1..GP..198,1:.198,0:.
1300..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL