MRMENU
FILE INFORMATION
FILENAME(S): MRMENU
FILE TYPE(S): PRG
FILE SIZE: 10.8K
FIRST SEEN: 2025-10-19 22:48:43
APPEARS ON: 1 disk(s)
FILE HASH
8e8ee98aeca71bb205724d9d6eec2e69789223ea1f8f6a463cca95545a47ef9a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PROGRAM | MRMENU | PRG | Radd Maxx | 17 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 8F 20 2A 2A 20 4D 52 4D 45 4E |....... ** MRMEN|
00000010: 55 20 2A 2A 20 30 38 2D 30 34 2D 38 35 00 39 08 |U ** 08-04-85.9.|
00000020: 02 00 8F 20 28 43 29 20 31 39 38 33 20 43 2E 50 |... (C) 1983 C.P|
00000030: 2E 55 2E 2C 20 49 4E 43 2E 00 5D 08 03 00 8F 20 |.U., INC..].... |
00000040: 28 43 29 20 31 39 38 33 20 43 4F 4E 54 49 4E 45 |(C) 1983 CONTINE|
00000050: 4E 54 41 4C 20 53 4F 46 54 57 41 52 45 00 8F 08 |NTAL SOFTWARE...|
00000060: 05 00 41 53 24 B2 22 2A 2A 2A 2A 2A 2A 2A 2A 2A |..AS$."*********|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 |**************".|
00000090: B4 08 06 00 53 43 24 28 30 29 B2 22 2A 2A 20 54 |....SC$(0)."** T|
000000A0: 48 45 20 46 2E 43 2E 4D 20 50 52 4F 47 52 41 4D |HE F.C.M PROGRAM|
000000B0: 20 2A 2A 22 00 C8 08 0A 00 56 48 B2 35 38 37 33 | **".....VH.5873|
000000C0: 32 3A 89 33 30 30 30 30 00 E1 08 0F 00 56 48 B2 |2:.30000.....VH.|
000000D0: 35 38 37 33 32 3A 8D 36 30 30 30 30 3A 89 34 30 |58732:.60000:.40|
000000E0: 30 00 F4 08 14 00 A1 58 24 3A 8B 58 24 B3 B1 22 |0......X$:.X$.."|
000000F0: 22 A7 32 30 00 FF 08 15 00 97 32 30 34 2C 30 00 |".20......204,0.|
00000100: 11 09 16 00 A1 58 24 3A 8B 58 24 B2 22 22 A7 32 |.....X$:.X$."".2|
00000110: 32 00 36 09 17 00 44 55 B2 C6 28 58 24 29 3A 8B |2.6...DU..(X$):.|
00000120: 44 55 B3 33 32 B0 44 55 B1 31 33 33 A7 8D 39 30 |DU.32.DU.133..90|
00000130: 33 30 3A 89 32 32 00 4D 09 18 00 97 32 30 34 2C |30:.22.M....204,|
00000140: 31 3A 99 48 57 24 28 31 37 29 3B 3A 8E 00 61 09 |1:.HW$(17);:..a.|
00000150: 1E 00 A1 58 58 24 3A 8B 58 58 24 B2 22 22 A7 33 |...XX$:.XX$."".3|
00000160: 30 00 67 09 23 00 8E 00 85 09 01 01 8B 4E 44 25 |0.g.#........ND%|
00000170: B2 38 AF 53 4C 24 B2 22 33 22 A7 8D 39 30 33 30 |.8.SL$."3"..9030|
00000180: 3A 89 34 33 30 00 BE 09 90 01 99 22 93 22 3B 3A |:.430......".";:|
00000190: 97 32 31 34 2C 32 3A 97 32 31 31 2C 32 30 AB C3 |.214,2:.211,20..|
000001A0: 28 53 43 24 28 30 29 29 AD 32 3A 9E 56 48 3A 99 |(SC$(0)).2:.VH:.|
000001B0: 53 43 24 28 30 29 3A 97 32 31 31 2C 31 36 00 F0 |SC$(0):.211,16..|
000001C0: 09 92 01 9E 56 48 3A 99 22 56 45 52 20 33 2E 32 |....VH:."VER 3.2|
000001D0: 30 22 3A 99 3A 97 32 31 31 2C 31 34 3A 9E 56 48 |0":.:.211,14:.VH|
000001E0: 3A 99 22 12 20 22 53 43 24 28 31 29 22 20 92 22 |:.". "SC$(1)" ."|
000001F0: 00 15 0A 95 01 97 32 31 34 2C 36 3A 97 32 31 31 |......214,6:.211|
00000200: 2C 32 30 AB C3 28 56 4E 24 29 AD 32 3A 9E 56 48 |,20..(VN$).2:.VH|
00000210: 3A 99 56 4E 24 00 51 0A 9A 01 81 58 B2 31 A4 35 |:.VN$.Q....X.1.5|
00000220: 3A 97 32 31 34 2C 36 AA 58 AC 32 3A 97 32 31 31 |:.214,6.X.2:.211|
00000230: 2C 33 3A 9E 56 48 3A 99 22 12 20 22 58 22 9D 20 |,3:.VH:.". "X". |
00000240: 20 92 22 3B 3A 99 22 20 22 4D 55 24 28 58 29 3A | .";:." "MU$(X):|
00000250: 82 00 88 0A A4 01 97 32 31 34 2C 32 30 3A 97 32 |.......214,20:.2|
00000260: 31 31 2C 31 3A 9E 56 48 3A 81 58 B2 30 A4 33 38 |11,1:.VH:.X.0.38|
00000270: 3A 99 42 4C 24 3A 97 32 31 31 2C 37 3A 97 32 31 |:.BL$:.211,7:.21|
00000280: 34 2C 32 30 3A 9E 56 48 00 9F 0A A5 01 99 53 43 |4,20:.VH......SC|
00000290: 24 28 32 29 22 20 28 31 2D 35 29 20 D2 22 3B 00 |$(2)" (1-5) .";.|
000002A0: DE 0A AE 01 97 32 31 34 2C 32 30 3A 97 32 31 31 |.....214,20:.211|
000002B0: 2C 32 39 3A 9E 56 48 3A 8D 32 30 3A 53 4C 24 B2 |,29:.VH:.20:SL$.|
000002C0: 58 24 3A 8B 53 4C 24 B3 22 31 22 B0 53 4C 24 B1 |X$:.SL$."1".SL$.|
000002D0: 22 35 22 A7 8D 39 30 33 30 3A 89 34 33 30 00 FC |"5"..9030:.430..|
000002E0: 0A 01 01 8B 4E 44 25 B2 31 AF 53 4C 24 B2 22 33 |....ND%.1.SL$."3|
000002F0: 22 A7 99 42 45 24 3B 3A 89 34 33 30 00 1C 0B B8 |"..BE$;:.430....|
00000300: 01 99 53 4C 24 3A 53 4C B2 C6 28 53 4C 24 29 AB |..SL$:SL..(SL$).|
00000310: 34 38 3A 8B 53 4C B2 35 A7 35 30 30 00 51 0B BD |48:.SL.5.500.Q..|
00000320: 01 97 32 31 34 2C 36 AA 53 4C AC 32 3A 97 32 31 |..214,6.SL.2:.21|
00000330: 31 2C 33 3A 9E 56 48 3A 99 22 12 20 22 C4 28 53 |1,3:.VH:.". ".(S|
00000340: 4C 29 22 20 20 20 22 4D 55 24 28 53 4C 29 22 92 |L)" "MU$(SL)".|
00000350: 22 00 8F 0B BE 01 97 32 31 34 2C 32 30 3A 97 32 |"......214,20:.2|
00000360: 31 31 2C 32 3A 9E 56 48 3A 99 22 50 52 45 53 53 |11,2:.VH:."PRESS|
00000370: 20 27 52 27 20 54 4F 20 52 55 4E 20 4F 52 20 27 | 'R' TO RUN OR '|
00000380: 58 27 20 54 4F 20 43 41 4E 43 45 4C 20 A4 22 00 |X' TO CANCEL .".|
00000390: B3 0B BF 01 97 32 31 34 2C 32 30 3A 97 32 31 31 |.....214,20:.211|
000003A0: 2C 33 36 3A 9E 56 48 3A 8D 33 30 3A 48 4B 24 B2 |,36:.VH:.30:HK$.|
000003B0: 58 58 24 00 CE 0B C1 01 8B 48 4B 24 B3 B1 22 52 |XX$......HK$.."R|
000003C0: 22 AF 48 4B 24 B3 B1 22 58 22 A7 34 34 37 00 D7 |".HK$.."X".447..|
000003D0: 0B C2 01 99 48 4B 24 00 EE 0B CC 01 8B 48 4B 24 |....HK$......HK$|
000003E0: B2 22 58 22 A7 8D 38 30 30 3A 89 34 32 30 00 F7 |."X"..800:.420..|
000003F0: 0B EA 01 89 35 35 30 00 23 0C F4 01 99 22 93 22 |....550.#...."."|
00000400: 3B 3A 97 32 31 34 2C 31 30 3A 9E 56 48 3A 99 41 |;:.214,10:.VH:.A|
00000410: 53 24 3A 97 32 31 34 2C 31 34 3A 9E 56 48 3A 99 |S$:.214,14:.VH:.|
00000420: 41 53 24 00 37 0C F9 01 97 37 39 32 2C 37 31 3A |AS$.7....792,71:|
00000430: 97 37 38 38 2C 34 39 00 7A 0C FE 01 97 32 31 34 |.788,49.z....214|
00000440: 2C 31 32 3A 97 32 31 31 2C 38 3A 9E 56 48 3A 99 |,12:.211,8:.VH:.|
00000450: 22 12 20 2A 2A 2A 20 45 4E 44 20 4F 46 20 53 45 |". *** END OF SE|
00000460: 53 53 49 4F 4E 20 2A 2A 2A 20 92 22 3A 97 32 31 |SSION *** .":.21|
00000470: 34 2C 32 30 3A 9E 56 48 3A A2 00 8A 0C 26 02 8F |4,20:.VH:....&..|
00000480: 20 47 4F 53 55 42 33 30 30 35 00 BC 0C 58 02 99 | GOSUB3005...X..|
00000490: 22 93 22 3A 97 32 31 34 2C 38 3A 9E 56 48 3A 99 |".":.214,8:.VH:.|
000004A0: 41 53 24 3A 97 32 31 34 2C 31 34 3A 9E 56 48 3A |AS$:.214,14:.VH:|
000004B0: 99 41 53 24 3A 97 32 31 34 2C 31 30 00 D8 0C 5A |.AS$:.214,10...Z|
000004C0: 02 97 32 31 31 2C 31 33 3A 9E 56 48 3A 99 22 12 |..211,13:.VH:.".|
000004D0: 20 22 4E 4C 24 22 20 22 00 13 0D 5D 02 99 3A 97 | "NL$" "...]..:.|
000004E0: 32 31 31 2C 31 39 AB C3 28 4D 55 24 28 53 4C 29 |211,19..(MU$(SL)|
000004F0: 29 AD 32 3A 9E 56 48 3A 99 22 20 22 4D 55 24 28 |).2:.VH:." "MU$(|
00000500: 53 4C 29 22 20 92 22 3A 97 32 31 34 2C 32 30 3A |SL)" .":.214,20:|
00000510: 9E 56 48 00 21 0D 62 02 8B 53 4C B2 32 A7 37 30 |.VH.!.b..SL.2.70|
00000520: 30 00 55 0D 6C 02 99 48 57 24 28 31 38 29 22 4E |0.U.l..HW$(18)"N|
00000530: 45 57 3A 13 4C 4F 41 44 22 C7 28 33 34 29 C8 28 |EW:.LOAD".(34).(|
00000540: 4D 55 24 28 53 4C 29 2C 36 29 C7 28 33 34 29 22 |MU$(SL),6).(34)"|
00000550: 2C 38 2C 31 22 00 8B 0D 71 02 97 36 33 31 2C 31 |,8,1"...q..631,1|
00000560: 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 38 |9:.632,13:.633,8|
00000570: 32 3A 97 36 33 34 2C 32 31 33 3A 97 36 33 35 2C |2:.634,213:.635,|
00000580: 31 33 3A 97 31 39 38 2C 35 3A 80 00 BB 0D BC 02 |13:.198,5:......|
00000590: 99 48 57 24 28 31 38 29 22 4E 45 57 3A 13 4C 4F |.HW$(18)"NEW:.LO|
000005A0: 41 44 22 C7 28 33 34 29 22 4D 52 53 4F 52 54 22 |AD".(34)"MRSORT"|
000005B0: C7 28 33 34 29 22 2C 38 2C 31 22 00 F1 0D C1 02 |.(34)",8,1".....|
000005C0: 97 36 33 31 2C 31 39 3A 97 36 33 32 2C 31 33 3A |.631,19:.632,13:|
000005D0: 97 36 33 33 2C 38 32 3A 97 36 33 34 2C 32 31 33 |.633,82:.634,213|
000005E0: 3A 97 36 33 35 2C 31 33 3A 97 31 39 38 2C 35 3A |:.635,13:.198,5:|
000005F0: 80 00 39 0E 20 03 8B 48 4B 24 B2 22 58 22 A7 97 |..9. ..HK$."X"..|
00000600: 32 31 34 2C 36 AA 53 4C AC 32 3A 97 32 31 31 2C |214,6.SL.2:.211,|
00000610: 33 3A 9E 56 48 3A 99 22 12 20 20 22 C7 28 34 38 |3:.VH:.". ".(48|
00000620: AA 53 4C 29 22 20 20 92 22 3B 3A 99 22 20 22 4D |.SL)" .";:." "M|
00000630: 55 24 28 53 4C 29 22 20 22 00 3F 0E 2A 03 8E 00 |U$(SL)" ".?.*...|
00000640: 4E 0E BD 0B A0 31 3A 9F 31 2C 38 2C 31 35 00 6F |N....1:.1,8,15.o|
00000650: 0E BE 0B 44 55 24 B2 22 22 3A A0 32 3A 9F 32 2C |...DU$."":.2:.2,|
00000660: 38 2C 30 2C 22 24 30 22 3A 8D 33 30 39 30 30 00 |8,0,"$0":.30900.|
00000670: 88 0E C2 0B 81 58 B2 31 A4 36 3A A1 23 32 2C 58 |.....X.1.6:.#2,X|
00000680: 24 3A 8D 33 30 39 30 30 00 A3 0E C7 0B A1 23 32 |$:.30900......#2|
00000690: 2C 58 24 3A 8B 58 24 B3 B1 C7 28 33 34 29 A7 33 |,X$:.X$...(34).3|
000006A0: 30 31 35 00 CA 0E CC 0B A1 23 32 2C 58 24 3A 8B |015......#2,X$:.|
000006B0: 58 24 B3 B1 C7 28 33 34 29 A7 44 55 24 B2 44 55 |X$...(34).DU$.DU|
000006C0: 24 AA 58 24 3A 89 33 30 32 30 00 D1 0E D1 0B A0 |$.X$:.3020......|
000006D0: 32 00 EB 0E D6 0B 8B C8 28 44 55 24 2C 37 29 B2 |2.......(DU$,7).|
000006E0: 22 50 52 4F 47 52 41 4D 22 A7 8E 00 FC 0E E0 0B |"PROGRAM".......|
000006F0: 8D 33 31 30 30 30 3A 89 33 30 30 36 00 0A 0F D7 |.31000:.3006....|
00000700: 0E 86 20 48 57 24 28 31 38 29 00 39 0F D8 0E A0 |.. HW$(18).9....|
00000710: 31 3A A0 32 3A 9F 31 2C 38 2C 31 35 3A 9F 32 2C |1:.2:.1,8,15:.2,|
00000720: 38 2C 32 2C 22 48 41 52 44 57 41 52 45 2C 53 2C |8,2,"HARDWARE,S,|
00000730: 52 22 3A 8D 33 30 39 30 30 00 4B 0F E2 0E 84 32 |R":.30900.K....2|
00000740: 2C 46 54 25 3A 8D 33 30 39 30 30 00 6C 0F EC 0E |,FT%:.30900.l...|
00000750: 81 53 4C B2 31 A4 31 39 3A 84 32 2C 48 57 24 28 |.SL.1.19:.2,HW$(|
00000760: 53 4C 29 3A 8D 33 30 39 30 30 3A 82 00 7A 0F F6 |SL):.30900:..z..|
00000770: 0E A0 32 3A 8D 33 30 39 30 30 00 83 0F 00 0F A0 |..2:.30900......|
00000780: 31 3A 8E 00 8E 0F 28 23 8F 20 42 45 45 50 00 AD |1:....(#. BEEP..|
00000790: 0F 32 23 41 58 B2 35 34 32 37 32 3A 81 59 B2 30 |.2#AX.54272:.Y.0|
000007A0: A4 32 34 3A 97 41 58 AA 59 2C 30 3A 82 00 CC 0F |.24:.AX.Y,0:....|
000007B0: 3C 23 97 41 58 AA 31 38 2C 31 36 3A 97 41 58 AA |<#.AX.18,16:.AX.|
000007C0: 31 34 2C 35 3A 97 41 58 AA 33 2C 31 00 D2 0F 41 |14,5:.AX.3,1...A|
000007D0: 23 8E 00 F4 0F 46 23 97 41 58 AA 32 34 2C 31 34 |#....F#.AX.24,14|
000007E0: 33 3A 97 41 58 AA 36 2C 32 34 30 3A 97 41 58 AA |3:.AX.6,240:.AX.|
000007F0: 34 2C 36 35 00 00 10 5A 23 46 30 B2 37 33 39 31 |4,65...Z#F0.7391|
00000800: 00 2C 10 64 23 81 54 30 B2 31 A4 39 3A 46 31 B2 |.,.d#.T0.1.9:F1.|
00000810: 46 30 3A 46 33 B2 B5 28 46 31 AD 32 35 36 29 3A |F0:F3..(F1.256):|
00000820: 46 32 B2 46 31 AB 46 33 AC 32 35 36 00 42 10 69 |F2.F1.F3.256.B.i|
00000830: 23 97 41 58 2C 46 32 3A 97 41 58 AA 31 2C 46 33 |#.AX,F2:.AX.1,F3|
00000840: 3A 82 00 4F 10 6E 23 97 41 58 AA 32 34 2C 30 00 |:..O.n#.AX.24,0.|
00000850: 55 10 82 23 8E 00 66 10 30 75 A0 31 35 3A 9F 31 |U..#..f.0u.15:.1|
00000860: 35 2C 38 2C 31 35 00 81 10 3A 75 A0 31 3A 9F 20 |5,8,15...:u.1:. |
00000870: 31 2C 38 2C 35 2C 22 30 3A 46 43 4D 2C 50 2C 57 |1,8,5,"0:FCM,P,W|
00000880: 22 00 9F 10 44 75 84 31 35 2C 45 2C 45 24 2C 53 |"...Du.15,E,E$,S|
00000890: 2C 54 3A 8B 45 B3 B1 36 33 A7 33 30 30 34 30 00 |,T:.E..63.30040.|
000008A0: C0 10 49 75 A0 31 3A 98 31 35 2C 22 53 30 3A 46 |..Iu.1:.15,"S0:F|
000008B0: 43 4D 22 3A 84 31 35 2C 45 2C 45 24 2C 53 2C 54 |CM":.15,E,E$,S,T|
000008C0: 00 DD 10 4E 75 8B 20 45 B2 32 36 20 A7 20 8D 20 |...Nu. E.26 . . |
000008D0: 33 31 30 30 30 3A 89 20 33 30 30 35 30 00 09 11 |31000:. 30050...|
000008E0: 53 75 A0 31 3A 8B 45 B2 31 20 B0 20 45 B2 30 A7 |Su.1:.E.1 . E.0.|
000008F0: 9F 31 2C 38 2C 35 2C 22 30 3A 46 43 4D 2C 50 2C |.1,8,5,"0:FCM,P,|
00000900: 57 22 3A A0 31 3A 8A 31 35 00 15 11 58 75 8D 20 |W":.1:.15...Xu. |
00000910: 33 32 30 30 30 00 2A 11 62 75 A1 41 24 3A 8B 41 |32000.*.bu.A$:.A|
00000920: 24 B2 22 22 A7 33 30 30 35 30 00 36 11 6C 75 41 |$."".30050.6.luA|
00000930: 24 B2 22 22 3A 8A 00 4D 11 B4 78 84 31 2C 45 31 |$."":..M..x.1,E1|
00000940: 25 2C 45 52 24 2C 45 32 25 2C 45 33 25 00 5F 11 |%,ER$,E2%,E3%._.|
00000950: BE 78 8B 45 31 25 B1 32 30 A7 33 33 30 30 30 00 |.x.E1%.20.33000.|
00000960: 65 11 C8 78 8E 00 8C 11 18 79 8D 39 30 33 30 3A |e..x.....y.9030:|
00000970: 97 32 31 34 2C 38 3A 9E 56 48 3A 99 41 53 24 3A |.214,8:.VH:.AS$:|
00000980: 99 3A 97 32 31 31 2C 33 3A 9E 56 48 00 C1 11 1D |.:.211,3:.VH....|
00000990: 79 99 22 52 45 4D 4F 56 45 20 57 52 49 54 45 20 |y."REMOVE WRITE |
000009A0: 50 52 4F 54 45 43 54 20 54 41 42 20 46 52 4F 4D |PROTECT TAB FROM|
000009B0: 20 44 49 53 4B 22 3A 97 32 31 31 2C 36 3A 9E 56 | DISK":.211,6:.V|
000009C0: 48 00 ED 11 20 79 99 22 41 4E 44 20 52 45 2D 49 |H... y."AND RE-I|
000009D0: 4E 53 45 52 54 20 49 54 20 49 4E 20 44 52 49 56 |NSERT IT IN DRIV|
000009E0: 45 20 23 38 2E 22 3A 97 32 31 31 2C 38 00 16 12 |E #8.":.211,8...|
000009F0: 22 79 99 22 50 52 45 53 53 20 41 4E 59 20 4B 45 |"y."PRESS ANY KE|
00000A00: 59 20 57 48 45 4E 20 52 45 41 44 59 22 3A 99 3A |Y WHEN READY":.:|
00000A10: 99 41 53 24 3A 8E 00 3F 12 00 7D A0 31 3A 99 42 |.AS$:..?..}.1:.B|
00000A20: 45 24 3A 97 32 31 34 2C 38 3A 9E 56 48 3A 99 41 |E$:.214,8:.VH:.A|
00000A30: 53 24 3A 99 3A 97 32 31 31 2C 34 3A 9E 56 48 00 |S$:.:.211,4:.VH.|
00000A40: 8B 12 05 7D 99 22 52 45 4D 4F 56 45 20 41 4E 59 |...}."REMOVE ANY|
00000A50: 20 44 49 53 4B 20 46 52 4F 4D 20 44 52 49 56 45 | DISK FROM DRIVE|
00000A60: 20 23 38 22 3A 99 22 49 4E 53 45 52 54 20 22 53 | #8":."INSERT "S|
00000A70: 43 24 28 30 29 22 20 50 52 4F 47 52 41 4D 2E 22 |C$(0)" PROGRAM."|
00000A80: 3A 97 32 31 31 2C 38 3A 9E 56 48 00 B2 12 08 7D |:.211,8:.VH....}|
00000A90: 99 22 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |."PRESS ANY KEY |
00000AA0: 57 48 45 4E 20 52 45 41 44 59 22 3A 99 3A 99 41 |WHEN READY":.:.A|
00000AB0: 53 24 00 B8 12 0A 7D 8E 00 D9 12 E8 80 99 22 93 |S$....}.......".|
00000AC0: 22 3A 8D 39 30 33 30 3A 8D 39 30 33 30 3A 97 32 |":.9030:.9030:.2|
00000AD0: 31 34 2C 38 3A 99 41 53 24 00 F6 12 F2 80 99 3A |14,8:.AS$......:|
00000AE0: 99 22 44 49 53 4B 20 45 52 52 4F 52 20 23 22 45 |."DISK ERROR #"E|
00000AF0: 31 25 2C 45 52 24 00 12 13 FC 80 99 22 49 4E 53 |1%,ER$......"INS|
00000B00: 45 52 54 20 47 4F 4F 44 20 44 49 53 4B 45 54 54 |ERT GOOD DISKETT|
00000B10: 45 22 00 30 13 06 81 99 22 50 52 45 53 53 20 4B |E".0...."PRESS K|
00000B20: 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 |EY TO CONTINUE."|
00000B30: 00 3F 13 10 81 99 3A 99 41 53 24 3A 8D 32 30 00 |.?....:.AS$:.20.|
00000B40: 46 13 1A 81 89 31 00 6C 13 60 EA 81 58 B2 30 A4 |F....1.l.`..X.0.|
00000B50: 33 38 3A 42 4C 24 B2 42 4C 24 AA 22 20 22 3A 41 |38:BL$.BL$." ":A|
00000B60: 53 24 B2 41 53 24 AA 22 2A 22 3A 82 00 82 13 65 |S$.AS$."*":....e|
00000B70: EA 41 53 24 B2 22 20 22 AA C8 28 41 53 24 2C 33 |.AS$." "..(AS$,3|
00000B80: 38 29 00 8F 13 6A EA 86 48 57 24 28 31 39 29 00 |8)...j..HW$(19).|
00000B90: C2 13 6F EA 8D 33 38 30 30 3A 99 22 93 22 3A 97 |..o..3800:.".":.|
00000BA0: 35 33 32 38 30 2C C5 28 48 57 24 28 31 36 29 29 |53280,.(HW$(16))|
00000BB0: 3A 97 35 33 32 38 31 2C C5 28 48 57 24 28 31 36 |:.53281,.(HW$(16|
00000BC0: 29 29 00 E1 13 74 EA 99 48 57 24 28 31 37 29 3A |))...t..HW$(17):|
00000BD0: 4E 4C 24 B2 22 4E 4F 57 20 4C 4F 41 44 49 4E 47 |NL$."NOW LOADING|
00000BE0: 22 00 2F 14 79 EA 83 52 45 43 4F 52 44 2F 45 44 |"./.y..RECORD/ED|
00000BF0: 49 54 2F 50 52 49 4E 54 20 45 4E 54 52 49 45 53 |IT/PRINT ENTRIES|
00000C00: 2C 53 4F 52 54 20 45 4E 54 52 49 45 53 2C 54 52 |,SORT ENTRIES,TR|
00000C10: 41 4E 53 46 45 52 20 45 4E 54 52 49 45 53 2C 53 |ANSFER ENTRIES,S|
00000C20: 59 53 54 45 4D 20 55 54 49 4C 49 54 49 45 53 00 |YSTEM UTILITIES.|
00000C30: 39 14 7A EA 83 45 58 49 54 00 79 14 7E EA 83 20 |9.z..EXIT.y.~.. |
00000C40: 20 20 2A 2A 20 46 2E 43 2E 4D 2E 20 2A 2A 2C 4D | ** F.C.M. **,M|
00000C50: 41 49 4E 20 4D 45 4E 55 2C 45 4E 54 45 52 20 53 |AIN MENU,ENTER S|
00000C60: 45 4C 45 43 54 49 4F 4E 2C 4C 45 54 54 45 52 20 |ELECTION,LETTER |
00000C70: 54 4F 20 45 44 49 54 20 20 00 A1 14 83 EA 81 58 |TO EDIT ......X|
00000C80: B2 31 A4 35 3A 87 4D 55 24 28 58 29 3A 82 58 3A |.1.5:.MU$(X):.X:|
00000C90: 81 58 B2 30 A4 33 3A 87 53 43 24 28 58 29 3A 82 |.X.0.3:.SC$(X):.|
00000CA0: 58 00 AB 14 88 EA 8D 39 30 30 30 00 CA 14 48 EE |X......9000...H.|
00000CB0: 8F 20 50 52 45 50 41 52 45 20 53 43 52 4E 20 44 |. PREPARE SCRN D|
00000CC0: 4D 50 20 52 4F 55 54 49 4E 45 00 E4 14 7A EE 8B |MP ROUTINE...z..|
00000CD0: 48 57 24 28 33 29 B2 22 59 22 A7 97 34 39 32 30 |HW$(3)."Y"..4920|
00000CE0: 37 2C 31 30 00 FD 14 7C EE 8B 48 57 24 28 33 29 |7,10...|..HW$(3)|
00000CF0: B2 22 4E 22 A7 97 34 39 32 30 37 2C 30 00 21 15 |."N"..49207,0.!.|
00000D00: 84 EE 8B 48 57 24 28 31 29 B2 22 4F 22 A7 97 34 |...HW$(1)."O"..4|
00000D10: 39 31 37 34 2C 31 32 3A 97 34 39 31 39 32 2C 36 |9174,12:.49192,6|
00000D20: 34 00 44 15 86 EE 8B 48 57 24 28 31 29 B2 22 56 |4.D....HW$(1)."V|
00000D30: 22 A7 97 34 39 31 37 34 2C 34 3A 97 34 39 31 39 |"..49174,4:.4919|
00000D40: 32 2C 36 34 00 4F 15 30 F2 56 4E 24 B2 22 22 00 |2,64.O.0.VN$."".|
00000D50: 55 15 8A F2 8E 00 00 00 56 48 90 65 6C 00 00 58 |U.......VH.el..X|
00000D60: 00 00 00 00 00 00 42 CC 27 0F 9A 00 00 41 D3 27 |......B.'....A.'|
00000D70: E8 99 00 00 4E CC 0B 1D 11 00 00 56 CE 00 56 12 |....N......V..V.|
00000D80: 00 00 53 CC 01 E7 99 00 00 53 4C 81 00 00 00 00 |..S......SL.....|
00000D90: 58 D8 01 E6 99 00 00 48 CB 01 E5 99 00 00 48 D7 |X......H......H.|
00000DA0: 34 00 01 00 0F 00 00 00 00 00 00 00 00 00 00 00 |4...............|
00000DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000DD0: 00 00 4D D5 28 00 01 00 0B 00 00 00 19 32 11 0C |..M.(........2..|
00000DE0: 4C 11 10 59 11 10 6A 11 12 7B 11 04 8E 11 00 00 |L..Y..j..{......|
00000DF0: 00 00 00 00 00 00 00 00 00 00 53 C3 28 00 01 00 |..........S.(...|
00000E00: 0B 0C 9B 11 09 A8 11 0F B2 11 10 C2 11 00 00 00 |................|
00000E10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000E20: 00 00 53 CD 28 00 01 00 0B 07 07 12 04 18 12 25 |..S.(..........%|
00000E30: 26 12 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |&...............|
00000E40: 00 00 00 00 00 00 00 00 00 00 24 28 53 4C 29 2C |..........$(SL),|
00000E50: 5A 2C 31 29 B3 B1 22 22 A7 4E 47 B2 31 3A 5A B2 |Z,1).."".NG.1:Z.|
00000E60: 33 3A 00 89 13 5D 04 8B 53 4C B1 33 AF 53 4C B3 |3:...]..SL.3.SL.|
00000E70: 31 34 A7 82 5A 3A 8B 4E 47 B2 31 A7 31 31 39 30 |14..Z:.NG.1.1190|
00000E80: 00 BB 13 60 04 8B 53 4C B2 31 34 A7 48 57 25 B2 |...`..SL.14.HW%.|
00000E90: C5 28 48 57 24 28 31 34 29 29 3A 8B 48 57 25 B3 |.(HW$(14)):.HW%.|
00000EA0: 31 B0 48 57 25 B1 32 A7 4E 47 B2 31 3A 89 31 31 |1.HW%.2.NG.1:.11|
00000EB0: 39 30 00 F2 13 6A 04 97 32 31 31 2C 48 54 28 53 |90...j..211,HT(S|
00000EC0: 4C 29 3A 97 32 31 34 2C 56 54 28 53 4C 29 3A 9E |L):.214,VT(SL):.|
00000ED0: 56 48 3A 99 C9 28 42 4C 24 AA 48 57 24 28 53 4C |VH:..(BL$.HW$(SL|
00000EE0: 29 2C 46 4C 28 53 4C 29 29 00 F8 13 A6 04 8E 00 |),FL(SL)).......|
00000EF0: 39 14 B0 04 99 22 93 22 3A 97 32 31 34 2C 38 3A |9....".":.214,8:|
00000F00: 9E 56 48 3A 99 41 53 24 3A 97 32 31 34 2C 31 34 |.VH:.AS$:.214,14|
00000F10: 3A 9E 56 48 3A 99 41 53 24 3A 97 32 31 34 2C 39 |:.VH:.AS$:.214,9|
00000F20: 3A 9E 56 48 3A 8D 39 30 30 30 3A 8D 39 30 30 30 |:.VH:.9000:.9000|
00000F30: 00 65 14 B2 04 99 22 44 4F 20 59 4F 55 20 57 49 |.e...."DO YOU WI|
00000F40: 53 48 20 54 4F 20 53 54 41 52 54 20 41 20 4E 45 |SH TO START A NE|
00000F50: 57 20 53 59 53 54 45 4D 3F 20 22 3B 00 7B 14 B3 |W SYSTEM? ";.{..|
00000F60: 04 A1 53 4E 24 3A 8B 53 4E 24 B2 22 22 A7 31 32 |..SN$:.SN$."".12|
00000F70: 30 33 00 97 14 B5 04 8B 53 4E 24 B3 B1 22 59 22 |03......SN$.."Y"|
00000F80: AF 53 4E 24 B3 B1 22 4E 22 A7 31 32 30 33 00 AE |.SN$.."N".1203..|
00000F90: 14 B7 04 99 53 4E 24 3A 8B 53 4E 24 B2 22 4E 22 |....SN$:.SN$."N"|
00000FA0: A7 31 32 39 30 00 DF 14 BA 04 8D 39 30 30 30 3A |.1290......9000:|
00000FB0: 99 22 41 52 45 20 59 4F 55 20 53 55 52 45 20 59 |."ARE YOU SURE Y|
00000FC0: 4F 55 20 57 41 4E 54 20 54 4F 20 44 4F 20 54 48 |OU WANT TO DO TH|
00000FD0: 49 53 3F 20 22 3B 00 F5 14 BD 04 A1 53 4E 24 3A |IS? ";......SN$:|
00000FE0: 8B 53 4E 24 B2 22 22 A7 31 32 31 33 00 11 15 BF |.SN$."".1213....|
00000FF0: 04 8B 53 4E 24 B3 B1 22 59 22 AF 53 4E 24 B3 B1 |..SN$.."Y".SN$..|
00001000: 22 4E 22 A7 31 32 31 33 00 28 15 C4 04 99 53 4E |"N".1213.(....SN|
00001010: 24 3A 8B 53 4E 24 B2 22 4E 22 A7 31 32 39 30 00 |$:.SN$."N".1290.|
00001020: 64 15 C9 04 97 32 31 34 2C 31 32 3A 9E 56 48 3A |d....214,12:.VH:|
00001030: 8D 39 30 30 30 3A 99 22 44 4F 20 59 4F 55 20 48 |.9000:."DO YOU H|
00001040: 41 56 45 20 41 4E 20 49 4E 49 54 49 41 4C 49 5A |AVE AN INITIALIZ|
00001050: 45 44 20 44 49 53 4B 3F 20 22 3B 00 7A 15 CB 04 |ED DISK? ";.z...|
00001060: A1 53 4E 24 3A 8B 53 4E 24 B2 22 22 A7 31 32 32 |.SN$:.SN$."".122|
00001070: 37 00 96 15 CE 04 8B 53 4E 24 B3 B1 22 59 22 AF |7......SN$.."Y".|
00001080: 53 4E 24 B3 B1 22 4E 22 A7 31 32 32 37 00 BD 15 |SN$.."N".1227...|
00001090: D3 04 99 53 4E 24 3A 8B 53 4E 24 B2 22 59 22 A7 |...SN$:.SN$."Y".|
000010A0: 8D 36 32 30 30 3A 8B 50 4B B3 B1 31 35 35 A7 46 |.6200:.PK..155.F|
000010B0: 54 25 B2 30 00 C3 15 0A 05 8E 00 F6 15 14 05 8D |T%.0............|
000010C0: 37 31 30 30 3A 81 53 4C B2 31 A4 31 30 3A 53 4C |7100:.SL.1.10:SL|
000010D0: B2 53 4C AC 32 3A 8D 31 38 30 30 3A 53 4C B2 53 |.SL.2:.1800:SL.S|
000010E0: 4C AD 32 3A 8D 31 39 30 30 3A 82 53 4C 00 26 16 |L.2:.1900:.SL.&.|
000010F0: 46 05 8D 37 31 34 30 3A 8B 53 4C 24 B2 22 58 22 |F..7140:.SL$."X"|
00001100: A7 8D 33 34 30 31 3A 8D 33 34 31 30 3A 8D 33 34 |..3401:.3410:.34|
00001110: 33 30 3A 45 46 B2 30 3A 89 31 33 30 30 00 2C 16 |30:EF.0:.1300.,.|
00001120: 73 05 8E 00 62 16 78 05 8D 37 33 30 30 3A 81 53 |s...b.x..7300:.S|
00001130: 4C B2 31 A4 34 3A 8D 32 36 30 30 3A 82 53 4C 3A |L.1.4:.2600:.SL:|
00001140: 81 4C 50 B2 31 A4 C5 28 4C 44 24 28 32 29 29 3A |.LP.1..(LD$(2)):|
00001150: 8D 32 33 30 30 3A 82 4C 50 00 8D 16 AA 05 8D 37 |.2300:.LP......7|
00001160: 33 34 30 3A 8B 53 4C 24 B2 22 58 22 A7 8D 33 34 |340:.SL$."X"..34|
00001170: 30 31 3A 8D 33 34 31 30 3A 8D 33 34 33 30 3A 89 |01:.3410:.3430:.|
00001180: 31 34 30 30 00 A8 16 B4 05 8B 53 4C 24 B2 C7 28 |1400......SL$..(|
00001190: 31 33 33 29 A7 8D 37 30 30 3A 89 31 34 30 30 00 |133)..700:.1400.|
000011A0: AE 16 D7 05 8E 00 CA 16 DC 05 8D 37 35 30 30 3A |...........7500:|
000011B0: 81 53 4C B2 31 A4 35 3A 8D 35 38 30 30 3A 82 53 |.SL.1.5:.5800:.S|
000011C0: 4C 00 D4 16 E6 05 8D 37 35 33 30 00 F9 16 0E 06 |L......7530.....|
000011D0: 8B 53 4C 24 B2 22 58 22 A7 8D 33 34 30 31 3A 8D |.SL$."X"..3401:.|
000011E0: 33 34 31 30 3A 8D 33 34 33 30 3A 89 31 35 30 30 |3410:.3430:.1500|
000011F0: 00 FF 16 3B 06 8E 00 09 17 3F 06 8D 39 30 30 30 |...;.....?..9000|
00001200: 00 30 17 40 06 45 46 B2 31 3A 97 32 31 34 2C 54 |.0.@.EF.1:.214,T|
00001210: 56 28 53 4C 29 3A 97 32 31 31 2C 54 48 28 53 4C |V(SL):.211,TH(SL|
00001220: 29 AA 31 3A 9E 56 48 00 5E 17 4A 06 99 C8 28 55 |).1:.VH.^.J...(U|
00001230: 4C 24 2C 4C 46 28 53 4C 29 29 AA 22 20 22 3B 3A |L$,LF(SL))." ";:|
00001240: 97 32 31 31 2C 54 48 28 53 4C 29 AA 31 3A 9E 56 |.211,TH(SL).1:.V|
00001250: 48 3A 8D 34 30 00 6E 17 4C 06 53 4C 24 28 53 4C |H:.40.n.L.SL$(SL|
00001260: 29 B2 44 55 24 00 84 17 4F 06 8B 20 53 4C 24 28 |).DU$...O.. SL$(|
00001270: 53 4C 29 B2 22 22 A7 31 35 39 39 00 A0 17 54 06 |SL)."".1599...T.|
00001280: 8B C3 28 53 4C 24 28 53 4C 29 29 B1 4C 46 28 53 |..(SL$(SL)).LF(S|
00001290: 4C 29 A7 31 35 39 39 00 E0 17 5E 06 8B 53 4C B1 |L).1599...^..SL.|
000012A0: 31 AF 53 4C AD 32 B3 B1 B5 28 53 4C AD 32 29 AF |1.SL.2...(SL.2).|
000012B0: 53 4C 24 28 53 4C AB 31 29 B3 B1 22 49 4E 41 43 |SL$(SL.1).."INAC|
000012C0: 54 49 56 45 22 AF C5 28 53 4C 24 28 53 4C 29 29 |TIVE"..(SL$(SL))|
000012D0: B3 31 A7 31 35 39 39 00 02 18 63 06 8B 53 4C B3 |.1.1599...c..SL.|
000012E0: 33 AF 53 4C 24 28 53 4C 29 B2 22 49 4E 41 43 54 |3.SL$(SL)."INACT|
000012F0: 49 56 45 22 A7 31 35 39 39 00 21 18 68 06 8B 53 |IVE".1599.!.h..S|
00001300: 4C 24 28 53 4C 29 B3 B1 22 49 4E 41 43 54 49 56 |L$(SL).."INACTIV|
00001310: 45 22 A7 89 31 36 34 35 00 6A 18 69 06 4E 58 B2 |E"..1645.j.i.NX.|
00001320: 53 4C 3A 81 58 4C B2 58 4C A4 32 30 3A 53 4C 24 |SL:.XL.XL.20:SL$|
00001330: 28 58 4C 29 B2 22 49 4E 41 43 54 49 56 45 22 3A |(XL)."INACTIVE":|
00001340: 8D 31 38 30 30 3A 53 4C B2 53 4C AA 31 3A 53 4C |.1800:SL.SL.1:SL|
00001350: 24 28 53 4C 29 B2 22 30 22 3A 8D 31 38 30 30 3A |$(SL)."0":.1800:|
00001360: 82 00 84 18 6A 06 8D 32 32 30 30 3A 58 4C B2 58 |....j..2200:XL.X|
00001370: 4C AD 32 AB 31 3A 89 31 36 39 30 00 A2 18 6D 06 |L.2.1:.1690...m.|
00001380: 8B 53 4C B3 B1 31 AF C5 28 53 4C 24 28 53 4C 29 |.SL..1..(SL$(SL)|
00001390: 29 B1 32 34 A7 31 35 39 39 00 B3 18 72 06 8B 20 |).24.1599...r.. |
000013A0: 53 4C B2 31 A7 89 31 36 39 30 00 DD 18 73 06 8B |SL.1..1690...s..|
000013B0: 53 4C AD 32 B3 B1 B5 28 53 4C AD 32 29 A7 8D 32 |SL.2...(SL.2)..2|
000013C0: 32 30 30 3A 8B 4D 43 25 AB 54 55 25 B3 30 A7 89 |200:.MC%.TU%.0..|
000013D0: 31 35 39 39 00 08 19 75 06 8F 20 49 46 20 43 48 |1599...u.. IF CH|
000013E0: 41 52 2E 20 55 53 45 44 20 54 55 25 3E 4D 43 25 |AR. USED TU%>MC%|
000013F0: 20 4D 41 58 20 54 48 45 4E 20 45 52 52 4F 52 00 | MAX THEN ERROR.|
00001400: 0E 19 9A 06 8E 00 18 19 A3 06 8D 39 30 30 30 00 |...........9000.|
00001410: 21 19 A4 06 45 46 B2 31 00 57 19 AE 06 97 32 31 |!...EF.1.W....21|
00001420: 34 2C 54 56 28 53 4C AC 32 29 3A 97 32 31 31 2C |4,TV(SL.2):.211,|
00001430: 31 34 3A 9E 56 48 3A 99 C8 28 55 4C 24 2C C5 28 |14:.VH:..(UL$,.(|
00001440: 53 4C 24 28 53 4C AC 32 AA 31 29 29 29 3B 00 77 |SL$(SL.2.1)));.w|
00001450: 19 B3 06 97 32 31 31 2C 31 34 3A 9E 56 48 3A 8D |....211,14:.VH:.|
00001460: 34 30 3A 44 46 24 28 53 4C 29 B2 44 55 24 00 9B |40:DF$(SL).DU$..|
00001470: 19 B8 06 8B C3 28 44 46 24 28 53 4C 29 29 B1 C5 |.....(DF$(SL))..|
00001480: 28 53 4C 24 28 53 4C AC 32 AA 31 29 29 A7 31 36 |(SL$(SL.2.1)).16|
00001490: 39 39 00 A5 19 C2 06 8D 31 39 30 30 00 AB 19 FE |99......1900....|
000014A0: 06 8E 00 EF 19 08 07 97 32 31 34 2C 54 56 28 53 |........214,TV(S|
000014B0: 4C 29 3A 97 32 31 31 2C 54 48 28 53 4C 29 AA 31 |L):.211,TH(SL).1|
000014C0: 3A 9E 56 48 3A 99 C8 28 42 4C 24 2C 4C 46 28 53 |:.VH:..(BL$,LF(S|
000014D0: 4C 29 29 3B 3A 97 32 31 31 2C 54 48 28 53 4C 29 |L));:.211,TH(SL)|
000014E0: AA 31 3A 9E 56 48 00 1B 1A 0D 07 8B 53 4C B1 31 |.1:.VH......SL.1|
000014F0: AF 53 4C AD 32 B3 B1 B5 28 53 4C AD 32 29 AF C5 |.SL.2...(SL.2)..|
00001500: 28 53 4C 24 28 53 4C 29 29 B3 31 30 A7 99 22 20 |(SL$(SL)).10.." |
00001510: 22 3B 00 2A 1A 12 07 99 53 4C 24 28 53 4C 29 3A |";.*....SL$(SL):|
00001520: 8E 00 70 1A 6C 07 97 32 31 31 2C 31 34 3A 97 32 |..p.l..211,14:.2|
00001530: 31 34 2C 54 56 28 53 4C AC 32 29 3A 9E 56 48 3A |14,TV(SL.2):.VH:|
00001540: 81 58 B2 31 34 A4 33 38 3A 99 22 20 22 3B 3A 82 |.X.14.38:." ";:.|
00001550: 3A 97 32 31 31 2C 31 34 3A 9E 56 48 3A 99 44 46 |:.211,14:.VH:.DF|
00001560: 24 28 53 4C 29 3A 8E 00 7A 1A D0 07 45 46 B2 31 |$(SL):..z...EF.1|
00001570: 31 00 9D 1A 34 08 97 32 31 31 2C 48 28 31 29 3A |1...4..211,H(1):|
00001580: 97 32 31 34 2C 56 28 31 29 3A 9E 56 48 3A 99 4E |.214,V(1):.VH:.N|
00001590: 4C 24 3A 8E 00 C7 1A 98 08 54 55 25 B2 30 3A 81 |L$:......TU%.0:.|
000015A0: 4C 53 B2 33 A4 32 31 A9 32 3A 54 55 25 B2 54 55 |LS.3.21.2:TU%.TU|
000015B0: 25 AA C5 28 53 4C 24 28 4C 53 29 29 3A 82 00 FC |%..(SL$(LS)):...|
000015C0: 1A A2 08 97 32 31 34 2C 31 37 3A 97 32 31 31 2C |....214,17:.211,|
000015D0: 32 38 3A 9E 56 48 3A 99 C9 28 42 4C 24 AA C4 28 |28:.VH:..(BL$..(|
000015E0: 54 55 25 29 2C 33 29 3A 97 32 31 31 2C 32 38 3A |TU%),3):.211,28:|
000015F0: 9E 56 48 00 17 1B A7 08 99 C9 28 42 4C 24 AA C4 |.VH.......(BL$..|
00001600: 28 4D 43 25 AB 54 55 25 29 2C 33 29 3A 8E 00 31 |(MC%.TU%),3):..1|
00001610: 1B FC 08 97 32 31 34 2C 4C 50 AA 31 30 3A 97 32 |....214,LP.10:.2|
00001620: 31 31 2C 33 3A 9E 56 48 00 4C 1B FD 08 99 C8 28 |11,3:.VH.L.....(|
00001630: 42 4C 24 2C 33 36 29 3B 3A 97 32 31 31 2C 33 3A |BL$,36);:.211,3:|
00001640: 9E 56 48 00 61 1B FE 08 99 53 4C 24 28 4C 50 25 |.VH.a....SL$(LP%|
00001650: 28 4C 50 2C 31 29 29 3B 00 88 1B 00 09 97 32 31 |(LP,1));......21|
00001660: 31 2C 31 34 3A 9E 56 48 3A 50 50 B2 32 3A 8D 32 |1,14:.VH:PP.2:.2|
00001670: 33 35 30 3A 97 32 31 31 2C 31 36 3A 9E 56 48 00 |350:.211,16:.VH.|
00001680: D0 1B 01 09 99 53 4C 24 28 4C 50 25 28 4C 50 2C |.....SL$(LP%(LP,|
00001690: 33 29 29 3B 3A 97 32 31 31 2C 32 37 3A 9E 56 48 |3));:.211,27:.VH|
000016A0: 3A 50 50 B2 34 3A 8D 32 33 35 30 3A 97 32 31 31 |:PP.4:.2350:.211|
000016B0: 2C 32 39 3A 9E 56 48 3A 99 53 4C 24 28 4C 50 25 |,29:.VH:.SL$(LP%|
000016C0: 28 4C 50 2C 35 29 29 00 D6 1B 02 09 8E 00 15 1C |(LP,5)).........|
000016D0: 2E 09 8B 4C 50 25 28 4C 50 2C 50 50 29 B3 33 32 |...LP%(LP,PP).32|
000016E0: AF 4C 50 25 28 4C 50 2C 50 50 29 B1 30 A7 99 22 |.LP%(LP,PP).0.."|
000016F0: 12 22 C7 28 4C 50 25 28 4C 50 2C 50 50 29 AA 36 |.".(LP%(LP,PP).6|
00001700: 34 29 22 92 22 3B 3A 89 32 33 36 30 00 29 1C 33 |4)".";:.2360.).3|
00001710: 09 99 C7 28 4C 50 25 28 4C 50 2C 50 50 29 29 3B |...(LP%(LP,PP));|
00001720: 00 2F 1C 38 09 8E 00 39 1C C3 09 8D 39 30 30 30 |./.8...9....9000|
00001730: 00 42 1C C4 09 45 46 B2 31 00 82 1C CE 09 97 32 |.B...EF.1......2|
00001740: 31 34 2C 56 43 28 53 4C 29 3A 97 32 31 31 2C 48 |14,VC(SL):.211,H|
00001750: 43 28 53 4C 29 AA 31 3A 9E 56 48 3A 99 C8 28 55 |C(SL).1:.VH:..(U|
00001760: 4C 24 2C 4C 43 28 53 4C 29 29 3B 3A 97 32 31 31 |L$,LC(SL));:.211|
00001770: 2C 48 43 28 53 4C 29 AA 31 00 96 1C D3 09 8D 34 |,HC(SL).1......4|
00001780: 30 3A 4C 44 24 28 53 4C 29 B2 44 55 24 00 C6 1C |0:LD$(SL).DU$...|
00001790: D8 09 8B C3 28 4C 44 24 28 53 4C 29 29 B1 4C 43 |....(LD$(SL)).LC|
000017A0: 28 53 4C 29 B0 28 C5 28 4C 44 24 28 53 4C 29 29 |(SL).(.(LD$(SL))|
000017B0: B2 30 AF 53 4C B3 34 29 A7 32 34 39 39 00 CC 1C |.0.SL.4).2499...|
000017C0: 1E 0A 8E 00 F9 1C 28 0A 97 32 31 34 2C 56 43 28 |......(..214,VC(|
000017D0: 53 4C 29 3A 97 32 31 31 2C 48 43 28 53 4C 29 AA |SL):.211,HC(SL).|
000017E0: 31 3A 9E 56 48 3A 99 4C 44 24 28 53 4C 29 3A 8E |1:.VH:.LD$(SL):.|
000017F0: 00 2E 1D 8C 0A 45 46 B2 31 3A 81 58 B2 31 A4 35 |.....EF.1:.X.1.5|
00001800: 3A 97 32 31 34 2C 53 4C AA 31 30 3A 97 32 31 31 |:.214,SL.10:.211|
00001810: 2C 48 50 28 58 29 3A 9E 56 48 3A 8D 32 38 30 30 |,HP(X):.VH:.2800|
00001820: 3A 82 58 3A 8E 00 53 1D F0 0A 99 C8 28 42 4C 24 |:.X:..S.....(BL$|
00001830: 2C 33 39 AB 48 50 28 58 29 29 3B 3A 97 32 31 31 |,39.HP(X));:.211|
00001840: 2C 48 50 28 58 29 3A 9E 56 48 00 7C 1D F1 0A 8D |,HP(X):.VH.|....|
00001850: 32 30 3A 4C 50 24 B2 58 24 3A 8B 4C 50 24 B2 C7 |20:LP$.X$:.LP$..|
00001860: 28 31 33 29 A7 4C 50 24 B2 C7 28 30 29 3A 89 32 |(13).LP$..(0):.2|
00001870: 38 39 30 00 8A 1D F2 0A 4D 53 25 28 53 4C 29 B2 |890.....MS%(SL).|
00001880: 30 00 AA 1D F5 0A 91 58 89 32 38 31 30 2C 32 38 |0......X.2810,28|
00001890: 33 30 2C 32 38 31 30 2C 32 38 33 30 2C 32 38 31 |30,2810,2830,281|
000018A0: 30 00 E1 1D FA 0A 8B C6 28 4C 50 24 29 AD 32 B3 |0.......(LP$).2.|
000018B0: B1 B5 28 C6 28 4C 50 24 29 AD 32 29 B0 4C 50 24 |..(.(LP$).2).LP$|
000018C0: B3 22 41 22 B0 4C 50 24 B1 22 54 22 A7 8D 39 30 |."A".LP$."T"..90|
000018D0: 30 30 3A 89 32 38 30 30 00 0F 1E 04 0B 99 53 4C |00:.2800......SL|
000018E0: 24 28 C6 28 4C 50 24 29 AB 36 34 29 3A 4C 50 25 |$(.(LP$).64):LP%|
000018F0: 28 53 4C 2C 58 29 B2 C6 28 4C 50 24 29 AB 36 34 |(SL,X)..(LP$).64|
00001900: 3A 89 32 38 39 35 00 39 1E 0E 0B 8B C6 28 4C 50 |:.2895.9.....(LP|
00001910: 24 29 B3 33 32 A7 99 22 12 22 C7 28 C6 28 4C 50 |$).32..".".(.(LP|
00001920: 24 29 AA 36 34 29 22 92 22 3B 3A 8D 39 30 30 30 |$).64)".";:.9000|
00001930: 00 42 1E 4A 0B 99 4C 50 24 00 57 1E 4C 0B 4C 50 |.B.J..LP$.W.L.LP|
00001940: 25 28 53 4C 2C 58 29 B2 C6 28 4C 50 24 29 00 85 |%(SL,X)..(LP$)..|
00001950: 1E 4F 0B 4D 53 25 28 53 4C 29 B2 28 28 4C 50 25 |.O.MS%(SL).((LP%|
00001960: 28 53 4C 2C 32 29 B2 31 29 AA 28 4C 50 25 28 53 |(SL,2).1).(LP%(S|
00001970: 4C 2C 34 29 B2 31 29 B1 30 29 3A 8E 00 98 1E B8 |L,4).1).0):.....|
00001980: 0B 98 31 2C 22 49 30 22 3A 44 55 24 B2 22 22 00 |..1,"I0":DU$."".|
00001990: B1 1E BA 0B 8D 33 30 39 30 30 3A 8B 45 31 25 B1 |.....30900:.E1%.|
000019A0: 32 30 A7 33 33 30 30 30 00 C1 1E BD 0B 9F 32 2C |20.33000......2,|
000019B0: 38 2C 30 2C 22 24 30 22 00 DA 1E C0 0B 8D 33 30 |8,0,"$0"......30|
000019C0: 39 30 30 3A 8B 45 31 25 B1 32 30 A7 33 33 30 30 |900:.E1%.20.3300|
000019D0: 30 00 EE 1E C2 0B 81 58 B2 31 A4 36 3A 8D 33 30 |0......X.1.6:.30|
000019E0: 34 30 30 3A 82 00 09 1F C7 0B 8D 33 30 34 30 30 |400:.......30400|
000019F0: 3A 8B 58 24 B3 B1 C7 28 33 34 29 A7 33 30 31 35 |:.X$...(34).3015|
00001A00: 00 30 1F CC 0B 8D 33 30 34 30 30 3A 8B 58 24 B3 |.0....30400:.X$.|
00001A10: B1 C7 28 33 34 29 A7 44 55 24 B2 44 55 24 AA 58 |..(34).DU$.DU$.X|
00001A20: 24 3A 89 33 30 32 30 00 3D 1F D1 0B 8D 33 30 31 |$:.3020.=....301|
00001A30: 30 30 3A 8E 00 61 1F E0 0B 8D 33 30 30 30 3A 8B |00:..a....3000:.|
00001A40: C8 28 44 55 24 2C 37 29 B3 B1 22 50 52 4F 47 52 |.(DU$,7).."PROGR|
00001A50: 41 4D 22 A7 33 30 36 30 00 77 1F E5 0B 45 4D B2 |AM".3060.w...EM.|
00001A60: 30 3A 8D 33 31 30 30 30 3A 89 33 30 34 30 00 7D |0:.31000:.3040.}|
00001A70: 1F F4 0B 8E 00 A0 1F FE 0B 8D 33 30 30 30 3A 8B |..........3000:.|
00001A80: C8 28 44 55 24 2C 37 29 B2 22 50 52 4F 47 52 41 |.(DU$,7)."PROGRA|
00001A90: 4D 22 A7 33 30 38 30 00 B1 1F 03 0C 8D 33 31 33 |M".3080......313|
00001AA0: 30 30 3A 89 33 30 37 30 00 B7 1F 08 0C 8E 00 D8 |00:.3070........|
00001AB0: 1F 0A 0C 8D 33 30 30 30 3A 8B C8 28 44 55 24 2C |....3000:..(DU$,|
00001AC0: 34 29 B3 B1 22 44 41 54 41 22 A7 33 30 38 39 00 |4).."DATA".3089.|
00001AD0: EE 1F 0C 0C 45 4D B2 31 3A 8D 33 31 30 30 30 3A |....EM.1:.31000:|
00001AE0: 89 33 30 38 32 00 F4 1F 11 0C 8E 00 14 20 12 0C |.3082........ ..|
00001AF0: 8D 33 30 30 30 3A 8B C8 28 44 55 24 2C 34 29 B2 |.3000:..(DU$,4).|
00001B00: 22 44 41 54 41 22 A7 33 30 39 39 00 28 20 17 0C |"DATA".3099.( ..|
00001B10: 8D 33 31 31 30 30 3A 8B 43 49 A7 33 30 39 30 00 |.31100:.CI.3090.|
00001B20: 2E 20 1B 0C 8E 00 41 20 1C 0C 4E 41 25 B2 30 3A |. ....A ..NA%.0:|
00001B30: 8D 33 30 30 30 30 3A 8E 00 63 20 2B 0C 98 31 2C |.30000:..c +..1,|
00001B40: 22 50 22 AA C7 28 32 AA 39 36 29 AA C7 28 31 29 |"P"..(2.96)..(1)|
00001B50: AA C7 28 30 29 AA C7 28 31 29 00 6E 20 2C 0C 8D |..(0)..(1).n ,..|
00001B60: 33 30 39 30 30 00 7C 20 2D 0C 44 55 24 B2 C4 28 |30900.| -.DU$..(|
00001B70: 54 52 29 00 87 20 2E 0C 81 59 B2 31 A4 33 00 B7 |TR).. ...Y.1.3..|
00001B80: 20 30 0C 44 55 24 B2 44 55 24 AA C7 28 31 33 29 | 0.DU$.DU$..(13)|
00001B90: AA C4 28 54 4E 28 59 29 29 AA C7 28 31 33 29 AA |..(TN(Y))..(13).|
00001BA0: 22 4E 4F 54 20 53 4F 52 54 45 44 22 3A 82 00 C4 |"NOT SORTED":...|
00001BB0: 20 32 0C 8D 33 30 33 37 30 3A 8E 00 D1 20 3A 0C | 2..30370:... :.|
00001BC0: 8D 33 30 31 30 30 3A 8E 00 EA 20 44 0C 8F 20 43 |.30100:... D.. C|
00001BD0: 52 45 41 54 45 20 4C 41 53 54 20 52 45 43 4F 52 |REATE LAST RECOR|
00001BE0: 44 00 FD 20 46 0C 81 5A B2 33 30 30 A4 35 30 30 |D.. F..Z.300.500|
00001BF0: A9 32 30 30 00 18 21 48 0C 58 B2 B5 28 5A AD 32 |.200..!H.X..(Z.2|
00001C00: 35 36 29 3A 59 B2 5A AB 28 58 AC 32 35 36 29 00 |56):Y.Z.(X.256).|
00001C10: 2B 21 4A 0C 99 22 58 3D 22 3B 58 2C 22 59 3D 22 |+!J.."X=";X,"Y="|
00001C20: 3B 59 00 4D 21 4C 0C 98 31 2C 22 50 22 AA C7 28 |;Y.M!L..1,"P"..(|
00001C30: 32 AA 39 36 29 AA C7 28 59 29 AA C7 28 58 29 AA |2.96)..(Y)..(X).|
00001C40: C7 28 31 29 00 5D 21 4E 0C 44 55 24 B2 22 44 55 |.(1).]!N.DU$."DU|
00001C50: 4D 4D 59 22 00 7D 21 50 0C 44 55 24 B2 44 55 24 |MMY".}!P.DU$.DU$|
00001C60: AA C7 28 31 33 29 AA 44 55 24 AA C7 28 31 33 29 |..(13).DU$..(13)|
00001C70: AA 44 55 24 00 88 21 52 0C 8D 33 30 33 37 30 00 |.DU$..!R..30370.|
00001C80: 8F 21 54 0C 82 5A 00 95 21 58 0C 8E 00 CC 21 E4 |.!T..Z..!X....!.|
00001C90: 0C 81 58 B2 31 A4 33 3A 4E 41 25 B2 35 AA 58 3A |..X.1.3:NA%.5.X:|
00001CA0: 8D 33 30 30 35 30 3A 81 44 55 B2 31 A4 31 30 3A |.30050:.DU.1.10:|
00001CB0: 8D 33 30 33 30 30 3A 82 3A 8D 33 30 31 30 30 3A |.30300:.:.30100:|
00001CC0: 82 3A 8E 00 D2 21 43 0D 8F 00 E5 21 48 0D 4E 41 |.:...!C....!H.NA|
00001CD0: 25 B2 31 3A 8D 33 30 30 30 30 3A 8E 00 F8 21 49 |%.1:.30000:...!I|
00001CE0: 0D 4E 41 25 B2 32 3A 8D 33 30 30 30 30 3A 8E 00 |.NA%.2:.30000:..|
00001CF0: 18 22 52 0D 81 58 B2 31 A4 32 31 3A 8D 33 30 32 |."R..X.1.21:.302|
00001D00: 35 30 3A 53 4C 24 28 58 29 B2 44 55 24 3A 82 00 |50:SL$(X).DU$:..|
00001D10: 38 22 54 0D 81 58 B2 31 A4 31 30 3A 8D 33 30 32 |8"T..X.1.10:.302|
00001D20: 35 30 3A 44 46 24 28 58 29 B2 44 55 24 3A 82 00 |50:DF$(X).DU$:..|
00001D30: 57 22 56 0D 81 58 B2 31 A4 34 3A 8D 33 30 32 35 |W"V..X.1.4:.3025|
00001D40: 30 3A 4C 44 24 28 58 29 B2 44 55 24 3A 82 00 92 |0:LD$(X).DU$:...|
00001D50: 22 58 0D 81 58 B2 31 A4 39 3A 8D 33 30 32 30 30 |"X..X.1.9:.30200|
00001D60: 3A 4D 53 25 28 58 29 B2 44 55 3A 81 59 B2 31 A4 |:MS%(X).DU:.Y.1.|
00001D70: 35 3A 8D 33 30 32 30 30 3A 4C 50 25 28 58 2C 59 |5:.30200:LP%(X,Y|
00001D80: 29 B2 44 55 3A 82 59 2C 58 00 B3 22 5A 0D 81 59 |).DU:.Y,X.."Z..Y|
00001D90: B2 31 A4 35 3A 8D 33 30 32 35 30 3A 45 46 24 28 |.1.5:.30250:EF$(|
00001DA0: 59 29 B2 44 55 24 3A 82 3A 8E 00 D3 22 5C 0D 81 |Y).DU$:.:..."\..|
00001DB0: 58 B2 31 A4 32 31 3A 44 55 24 B2 53 4C 24 28 58 |X.1.21:DU$.SL$(X|
00001DC0: 29 3A 8D 33 30 33 35 30 3A 82 00 F3 22 5E 0D 81 |):.30350:..."^..|
00001DD0: 58 B2 31 A4 31 30 3A 44 55 24 B2 44 46 24 28 58 |X.1.10:DU$.DF$(X|
00001DE0: 29 3A 8D 33 30 33 35 30 3A 82 00 12 23 5F 0D 81 |):.30350:...#_..|
00001DF0: 58 B2 31 A4 34 3A 44 55 24 B2 4C 44 24 28 58 29 |X.1.4:DU$.LD$(X)|
00001E00: 3A 8D 33 30 33 35 30 3A 82 00 4D 23 60 0D 81 58 |:.30350:..M#`..X|
00001E10: B2 31 A4 39 3A 44 55 B2 4D 53 25 28 58 29 3A 8D |.1.9:DU.MS%(X):.|
00001E20: 33 30 33 30 30 3A 81 59 B2 31 A4 35 3A 44 55 B2 |30300:.Y.1.5:DU.|
00001E30: 4C 50 25 28 58 2C 59 29 3A 8D 33 30 33 30 30 3A |LP%(X,Y):.30300:|
00001E40: 82 59 2C 58 00 6C 23 62 0D 81 59 B2 31 A4 35 3A |.Y,X.l#b..Y.1.5:|
00001E50: 44 55 24 B2 45 46 24 28 59 29 3A 8D 33 30 33 35 |DU$.EF$(Y):.3035|
00001E60: 30 3A 82 00 77 23 64 0D 45 46 B2 30 3A 8E 00 84 |0:..w#d.EF.0:...|
00001E70: 23 66 0D 8D 33 30 31 30 30 3A 8E 00 A2 23 AC 0D |#f..30100:...#..|
00001E80: 4E 41 25 B2 33 3A 8D 33 30 30 30 30 3A 44 55 B2 |NA%.3:.30000:DU.|
00001E90: 54 52 3A 8D 33 30 33 30 30 00 AF 23 B6 0D 8D 33 |TR:.30300..#...3|
00001EA0: 30 31 30 30 3A 8E 00 C2 23 D8 0E 4E 41 25 B2 34 |0100:...#..NA%.4|
00001EB0: 3A 8D 33 30 30 30 30 3A 8E 00 00 24 E2 0E 8D 33 |:.30000:...$...3|
00001EC0: 30 32 30 30 3A 46 54 25 B2 44 55 3A 81 53 4C B2 |0200:FT%.DU:.SL.|
00001ED0: 31 A4 31 34 3A 8D 33 30 32 35 30 3A 48 57 24 28 |1.14:.30250:HW$(|
00001EE0: 53 4C 29 B2 44 55 24 3A 82 3A 50 53 25 B2 C5 28 |SL).DU$:.:PS%..(|
00001EF0: 48 57 24 28 31 29 29 00 17 24 E7 0E 4E 44 25 B2 |HW$(1))..$..ND%.|
00001F00: 37 AA C5 28 48 57 24 28 31 34 29 29 3A 8E 00 28 |7..(HW$(14)):..(|
00001F10: 24 EC 0E 4E 41 25 B2 35 3A 8D 33 30 30 30 30 00 |$..NA%.5:.30000.|
00001F20: 3D 24 EE 0E 4E 44 25 B2 37 AA C5 28 48 57 24 28 |=$..ND%.7..(HW$(|
00001F30: 31 34 29 29 00 6F 24 F0 0E 44 55 B2 46 54 25 3A |14)).o$..DU.FT%:|
00001F40: 8D 33 30 33 30 30 3A 81 53 4C B2 31 A4 31 34 3A |.30300:.SL.1.14:|
00001F50: 44 55 24 B2 48 57 24 28 53 4C 29 3A 8D 33 30 33 |DU$.HW$(SL):.303|
00001F60: 35 30 3A 82 3A 8E 00 84 24 F1 0E 98 36 2C 48 57 |50:.:...$...6,HW|
00001F70: 24 28 53 4C 29 3A 82 53 4C 3A 8E 00 91 24 F6 0E |$(SL):.SL:...$..|
00001F80: 8D 33 30 31 30 30 3A 8E 00 97 24 3C 0F 8E 00 A1 |.30100:...$<....|
00001F90: 24 43 16 8D 39 30 30 30 00 C6 24 44 16 45 46 B2 |$C..9000..$D.EF.|
00001FA0: 31 3A 97 32 31 34 2C 45 56 28 53 4C 29 3A 97 32 |1:.214,EV(SL):.2|
00001FB0: 31 31 2C 45 48 28 53 4C 29 3A 9E 56 48 00 EA 24 |11,EH(SL):.VH..$|
00001FC0: 4E 16 99 C8 28 55 4C 24 2C 4C 45 28 53 4C 29 29 |N...(UL$,LE(SL))|
00001FD0: 3B 3A 97 32 31 31 2C 45 48 28 53 4C 29 3A 9E 56 |;:.211,EH(SL):.V|
00001FE0: 48 00 0F 25 53 16 8D 34 30 3A 45 46 24 28 53 4C |H..%S..40:EF$(SL|
00001FF0: 29 B2 44 55 24 3A 8B 45 46 24 28 53 4C 29 B2 22 |).DU$:.EF$(SL)."|
00002000: 22 A7 35 36 39 39 00 63 25 58 16 8B C3 28 45 46 |".5699.c%X...(EF|
00002010: 24 28 53 4C 29 29 B1 4C 45 28 53 4C 29 B0 53 4C |$(SL)).LE(SL).SL|
00002020: B3 33 AF 45 46 24 28 53 4C 29 B3 B1 CA 28 53 43 |.3.EF$(SL)...(SC|
00002030: 24 2C 53 4C AA 28 53 4C B2 32 29 2C 31 29 AF 45 |$,SL.(SL.2),1).E|
00002040: 46 24 28 53 4C 29 B3 B1 CA 28 53 43 24 2C 53 4C |F$(SL)...(SC$,SL|
00002050: AC 32 2C 31 29 A7 35 36 39 39 00 69 25 9E 16 8E |.2,1).5699.i%...|
00002060: 00 A2 25 A8 16 97 32 31 34 2C 45 56 28 53 4C 29 |..%...214,EV(SL)|
00002070: 3A 97 32 31 31 2C 45 48 28 53 4C 29 3A 9E 56 48 |:.211,EH(SL):.VH|
00002080: 3A 99 C9 28 42 4C 24 AA 45 46 24 28 53 4C 29 2C |:..(BL$.EF$(SL),|
00002090: 4C 45 28 53 4C 29 29 3A 8E 00 BD 25 38 18 8D 33 |LE(SL)):...%8..3|
000020A0: 32 30 30 30 3A 8B C6 28 58 24 29 B2 31 33 33 A7 |2000:..(X$).133.|
000020B0: 36 32 34 30 00 E2 25 3A 18 8F 20 49 4E 53 45 52 |6240..%:.. INSER|
000020C0: 54 20 43 48 4B 20 46 4F 52 20 52 49 47 48 54 20 |T CHK FOR RIGHT |
000020D0: 44 49 53 4B 20 48 45 52 45 00 EC 25 3D 18 8D 33 |DISK HERE..%=..3|
000020E0: 30 34 30 00 F7 25 40 18 8D 33 34 30 30 30 00 08 |040..%@..34000..|
000020F0: 26 41 18 98 31 2C 22 4E 30 3A 44 41 54 41 22 00 |&A..1,"N0:DATA".|
00002100: 24 26 42 18 8D 33 35 30 30 3A 8D 33 34 30 30 3A |$&B..3500:.3400:|
00002110: 8D 33 34 32 30 3A 8D 33 34 33 30 00 2E 26 4C 18 |.3420:.3430..&L.|
00002120: 8D 33 33 30 30 00 4A 26 56 18 8D 33 31 30 30 3A |.3300.J&V..3100:|
00002130: 8D 33 31 31 35 3A 8D 33 31 34 30 3A 8D 33 31 33 |.3115:.3140:.313|
00002140: 30 00 50 26 60 18 8E 00 59 26 58 1B 8D 32 30 30 |0.P&`...Y&X..200|
00002150: 00 9A 26 5D 1B 97 32 31 34 2C 35 3A 9E 56 48 3A |..&]..214,5:.VH:|
00002160: 99 22 12 41 92 20 4C 49 53 54 20 4E 41 4D 45 3E |.".A. LIST NAME>|
00002170: 3E 22 3A 99 3A 97 32 31 31 2C 32 3A 9E 56 48 3A |>":.:.211,2:.VH:|
00002180: 99 22 12 20 46 49 45 4C 44 20 4E 41 4D 45 20 22 |.". FIELD NAME "|
00002190: 3B 00 C1 26 5F 1B 97 32 31 31 2C 31 37 3A 9E 56 |;..&_..211,17:.V|
000021A0: 48 3A 99 22 20 43 48 41 52 41 43 54 45 52 20 4C |H:." CHARACTER L|
000021B0: 49 4D 49 54 20 22 3A 99 00 FA 26 67 1B 81 58 B2 |IMIT ":...&g..X.|
000021C0: 31 A4 31 30 3A 99 22 12 22 C7 28 36 34 AA 58 AC |1.10:.".".(64.X.|
000021D0: 32 29 3B 3A 97 32 31 31 2C 31 34 3A 9E 56 48 3A |2);:.211,14:.VH:|
000021E0: 99 22 12 22 C7 28 36 35 AA 58 AC 32 29 3A 82 3A |.".".(65.X.2):.:|
000021F0: 99 00 32 27 6C 1B 97 32 31 34 2C 31 35 3A 97 32 |..2'l..214,15:.2|
00002200: 31 31 2C 32 30 3A 9E 56 48 3A 99 22 54 4F 54 41 |11,20:.VH:."TOTA|
00002210: 4C 20 43 48 41 52 41 43 54 45 52 53 22 3A 97 32 |L CHARACTERS":.2|
00002220: 31 31 2C 32 30 3A 9E 56 48 00 78 27 6E 1B 99 22 |11,20:.VH.x'n.."|
00002230: 2D 2D 2D 2D 2D 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----- ----------|
00002240: 22 3A 97 32 31 31 2C 32 30 3A 9E 56 48 3A 99 22 |":.211,20:.VH:."|
00002250: 55 53 45 44 20 3E 3E 22 3A 97 32 31 31 2C 32 30 |USED >>":.211,20|
00002260: 3A 9E 56 48 3A 99 22 4C 45 46 54 20 3E 3E 22 00 |:.VH:."LEFT >>".|
00002270: B5 27 7B 1B 97 32 31 34 2C 32 30 3A 97 32 31 31 |.'{..214,20:.211|
00002280: 2C 31 30 3A 9E 56 48 3A 99 53 43 24 28 33 29 22 |,10:.VH:.SC$(3)"|
00002290: 20 28 41 2D 55 29 22 3A 99 53 43 24 28 36 29 3B | (A-U)":.SC$(6);|
000022A0: 3A 97 32 31 31 2C 32 37 3A 9E 56 48 00 DB 27 7C |:.211,27:.VH..'||
000022B0: 1B 99 22 28 5A 29 52 45 43 4F 52 44 22 3A 97 32 |.."(Z)RECORD":.2|
000022C0: 31 31 2C 31 32 3A 9E 56 48 3A 99 53 43 24 28 32 |11,12:.VH:.SC$(2|
000022D0: 29 3B 00 08 28 7D 1B 8B 50 53 25 B3 B1 30 20 A7 |);..(}..PS%..0 .|
000022E0: 97 32 31 34 2C 32 31 3A 97 32 31 31 2C 31 34 3A |.214,21:.211,14:|
000022F0: 9E 56 48 3A 99 22 28 59 29 50 52 49 4E 54 22 00 |.VH:."(Y)PRINT".|
00002300: 0E 28 7F 1B 8E 00 3B 28 80 1B 97 32 31 34 2C 32 |.(....;(...214,2|
00002310: 32 3A 97 32 31 31 2C 32 38 3A 9E 56 48 3A 99 C7 |2:.211,28:.VH:..|
00002320: 28 31 37 35 29 3B 3A 97 32 31 31 2C 32 38 3A 9E |(175);:.211,28:.|
00002330: 56 48 00 4A 28 81 1B 8D 32 30 3A 53 4C 24 B2 58 |VH.J(...20:SL$.X|
00002340: 24 00 74 28 82 1B 53 4C B2 C6 28 53 4C 24 29 AB |$.t(..SL..(SL$).|
00002350: 36 34 3A 8B 53 4C 24 B2 22 5A 22 B0 53 4C 24 B2 |64:.SL$."Z".SL$.|
00002360: 22 58 22 A7 99 3A 89 37 30 39 30 00 8D 28 83 1B |"X"..:.7090..(..|
00002370: 8B 53 4C 24 B2 22 59 22 A7 99 3A 8D 38 30 3A 89 |.SL$."Y"..:.80:.|
00002380: 37 30 34 30 00 BA 28 85 1B 8B 53 4C 24 B3 22 41 |7040..(...SL$."A|
00002390: 22 B0 53 4C 24 B1 22 55 22 B0 53 4C B1 28 58 4C |".SL$."U".SL.(XL|
000023A0: AA 31 29 AC 32 A7 8D 39 30 30 30 3A 89 37 30 34 |.1).2..9000:.704|
000023B0: 30 00 D7 28 94 1B 99 53 4C 24 3A 8D 31 36 30 30 |0..(...SL$:.1600|
000023C0: 3A 8B 53 4C B3 B1 32 32 A7 8D 31 38 30 30 00 15 |:.SL..22..1800..|
000023D0: 29 99 1B 8B 53 4C B2 32 AC 58 4C AA 32 AF 53 4C |)...SL.2.XL.2.SL|
000023E0: B3 32 31 A7 53 4C B2 53 4C AA 31 3A 8D 31 36 30 |.21.SL.SL.1:.160|
000023F0: 30 3A 8D 31 38 30 30 3A 58 4C B2 58 4C AA 31 3A |0:.1800:XL.XL.1:|
00002400: 8B 58 4C B2 31 31 A7 58 4C B2 31 30 00 1F 29 9E |.XL.11.XL.10..).|
00002410: 1B 89 37 30 34 30 00 25 29 B2 1B 8E 00 2E 29 BC |..7040.%).....).|
00002420: 1B 8D 32 30 30 00 76 29 C1 1B 97 32 31 34 2C 35 |..200.v)...214,5|
00002430: 3A 97 32 31 31 2C 36 3A 9E 56 48 3A 99 22 12 20 |:.211,6:.VH:.". |
00002440: 54 59 50 45 20 2A 20 46 4F 52 20 52 45 50 45 41 |TYPE * FOR REPEA|
00002450: 54 20 46 45 41 54 55 52 45 20 22 3A 97 32 31 34 |T FEATURE ":.214|
00002460: 2C 37 3A 97 32 31 31 2C 33 3A 9E 56 48 00 A2 29 |,7:.211,3:.VH..)|
00002470: C3 1B 99 22 20 4C 41 42 45 4C 20 22 3B 3A 97 32 |..." LABEL ";:.2|
00002480: 31 31 2C 31 34 3A 99 22 20 44 45 46 41 55 4C 54 |11,14:." DEFAULT|
00002490: 20 49 4E 50 55 54 22 3A 99 00 C8 29 CB 1B 97 32 | INPUT":...)...2|
000024A0: 31 34 2C 39 3A 81 58 B2 31 A4 31 30 3A 99 22 12 |14,9:.X.1.10:.".|
000024B0: 22 C7 28 36 34 AA 58 29 3A 82 3A 99 22 92 22 00 |".(64.X):.:.".".|
000024C0: 0E 2A DF 1B 97 32 31 34 2C 32 30 3A 97 32 31 31 |.*...214,20:.211|
000024D0: 2C 31 30 3A 99 53 43 24 28 33 29 22 20 28 41 2D |,10:.SC$(3)" (A-|
000024E0: 4A 29 22 3A 99 53 43 24 28 36 29 3B 3A 97 32 31 |J)":.SC$(6);:.21|
000024F0: 31 2C 32 37 3A 9E 56 48 3A 99 22 28 52 29 52 45 |1,27:.VH:."(R)RE|
00002500: 43 4F 52 44 22 00 4F 2A E1 1B 97 32 31 31 2C 31 |CORD".O*...211,1|
00002510: 32 3A 9E 56 48 3A 99 53 43 24 28 32 29 3B 3A 8B |2:.VH:.SC$(2);:.|
00002520: 50 53 25 B3 B1 30 A7 97 32 31 34 2C 32 31 3A 97 |PS%..0..214,21:.|
00002530: 32 31 31 2C 31 34 3A 9E 56 48 3A 99 22 28 50 29 |211,14:.VH:."(P)|
00002540: 50 52 49 4E 54 22 00 55 2A E3 1B 8E 00 82 2A E4 |PRINT".U*.....*.|
00002550: 1B 97 32 31 34 2C 32 32 3A 97 32 31 31 2C 32 38 |..214,22:.211,28|
00002560: 3A 9E 56 48 3A 99 C7 28 31 37 35 29 3B 3A 97 32 |:.VH:..(175);:.2|
00002570: 31 31 2C 32 38 3A 9E 56 48 00 91 2A E5 1B 8D 32 |11,28:.VH..*...2|
00002580: 30 3A 53 4C 24 B2 58 24 00 AF 2A E6 1B 3A 8B 53 |0:SL$.X$..*..:.S|
00002590: 4C 24 B2 22 52 22 B0 53 4C 24 B2 22 58 22 A7 99 |L$."R".SL$."X"..|
000025A0: 3A 89 37 31 39 30 00 C8 2A E7 1B 8B 53 4C 24 B2 |:.7190..*...SL$.|
000025B0: 22 50 22 A7 99 3A 8D 38 30 3A 89 37 31 34 30 00 |"P"..:.80:.7140.|
000025C0: E9 2A E9 1B 8B 53 4C 24 B3 22 41 22 B0 53 4C 24 |.*...SL$."A".SL$|
000025D0: B1 22 4A 22 A7 8D 39 30 30 30 3A 89 37 31 34 30 |."J"..9000:.7140|
000025E0: 00 21 2B F8 1B 99 53 4C 24 3A 53 4C B2 C6 28 53 |.!+...SL$:SL..(S|
000025F0: 4C 24 29 AB 36 34 3A 8B 53 4C 24 28 53 4C AC 32 |L$).64:.SL$(SL.2|
00002600: 29 B2 22 49 4E 41 43 54 49 56 45 22 A7 8D 39 30 |)."INACTIVE"..90|
00002610: 30 30 3A 89 37 31 34 30 00 2B 2B FD 1B 8D 31 37 |00:.7140.++...17|
00002620: 30 30 00 35 2B 02 1C 89 37 31 34 30 00 3B 2B 16 |00.5+...7140.;+.|
00002630: 1C 8E 00 44 2B 84 1C 8D 32 30 30 00 87 2B 8E 1C |...D+...200..+..|
00002640: 97 32 31 34 2C 35 3A 9E 56 48 3A 99 22 12 41 92 |.214,5:.VH:.".A.|
00002650: 20 4C 41 42 45 4C 20 57 49 44 54 48 22 3B 3A 97 | LABEL WIDTH";:.|
00002660: 32 31 31 2C 32 32 3A 9E 56 48 3A 99 22 12 42 92 |211,22:.VH:.".B.|
00002670: 20 4C 41 42 45 4C 20 48 45 49 47 48 54 22 00 BB | LABEL HEIGHT"..|
00002680: 2B 93 1C 99 22 12 43 92 20 48 4F 57 20 4D 41 4E |+...".C. HOW MAN|
00002690: 59 20 4C 41 42 45 4C 53 20 41 43 52 4F 53 53 3F |Y LABELS ACROSS?|
000026A0: 22 3A 99 22 12 44 92 20 4D 45 53 53 41 47 45 22 |":.".D. MESSAGE"|
000026B0: 3A 99 00 E9 2B A2 1C 99 22 4C 20 50 4F 53 49 54 |:...+..."L POSIT|
000026C0: 49 4F 4E 20 31 20 50 20 50 4F 53 49 54 49 4F 4E |ION 1 P POSITION|
000026D0: 20 32 20 50 20 50 4F 53 49 54 49 4F 4E 20 33 22 | 2 P POSITION 3"|
000026E0: 00 23 2C A3 1C 99 22 2D 20 2D 2D 2D 2D 2D 2D 2D |.#,..."- -------|
000026F0: 2D 2D 2D 20 2D 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |--- - ----------|
00002700: 20 2D 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 97 | - ----------":.|
00002710: 32 31 34 2C 31 31 3A 9E 56 48 00 67 2C A4 1C 81 |214,11:.VH.g,...|
00002720: 58 B2 31 A4 39 3A 99 22 12 22 58 22 92 22 3A 82 |X.1.9:."."X".":.|
00002730: 3A 97 32 31 31 2C 32 3A 9E 56 48 3A 99 22 3C 3C |:.211,2:.VH:."<<|
00002740: 46 31 3E 3E 20 46 4F 52 20 53 43 52 45 45 4E 20 |F1>> FOR SCREEN |
00002750: 4C 41 42 45 4C 20 4C 45 54 54 45 52 53 22 00 B0 |LABEL LETTERS"..|
00002760: 2C A7 1C 97 32 31 34 2C 32 31 3A 97 32 31 31 2C |,...214,21:.211,|
00002770: 36 3A 9E 56 48 3A 99 22 49 54 45 4D 20 54 4F 20 |6:.VH:."ITEM TO |
00002780: 45 44 49 54 20 28 41 2D 44 20 4F 52 20 31 2D 39 |EDIT (A-D OR 1-9|
00002790: 29 22 3A 99 53 43 24 28 36 29 3B 3A 97 32 31 31 |)":.SC$(6);:.211|
000027A0: 2C 32 37 3A 9E 56 48 00 D6 2C A8 1C 99 22 28 52 |,27:.VH..,..."(R|
000027B0: 29 52 45 43 4F 52 44 22 3A 97 32 31 31 2C 31 32 |)RECORD":.211,12|
000027C0: 3A 9E 56 48 3A 99 53 43 24 28 32 29 3B 00 02 2D |:.VH:.SC$(2);..-|
000027D0: A9 1C 8B 50 53 25 B3 B1 30 A7 97 32 31 34 2C 32 |...PS%..0..214,2|
000027E0: 32 3A 97 32 31 31 2C 31 34 3A 9E 56 48 3A 99 22 |2:.211,14:.VH:."|
000027F0: 28 50 29 50 52 49 4E 54 22 00 08 2D AB 1C 8E 00 |(P)PRINT"..-....|
00002800: 35 2D AC 1C 97 32 31 34 2C 32 33 3A 97 32 31 31 |5-...214,23:.211|
00002810: 2C 32 38 3A 9E 56 48 3A 99 C7 28 31 37 35 29 3B |,28:.VH:..(175);|
00002820: 3A 97 32 31 31 2C 32 38 3A 9E 56 48 00 4C 2D AD |:.211,28:.VH.L-.|
00002830: 1C A1 53 4C 24 3A 8B 20 53 4C 24 B2 22 22 A7 37 |..SL$:. SL$."".7|
00002840: 33 34 31 00 61 2D AE 1C 8B 20 53 4C 24 B2 C7 28 |341.a-... SL$..(|
00002850: 31 33 29 A7 37 33 36 30 00 8B 2D AF 1C 99 53 4C |13).7360..-...SL|
00002860: 24 3A 8B 53 4C 24 B2 22 52 22 B0 53 4C 24 B2 22 |$:.SL$."R".SL$."|
00002870: 58 22 B0 53 4C 24 B2 C7 28 31 33 33 29 A7 37 33 |X".SL$..(133).73|
00002880: 39 30 00 A2 2D B6 1C 8B 53 4C 24 B2 22 50 22 A7 |90..-...SL$."P".|
00002890: 8D 38 30 3A 89 37 33 34 30 00 DF 2D C0 1C 8B C5 |.80:.7340..-....|
000028A0: 28 53 4C 24 29 B2 30 AF 28 53 4C 24 B3 22 41 22 |(SL$).0.(SL$."A"|
000028B0: B0 53 4C 24 B1 22 44 22 29 B0 C5 28 53 4C 24 29 |.SL$."D")..(SL$)|
000028C0: B1 C5 28 4C 44 24 28 32 29 29 A7 8D 39 30 30 30 |..(LD$(2))..9000|
000028D0: 3A 89 37 33 34 30 00 11 2E CF 1C 8B 53 4C 24 B1 |:.7340......SL$.|
000028E0: 22 39 22 A7 53 4C B2 C6 28 53 4C 24 29 AB 36 34 |"9".SL..(SL$).64|
000028F0: 3A 8D 32 35 30 30 3A 8D 32 36 30 30 3A 8D 37 34 |:.2500:.2600:.74|
00002900: 30 30 3A 89 37 33 34 30 00 2E 2E D4 1C 53 4C B2 |00:.7340.....SL.|
00002910: C6 28 53 4C 24 29 AB 34 38 3A 8D 32 37 30 30 3A |.(SL$).48:.2700:|
00002920: 89 37 33 34 30 00 34 2E DE 1C 8E 00 6A 2E E3 1C |.7340.4.....j...|
00002930: 8B 43 4C 28 32 29 B3 B1 30 A7 97 32 31 34 2C 31 |.CL(2)..0..214,1|
00002940: 32 3A 99 22 12 22 3A 81 5A B2 31 A4 43 4C 28 32 |2:.".":.Z.1.CL(2|
00002950: 29 3A 99 C7 28 34 38 AA 5A 29 3A 82 3A 99 22 92 |):..(48.Z):.:.".|
00002960: 22 00 97 2E E5 1C 8B 20 43 4C 28 32 29 B3 39 A7 |"...... CL(2).9.|
00002970: 81 5A B2 43 4C 28 32 29 AA 31 A4 39 3A 97 32 31 |.Z.CL(2).1.9:.21|
00002980: 34 2C 31 31 AA 5A 3A 9E AB 38 36 38 3A 82 00 9D |4,11.Z:..868:...|
00002990: 2E E6 1C 8E 00 B9 2E E8 1C 81 4C 50 B2 31 A4 C5 |..........LP.1..|
000029A0: 28 4C 44 24 28 32 29 29 3A 8D 32 33 30 30 3A 82 |(LD$(2)):.2300:.|
000029B0: 00 FA 2E EA 1C 8B 4C 50 B3 B1 31 30 A7 81 4C 50 |......LP..10..LP|
000029C0: B2 C5 28 4C 44 24 28 32 29 29 AA 31 A4 39 3A 97 |..(LD$(2)).1.9:.|
000029D0: 32 31 34 2C 31 30 AA 4C 50 3A 97 32 31 31 2C 33 |214,10.LP:.211,3|
000029E0: 3A 9E 56 48 3A 99 C8 28 42 4C 24 2C 33 36 29 3A |:.VH:..(BL$,36):|
000029F0: 82 00 00 2F F2 1C 8E 00 09 2F 4C 1D 8D 32 30 30 |.../...../L..200|
00002A00: 00 3D 2F 56 1D 97 32 31 34 2C 38 3A 9E 56 48 3A |.=/V..214,8:.VH:|
00002A10: 99 22 12 41 92 20 50 52 49 4E 54 20 52 45 54 55 |.".A. PRINT RETU|
00002A20: 52 4E 20 41 44 44 52 45 53 53 3F 20 28 59 2F 4E |RN ADDRESS? (Y/N|
00002A30: 29 22 3A 99 00 86 2F 58 1D 99 22 12 42 92 20 53 |)":.../X..".B. S|
00002A40: 49 4E 47 4C 45 20 4F 52 20 43 4F 4E 54 49 4E 4F |INGLE OR CONTINO|
00002A50: 55 53 3F 20 28 53 2F 43 29 22 3A 99 3A 99 22 12 |US? (S/C)":.:.".|
00002A60: 43 92 20 4C 45 46 54 20 4D 41 52 47 49 4E 20 46 |C. LEFT MARGIN F|
00002A70: 4F 52 20 41 44 44 52 45 53 53 22 3A 99 00 D4 2F |OR ADDRESS":.../|
00002A80: 60 1D 99 22 12 44 92 20 45 4E 56 45 4C 4F 50 45 |`..".D. ENVELOPE|
00002A90: 20 48 45 49 47 48 54 20 49 4E 20 4C 49 4E 45 53 | HEIGHT IN LINES|
00002AA0: 22 3A 99 3A 99 22 12 45 92 20 4C 49 4E 45 53 3A |":.:.".E. LINES:|
00002AB0: 20 52 45 54 55 52 4E 20 41 44 44 52 45 53 53 20 | RETURN ADDRESS |
00002AC0: 54 4F 20 41 44 44 52 45 53 53 22 00 DA 2F 62 1D |TO ADDRESS"../b.|
00002AD0: 8E 00 17 30 6A 1D 97 32 31 34 2C 32 30 3A 97 32 |...0j..214,20:.2|
00002AE0: 31 31 2C 31 30 3A 9E 56 48 3A 99 53 43 24 28 33 |11,10:.VH:.SC$(3|
00002AF0: 29 22 20 28 41 2D 45 29 22 3A 99 53 43 24 28 36 |)" (A-E)":.SC$(6|
00002B00: 29 3B 3A 97 32 31 31 2C 32 37 3A 9E 56 48 00 3D |);:.211,27:.VH.=|
00002B10: 30 6C 1D 99 22 28 52 29 20 0D 34 0D 53 0D 59 0D |0l.."(R) .4.S.Y.|
00002B20: 30 0D 30 0D 30 0D 30 0D 30 0D 30 0D 30 0D 30 0D |0.0.0.0.0.0.0.0.|
00002B30: 30 0D 30 0D 31 0D |0.0.1. |
....... ** MRMENU ** 08-04-85.9.... (C)
1983 C.P.U., INC..].... (C) 1983 CONTINE
NTAL SOFTWARE.....AS$."*****************
**********************".....SC$(0)."** T
HE F.C.M PROGRAM **".H...VH.58732:.30000
.....VH.58732:.60000:.400......X$:.X$.."
".20......204,0......X$:.X$."".22.6...DU
.F(X$):.DU.32.DU.133..9030:.22.M....204,
1:.HW$(17);:..A....XX$:.XX$."".30.G.#...
.....ND%.8.SL$."3"..9030:.430......".";:
.214,2:.211,20.C(SC$(0)).2:.VH:.SC$(0):.
211,16......VH:."VER 3.20":.:.211,14:.VH
:.". "SC$(1)" ."......214,6:.211,20.C(VN
$).2:.VH:.VN$.Q....X.1.5:.214,6.X.2:.211
,3:.VH:.". "X". .";:." "MU$(X):.......2
14,20:.211,1:.VH:.X.0.38:.BL$:.211,7:.21
4,20:.VH......SC$(2)" (1-5) R";......214
,20:.211,29:.VH:.20:SL$.X$:.SL$."1".SL$.
"5"..9030:.430......ND%.1.SL$."3"..BE$;:
.430......SL$:SL.F(SL$).48:.SL.5.500.Q..
..214,6.SL.2:.211,3:.VH:.". "D(SL)" "M
U$(SL)"."......214,20:.211,2:.VH:."PRESS
'R' TO RUN OR 'X' TO CANCEL ."......214
,20:.211,36:.VH:.30:HK$.XX$.N.A..HK$.."R
".HK$.."X".447.W.B..HK$...L..HK$."X"..80
0:.420......550.#....".";:.214,10:.VH:.A
S$:.214,14:.VH:.AS$.7....792,71:.788,49.
Z....214,12:.211,8:.VH:.". *** END OF SE
SSION *** .":.214,20:.VH:....&.. GOSUB30
05...X..".":.214,8:.VH:.AS$:.214,14:.VH:
.AS$:.214,10.X.Z..211,13:.VH:.". "NL$" "
...]..:.211,19.C(MU$(SL)).2:.VH:." "MU$(
SL)" .":.214,20:.VH.!.B..SL.2.700.U.L..H
W$(18)"NEW:.LOAD"G(34)H(MU$(SL),6)G(34)"
,8,1"...Q..631,19:.632,13:.633,82:.634,2
13:.635,13:.198,5:.......HW$(18)"NEW:.LO
AD"G(34)"MRSORT"G(34)",8,1"...A..631,19:
.632,13:.633,82:.634,213:.635,13:.198,5:
..9. ..HK$."X"..214,6.SL.2:.211,3:.VH:."
. "G(48.SL)" .";:." "MU$(SL)" ".?.*...
N... 1:.1,8,15.O...DU$."": 2:.2,8,0,"$0"
:.30900...B..X.1.6:.#2,X$:.30900...G..#2
,X$:.X$..G(34).3015.J.L..#2,X$:.X$..G(34
).DU$.DU$.X$:.3020.Q.Q. 2...V..H(DU$,7).
"PROGRAM"........31000:.3006...W.. HW$(1
8).9.X. 1: 2:.1,8,15:.2,8,2,"HARDWARE,S,
R":.30900.K....2,FT%:.30900.L....SL.1.19
:.2,HW$(SL):.30900:..Z... 2:.30900.....
1:....(#. BEEP...2#AX.54272:.Y.0.24:.AX.
Y,0:..L.<#.AX.18,16:.AX.14,5:.AX.3,1.R.A
#....F#.AX.24,143:.AX.6,240:.AX.4,65...Z
#F0.7391.,.D#.T0.1.9:F1.F0:F3..(F1.256):
F2.F1.F3.256.B.I#.AX,F2:.AX.1,F3:..O.N#.
AX.24,0.U..#..F.0U 15:.15,8,15...:U 1:.
1,8,5,"0:FCM,P,W"...DU.15,E,E$,S,T:.E..6
3.30040...IU 1:.15,"S0:FCM":.15,E,E$,S,T
...NU. E.26 . . 31000:. 30050...SU 1:.E.
1 . E.0..1,8,5,"0:FCM,P,W": 1:.15...XU.
32000.*.BU.A$:.A$."".30050.6.LUA$."":..M
..X.1,E1%,ER$,E2%,E3%._..X.E1%.20.33000.
E.HX.....Y.9030:.214,8:.VH:.AS$:.:.211,3
:.VH.A..Y."REMOVE WRITE PROTECT TAB FROM
DISK":.211,6:.VH... Y."AND RE-INSERT IT
IN DRIVE #8.":.211,8..."Y."PRESS ANY KE
Y WHEN READY":.:.AS$:..?..} 1:.BE$:.214,
8:.VH:.AS$:.:.211,4:.VH....}."REMOVE ANY
DISK FROM DRIVE #8":."INSERT "SC$(0)" P
ROGRAM.":.211,8:.VH....}."PRESS ANY KEY
WHEN READY":.:.AS$....}..Y....".":.9030:
.9030:.214,8:.AS$......:."DISK ERROR #"E
1%,ER$......"INSERT GOOD DISKETTE".0....
"PRESS KEY TO CONTINUE.".?....:.AS$:.20.
F....1.L.`..X.0.38:BL$.BL$." ":AS$.AS$."
*":....E.AS$." ".H(AS$,38)...J..HW$(19).
B.O..3800:.".":.53280,E(HW$(16)):.53281,
E(HW$(16))...T..HW$(17):NL$."NOW LOADING
"./.Y..RECORD/EDIT/PRINT ENTRIES,SORT EN
TRIES,TRANSFER ENTRIES,SYSTEM UTILITIES.
9.Z..EXIT.Y.~.. ** F.C.M. **,MAIN MENU
,ENTER SELECTION,LETTER TO EDIT ......X
.1.5:.MU$(X):.X:.X.0.3:.SC$(X):.X......9
000.J.H.. PREPARE SCRN DMP ROUTINE...Z..
HW$(3)."Y"..49207,10...|..HW$(3)."N"..49
207,0.!....HW$(1)."O"..49174,12:.49192,6
4.D....HW$(1)."V"..49174,4:.49192,64.O.0
.VN$."".U.......VH.EL..X......BL'....AS'
....NL.....VN.V...SL.....SL.....XX.....H
K.....HW4...............................
..................MU(........2..L..Y..J.
.{................SC(..............B....
..................SM(..........%&.......
..................$(SL),Z,1).."".NG.1:Z.
3:...]..SL.3.SL.14..Z:.NG.1.1190...`..SL
.14.HW%.E(HW$(14)):.HW%.1.HW%.2.NG.1:.11
90...J..211,HT(SL):.214,VT(SL):.VH:.I(BL
$.HW$(SL),FL(SL)).......9....".":.214,8:
.VH:.AS$:.214,14:.VH:.AS$:.214,9:.VH:.90
00:.9000.E...."DO YOU WISH TO START A NE
W SYSTEM? ";.{....SN$:.SN$."".1203......
SN$.."Y".SN$.."N".1203......SN$:.SN$."N"
.1290......9000:."ARE YOU SURE YOU WANT
TO DO THIS? ";......SN$:.SN$."".1213....
..SN$.."Y".SN$.."N".1213.(.D..SN$:.SN$."
N".1290.D.I..214,12:.VH:.9000:."DO YOU H
AVE AN INITIALIZED DISK? ";.Z.K..SN$:.SN
$."".1227...N..SN$.."Y".SN$.."N".1227...
S..SN$:.SN$."Y"..6200:.PK..155.FT%.0.C..
........7100:.SL.1.10:SL.SL.2:.1800:SL.S
L.2:.1900:.SL.&.F..7140:.SL$."X"..3401:.
3410:.3430:EF.0:.1300.,.S...B.X..7300:.S
L.1.4:.2600:.SL:.LP.1.E(LD$(2)):.2300:.L
P......7340:.SL$."X"..3401:.3410:.3430:.
1400......SL$.G(133)..700:.1400...W...J.
...7500:.SL.1.5:.5800:.SL.T....7530.....
.SL$."X"..3401:.3410:.3430:.1500...;....
.?..9000.0.@.EF.1:.214,TV(SL):.211,TH(SL
).1:.VH.^.J..H(UL$,LF(SL))." ";:.211,TH(
SL).1:.VH:.40.N.L.SL$(SL).DU$...O.. SL$(
SL)."".1599. .T..C(SL$(SL)).LF(SL).1599.
..^..SL.1.SL.2...(SL.2).SL$(SL.1).."INAC
TIVE".E(SL$(SL)).1.1599...C..SL.3.SL$(SL
)."INACTIVE".1599.!.H..SL$(SL).."INACTIV
E"..1645.J.I.NX.SL:.XL.XL.20:SL$(XL)."IN
ACTIVE":.1800:SL.SL.1:SL$(SL)."0":.1800:
....J..2200:XL.XL.2.1:.1690...M..SL..1.E
(SL$(SL)).24.1599...R.. SL.1..1690...S..
SL.2...(SL.2)..2200:.MC%.TU%.0..1599...U
.. IF CHAR. USED TU%>MC% MAX THEN ERROR.
...........9000.!...EF.1.W....214,TV(SL.
2):.211,14:.VH:.H(UL$,E(SL$(SL.2.1)));.W
....211,14:.VH:.40:DF$(SL).DU$......C(DF
$(SL)).E(SL$(SL.2.1)).1699...B..1900....
........214,TV(SL):.211,TH(SL).1:.VH:.H(
BL$,LF(SL));:.211,TH(SL).1:.VH......SL.1
.SL.2...(SL.2).E(SL$(SL)).10.." ";.*....
SL$(SL):..P.L..211,14:.214,TV(SL.2):.VH:
.X.14.38:." ";:.:.211,14:.VH:.DF$(SL):..
Z.P.EF.11...4..211,H(1):.214,V(1):.VH:.N
L$:..G...TU%.0:.LS.3.21.2:TU%.TU%.E(SL$(
LS)):.......214,17:.211,28:.VH:.I(BL$.D(
TU%),3):.211,28:.VH......I(BL$.D(MC%.TU%
),3):..1....214,LP.10:.211,3:.VH.L....H(
BL$,36);:.211,3:.VH.A....SL$(LP%(LP,1));
......211,14:.VH:PP.2:.2350:.211,16:.VH.
P....SL$(LP%(LP,3));:.211,27:.VH:PP.4:.2
350:.211,29:.VH:.SL$(LP%(LP,5)).V.......
...LP%(LP,PP).32.LP%(LP,PP).0.."."G(LP%(
LP,PP).64)".";:.2360.).3..G(LP%(LP,PP));
./.8...9.C..9000.B.D.EF.1...N..214,VC(SL
):.211,HC(SL).1:.VH:.H(UL$,LC(SL));:.211
,HC(SL).1...S..40:LD$(SL).DU$.F.X..C(LD$
(SL)).LC(SL).(E(LD$(SL)).0.SL.4).2499.L.
......(..214,VC(SL):.211,HC(SL).1:.VH:.L
D$(SL):......EF.1:.X.1.5:.214,SL.10:.211
,HP(X):.VH:.2800:.X:..S....H(BL$,39.HP(X
));:.211,HP(X):.VH.|....20:LP$.X$:.LP$.G
(13).LP$.G(0):.2890.....MS%(SL).0......X
.2810,2830,2810,2830,2810......F(LP$).2.
..(F(LP$).2).LP$."A".LP$."T"..9000:.2800
......SL$(F(LP$).64):LP%(SL,X).F(LP$).64
:.2895.9....F(LP$).32.."."G(F(LP$).64)".
";:.9000.B.J..LP$.W.L.LP%(SL,X).F(LP$)..
.O.MS%(SL).((LP%(SL,2).1).(LP%(SL,4).1).
0):.......1,"I0":DU$.""......30900:.E1%.
20.33000.A....2,8,0,"$0".Z....30900:.E1%
.20.33000...B..X.1.6:.30400:....G..30400
:.X$..G(34).3015.0.L..30400:.X$..G(34).D
U$.DU$.X$:.3020.=.Q..30100:..A....3000:.
H(DU$,7).."PROGRAM".3060.W...EM.0:.31000
:.3040.}..... ....3000:.H(DU$,7)."PROGRA
M".3080......31300:.3070.......X....3000
:.H(DU$,4).."DATA".3089.....EM.1:.31000:
.3082........ ...3000:.H(DU$,4)."DATA".3
099.( ...31100:.CI.3090.. ....A ..NA%.0:
.30000:..C +..1,"P".G(2.96).G(1).G(0).G(
1).N ,..30900.| -.DU$.D(TR).. ...Y.1.3..
0.DU$.DU$.G(13).D(TN(Y)).G(13)."NOT SOR
TED":..D 2..30370:..Q :..30100:... D.. C
REATE LAST RECORD.. F..Z.300.500.200..!H
.X..(Z.256):Y.Z.(X.256).+!J.."X=";X,"Y="
;Y.M!L..1,"P".G(2.96).G(Y).G(X).G(1).]!N
.DU$."DUMMY".}!P.DU$.DU$.G(13).DU$.G(13)
.DU$..!R..30370..!T..Z..!X...L!...X.1.3:
NA%.5.X:.30050:.DU.1.10:.30300:.:.30100:
.:..R!C....!H.NA%.1:.30000:...!I.NA%.2:.
30000:..."R..X.1.21:.30250:SL$(X).DU$:..
8"T..X.1.10:.30250:DF$(X).DU$:..W"V..X.1
.4:.30250:LD$(X).DU$:..."X..X.1.9:.30200
:MS%(X).DU:.Y.1.5:.30200:LP%(X,Y).DU:.Y,
X.."Z..Y.1.5:.30250:EF$(Y).DU$:.:..S"\..
X.1.21:DU$.SL$(X):.30350:..."^..X.1.10:D
U$.DF$(X):.30350:...#_..X.1.4:DU$.LD$(X)
:.30350:..M#`..X.1.9:DU.MS%(X):.30300:.Y
.1.5:DU.LP%(X,Y):.30300:.Y,X.L#B..Y.1.5:
DU$.EF$(Y):.30350:..W#D.EF.0:...#F..3010
0:...#..NA%.3:.30000:DU.TR:.30300..#...3
0100:..B#X.NA%.4:.30000:...$...30200:FT%
.DU:.SL.1.14:.30250:HW$(SL).DU$:.:PS%.E(
HW$(1))..$..ND%.7.E(HW$(14)):..($..NA%.5
:.30000.=$..ND%.7.E(HW$(14)).O$..DU.FT%:
.30300:.SL.1.14:DU$.HW$(SL):.30350:.:...
$...6,HW$(SL):.SL:...$...30100:...$<....
$C..9000.F$D.EF.1:.214,EV(SL):.211,EH(SL
):.VH..$N..H(UL$,LE(SL));:.211,EH(SL):.V
H..%S..40:EF$(SL).DU$:.EF$(SL)."".5699.C
%X..C(EF$(SL)).LE(SL).SL.3.EF$(SL)..J(SC
$,SL.(SL.2),1).EF$(SL)..J(SC$,SL.2,1).56
99.I%.....%...214,EV(SL):.211,EH(SL):.VH
:.I(BL$.EF$(SL),LE(SL)):...%8..32000:.F(
X$).133.6240..%:.. INSERT CHK FOR RIGHT
DISK HERE..%=..3040..%@..34000..&A..1,"N
0:DATA".$&B..3500:.3400:.3420:.3430..&L.
.3300.J&V..3100:.3115:.3140:.3130.P&`...
Y&X..200..&]..214,5:.VH:.".A. LIST NAME>
>":.:.211,2:.VH:.". FIELD NAME ";.A&_..2
11,17:.VH:." CHARACTER LIMIT ":...&G..X.
1.10:."."G(64.X.2);:.211,14:.VH:."."G(65
.X.2):.:..2'L..214,15:.211,20:.VH:."TOTA
L CHARACTERS":.211,20:.VH.X'N.."----- --
--------":.211,20:.VH:."USED >>":.211,20
:.VH:."LEFT >>"..'{..214,20:.211,10:.VH:
.SC$(3)" (A-U)":.SC$(6);:.211,27:.VH..'|
.."(Z)RECORD":.211,12:.VH:.SC$(2);..(}..
PS%..0 ..214,21:.211,14:.VH:."(Y)PRINT".
.(...;(...214,22:.211,28:.VH:.G(175);:.
211,28:.VH.J(...20:SL$.X$.T(..SL.F(SL$).
64:.SL$."Z".SL$."X"..:.7090..(...SL$."Y"
..:.80:.7040..(...SL$."A".SL$."U".SL.(XL
.1).2..9000:.7040.W(...SL$:.1600:.SL..22
..1800..)...SL.2.XL.2.SL.21.SL.SL.1:.160
0:.1800:XL.XL.1:.XL.11.XL.10..)...7040.%
).....)...200.V)A..214,5:.211,6:.VH:.".
TYPE * FOR REPEAT FEATURE ":.214,7:.211,
3:.VH..)C.." LABEL ";:.211,14:." DEFAULT
INPUT":..H)K..214,9:.X.1.10:."."G(64.X)
:.:."."..*...214,20:.211,10:.SC$(3)" (A-
J)":.SC$(6);:.211,27:.VH:."(R)RECORD".O*
...211,12:.VH:.SC$(2);:.PS%..0..214,21:.
211,14:.VH:."(P)PRINT".U*.....*...214,22
:.211,28:.VH:.G(175);:.211,28:.VH..*...2
0:SL$.X$..*..:.SL$."R".SL$."X"..:.7190.H
*...SL$."P"..:.80:.7140..*...SL$."A".SL$
."J"..9000:.7140.!+...SL$:SL.F(SL$).64:.
SL$(SL.2)."INACTIVE"..9000:.7140.++...17
00.5+...7140.;+....D+...200..+...214,5:.
VH:.".A. LABEL WIDTH";:.211,22:.VH:.".B.
LABEL HEIGHT"..+...".C. HOW MANY LABELS
ACROSS?":.".D. MESSAGE":...+..."L POSIT
ION 1 P POSITION 2 P POSITION 3".#,..."-
---------- - ---------- - ----------":.
214,11:.VH.G,...X.1.9:."."X".":.:.211,2:
.VH:."<<F1>> FOR SCREEN LABEL LETTERS"..
,...214,21:.211,6:.VH:."ITEM TO EDIT (A-
D OR 1-9)":.SC$(6);:.211,27:.VH.V,..."(R
)RECORD":.211,12:.VH:.SC$(2);..-...PS%..
0..214,22:.211,14:.VH:."(P)PRINT"..-....
5-...214,23:.211,28:.VH:.G(175);:.211,28
:.VH.L-...SL$:. SL$."".7341.A-... SL$.G(
13).7360..-...SL$:.SL$."R".SL$."X".SL$.G
(133).7390..-...SL$."P"..80:.7340..-...E
(SL$).0.(SL$."A".SL$."D").E(SL$).E(LD$(2
))..9000:.7340...O..SL$."9".SL.F(SL$).64
:.2500:.2600:.7400:.7340...T.SL.F(SL$).4
8:.2700:.7340.4.....J....CL(2)..0..214,1
2:.".":.Z.1.CL(2):.G(48.Z):.:."."......
CL(2).9..Z.CL(2).1.9:.214,11.Z:..868:...
..........LP.1.E(LD$(2)):.2300:.......LP
..10..LP.E(LD$(2)).1.9:.214,10.LP:.211,3
:.VH:.H(BL$,36):.../...../L..200.=/V..21
4,8:.VH:.".A. PRINT RETURN ADDRESS? (Y/N
)":.../X..".B. SINGLE OR CONTINOUS? (S/C
)":.:.".C. LEFT MARGIN FOR ADDRESS":..T/
`..".D. ENVELOPE HEIGHT IN LINES":.:.".E
. LINES: RETURN ADDRESS TO ADDRESS".Z/B.
...0J..214,20:.211,10:.VH:.SC$(3)" (A-E)
":.SC$(6);:.211,27:.VH.=0L.."(R) .4.S.Y.
0.0.0.0.0.0.0.0.0.0.1.
> CLICK IMAGE PREVIEW FOR FULL MODAL