LABELS
FILE INFORMATION
FILENAME(S): LABELS
FILE TYPE(S): PRG
FILE SIZE: 8.2K
FIRST SEEN: 2025-12-02 02:14:52
APPEARS ON: 1 disk(s)
FILE HASH
3bf990e76ce85d341302a176db81f96a1e62417774de015f0bba9fc756f69adc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PANS DATABASE 01 | LABELS | PRG | The BAM Archive | 24 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 48 08 0A 00 8F 20 2A 20 44 46 4D 20 4C 41 |..H.... * DFM LA| 00000010: 42 45 4C 53 20 42 59 20 43 48 52 49 53 20 45 4C |BELS BY CHRIS EL| 00000020: 59 20 2A 20 44 49 41 4C 4F 47 20 53 4F 46 54 57 |Y * DIALOG SOFTW| 00000030: 41 52 45 28 43 29 20 31 35 2F 30 33 2F 38 33 20 |ARE(C) 15/03/83 | 00000040: 2A 20 4A 41 33 30 30 34 00 63 08 0F 00 97 35 33 |* JA3004.c....53| 00000050: 32 38 30 2C 32 3A 97 35 33 32 38 31 2C 32 3A 99 |280,2:.53281,2:.| 00000060: 22 9E 22 00 91 08 14 00 58 B2 30 3A 59 B2 30 3A |".".....X.0:Y.0:| 00000070: 52 B2 30 3A 43 B2 30 3A 49 50 24 B2 22 22 3A 4B |R.0:C.0:IP$."":K| 00000080: 24 B2 22 22 3A 45 4D 24 B2 22 22 3A 4E 24 B2 22 |$."":EM$."":N$."| 00000090: 22 00 A8 08 28 00 41 24 28 52 2C 43 29 B2 22 22 |"...(.A$(R,C).""| 000000A0: 3A 46 B2 30 3A 53 B2 30 00 B4 08 32 00 99 C7 28 |:F.0:S.0...2...(| 000000B0: 31 34 37 29 00 CA 08 3C 00 8D 31 36 38 30 3A 81 |147)...<..1680:.| 000000C0: 49 B2 31 A4 31 30 3A 99 3A 82 00 F7 08 46 00 99 |I.1.10:.:....F..| 000000D0: 22 20 20 20 20 20 20 53 45 4C 45 43 54 3A 20 12 |" SELECT: .| 000000E0: 55 92 50 50 45 52 20 4F 52 20 12 4C 92 4F 57 45 |U.PPER OR .L.OWE| 000000F0: 52 20 43 41 53 45 22 00 0B 09 50 00 A1 20 4B 24 |R CASE"...P.. K$| 00000100: 3A 8B 20 4B 24 B2 22 22 A7 38 30 00 25 09 5A 00 |:. K$."".80.%.Z.| 00000110: 8B 4B 24 B2 22 55 22 A7 99 C7 28 31 34 32 29 20 |.K$."U"...(142) | 00000120: 3A 89 31 32 30 00 3D 09 64 00 8B 4B 24 B2 22 4C |:.120.=.d..K$."L| 00000130: 22 A7 99 C7 28 31 34 29 3A 89 31 32 30 00 45 09 |"...(14):.120.E.| 00000140: 6E 00 89 38 30 00 57 09 78 00 99 C7 28 31 34 37 |n..80.W.x...(147| 00000150: 29 3A 8D 31 36 38 30 00 6B 09 82 00 99 3A 8B 4E |):.1680.k....:.N| 00000160: 24 B2 22 22 A7 99 3A 89 31 35 30 00 87 09 87 00 |$.""..:.150.....| 00000170: 8B C3 28 4E 24 29 B3 39 A7 4E 24 B2 4E 24 AA 22 |..(N$).9.N$.N$."| 00000180: 20 22 3A 89 31 33 35 00 B4 09 8C 00 99 3A 99 3A | ":.135......:.:| 00000190: 99 3A 99 A3 38 29 22 12 20 46 49 4C 45 20 49 4E |.:..8)". FILE IN| 000001A0: 20 55 53 45 3A 20 22 3B 4E 24 3B 22 92 22 3A 99 | USE: ";N$;".":.| 000001B0: 3A 99 3A 99 00 D2 09 96 00 99 3A 99 A3 31 34 29 |:.:.......:..14)| 000001C0: 22 4B 45 59 20 4F 50 54 49 4F 4E 22 3A 8D 31 32 |"KEY OPTION":.12| 000001D0: 36 30 00 F6 09 A0 00 99 22 12 44 92 41 54 41 46 |60......".D.ATAF| 000001E0: 49 4C 45 20 4C 4F 41 44 22 A3 32 37 29 22 12 4C |ILE LOAD".27)".L| 000001F0: 92 41 42 45 4C 53 00 1D 0A AA 00 99 22 12 56 92 |.ABELS......".V.| 00000200: 49 45 57 20 52 45 43 4F 52 44 53 22 A3 32 37 29 |IEW RECORDS".27)| 00000210: 22 12 55 92 54 49 4C 49 54 49 45 53 22 00 52 0A |".U.TILITIES".R.| 00000220: B4 00 99 22 12 53 92 4F 52 54 2F 56 49 45 57 20 |...".S.ORT/VIEW | 00000230: 49 4E 44 45 58 22 A3 32 37 29 22 12 45 92 58 49 |INDEX".27)".E.XI| 00000240: 54 20 50 52 4F 47 52 41 4D 22 3A 99 3A 8D 31 32 |T PROGRAM":.:.12| 00000250: 36 30 00 58 0A BE 00 3A 00 6B 0A C8 00 A1 4B 24 |60.X...:.k....K$| 00000260: 3A 8B 4B 24 B2 22 22 A7 32 30 30 00 96 0A D2 00 |:.K$."".200.....| 00000270: 4B 4B 24 B2 22 44 4C 56 55 53 45 22 3A 81 4B B2 |KK$."DLVUSE":.K.| 00000280: 31 A4 36 3A 8B 4B 24 B2 CA 28 4B 4B 24 2C 4B 2C |1.6:.K$..(KK$,K,| 00000290: 31 29 A7 32 32 30 00 A2 0A D7 00 82 4B 3A 89 32 |1).220......K:.2| 000002A0: 30 30 00 C6 0A DC 00 91 4B 89 31 33 30 30 2C 32 |00......K.1300,2| 000002B0: 34 33 30 2C 32 34 30 2C 31 37 32 30 2C 32 31 30 |430,240,1720,210| 000002C0: 30 2C 31 36 36 30 00 CC 0A E6 00 3A 00 0E 0B F0 |0,1660.....:....| 000002D0: 00 52 4E B2 30 3A 99 22 45 4E 54 45 52 20 52 45 |.RN.0:."ENTER RE| 000002E0: 43 4F 52 44 20 12 4E 4F 3A 92 20 4F 52 20 12 53 |CORD .NO:. OR .S| 000002F0: 92 43 52 4F 4C 4C 3A 20 20 22 3B 3A 8D 31 31 33 |.CROLL: ";:.113| 00000300: 30 3A 8B 49 50 24 B2 22 53 22 A7 32 37 30 00 39 |0:.IP$."S".270.9| 00000310: 0B FA 00 52 4E B2 B5 28 C5 28 49 50 24 29 29 3A |...RN..(.(IP$)):| 00000320: 8B 28 52 4E B3 31 B0 52 4E B1 59 29 A7 99 3A 8D |.(RN.1.RN.Y)..:.| 00000330: 32 30 35 30 3A 89 32 34 30 00 6C 0B 04 01 52 B2 |2050:.240.l...R.| 00000340: 52 4E 3A 99 C7 28 31 34 37 29 3A 99 A3 31 32 29 |RN:..(147):..12)| 00000350: 22 12 20 52 45 43 4F 52 44 20 56 49 45 57 20 92 |". RECORD VIEW .| 00000360: 22 3A 8D 31 32 36 30 3A 89 33 30 30 00 8E 0B 0E |":.1260:.300....| 00000370: 01 99 C7 28 31 34 37 29 3B 3A 81 52 B2 31 A4 59 |...(147);:.R.1.Y| 00000380: 3A 99 C7 28 31 39 29 3B 3A 8D 31 32 36 30 00 C1 |:..(19);:.1260..| 00000390: 0B 18 01 99 22 12 20 52 45 43 4F 52 44 53 20 57 |....". RECORDS W| 000003A0: 49 4C 4C 20 44 49 53 50 4C 41 59 20 49 4E 20 4C |ILL DISPLAY IN L| 000003B0: 4F 47 49 43 41 4C 20 4F 52 44 45 52 20 92 22 3A |OGICAL ORDER .":| 000003C0: 99 00 FE 0B 22 01 99 22 12 43 92 4F 4E 54 49 4E |...."..".C.ONTIN| 000003D0: 55 4F 55 53 20 53 43 52 4F 4C 4C 3A 20 20 12 53 |UOUS SCROLL: .S| 000003E0: 92 54 4F 50 20 53 43 52 4F 4C 4C 3A 20 20 12 45 |.TOP SCROLL: .E| 000003F0: 92 58 49 54 3A 22 3A 99 3A 8D 31 32 36 30 00 1C |.XIT:":.:.1260..| 00000400: 0C 2C 01 99 3A 99 22 52 45 43 4F 52 44 20 4E 4F |.,..:."RECORD NO| 00000410: 3A 20 22 3B 52 3A 81 43 B2 31 A4 58 00 43 0C 36 |: ";R:.C.1.X.C.6| 00000420: 01 41 31 24 B2 C8 28 41 24 28 30 2C 43 29 2C 39 |.A1$..(A$(0,C),9| 00000430: 29 3A 41 32 24 B2 C8 28 41 24 28 52 2C 43 29 2C |):A2$..(A$(R,C),| 00000440: 32 36 29 00 62 0C 40 01 8B C3 28 41 31 24 29 B3 |26).b.@...(A1$).| 00000450: 39 A7 41 31 24 B2 41 31 24 AA 22 20 22 3A 89 33 |9.A1$.A1$." ":.3| 00000460: 32 30 00 82 0C 4A 01 8B C3 28 41 32 24 29 B3 32 |20...J...(A2$).2| 00000470: 36 A7 41 32 24 B2 41 32 24 AA 22 20 22 3A 89 33 |6.A2$.A2$." ":.3| 00000480: 33 30 00 9F 0C 54 01 99 22 12 22 41 31 24 22 92 |30...T.."."A1$".| 00000490: 22 A3 31 32 29 41 32 24 3A 8B 43 B2 31 A7 99 00 |".12)A2$:.C.1...| 000004A0: AF 0C 59 01 8B 52 4E B3 B1 30 A7 33 32 37 30 00 |..Y..RN..0.3270.| 000004B0: BF 0C 5E 01 82 43 3A 8B 52 B2 31 A7 33 39 30 00 |..^..C:.R.1.390.| 000004C0: D9 0C 68 01 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B |..h.K$."":.K$:.K| 000004D0: 24 B2 22 53 22 A7 33 39 30 00 F5 0C 72 01 8B 4B |$."S".390...r..K| 000004E0: 24 B3 B1 22 45 22 A7 81 49 B2 31 A4 35 30 30 3A |$.."E"..I.1.500:| 000004F0: 82 49 3A 82 52 00 02 0D 7C 01 52 B2 59 3A 89 31 |.I:.R...|.R.Y:.1| 00000500: 32 30 00 25 0D 86 01 4B 24 B2 22 22 3A A1 4B 24 |20.%...K$."":.K$| 00000510: 3A 8B 4B 24 B3 B1 22 43 22 AF 4B 24 B3 B1 22 45 |:.K$.."C".K$.."E| 00000520: 22 A7 33 39 30 00 2E 0D 90 01 89 33 37 30 00 34 |".390......370.4| 00000530: 0D 9A 01 3A 00 40 0D A4 01 99 C7 28 31 34 37 29 |...:.@.....(147)| 00000540: 00 6D 0D A9 01 99 A3 38 29 22 12 20 53 45 4C 45 |.m.....8)". SELE| 00000550: 43 54 49 4F 4E 20 46 4F 52 20 50 52 49 4E 54 49 |CTION FOR PRINTI| 00000560: 4E 47 20 92 22 3A 8D 31 32 36 30 3A 99 00 78 0D |NG .":.1260:..x.| 00000570: AE 01 81 52 B2 31 A4 59 00 AF 0D B8 01 99 22 45 |...R.1.Y......"E| 00000580: 4E 54 45 52 20 46 49 45 4C 44 20 54 49 54 4C 45 |NTER FIELD TITLE| 00000590: 20 5B 20 20 20 20 20 20 20 20 20 5D 9D 9D 9D 9D | [ ]....| 000005A0: 9D 9D 9D 9D 9D 9D 22 3B 3A 8D 31 31 33 30 3B 00 |......";:.1130;.| 000005B0: BB 0D C2 01 44 50 24 B2 49 50 24 00 DA 0D CC 01 |....DP$.IP$.....| 000005C0: 8B C3 28 44 50 24 29 B3 39 A7 44 50 24 B2 44 50 |..(DP$).9.DP$.DP| 000005D0: 24 AA 22 20 22 3A 89 34 36 30 00 E4 0D D6 01 99 |$." ":.460......| 000005E0: 3A 43 B2 31 00 F9 0D E0 01 8B 41 24 28 30 2C 43 |:C.1......A$(0,C| 000005F0: 29 B2 44 50 24 A7 35 31 30 00 0E 0E EA 01 43 B2 |).DP$.510.....C.| 00000600: 43 AA 31 3A 8B 43 B3 58 AA 31 A7 34 38 30 00 35 |C.1:.C.X.1.480.5| 00000610: 0E F4 01 45 4D 24 B2 22 12 20 4E 4F 20 53 55 43 |...EM$.". NO SUC| 00000620: 48 20 46 49 45 4C 44 20 92 22 3A 8D 31 32 32 30 |H FIELD .":.1220| 00000630: 3A 89 31 32 30 00 55 0E FE 01 99 22 45 4E 54 45 |:.120.U...."ENTE| 00000640: 52 20 43 52 49 54 45 52 49 41 20 46 4F 52 20 22 |R CRITERIA FOR "| 00000650: 44 50 24 3A 99 00 72 0E 08 02 99 22 5B 22 3B 3A |DP$:..r...."[";:| 00000660: 8D 32 30 37 30 3A 99 C8 28 53 24 2C 41 28 43 29 |.2070:..(S$,A(C)| 00000670: 29 3B 00 8F 0E 12 02 99 22 5D 22 3B 3A 99 C8 28 |);......"]";:..(| 00000680: 54 24 2C 41 28 43 29 29 3B 3A 99 22 9D 22 3B 00 |T$,A(C));:.".";.| 00000690: A3 0E 1C 02 8D 31 31 33 30 3A 43 50 24 B2 49 50 |.....1130:CP$.IP| 000006A0: 24 3A 99 00 B0 0E 26 02 46 B2 C3 28 43 50 24 29 |$:....&.F..(CP$)| 000006B0: 00 C9 0E 3A 02 8B 41 41 24 28 43 29 B2 22 43 22 |...:..AA$(C)."C"| 000006C0: A7 49 B2 31 3A 89 36 36 30 00 E7 0E 44 02 99 22 |.I.1:.660...D.."| 000006D0: 53 48 4F 55 4C 44 20 12 20 22 44 50 24 22 20 92 |SHOULD . "DP$" .| 000006E0: 20 42 45 3A 22 3A 99 00 09 0F 4E 02 99 A3 37 29 | BE:":....N...7)| 000006F0: 22 12 45 92 51 55 41 4C 20 54 4F 20 20 20 20 20 |".E.QUAL TO | 00000700: 20 3A 20 22 43 50 24 3A 99 00 2B 0F 58 02 99 A3 | : "CP$:..+.X...| 00000710: 37 29 22 12 4C 92 45 53 53 20 54 48 41 4E 20 20 |7)".L.ESS THAN | 00000720: 20 20 20 3A 20 22 43 50 24 3A 99 00 4D 0F 62 02 | : "CP$:..M.b.| 00000730: 99 A3 37 29 22 12 47 92 52 45 41 54 45 52 20 54 |..7)".G.REATER T| 00000740: 48 41 4E 20 20 3A 20 22 43 50 24 3A 99 00 53 0F |HAN : "CP$:..S.| 00000750: 6C 02 3A 00 66 0F 76 02 A1 4B 24 3A 8B 4B 24 B2 |l.:.f.v..K$:.K$.| 00000760: 22 22 A7 36 33 30 00 8E 0F 80 02 4B 4B 24 B2 22 |"".630.....KK$."| 00000770: 45 4C 47 22 3A 81 49 B2 31 A4 33 3A 8B 4B 24 B2 |ELG":.I.1.3:.K$.| 00000780: CA 28 4B 4B 24 2C 49 2C 31 29 A7 36 36 30 00 9A |.(KK$,I,1).660..| 00000790: 0F 8A 02 82 49 3A 89 36 33 30 00 C7 0F 94 02 99 |....I:.630......| 000007A0: C7 28 31 34 37 29 3A 99 A3 31 32 29 22 12 20 4C |.(147):..12)". L| 000007B0: 41 42 45 4C 53 20 50 52 49 4E 54 49 4E 47 20 92 |ABELS PRINTING .| 000007C0: 22 3A 8D 31 32 36 30 00 E1 0F 9E 02 99 22 46 49 |":.1260......"FI| 000007D0: 4C 45 20 4E 41 4D 45 20 3A 20 12 20 22 4E 24 3A |LE NAME : . "N$:| 000007E0: 99 00 FC 0F A8 02 99 22 53 45 4C 45 43 54 49 4F |......."SELECTIO| 000007F0: 4E 20 3A 20 12 20 22 44 50 24 3A 99 00 0F 10 B2 |N : . "DP$:.....| 00000800: 02 91 49 89 39 37 30 2C 37 31 30 2C 38 33 30 00 |..I.970,710,830.| 00000810: 34 10 C6 02 99 22 43 52 49 54 45 52 49 41 20 20 |4...."CRITERIA | 00000820: 3C 20 12 20 22 43 50 24 22 20 92 22 3A 99 3A 8D |< . "CP$" .":.:.| 00000830: 31 32 36 30 00 57 10 D0 02 9F 34 2C 34 3A 81 52 |1260.W....4,4:.R| 00000840: B2 31 A4 59 3A 81 4E 4C B2 31 A4 4E 50 3A 81 42 |.1.Y:.NL.1.NP:.B| 00000850: B2 31 A4 42 42 AB 31 00 86 10 E4 02 8B C5 28 41 |.1.BB.1.......(A| 00000860: 24 28 52 2C 43 29 29 B3 C5 28 43 50 24 29 A7 98 |$(R,C))..(CP$)..| 00000870: 34 2C A3 4C 4E 29 C8 28 41 24 28 52 2C 42 28 42 |4,.LN).(A$(R,B(B| 00000880: 29 29 2C 4C 57 29 00 AE 10 F8 02 82 42 3A 8B C5 |)),LW)......B:..| 00000890: 28 41 24 28 52 2C 43 29 29 B3 C5 28 43 50 24 29 |(A$(R,C))..(CP$)| 000008A0: A7 81 49 B2 31 A4 42 4C 3A 98 34 3A 82 49 00 C2 |..I.1.BL:.4:.I..| 000008B0: 10 02 03 82 4E 4C 3A 82 52 3A A0 34 3A 89 31 30 |....NL:.R:.4:.10| 000008C0: 38 30 00 E7 10 3E 03 99 22 43 52 49 54 45 52 49 |80...>.."CRITERI| 000008D0: 41 20 20 3E 20 12 20 22 43 50 24 22 20 92 22 3A |A > . "CP$" .":| 000008E0: 99 3A 8D 31 32 36 30 00 0A 11 48 03 9F 34 2C 34 |.:.1260...H..4,4| 000008F0: 3A 81 52 B2 31 A4 59 3A 81 4E 4C B2 31 A4 4E 50 |:.R.1.Y:.NL.1.NP| 00000900: 3A 81 42 B2 31 A4 42 42 AB 31 00 39 11 5C 03 8B |:.B.1.BB.1.9.\..| 00000910: C5 28 41 24 28 52 2C 43 29 29 B1 C5 28 43 50 24 |.(A$(R,C))..(CP$| 00000920: 29 A7 98 34 2C A3 4C 4E 29 C8 28 41 24 28 52 2C |)..4,.LN).(A$(R,| 00000930: 42 28 42 29 29 2C 4C 57 29 00 61 11 7A 03 82 42 |B(B)),LW).a.z..B| 00000940: 3A 8B C5 28 41 24 28 52 2C 43 29 29 B1 C5 28 43 |:..(A$(R,C))..(C| 00000950: 50 24 29 A7 81 49 B2 31 A4 42 4C 3A 98 34 3A 82 |P$)..I.1.BL:.4:.| 00000960: 49 00 75 11 84 03 82 4E 4C 3A 82 52 3A A0 34 3A |I.u....NL:.R:.4:| 00000970: 89 31 30 38 30 00 9A 11 CA 03 99 22 43 52 49 54 |.1080......"CRIT| 00000980: 45 52 49 41 20 20 3D 20 12 20 22 43 50 24 22 20 |ERIA = . "CP$" | 00000990: 92 22 3A 99 3A 8D 31 32 36 30 00 BD 11 D4 03 9F |.":.:.1260......| 000009A0: 34 2C 34 3A 81 52 B2 31 A4 59 3A 81 4E 4C B2 31 |4,4:.R.1.Y:.NL.1| 000009B0: A4 4E 50 3A 81 42 B2 31 A4 42 42 AB 31 00 EB 11 |.NP:.B.1.BB.1...| 000009C0: E8 03 8B C8 28 41 24 28 52 2C 43 29 2C 46 29 B2 |....(A$(R,C),F).| 000009D0: 43 50 24 A7 98 34 2C A3 4C 4E 29 C8 28 41 24 28 |CP$..4,.LN).(A$(| 000009E0: 52 2C 42 28 42 29 29 2C 4C 57 29 00 12 12 06 04 |R,B(B)),LW).....| 000009F0: 82 42 3A 8B C8 28 41 24 28 52 2C 43 29 2C 46 29 |.B:..(A$(R,C),F)| 00000A00: B2 43 50 24 A7 81 49 B2 31 A4 42 4C 3A 98 34 3A |.CP$..I.1.BL:.4:| 00000A10: 82 49 00 20 12 10 04 82 4E 4C 3A 82 52 3A A0 34 |.I. ....NL:.R:.4| 00000A20: 00 41 12 38 04 99 3A 99 A3 31 32 29 22 12 52 92 |.A.8..:..12)".R.| 00000A30: 45 50 52 49 4E 54 20 4F 52 20 12 4D 92 45 4E 55 |EPRINT OR .M.ENU| 00000A40: 22 00 55 12 42 04 A1 4B 24 3A 8B 4B 24 B2 22 22 |".U.B..K$:.K$.""| 00000A50: A7 31 30 39 30 00 6C 12 4C 04 8B 4B 24 B2 22 4D |.1090.l.L..K$."M| 00000A60: 22 A7 52 B2 52 AB 31 3A 89 31 32 30 00 7C 12 56 |".R.R.1:.120.|.V| 00000A70: 04 8B 4B 24 B2 22 52 22 A7 36 36 30 00 86 12 60 |..K$."R".660...`| 00000A80: 04 89 31 30 39 30 00 96 12 6A 04 42 24 B2 22 20 |..1090...j.B$." | 00000A90: 22 3A 99 22 22 3B 00 AD 12 74 04 A1 49 50 24 3A |":."";...t..IP$:| 00000AA0: 8B 49 50 24 B2 22 22 A7 89 31 31 34 30 00 C9 12 |.IP$.""..1140...| 00000AB0: 7E 04 8B 42 24 B2 22 20 22 AF C6 28 49 50 24 29 |~..B$." "..(IP$)| 00000AC0: B2 32 30 A7 89 31 31 34 30 00 F7 12 88 04 8B C6 |.20..1140.......| 00000AD0: 28 49 50 24 29 B2 32 30 A7 42 24 B2 C8 28 42 24 |(IP$).20.B$..(B$| 00000AE0: 2C C3 28 42 24 29 AB 31 29 3A 99 22 9D 20 9D 22 |,.(B$).1):.". ."| 00000AF0: 3B 3A 89 31 31 34 30 00 16 13 92 04 8B 49 50 24 |;:.1140......IP$| 00000B00: B2 C7 28 31 33 29 A7 49 50 24 B2 CA 28 42 24 2C |..(13).IP$..(B$,| 00000B10: 32 29 3A 99 3A 8E 00 2F 13 9C 04 41 B2 C6 28 49 |2):.:../...A..(I| 00000B20: 50 24 29 3A 8B 41 B3 31 31 A7 89 31 31 34 30 00 |P$):.A.11..1140.| 00000B30: 51 13 A6 04 42 24 B2 42 24 AA 49 50 24 3A 99 22 |Q...B$.B$.IP$:."| 00000B40: 12 22 3B 49 50 24 3B 22 92 22 3B 3A 89 31 31 34 |.";IP$;".";:.114| 00000B50: 30 00 57 13 B0 04 3A 00 5D 13 BA 04 3A 00 67 13 |0.W...:.]...:.g.| 00000B60: C4 04 99 20 45 4D 24 00 7A 13 CE 04 81 20 54 38 |... EM$.z.... T8| 00000B70: B2 31 20 A4 31 30 30 30 3A 82 00 80 13 D8 04 8E |.1 .1000:.......| 00000B80: 00 86 13 E2 04 3A 00 B7 13 EC 04 99 22 A3 A3 A3 |.....:......"...| 00000B90: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 00000BA0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 00000BB0: A3 A3 A3 A3 22 3A 8E 00 E8 13 F6 04 99 22 2D 2D |....":......."--| 00000BC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000BD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000BE0: 2D 2D 2D 2D 2D 22 3A 8E 00 EE 13 0A 05 3A 00 F4 |-----":......:..| 00000BF0: 13 14 05 9C 00 12 14 1E 05 99 22 41 52 45 20 59 |.........."ARE Y| 00000C00: 4F 55 20 4C 4F 41 44 49 4E 47 20 46 52 4F 4D 3A |OU LOADING FROM:| 00000C10: 2D 22 00 2A 14 28 05 99 22 12 44 92 49 53 4B 20 |-".*.(..".D.ISK | 00000C20: 4F 52 20 12 54 92 41 50 45 22 00 40 14 32 05 A1 |OR .T.APE".@.2..| 00000C30: 20 4B 24 3A 8B 20 4B 24 B2 22 22 A7 31 33 33 30 | K$:. K$."".1330| 00000C40: 00 51 14 3C 05 8B 4B 24 B2 22 54 22 A7 31 33 38 |.Q.<..K$."T".138| 00000C50: 30 00 62 14 46 05 8B 4B 24 B2 22 44 22 A7 31 34 |0.b.F..K$."D".14| 00000C60: 34 30 00 6C 14 50 05 89 31 33 33 30 00 72 14 5A |40.l.P..1330.r.Z| 00000C70: 05 3A 00 85 14 64 05 54 B2 31 3A 55 B2 30 3A 4E |.:...d.T.1:U.0:N| 00000C80: 4E 24 B2 4E 24 00 AF 14 6E 05 8D 32 30 35 30 3A |N$.N$...n..2050:| 00000C90: 99 22 49 46 20 44 41 54 41 20 43 41 53 53 45 54 |."IF DATA CASSET| 00000CA0: 54 45 20 49 53 20 49 4E 20 50 4C 41 43 45 22 00 |TE IS IN PLACE".| 00000CB0: D2 14 78 05 99 22 50 52 45 53 53 20 12 43 92 4F |..x.."PRESS .C.O| 00000CC0: 4E 54 49 4E 55 45 20 4F 52 20 12 41 92 42 4F 52 |NTINUE OR .A.BOR| 00000CD0: 54 22 00 EC 14 82 05 4B 24 B2 22 22 3A A1 4B 24 |T".....K$."":.K$| 00000CE0: 3A 8B 4B 24 B2 22 22 A7 31 34 31 30 00 FD 14 8C |:.K$."".1410....| 00000CF0: 05 8B 4B 24 B3 B1 22 43 22 A7 31 32 30 00 07 15 |..K$.."C".120...| 00000D00: 96 05 89 31 34 39 30 00 3C 15 A0 05 54 B2 38 3A |...1490.<...T.8:| 00000D10: 55 B2 34 3A 4E 31 24 B2 22 30 3A 22 3A 4E 32 24 |U.4:N1$."0:":N2$| 00000D20: B2 22 2C 53 45 51 2C 52 45 41 44 22 3A 4E 4E 24 |.",SEQ,READ":NN$| 00000D30: B2 4E 31 24 AA 4E 4E 24 AA 4E 32 24 00 46 15 AA |.N1$.NN$.N2$.F..| 00000D40: 05 89 31 34 39 30 00 4C 15 C8 05 3A 00 85 15 D2 |..1490.L...:....| 00000D50: 05 8D 32 30 35 30 3A 99 22 45 4E 54 45 52 20 46 |..2050:."ENTER F| 00000D60: 49 4C 45 20 4E 41 4D 45 20 5B 20 20 20 20 20 20 |ILE NAME [ | 00000D70: 20 20 5D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 8D | ].........";:.| 00000D80: 20 31 31 33 30 00 9E 15 DC 05 4E 24 B2 C8 28 49 | 1130.....N$..(I| 00000D90: 50 24 2C 38 29 3A 4E 4E 24 B2 4E 24 3A 99 00 AE |P$,8):NN$.N$:...| 00000DA0: 15 E6 05 8B 54 B2 31 A7 99 22 91 91 91 22 00 BD |....T.1.."..."..| 00000DB0: 15 F0 05 9F 31 2C 54 2C 55 2C 4E 4E 24 00 D2 15 |....1,T,U,NN$...| 00000DC0: FA 05 84 31 2C 59 3A 84 31 2C 58 20 3A 8D 33 30 |...1,Y:.1,X :.30| 00000DD0: 30 30 00 EA 15 04 06 81 20 43 B2 31 20 A4 20 58 |00...... C.1 . X| 00000DE0: 3A 84 31 2C 41 28 43 29 3A 82 00 04 16 0E 06 81 |:.1,A(C):.......| 00000DF0: 20 43 B2 31 20 A4 20 58 3A 84 31 2C 41 41 24 28 | C.1 . X:.1,AA$(| 00000E00: 43 29 3A 82 00 12 16 18 06 81 20 52 B2 31 20 A4 |C):....... R.1 .| 00000E10: 20 59 00 20 16 22 06 81 20 43 B2 31 20 A4 20 58 | Y. .".. C.1 . X| 00000E20: 00 2F 16 2C 06 84 31 2C 41 24 28 52 2C 43 29 00 |./.,..1,A$(R,C).| 00000E30: 37 16 36 06 82 3A 82 00 45 16 40 06 81 20 43 B2 |7.6..:..E.@.. C.| 00000E40: 31 20 A4 20 58 00 54 16 4A 06 84 31 2C 41 24 28 |1 . X.T.J..1,A$(| 00000E50: 30 2C 43 29 00 5A 16 54 06 82 00 61 16 5E 06 A0 |0,C).Z.T...a.^..| 00000E60: 31 00 6A 16 68 06 89 31 32 30 00 70 16 72 06 3A |1.j.h..120.p.r.:| 00000E70: 00 9A 16 7C 06 99 22 12 20 45 58 49 54 20 92 20 |...|..". EXIT . | 00000E80: 3A 20 41 52 45 20 59 4F 55 20 53 55 52 45 3F 20 |: ARE YOU SURE? | 00000E90: 5B 12 59 92 2F 12 4E 92 5D 22 00 B4 16 7F 06 4B |[.Y./.N.]".....K| 00000EA0: 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 |$."":.K$:.K$."".| 00000EB0: 31 36 36 33 00 C5 16 81 06 8B 4B 24 B3 B1 22 59 |1663......K$.."Y| 00000EC0: 22 A7 31 32 30 00 E7 16 86 06 4E 24 B2 22 22 3A |".120.....N$."":| 00000ED0: 99 C7 28 31 34 37 29 3A 8D 31 36 38 30 3A 99 3A |..(147):.1680:.:| 00000EE0: 99 3A 99 3A 99 3A 99 00 F5 16 8B 06 99 3A 99 3A |.:.:.:.......:.:| 00000EF0: 99 3A 99 3A 80 00 21 17 90 06 99 3A 99 22 20 20 |.:.:..!....:." | 00000F00: 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | *************| 00000F10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F20: 22 00 51 17 9A 06 99 22 20 20 20 20 20 2A 2A 2A |".Q...." ***| 00000F30: 20 12 20 44 46 4D 20 92 20 12 20 4D 41 49 4C 20 | . DFM . . MAIL | 00000F40: 92 20 12 20 4C 41 42 45 4C 53 20 92 20 2A 2A 2A |. . LABELS . ***| 00000F50: 22 00 7D 17 A4 06 99 22 20 20 20 20 20 2A 2A 2A |".}...." ***| 00000F60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 00 8B 17 |**********":....| 00000F80: A7 06 8B 4E 24 B3 B1 22 22 A7 8E 00 A9 17 A9 06 |...N$.."".......| 00000F90: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." | 00000FA0: 20 20 20 20 42 59 22 3A 99 00 DF 17 AE 06 99 22 | BY":......."| 00000FB0: 20 20 20 20 20 20 20 20 12 20 44 20 92 20 12 20 | . D . . | 00000FC0: 49 20 92 20 12 20 41 20 92 20 12 20 4C 20 92 20 |I . . A . . L . | 00000FD0: 12 20 4F 20 92 20 12 20 47 20 92 20 22 3A 99 00 |. O . . G . ":..| 00000FE0: 06 18 B3 06 99 22 20 20 20 20 20 20 20 20 20 20 |....." | 00000FF0: 20 20 53 20 4F 20 46 20 54 20 57 20 41 20 52 20 | S O F T W A R | 00001000: 45 22 3A 99 3A 8E 00 12 18 B8 06 99 C7 28 31 34 |E":.:........(14| 00001010: 37 29 00 33 18 BD 06 99 A3 31 34 29 22 12 20 55 |7).3.....14)". U| 00001020: 54 49 4C 49 54 49 45 53 20 92 22 3A 8D 31 32 36 |TILITIES .":.126| 00001030: 30 3A 99 00 5B 18 C2 06 99 22 20 20 20 44 49 53 |0:..[...." DIS| 00001040: 4B 20 44 49 52 45 43 54 4F 52 59 20 4F 46 20 44 |K DIRECTORY OF D| 00001050: 52 49 56 45 20 12 30 92 22 3A 99 00 83 18 C7 06 |RIVE .0.":......| 00001060: 99 22 20 20 20 44 49 53 4B 20 44 49 52 45 43 54 |." DISK DIRECT| 00001070: 4F 52 59 20 4F 46 20 44 52 49 56 45 20 12 31 92 |ORY OF DRIVE .1.| 00001080: 22 3A 99 00 A5 18 CC 06 99 22 20 20 20 12 4D 92 |":......." .M.| 00001090: 45 4D 4F 52 59 20 41 56 41 49 4C 41 42 49 4C 49 |EMORY AVAILABILI| 000010A0: 54 59 22 3A 99 00 C4 18 D1 06 99 22 20 20 20 12 |TY":......." .| 000010B0: 46 92 49 4C 45 20 44 45 53 43 52 49 50 54 49 4F |F.ILE DESCRIPTIO| 000010C0: 4E 22 3A 99 00 E6 18 D6 06 99 22 20 20 20 12 52 |N":......." .R| 000010D0: 92 45 54 55 52 4E 20 54 4F 20 4D 41 49 4E 20 4D |.ETURN TO MAIN M| 000010E0: 45 4E 55 22 3A 99 00 F4 18 E0 06 99 3A 8D 31 32 |ENU":.......:.12| 000010F0: 36 30 3A 99 00 08 19 F4 06 A1 56 24 3A 8B 56 24 |60:.......V$:.V$| 00001100: B2 22 22 A7 31 37 38 30 00 2F 19 FE 06 8B 56 24 |."".1780./....V$| 00001110: B2 22 30 22 A7 99 22 43 48 52 24 28 31 34 37 29 |."0".."CHR$(147)| 00001120: 3B 3A 49 46 44 30 3A 47 4F 54 4F 32 30 34 32 00 |;:IFD0:GOTO2042.| 00001130: 4F 19 08 07 8B 56 24 B2 22 31 22 A7 99 C7 28 31 |O....V$."1"...(1| 00001140: 34 37 29 3B 3A 8B 20 44 31 20 89 32 30 34 32 00 |47);:. D1 .2042.| 00001150: 60 19 12 07 8B 56 24 B2 22 4D 22 A7 31 38 37 30 |`....V$."M".1870| 00001160: 00 70 19 1C 07 8B 56 24 B2 22 52 22 A7 31 32 30 |.p....V$."R".120| 00001170: 00 81 19 26 07 8B 56 24 B2 22 46 22 A7 31 39 36 |...&..V$."F".196| 00001180: 30 00 8B 19 44 07 89 31 37 38 30 00 A1 19 4E 07 |0...D..1780...N.| 00001190: 99 C7 28 31 39 29 3A 81 49 B2 31 A4 37 3A 99 3A |..(19):.I.1.7:.:| 000011A0: 82 00 B9 19 58 07 99 A3 32 34 29 22 3D 22 B8 28 |....X...24)"=".(| 000011B0: 30 29 22 42 59 54 45 53 22 00 CA 19 9E 07 99 C7 |0)"BYTES".......| 000011C0: 28 31 39 29 3A 89 31 37 32 35 00 F7 19 A8 07 99 |(19):.1725......| 000011D0: C7 28 31 34 37 29 3A 99 22 46 49 4C 45 20 44 45 |.(147):."FILE DE| 000011E0: 53 43 52 49 50 54 49 4F 4E 20 46 4F 52 20 22 4E |SCRIPTION FOR "N| 000011F0: 24 3A 8D 31 32 36 30 00 1E 1A B2 07 99 22 4F 55 |$:.1260......"OU| 00001200: 54 50 55 54 20 54 4F 20 12 53 92 43 52 45 45 4E |TPUT TO .S.CREEN| 00001210: 20 4F 52 20 12 50 92 52 49 4E 54 45 52 22 00 3C | OR .P.RINTER".<| 00001220: 1A BC 07 A1 4B 24 3A 8B 4B 24 B3 B1 22 53 22 AF |....K$:.K$.."S".| 00001230: 4B 24 B3 B1 22 50 22 A7 31 39 38 30 00 53 1A C1 |K$.."P".1980.S..| 00001240: 07 8B 4B 24 B2 22 53 22 A7 44 56 B2 33 3A 89 31 |..K$."S".DV.3:.1| 00001250: 39 39 30 00 87 1A C2 07 44 56 B2 34 3A 99 C7 28 |990.....DV.4:..(| 00001260: 31 39 29 3A 99 3A 99 3A 99 22 3E 3E 20 45 4E 53 |19):.:.:.">> ENS| 00001270: 55 52 45 20 50 52 49 4E 54 45 52 20 41 4C 49 47 |URE PRINTER ALIG| 00001280: 4E 45 44 20 3C 3C 22 00 AD 1A C4 07 99 3A 99 22 |NED <<"......:."| 00001290: 50 52 45 53 53 20 12 20 53 50 41 43 45 20 42 41 |PRESS . SPACE BA| 000012A0: 52 20 92 20 54 4F 20 50 52 49 4E 54 22 00 C9 1A |R . TO PRINT"...| 000012B0: C5 07 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B3 |..K$."":.K$:.K$.| 000012C0: B1 22 20 22 A7 31 39 38 39 00 D6 1A C6 07 9F 34 |." ".1989......4| 000012D0: 2C 44 56 3A 9D 34 00 03 1B D0 07 99 C7 28 31 34 |,DV:.4.......(14| 000012E0: 37 29 3A 99 22 46 49 4C 45 20 44 45 53 43 52 49 |7):."FILE DESCRI| 000012F0: 50 54 49 4F 4E 20 46 4F 52 20 22 4E 24 3A 8D 31 |PTION FOR "N$:.1| 00001300: 32 37 30 00 26 1B DA 07 81 43 B2 31 A4 58 3A 43 |270.&....C.1.X:C| 00001310: 24 B2 C4 28 43 29 3A 8B 43 B3 31 30 A7 43 24 B2 |$..(C):.C.10.C$.| 00001320: 43 24 AA 22 20 22 00 4B 1B E4 07 43 31 24 B2 C4 |C$." ".K...C1$..| 00001330: 28 41 28 43 29 29 3A 8B 41 28 43 29 B3 31 30 A7 |(A(C)):.A(C).10.| 00001340: 43 31 24 B2 22 20 22 AA 43 31 24 00 82 1B EE 07 |C1$." ".C1$.....| 00001350: 99 22 46 49 45 4C 44 20 4E 4F 22 43 24 22 20 22 |."FIELD NO"C$" "| 00001360: 41 24 28 4F 2C 43 29 22 20 20 57 49 44 54 48 22 |A$(O,C)" WIDTH"| 00001370: 43 31 24 22 20 20 54 59 50 45 20 22 41 41 24 28 |C1$" TYPE "AA$(| 00001380: 43 29 00 99 1B F8 07 82 3A 98 34 3A A0 34 3A 8B |C)......:.4:.4:.| 00001390: 44 56 B2 34 A7 31 37 32 30 00 C2 1B FA 07 99 3A |DV.4.1720......:| 000013A0: 99 22 50 52 45 53 53 20 12 20 53 50 41 43 45 20 |."PRESS . SPACE | 000013B0: 42 41 52 20 92 20 54 4F 20 43 4F 4E 54 49 4E 55 |BAR . TO CONTINU| 000013C0: 45 22 00 D8 1B FC 07 A1 4B 24 3A 8B 4B 24 B3 B1 |E"......K$:.K$..| 000013D0: 22 20 22 A7 32 30 34 34 00 E2 1B FE 07 89 31 37 |" ".2044......17| 000013E0: 32 30 00 14 1C 02 08 42 4C 24 B2 22 20 20 20 20 |20.....BL$." | 000013F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001410: 20 20 20 22 00 32 1C 0C 08 99 22 91 91 22 3B 3A | ".2...."..";:| 00001420: 99 42 4C 24 3A 99 42 4C 24 3A 99 22 91 91 91 22 |.BL$:.BL$:."..."| 00001430: 3A 8E 00 64 1C 16 08 53 24 B2 22 20 20 20 20 20 |:..d...S$." | 00001440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001460: 20 20 20 22 00 98 1C 20 08 54 24 B2 22 9D 9D 9D | "... .T$."...| 00001470: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................| 00001480: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................| 00001490: 9D 9D 9D 9D 9D 22 3A 8E 00 9E 1C 2A 08 3A 00 CE |.....":....*.:..| 000014A0: 1C 34 08 8B 59 B2 30 A7 45 4D 24 B2 22 12 20 4E |.4..Y.0.EM$.". N| 000014B0: 4F 20 46 49 4C 45 20 49 4E 20 4D 45 4D 4F 52 59 |O FILE IN MEMORY| 000014C0: 20 92 22 3A 8D 31 32 32 30 3A 89 31 32 30 00 F6 | .":.1220:.120..| 000014D0: 1C 3E 08 99 22 12 53 92 4F 52 54 20 4F 52 20 12 |.>..".S.ORT OR .| 000014E0: 56 92 49 45 57 20 49 4E 44 45 58 20 4F 52 20 12 |V.IEW INDEX OR .| 000014F0: 45 92 58 49 54 22 00 10 1D 48 08 4B 24 B2 22 22 |E.XIT"...H.K$.""| 00001500: 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 31 32 30 |:.K$:.K$."".2120| 00001510: 00 21 1D 52 08 8B 4B 24 B2 22 56 22 A7 33 32 30 |.!.R..K$."V".320| 00001520: 30 00 31 1D 5C 08 8B 4B 24 B2 22 45 22 A7 31 32 |0.1.\..K$."E".12| 00001530: 30 00 43 1D 66 08 8B 4B 24 B3 B1 22 53 22 A7 32 |0.C.f..K$.."S".2| 00001540: 31 32 30 00 72 1D 70 08 99 3A 8D 32 30 35 30 3A |120.r.p..:.2050:| 00001550: 99 22 45 4E 54 45 52 20 46 49 45 4C 44 20 59 4F |."ENTER FIELD YO| 00001560: 55 20 57 49 53 48 20 54 4F 20 53 4F 52 54 20 42 |U WISH TO SORT B| 00001570: 59 22 00 90 1D 7A 08 99 22 4B 45 59 20 12 31 20 |Y"...z.."KEY .1 | 00001580: 54 4F 22 58 22 92 3A 20 22 3B 3A 8D 31 31 33 30 |TO"X".: ";:.1130| 00001590: 00 B2 1D 84 08 4D B2 C5 28 49 50 24 29 3A 8B 4D |.....M..(IP$):.M| 000015A0: B3 31 B0 4D B1 58 A7 8D 32 30 35 30 3A 89 32 31 |.1.M.X..2050:.21| 000015B0: 36 30 00 D7 1D 98 08 8D 32 30 35 30 3A 99 22 12 |60......2050:.".| 000015C0: 20 53 4F 52 54 49 4E 47 20 92 20 50 4C 45 41 53 | SORTING . PLEAS| 000015D0: 45 20 57 41 49 54 22 00 E4 1D A2 08 81 52 B2 31 |E WAIT"......R.1| 000015E0: A4 59 AB 31 00 F3 1D AC 08 81 49 B2 28 52 AA 31 |.Y.1......I.(R.1| 000015F0: 29 A4 59 00 19 1E B6 08 8B 41 41 24 28 4D 29 B2 |).Y......AA$(M).| 00001600: 22 43 22 AF 41 24 28 49 2C 4D 29 B1 B2 41 24 28 |"C".A$(I,M)..A$(| 00001610: 52 2C 4D 29 A7 32 33 30 30 00 45 1E C0 08 8B 41 |R,M).2300.E....A| 00001620: 41 24 28 4D 29 B2 22 4E 22 AF C5 28 41 24 28 49 |A$(M)."N"..(A$(I| 00001630: 2C 4D 29 29 B1 B2 C5 28 41 24 28 52 2C 4D 29 29 |,M))...(A$(R,M))| 00001640: A7 32 33 30 30 00 50 1E CA 08 81 43 B2 31 A4 58 |.2300.P....C.1.X| 00001650: 00 62 1E D4 08 42 24 28 43 29 B2 41 24 28 52 2C |.b...B$(C).A$(R,| 00001660: 43 29 00 76 1E DE 08 41 24 28 52 2C 43 29 B2 41 |C).v...A$(R,C).A| 00001670: 24 28 49 2C 43 29 00 88 1E E8 08 41 24 28 49 2C |$(I,C).....A$(I,| 00001680: 43 29 B2 42 24 28 43 29 00 8F 1E F2 08 82 43 00 |C).B$(C)......C.| 00001690: 97 1E FC 08 82 3A 82 00 CA 1E 06 09 99 3A 8D 32 |.....:.......:.2| 000016A0: 30 35 30 3A 99 22 12 20 53 4F 52 54 20 92 20 43 |050:.". SORT . C| 000016B0: 4F 4D 50 4C 45 54 45 44 22 3A 81 4A B2 31 A4 31 |OMPLETED":.J.1.1| 000016C0: 30 30 30 3A 82 3A 89 31 32 30 00 E8 1E 10 09 43 |000:.:.120.....C| 000016D0: 4F 4C B2 31 3A 4C 4E 45 B2 32 31 3A 8D 32 33 34 |OL.1:LNE.21:.234| 000016E0: 30 3A 81 49 B2 31 A4 33 00 1C 1F 1A 09 99 22 20 |0:.I.1.3......" | 000016F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001710: 20 20 20 20 20 20 22 3A 82 49 3A 8E 00 4F 1F 24 | ":.I:..O.$| 00001720: 09 41 43 43 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.ACC$.".........| 00001730: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001740: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 |..............".| 00001750: 73 1F 2E 09 44 4F 57 24 B2 22 11 11 11 11 11 11 |s...DOW$."......| 00001760: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001770: 11 11 22 00 7E 1F 38 09 81 5A B2 31 A4 32 00 88 |..".~.8..Z.1.2..| 00001780: 1F 42 09 99 22 13 22 3B 00 A3 1F 4C 09 8B 43 4F |.B..".";...L..CO| 00001790: 4C B1 31 A7 99 C8 28 41 43 43 24 2C 43 4F 4C AB |L.1...(ACC$,COL.| 000017A0: 31 29 3B 00 BE 1F 56 09 8B 4C 4E 45 B1 31 A7 99 |1);...V..LNE.1..| 000017B0: C8 28 44 4F 57 24 2C 4C 4E 45 AB 31 29 3B 00 F3 |.(DOW$,LNE.1);..| 000017C0: 1F 60 09 8B 5A B2 31 A7 99 22 20 20 20 20 20 20 |.`..Z.1.." | 000017D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000017E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000017F0: 20 22 3B 00 FA 1F 6A 09 82 5A 00 00 20 74 09 8E | ";...j..Z.. t..| 00001800: 00 13 20 7E 09 99 C7 28 31 34 37 29 3B 3A 8D 31 |.. ~...(147);:.1| 00001810: 32 36 30 00 43 20 88 09 99 22 20 20 53 45 4C 45 |260.C ..." SELE| 00001820: 43 54 20 54 48 45 20 12 20 46 49 45 4C 44 53 20 |CT THE . FIELDS | 00001830: 92 20 54 48 41 54 20 41 52 45 20 54 4F 20 42 45 |. THAT ARE TO BE| 00001840: 22 3A 99 00 77 20 92 09 99 22 20 20 20 20 49 4E |":..w ..." IN| 00001850: 43 4C 55 44 45 44 20 4F 4E 20 45 41 43 48 20 50 |CLUDED ON EACH P| 00001860: 52 49 4E 54 45 44 20 4C 41 42 45 4C 22 3A 99 3A |RINTED LABEL":.:| 00001870: 8D 31 32 36 30 3A 99 00 84 20 A6 09 42 B2 31 3A |.1260:... ..B.1:| 00001880: 42 42 B2 31 00 8F 20 B0 09 81 43 B2 31 A4 58 00 |BB.1.. ...C.1.X.| 00001890: BC 20 BA 09 99 41 24 28 30 2C 43 29 A3 32 34 29 |. ...A$(0,C).24)| 000018A0: 22 12 59 92 45 53 20 4F 52 20 12 4E 92 4F 20 5B |".Y.ES OR .N.O [| 000018B0: 20 5D 9D 9D 22 3B 3A 8D 31 31 33 30 00 DE 20 CE | ]..";:.1130.. .| 000018C0: 09 8B 49 50 24 B2 22 59 22 A7 42 28 42 29 B2 43 |..IP$."Y".B(B).C| 000018D0: 3A 42 B2 42 AA 31 3A 42 42 B2 42 42 AA 31 00 18 |:B.B.1:BB.BB.1..| 000018E0: 21 D8 09 82 43 3A 99 3A 99 22 3E 3E 20 41 43 43 |!...C:.:.">> ACC| 000018F0: 45 50 54 20 53 45 4C 45 43 54 49 4F 4E 20 3C 3C |EPT SELECTION <<| 00001900: 20 20 20 20 20 20 20 20 20 12 59 92 2F 12 4E 92 | .Y./.N.| 00001910: 2F 12 45 92 58 49 54 22 00 24 21 D9 09 99 3A 8D |/.E.XIT".$!...:.| 00001920: 31 32 36 30 00 3E 21 DA 09 4B 24 B2 22 22 3A A1 |1260.>!..K$."":.| 00001930: 4B 24 3A 8B 4B 24 B2 22 22 A7 32 35 32 32 00 4F |K$:.K$."".2522.O| 00001940: 21 DC 09 8B 4B 24 B2 22 4E 22 A7 32 34 33 30 00 |!...K$."N".2430.| 00001950: 5F 21 DE 09 8B 4B 24 B2 22 45 22 A7 31 32 30 00 |_!...K$."E".120.| 00001960: 71 21 E0 09 8B 4B 24 B3 B1 22 59 22 A7 32 35 32 |q!...K$.."Y".252| 00001970: 32 00 7D 21 E2 09 99 C7 28 31 34 37 29 00 A1 21 |2.}!....(147)..!| 00001980: E7 09 99 A3 31 33 29 22 12 20 4C 41 42 45 4C 20 |....13)". LABEL | 00001990: 46 4F 52 4D 41 54 20 92 22 3A 8D 31 32 36 30 3A |FORMAT .":.1260:| 000019A0: 99 00 DF 21 F6 09 99 22 4C 41 42 45 4C 20 53 54 |...!..."LABEL ST| 000019B0: 41 52 54 49 4E 47 20 50 4F 49 4E 54 20 28 31 2D |ARTING POINT (1-| 000019C0: 38 30 29 20 20 20 5B 20 20 5D 9D 9D 9D 22 3B 3A |80) [ ]...";:| 000019D0: 8D 31 31 33 30 3A 4C 4E B2 C5 28 49 50 24 29 00 |.1130:LN..(IP$).| 000019E0: 1F 22 0A 0A 99 3A 99 22 4D 41 58 20 43 48 41 52 |."...:."MAX CHAR| 000019F0: 41 43 54 45 52 20 57 49 44 54 48 20 54 4F 20 50 |ACTER WIDTH TO P| 00001A00: 52 49 4E 54 20 20 5B 20 20 5D 9D 9D 9D 22 3B 3A |RINT [ ]...";:| 00001A10: 8D 31 31 33 30 3A 4C 57 B2 C5 28 49 50 24 29 00 |.1130:LW..(IP$).| 00001A20: 5D 22 14 0A 99 3A 99 22 4E 4F 3A 20 4F 46 20 4C |]"...:."NO: OF L| 00001A30: 49 4E 45 53 20 42 45 54 57 45 45 4E 20 4C 41 42 |INES BETWEEN LAB| 00001A40: 45 4C 53 20 20 20 5B 20 5D 9D 9D 22 3B 3A 8D 31 |ELS [ ]..";:.1| 00001A50: 31 33 30 3A 42 4C B2 C5 28 49 50 24 29 00 9D 22 |130:BL..(IP$).."| 00001A60: 16 0A 99 3A 99 22 48 4F 57 20 4D 41 4E 59 20 4F |...:."HOW MANY O| 00001A70: 46 20 45 41 43 48 20 4C 41 42 45 4C 20 20 20 20 |F EACH LABEL | 00001A80: 20 20 20 20 5B 20 20 5D 9D 9D 9D 22 3B 3A 8D 31 | [ ]...";:.1| 00001A90: 31 33 30 3A 4E 50 B2 C5 28 49 50 24 29 00 D6 22 |130:NP..(IP$).."| 00001AA0: 3C 0A 99 3A 99 3A 99 22 3E 3E 20 41 43 43 45 50 |<..:.:.">> ACCEP| 00001AB0: 54 20 46 4F 52 4D 41 54 20 3C 3C 20 20 20 20 20 |T FORMAT << | 00001AC0: 20 20 20 20 20 20 20 12 59 92 2F 12 4E 92 2F 12 | .Y./.N./.| 00001AD0: 45 92 58 49 54 22 00 E2 22 41 0A 99 3A 8D 31 32 |E.XIT".."A..:.12| 00001AE0: 36 30 00 FC 22 46 0A 4B 24 B2 22 22 3A A1 4B 24 |60.."F.K$."":.K$| 00001AF0: 3A 8B 4B 24 B2 22 22 A7 32 36 33 30 00 0D 23 4B |:.K$."".2630..#K| 00001B00: 0A 8B 4B 24 B2 22 4E 22 A7 32 35 33 30 00 1D 23 |..K$."N".2530..#| 00001B10: 50 0A 8B 4B 24 B2 22 45 22 A7 31 32 30 00 2F 23 |P..K$."E".120./#| 00001B20: 52 0A 8B 4B 24 B3 B1 22 59 22 A7 32 36 33 30 00 |R..K$.."Y".2630.| 00001B30: 3B 23 54 0A 99 C7 28 31 34 37 29 00 67 23 56 0A |;#T...(147).g#V.| 00001B40: 99 A3 31 33 29 22 12 20 4C 41 42 45 4C 20 50 52 |..13)". LABEL PR| 00001B50: 49 4E 54 20 92 22 3A 8D 31 32 36 30 3A 81 49 B2 |INT .":.1260:.I.| 00001B60: 31 A4 35 3A 99 3A 82 00 94 23 5A 0A 99 22 20 20 |1.5:.:...#Z.." | 00001B70: 20 20 20 20 3E 3E 20 54 45 53 54 20 50 52 49 4E | >> TEST PRIN| 00001B80: 54 20 46 4F 52 4D 41 54 20 3C 3C 20 12 59 92 2F |T FORMAT << .Y./| 00001B90: 12 4E 92 22 00 A9 23 5F 0A 81 49 B2 31 A4 36 3A |.N."..#_..I.1.6:| 00001BA0: 99 3A 82 3A 8D 31 32 36 30 00 C3 23 64 0A 4B 24 |.:.:.1260..#d.K$| 00001BB0: B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 |."":.K$:.K$."".2| 00001BC0: 36 36 30 00 E0 23 69 0A 4B 4B 24 B2 4B 24 3A 99 |660..#i.KK$.K$:.| 00001BD0: C7 28 31 39 29 3A 81 49 B2 31 A4 37 3A 99 3A 82 |.(19):.I.1.7:.:.| 00001BE0: 00 0A 24 6E 0A 99 22 20 20 20 20 3E 3E 3E 20 45 |..$n.." >>> E| 00001BF0: 4E 53 55 52 45 20 50 52 49 4E 54 45 52 20 41 4C |NSURE PRINTER AL| 00001C00: 49 47 4E 45 44 20 3C 3C 3C 22 00 2F 24 73 0A 8B |IGNED <<<"./$s..| 00001C10: 4B 4B 24 B2 22 59 22 A7 8D 32 38 35 30 3A 99 C7 |KK$."Y"..2850:..| 00001C20: 28 31 39 29 3A 81 49 B2 31 A4 38 3A 99 3A 82 00 |(19):.I.1.8:.:..| 00001C30: 6D 24 78 0A 81 49 B2 31 A4 34 3A 99 3A 82 3A 99 |m$x..I.1.4:.:.:.| 00001C40: 22 20 50 52 49 4E 54 20 12 41 92 4C 4C 20 2F 20 |" PRINT .A.LL / | 00001C50: 12 53 92 45 4C 45 43 54 45 44 20 52 45 43 4F 52 |.S.ELECTED RECOR| 00001C60: 44 53 20 4F 52 20 12 4E 92 4F 4E 45 22 00 87 24 |DS OR .N.ONE"..$| 00001C70: 82 0A 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 |..K$."":.K$:.K$.| 00001C80: 22 22 A7 32 36 39 30 00 97 24 8C 0A 8B 4B 24 B2 |"".2690..$...K$.| 00001C90: 22 53 22 A7 34 32 30 00 A7 24 96 0A 8B 4B 24 B2 |"S".420..$...K$.| 00001CA0: 22 4E 22 A7 31 32 30 00 B9 24 A0 0A 8B 4B 24 B3 |"N".120..$...K$.| 00001CB0: B1 22 41 22 A7 32 36 39 30 00 E6 24 A5 0A 99 C7 |."A".2690..$....| 00001CC0: 28 31 34 37 29 3A 99 A3 31 32 29 22 12 20 4C 41 |(147):..12)". LA| 00001CD0: 42 45 4C 53 20 50 52 49 4E 54 49 4E 47 20 92 22 |BELS PRINTING ."| 00001CE0: 3A 8D 31 32 36 30 00 00 25 AA 0A 99 22 46 49 4C |:.1260..%..."FIL| 00001CF0: 45 20 4E 41 4D 45 20 3A 20 12 20 22 4E 24 3A 99 |E NAME : . "N$:.| 00001D00: 00 2B 25 AF 0A 99 22 53 45 4C 45 43 54 49 4F 4E |.+%..."SELECTION| 00001D10: 20 3A 20 12 20 41 4C 4C 20 52 45 43 4F 52 44 53 | : . ALL RECORDS| 00001D20: 20 92 22 3A 99 3A 8D 31 32 36 30 00 37 25 B4 0A | .":.:.1260.7%..| 00001D30: 9F 34 2C 34 3A 9D 34 00 42 25 B9 0A 81 52 B2 31 |.4,4:.4.B%...R.1| 00001D40: A4 59 00 4F 25 BE 0A 81 4E 4C B2 31 A4 4E 50 00 |.Y.O%...NL.1.NP.| 00001D50: 5D 25 C8 0A 81 42 B2 31 A4 42 42 AB 31 00 77 25 |]%...B.1.BB.1.w%| 00001D60: D2 0A 99 A3 4C 4E 29 C8 28 41 24 28 52 2C 42 28 |....LN).(A$(R,B(| 00001D70: 42 29 29 2C 4C 57 29 00 7E 25 DC 0A 82 42 00 8F |B)),LW).~%...B..| 00001D80: 25 E6 0A 81 49 B2 31 A4 42 4C 3A 99 3A 82 49 00 |%...I.1.BL:.:.I.| 00001D90: A1 25 F0 0A 82 4E 4C 3A 82 52 3A 20 98 34 3A A0 |.%...NL:.R: .4:.| 00001DA0: 34 00 C2 25 FA 0A 99 3A 99 A3 31 32 29 22 12 52 |4..%...:..12)".R| 00001DB0: 92 45 50 52 49 4E 54 20 4F 52 20 12 4D 92 45 4E |.EPRINT OR .M.EN| 00001DC0: 55 22 00 D6 25 04 0B A1 4B 24 3A 8B 4B 24 B2 22 |U"..%...K$:.K$."| 00001DD0: 22 A7 32 38 32 30 00 E6 25 0E 0B 8B 4B 24 B2 22 |".2820..%...K$."| 00001DE0: 4D 22 A7 31 32 30 00 F7 25 13 0B 8B 4B 24 B2 22 |M".120..%...K$."| 00001DF0: 52 22 A7 32 37 32 35 00 01 26 18 0B 89 32 38 32 |R".2725..&...282| 00001E00: 30 00 39 26 22 0B 81 49 B2 31 A4 34 3A 99 3A 82 |0.9&"..I.1.4:.:.| 00001E10: 3A 99 22 20 20 20 20 50 52 45 53 53 20 12 20 53 |:." PRESS . S| 00001E20: 50 41 43 45 20 42 41 52 20 92 20 54 4F 20 50 52 |PACE BAR . TO PR| 00001E30: 49 4E 54 20 54 45 53 54 22 00 55 26 27 0B 4B 24 |INT TEST".U&'.K$| 00001E40: B2 22 22 3A A1 4B 24 3A 8B 4B 24 B3 B1 22 20 22 |."":.K$:.K$.." "| 00001E50: A7 32 38 35 35 00 78 26 2C 0B 41 24 B2 22 22 3A |.2855.x&,.A$."":| 00001E60: 81 49 B2 31 A4 4C 57 3A 41 24 B2 41 24 AA 22 58 |.I.1.LW:A$.A$."X| 00001E70: 22 3A 82 3A 9F 34 2C 36 00 93 26 36 0B 81 49 B2 |":.:.4,6..&6..I.| 00001E80: 31 A4 42 42 AB 31 3A 98 34 2C A3 4C 4E 29 3B 41 |1.BB.1:.4,.LN);A| 00001E90: 24 3A 82 00 BA 26 40 0B 81 49 B2 31 A4 42 4C 3A |$:...&@..I.1.BL:| 00001EA0: 98 34 3A 82 3A A0 34 3A 99 C7 28 31 39 29 3A 81 |.4:.:.4:..(19):.| 00001EB0: 49 B2 31 A4 31 32 3A 99 3A 82 00 E9 26 4A 0B 99 |I.1.12:.:...&J..| 00001EC0: 22 20 20 20 20 54 45 53 54 20 4F 56 45 52 3A 20 |" TEST OVER: | 00001ED0: 12 43 92 4F 4E 54 49 4E 55 45 20 4F 52 20 12 52 |.C.ONTINUE OR .R| 00001EE0: 92 45 53 45 54 2D 55 50 22 00 03 27 54 0B 4B 24 |.ESET-UP"..'T.K$| 00001EF0: B2 22 22 3A A1 4B 24 3A 8B 4B 24 B2 22 22 A7 32 |."":.K$:.K$."".2| 00001F00: 39 30 30 00 11 27 5E 0B 8B 4B 24 B2 22 43 22 A7 |900..'^..K$."C".| 00001F10: 8E 00 23 27 68 0B 8B 4B 24 B3 B1 22 52 22 A7 32 |..#'h..K$.."R".2| 00001F20: 39 30 30 00 2D 27 72 0B 89 32 34 33 30 00 69 27 |900.-'r..2430.i'| 00001F30: B8 0B 86 20 41 24 28 32 30 30 2C 58 29 2C 41 41 |... A$(200,X),AA| 00001F40: 24 28 58 29 2C 41 28 58 AA 31 29 2C 43 24 28 58 |$(X),A(X.1),C$(X| 00001F50: 29 2C 42 24 28 58 29 2C 42 28 58 29 3A 41 24 28 |),B$(X),B(X):A$(| 00001F60: 52 2C 43 29 B2 22 22 3A 8E 00 6F 27 1C 0C 3A 00 |R,C)."":..o'..:.| 00001F70: 9B 27 80 0C 99 C7 28 31 34 37 29 3A 99 A3 31 32 |.'....(147):..12| 00001F80: 29 22 12 20 20 56 49 45 57 20 49 4E 44 45 58 20 |)". VIEW INDEX | 00001F90: 20 92 22 3A 8D 31 32 36 30 3A 99 00 A8 27 85 0C | .":.1260:...'..| 00001FA0: 8B 4D B2 30 A7 4D B2 31 00 CC 27 8A 0C 43 54 B2 |.M.0.M.1..'..CT.| 00001FB0: 31 3A 81 49 B2 31 A4 59 3A 99 49 3B A3 36 29 C8 |1:.I.1.Y:.I;.6).| 00001FC0: 28 41 24 28 49 2C 4D 29 2C 33 30 29 00 E5 27 9E |(A$(I,M),30)..'.| 00001FD0: 0C 43 54 B2 43 54 AA 31 3A 8B 43 54 B3 B1 31 35 |.CT.CT.1:.CT..15| 00001FE0: A7 33 32 37 30 00 1D 28 A8 0C 43 54 B2 31 3A 99 |.3270..(..CT.1:.| 00001FF0: 3A 99 22 50 52 45 53 53 20 12 20 53 50 41 43 45 |:."PRESS . SPACE| 00002000: 20 42 41 52 20 92 20 54 4F 20 43 4F 4E 54 49 4E | BAR . TO CONTIN| 00002010: 55 45 20 4F 52 20 12 45 92 58 49 54 22 00 41 28 |UE OR .E.XIT".A(| 00002020: B2 0C 4B 24 B2 22 22 3A A1 4B 24 3A 8B 4B 24 B3 |..K$."":.K$:.K$.| 00002030: B1 22 20 22 AF 4B 24 B3 B1 22 45 22 A7 33 32 35 |." ".K$.."E".325| 00002040: 30 00 51 28 B7 0C 8B 4B 24 B2 22 45 22 A7 31 32 |0.Q(...K$."E".12| 00002050: 30 00 71 28 C1 0C 99 C7 28 31 39 29 3A 99 3A 99 |0.q(....(19):.:.| 00002060: 3A 99 3A 81 47 B2 31 A4 31 37 3A 99 42 4C 24 3A |:.:.G.1.17:.BL$:| 00002070: 82 00 82 28 C3 0C 99 C7 28 31 39 29 3A 99 3A 99 |...(....(19):.:.| 00002080: 3A 99 00 B3 28 C6 0C 82 3A 99 3A 8D 31 32 36 30 |:...(...:.:.1260| 00002090: 3A 99 A3 36 29 22 50 52 45 53 53 20 12 20 53 50 |:..6)"PRESS . SP| 000020A0: 41 43 45 20 42 41 52 20 92 20 46 4F 52 20 4D 45 |ACE BAR . FOR ME| 000020B0: 4E 55 22 00 CF 28 D0 0C 4B 24 B2 22 22 3A A1 4B |NU"..(..K$."":.K| 000020C0: 24 3A 8B 4B 24 B3 B1 22 20 22 A7 33 32 38 30 00 |$:.K$.." ".3280.| 000020D0: D8 28 DA 0C 89 31 32 30 00 ED 28 0F 27 94 22 40 |.(...120..(.'."@| 000020E0: 30 3A 4C 41 42 45 4C 53 22 2C 38 3A 80 00 00 00 |0:LABELS",8:....| 000020F0: 3A 81 |:. |
..H.... * DFM LABELS BY CHRIS ELY * DIAL
OG SOFTWARE(C) 15/03/83 * JA3004.C....53
280,2:.53281,2:.".".....X.0:Y.0:R.0:C.0:
IP$."":K$."":EM$."":N$.""...(.A$(R,C).""
:F.0:S.0...2..G(147).J.<..1680:.I.1.10:.
:....F.." SELECT: .U.PPER OR .L.OWE
R CASE"...P.. K$:. K$."".80.%.Z..K$."U".
.G(142) :.120.=.D..K$."L"..G(14):.120.E.
N..80.W.X..G(147):.1680.K....:.N$.""..:.
150......C(N$).9.N$.N$." ":.135......:.:
.:..8)". FILE IN USE: ";N$;".":.:.:..R..
..:..14)"KEY OPTION":.1260... ..".D.ATAF
ILE LOAD".27)".L.ABELS......".V.IEW RECO
RDS".27)".U.TILITIES".R....".S.ORT/VIEW
INDEX".27)".E.XIT PROGRAM":.:.1260.X...:
.K.H..K$:.K$."".200...R.KK$."DLVUSE":.K.
1.6:.K$.J(KK$,K,1).220...W..K:.200.F....
K.1300,2430,240,1720,2100,1660.L...:....
.RN.0:."ENTER RECORD .NO:. OR .S.CROLL:
";:.1130:.IP$."S".270.9...RN..(E(IP$)):
.(RN.1.RN.Y)..:.2050:.240.L...R.RN:.G(14
7):..12)". RECORD VIEW .":.1260:.300....
..G(147);:.R.1.Y:.G(19);:.1260.A....". R
ECORDS WILL DISPLAY IN LOGICAL ORDER .":
...."..".C.ONTINUOUS SCROLL: .S.TOP SCR
OLL: .E.XIT:":.:.1260...,..:."RECORD NO
: ";R:.C.1.X.C.6.A1$.H(A$(0,C),9):A2$.H(
A$(R,C),26).B.@..C(A1$).9.A1$.A1$." ":.3
20...J..C(A2$).26.A2$.A2$." ":.330...T..
"."A1$".".12)A2$:.C.1.....Y..RN..0.3270.
..^..C:.R.1.390.Y.H.K$."":.K$:.K$."S".39
0...R..K$.."E"..I.1.500:.I:.R...|.R.Y:.1
20.%...K$."":.K$:.K$.."C".K$.."E".390...
...370.4...:.@....G(147).M.....8)". SELE
CTION FOR PRINTING .":.1260:..X....R.1.Y
......"ENTER FIELD TITLE [ ]....
......";:.1130;...B.DP$.IP$.Z.L..C(DP$).
9.DP$.DP$." ":.460...V..:C.1......A$(0,C
).DP$.510.....C.C.1:.C.X.1.480.5...EM$."
. NO SUCH FIELD .":.1220:.120.U...."ENTE
R CRITERIA FOR "DP$:..R...."[";:.2070:.H
(S$,A(C));......"]";:.H(T$,A(C));:.".";.
.....1130:CP$.IP$:....&.F.C(CP$).I.:..AA
$(C)."C".I.1:.660...D.."SHOULD . "DP$" .
BE:":....N...7)".E.QUAL TO : "CP$:
..+.X...7)".L.ESS THAN : "CP$:..M.B.
..7)".G.REATER THAN : "CP$:..S.L.:.F.V.
.K$:.K$."".630.....KK$."ELG":.I.1.3:.K$.
J(KK$,I,1).660......I:.630.G....G(147):.
.12)". LABELS PRINTING .":.1260......"FI
LE NAME : . "N$:......."SELECTION : . "D
P$:.......I.970,710,830.4.F.."CRITERIA
< . "CP$" .":.:.1260.W.P..4,4:.R.1.Y:.NL
.1.NP:.B.1.BB.1......E(A$(R,C)).E(CP$)..
4,.LN)H(A$(R,B(B)),LW)......B:.E(A$(R,C)
).E(CP$)..I.1.BL:.4:.I.B....NL:.R: 4:.10
80...>.."CRITERIA > . "CP$" .":.:.1260.
..H..4,4:.R.1.Y:.NL.1.NP:.B.1.BB.1.9.\..
E(A$(R,C)).E(CP$)..4,.LN)H(A$(R,B(B)),LW
).A.Z..B:.E(A$(R,C)).E(CP$)..I.1.BL:.4:.
I.U....NL:.R: 4:.1080...J.."CRITERIA =
. "CP$" .":.:.1260...T..4,4:.R.1.Y:.NL.1
.NP:.B.1.BB.1......H(A$(R,C),F).CP$..4,.
LN)H(A$(R,B(B)),LW)......B:.H(A$(R,C),F)
.CP$..I.1.BL:.4:.I. ....NL:.R: 4.A.8..:.
.12)".R.EPRINT OR .M.ENU".U.B..K$:.K$.""
.1090.L.L..K$."M".R.R.1:.120.|.V..K$."R"
.660...`..1090...J.B$." ":."";...T..IP$:
.IP$.""..1140.I.~..B$." ".F(IP$).20..114
0......F(IP$).20.B$.H(B$,C(B$).1):.". ."
;:.1140......IP$.G(13).IP$.J(B$,2):.:../
...A.F(IP$):.A.11..1140.Q...B$.B$.IP$:."
.";IP$;".";:.1140.W...:.]...:.G.D.. EM$.
Z.N.. T8.1 .1000:....X.......:......"...
....................................":..
....."----------------------------------
-----":......:............"ARE YOU LOADI
NG FROM:-".*.(..".D.ISK OR .T.APE".@.2..
K$:. K$."".1330.Q.<..K$."T".1380.B.F..K
$."D".1440.L.P..1330.R.Z.:...D.T.1:U.0:N
N$.N$...N..2050:."IF DATA CASSETTE IS IN
PLACE".R.X.."PRESS .C.ONTINUE OR .A.BOR
T".....K$."":.K$:.K$."".1410......K$.."C
".120......1490.<. .T.8:U.4:N1$."0:":N2$
.",SEQ,READ":NN$.N1$.NN$.N2$.F....1490.L
.H.:...R..2050:."ENTER FILE NAME [
].........";:. 1130.....N$.H(IP$,8):NN
$.N$:.......T.1.."..."......1,T,U,NN$.R.
...1,Y:.1,X :.3000...... C.1 . X:.1,A(C)
:....... C.1 . X:.1,AA$(C):....... R.1 .
Y. .".. C.1 . X./.,..1,A$(R,C).7.6..:..
E.@.. C.1 . X.T.J..1,A$(0,C).Z.T...A.^.
1.J.H..120.P.R.:...|..". EXIT . : ARE YO
U SURE? [.Y./.N.]"....K$."":.K$:.K$."".
1663.E....K$.."Y".120.....N$."":.G(147):
.1680:.:.:.:.:.......:.:.:.:..!....:."
*****************************".Q...."
*** . DFM . . MAIL . . LABELS . ***
".}...." ***************************
**":.......N$..""........"
BY":......." . D . . I . . A
. . L . . O . . G . ":......."
S O F T W A R E":.:.......G(147).3....
.14)". UTILITIES .":.1260:..[.B.." DIS
K DIRECTORY OF DRIVE .0.":....G.." DIS
K DIRECTORY OF DRIVE .1.":....L.." .M.
EMORY AVAILABILITY":..D.Q.." .F.ILE DE
SCRIPTION":....V.." .R.ETURN TO MAIN M
ENU":.......:.1260:.......V$:.V$."".1780
./....V$."0".."CHR$(147);:IFD0:GOTO2042.
O....V$."1"..G(147);:. D1 .2042.`....V$.
"M".1870.P....V$."R".120...&..V$."F".196
0...D..1780...N..G(19):.I.1.7:.:....X...
24)"=".(0)"BYTES".J....G(19):.1725......
G(147):."FILE DESCRIPTION FOR "N$:.1260.
....."OUTPUT TO .S.CREEN OR .P.RINTER".<
....K$:.K$.."S".K$.."P".1980.S.A..K$."S"
.DV.3:.1990...B.DV.4:.G(19):.:.:.">> ENS
URE PRINTER ALIGNED <<"...D..:."PRESS .
SPACE BAR . TO PRINT".I.E.K$."":.K$:.K$.
." ".1989.V.F..4,DV:.4...P..G(147):."FIL
E DESCRIPTION FOR "N$:.1270.&.Z..C.1.X:C
$.D(C):.C.10.C$.C$." ".K...C1$.D(A(C)):.
A(C).10.C1$." ".C1$......"FIELD NO"C$" "
A$(O,C)" WIDTH"C1$" TYPE "AA$(C)......
:.4: 4:.DV.4.1720.B....:."PRESS . SPACE
BAR . TO CONTINUE".X....K$:.K$.." ".2044
......1720.....BL$."
".2...."..";:.BL$:.BL
$:."...":..D...S$."
"... .T$."...........
.............................":....*.:.N
.4..Y.0.EM$.". NO FILE IN MEMORY .":.122
0:.120...>..".S.ORT OR .V.IEW INDEX OR .
E.XIT"...H.K$."":.K$:.K$."".2120.!.R..K$
."V".3200.1.\..K$."E".120.C.F..K$.."S".2
120.R.P..:.2050:."ENTER FIELD YOU WISH T
O SORT BY"...Z.."KEY .1 TO"X".: ";:.1130
.....M.E(IP$):.M.1.M.X..2050:.2160.W....
2050:.". SORTING . PLEASE WAIT"......R.1
.Y.1......I.(R.1).Y......AA$(M)."C".A$(I
,M)..A$(R,M).2300.E....AA$(M)."N".E(A$(I
,M))..E(A$(R,M)).2300.P.J..C.1.X.B.T.B$(
C).A$(R,C).V...A$(R,C).A$(I,C).....A$(I,
C).B$(C)......C......:..J....:.2050:.".
SORT . COMPLETED":.J.1.1000:.:.120.....C
OL.1:LNE.21:.2340:.I.1.3......"
":.I:..O.$
.ACC$.".................................
......".S...DOW$."......................
..".~.8..Z.1.2...B..".";...L..COL.1..H(A
CC$,COL.1);...V..LNE.1..H(DOW$,LNE.1);..
.`..Z.1.."
";...J..Z.. T.... ~..G(147);:.1
260.C ..." SELECT THE . FIELDS . THAT A
RE TO BE":..W ..." INCLUDED ON EACH P
RINTED LABEL":.:.1260:... ..B.1:BB.1.. .
..C.1.X.. ...A$(0,C).24)".Y.ES OR .N.O [
]..";:.1130.. N..IP$."Y".B(B).C:B.B.1:B
B.BB.1..!X..C:.:.">> ACCEPT SELECTION <<
.Y./.N./.E.XIT".$!Y..:.1260.>!Z
.K$."":.K$:.K$."".2522.O!...K$."N".2430.
_!...K$."E".120.Q!...K$.."Y".2522.}!...G
(147)..!....13)". LABEL FORMAT .":.1260:
...!..."LABEL STARTING POINT (1-80) [
]...";:.1130:LN.E(IP$).."...:."MAX CHAR
ACTER WIDTH TO PRINT [ ]...";:.1130:LW
.E(IP$).]"...:."NO: OF LINES BETWEEN LAB
ELS [ ]..";:.1130:BL.E(IP$).."...:."HO
W MANY OF EACH LABEL [ ]...";:.1
130:NP.E(IP$).V"<..:.:.">> ACCEPT FORMAT
<< .Y./.N./.E.XIT".."A..:.12
60.."F.K$."":.K$:.K$."".2630..#K..K$."N"
.2530..#P..K$."E".120./#R..K$.."Y".2630.
;#T..G(147).G#V...13)". LABEL PRINT .":.
1260:.I.1.5:.:...#Z.." >> TEST PRIN
T FORMAT << .Y./.N."..#_..I.1.6:.:.:.126
0.C#D.K$."":.K$:.K$."".2660..#I.KK$.K$:.
G(19):.I.1.7:.:...$N.." >>> ENSURE PR
INTER ALIGNED <<<"./$S..KK$."Y"..2850:.G
(19):.I.1.8:.:..M$X..I.1.4:.:.:." PRINT
.A.LL / .S.ELECTED RECORDS OR .N.ONE"..$
..K$."":.K$:.K$."".2690..$...K$."S".420.
.$...K$."N".120..$ ..K$.."A".2690..$...G
(147):..12)". LABELS PRINTING .":.1260..
%..."FILE NAME : . "N$:..+%..."SELECTION
: . ALL RECORDS .":.:.1260.7%...4,4:.4.
B%...R.1.Y.O%...NL.1.NP.]%H..B.1.BB.1.W%
R...LN)H(A$(R,B(B)),LW).~%...B..%...I.1.
BL:.:.I..%...NL:.R: .4: 4.B%...:..12)".R
.EPRINT OR .M.ENU".V%...K$:.K$."".2820..
%...K$."M".120..%...K$."R".2725..&...282
0.9&"..I.1.4:.:.:." PRESS . SPACE BAR
. TO PRINT TEST".U&'.K$."":.K$:.K$.." "
.2855.X&,.A$."":.I.1.LW:A$.A$."X":.:.4,6
..&6..I.1.BB.1:.4,.LN);A$:...&@..I.1.BL:
.4:.: 4:.G(19):.I.1.12:.:...&J.." TES
T OVER: .C.ONTINUE OR .R.ESET-UP"..'T.K$
."":.K$:.K$."".2900..'^..K$."C"...#'H..K
$.."R".2900.-'R..2430.I'... A$(200,X),AA
$(X),A(X.1),C$(X),B$(X),B(X):A$(R,C)."":
..O'..:..'...G(147):..12)". VIEW INDEX
.":.1260:...'...M.0.M.1.L'..CT.1:.I.1.Y
:.I;.6)H(A$(I,M),30)..'..CT.CT.1:.CT..15
.3270..(..CT.1:.:."PRESS . SPACE BAR . T
O CONTINUE OR .E.XIT".A(..K$."":.K$:.K$.
." ".K$.."E".3250.Q(...K$."E".120.Q(A..G
(19):.:.:.:.G.1.17:.BL$:...(C..G(19):.:.
:...(F..:.:.1260:..6)"PRESS . SPACE BAR
. FOR MENU".O(P.K$."":.K$:.K$.." ".3280.
X(Z..120..(.'."@0:LABELS",8:....:.
> CLICK IMAGE PREVIEW FOR FULL MODAL