MRSORT
FILE INFORMATION
FILENAME(S): MRSORT
FILE TYPE(S): PRG
FILE SIZE: 8.5K
FIRST SEEN: 2025-10-19 22:48:43
APPEARS ON: 1 disk(s)
FILE HASH
44a1f6218c6596f84f1542638d51f58955906779ec812ac8674de947b7584d02
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PROGRAM | MRSORT | PRG | Radd Maxx | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4E 08 02 00 56 48 B2 35 38 37 33 32 3A 86 |..N...VH.58732:.| 00000010: 53 52 24 28 37 35 31 29 2C 53 52 25 28 37 35 31 |SR$(751),SR%(751| 00000020: 29 2C 48 57 24 28 31 38 29 2C 4C 46 28 31 31 29 |),HW$(18),LF(11)| 00000030: 2C 44 46 24 28 31 31 29 2C 53 4C 24 28 31 31 29 |,DF$(11),SL$(11)| 00000040: 2C 4E 24 28 31 31 29 2C 53 4F 28 31 31 29 00 8E |,N$(11),SO(11)..| 00000050: 08 03 00 81 58 B2 4F A4 33 38 3A 42 4C 24 B2 42 |....X.O.38:BL$.B| 00000060: 4C 24 AA 22 20 22 3A 55 4C 24 B2 55 4C 24 AA C7 |L$." ":UL$.UL$..| 00000070: 28 31 37 35 29 3A 3A 41 53 24 B2 41 53 24 AA 22 |(175)::AS$.AS$."| 00000080: 2A 22 3A 51 4D 24 B2 51 4D 24 AA 22 3F 22 00 CC |*":QM$.QM$."?"..| 00000090: 08 04 00 45 58 24 B2 45 58 24 AA C7 28 30 31 29 |...EX$.EX$..(01)| 000000A0: 3A 82 3A 41 53 24 B2 22 20 22 AA C8 28 41 53 24 |:.:AS$." "..(AS$| 000000B0: 2C 33 38 29 3A 8D 39 30 3A 4E 4C 24 B2 22 20 4E |,38):.90:NL$." N| 000000C0: 4F 57 20 4C 4F 41 44 49 4E 47 20 22 00 10 09 05 |OW LOADING "....| 000000D0: 00 4C 46 28 31 31 29 B2 34 3A 53 4C 24 28 31 31 |.LF(11).4:SL$(11| 000000E0: 29 B2 22 53 4F 52 54 20 4F 52 44 45 52 22 3A 54 |)."SORT ORDER":T| 000000F0: 57 25 B2 32 3A 4D 53 24 B2 22 52 45 41 44 49 4E |W%.2:MS$."READIN| 00000100: 47 22 3A 53 4D 24 28 31 29 B2 22 44 41 54 41 22 |G":SM$(1)."DATA"| 00000110: 00 5D 09 06 00 83 53 4F 52 54 20 45 4E 54 52 49 |.]....SORT ENTRI| 00000120: 45 53 2C 45 58 41 4D 49 4E 45 20 53 4F 52 54 20 |ES,EXAMINE SORT | 00000130: 46 49 4C 45 53 2C 43 48 41 4E 47 45 20 44 41 54 |FILES,CHANGE DAT| 00000140: 41 20 44 49 53 4B 2C 43 52 45 41 54 45 20 44 55 |A DISK,CREATE DU| 00000150: 50 4C 49 43 41 54 45 53 20 46 49 4C 45 00 A4 09 |PLICATES FILE...| 00000160: 07 00 83 52 45 43 4F 52 44 2F 45 44 49 54 2F 50 |...RECORD/EDIT/P| 00000170: 52 49 4E 54 20 45 4E 54 52 49 45 53 2C 4D 41 49 |RINT ENTRIES,MAI| 00000180: 4E 20 4D 45 4E 55 2C 2A 2A 20 46 2E 43 2E 4D 2E |N MENU,** F.C.M.| 00000190: 20 2A 2A 2C 41 44 44 2F 45 44 49 54 20 45 4E 54 | **,ADD/EDIT ENT| 000001A0: 52 49 45 53 00 E8 09 08 00 83 45 4E 54 45 52 20 |RIES......ENTER | 000001B0: 53 45 4C 45 43 54 49 4F 4E 2C 4C 45 54 54 45 52 |SELECTION,LETTER| 000001C0: 20 54 4F 20 45 44 49 54 2C 28 52 29 20 52 45 43 | TO EDIT,(R) REC| 000001D0: 4F 52 44 2C 28 50 29 20 50 52 49 4E 54 2C 28 58 |ORD,(P) PRINT,(X| 000001E0: 29 20 43 41 4E 43 45 4C 00 1F 0A 09 00 81 58 B2 |) CANCEL......X.| 000001F0: 31 A4 36 3A 87 4D 55 24 28 58 29 3A 82 3A 81 58 |1.6:.MU$(X):.:.X| 00000200: B2 30 A4 36 3A 87 53 43 24 28 58 29 3A 82 3A 53 |.0.6:.SC$(X):.:S| 00000210: 4D 24 28 30 29 B2 22 50 52 4F 47 52 41 4D 22 00 |M$(0)."PROGRAM".| 00000220: 6E 0A 0A 00 53 4D 24 28 32 29 B2 22 20 44 49 53 |n...SM$(2)." DIS| 00000230: 4B 45 54 54 45 2E 20 50 52 45 53 53 20 41 4E 59 |KETTE. PRESS ANY| 00000240: 20 4B 45 59 20 57 48 45 4E 20 52 45 41 44 59 2E | KEY WHEN READY.| 00000250: 22 3A 4E 41 24 28 30 29 B2 22 30 3A 4D 52 45 4E |":NA$(0)."0:MREN| 00000260: 54 52 59 2C 4C 2C 22 AA C7 28 31 34 32 29 00 BA |TRY,L,"..(142)..| 00000270: 0A 0B 00 4E 41 24 28 31 29 B2 22 30 3A 43 55 53 |...NA$(1)."0:CUS| 00000280: 54 4F 4D 2C 53 2C 52 22 3A 4E 41 24 28 32 29 B2 |TOM,S,R":NA$(2).| 00000290: 22 30 3A 48 41 52 44 57 41 52 45 2C 53 2C 52 22 |"0:HARDWARE,S,R"| 000002A0: 3A 4E 41 24 28 35 29 B2 22 40 30 3A 53 4F 52 54 |:NA$(5)."@0:SORT| 000002B0: 46 49 4C 45 33 2C 53 2C 57 22 00 FE 0A 0C 00 4E |FILE3,S,W".....N| 000002C0: 41 24 28 33 29 B2 22 40 30 3A 53 4F 52 54 46 49 |A$(3)."@0:SORTFI| 000002D0: 4C 45 31 2C 53 2C 57 22 3A 4E 41 24 28 34 29 B2 |LE1,S,W":NA$(4).| 000002E0: 22 40 30 3A 53 4F 52 54 46 49 4C 45 32 2C 53 2C |"@0:SORTFILE2,S,| 000002F0: 57 22 3A 8D 33 30 37 30 3A 8D 33 38 30 30 00 31 |W":.3070:.3800.1| 00000300: 0B 0D 00 97 35 33 32 38 30 2C C5 28 48 57 24 28 |....53280,.(HW$(| 00000310: 31 36 29 29 3A 97 35 33 32 38 31 2C C5 28 48 57 |16)):.53281,.(HW| 00000320: 24 28 31 36 29 29 3A 8D 33 30 39 30 3A 8D 39 30 |$(16)):.3090:.90| 00000330: 30 00 61 0B 0E 00 8D 33 34 30 30 3A 8D 33 31 30 |0.a....3400:.310| 00000340: 30 3A 8D 33 31 36 30 3A 8D 33 31 39 30 3A 50 46 |0:.3160:.3190:PF| 00000350: 24 28 30 29 B2 22 22 3A 50 46 24 28 31 29 B2 22 |$(0)."":PF$(1)."| 00000360: 22 00 8C 0B 0F 00 81 58 B2 31 A4 31 30 3A 8B 44 |"......X.1.10:.D| 00000370: 46 24 28 58 29 B2 22 2A 22 A7 44 46 25 28 58 29 |F$(X)."*".DF%(X)| 00000380: B2 31 3A 44 46 24 28 58 29 B2 22 22 00 C9 0B 10 |.1:DF$(X).""....| 00000390: 00 82 3A 81 48 57 B2 34 A4 38 3A 43 48 B2 B5 28 |..:.HW.4.8:CH..(| 000003A0: C5 28 48 57 24 28 48 57 29 29 AA 2E 35 29 3A 8B |.(HW$(HW))..5):.| 000003B0: 43 48 B3 B1 30 A7 50 46 24 28 30 29 B2 50 46 24 |CH..0.PF$(0).PF$| 000003C0: 28 30 29 AA C7 28 43 48 29 00 07 0C 11 00 82 3A |(0)..(CH)......:| 000003D0: 81 48 57 B2 39 A4 31 33 3A 43 48 B2 B5 28 C5 28 |.HW.9.13:CH..(.(| 000003E0: 48 57 24 28 48 57 29 29 AA 2E 35 29 3A 8B 43 48 |HW$(HW))..5):.CH| 000003F0: B3 B1 30 A7 50 46 24 28 31 29 B2 50 46 24 28 31 |..0.PF$(1).PF$(1| 00000400: 29 AA C7 28 43 48 29 00 34 0C 12 00 82 3A 50 53 |)..(CH).4....:PS| 00000410: 25 B2 30 3A 53 44 25 B2 C5 28 48 57 24 28 32 29 |%.0:SD%..(HW$(2)| 00000420: 29 3A 8B 48 57 24 28 31 29 B3 B1 22 4E 22 A7 50 |):.HW$(1).."N".P| 00000430: 53 25 B2 31 00 3D 0C 13 00 89 34 30 30 00 48 0C |S%.1.=....400.H.| 00000440: 14 00 97 32 30 34 2C 30 00 5B 0C 15 00 A1 58 24 |...204,0.[....X$| 00000450: 3A 8B 58 24 B3 B1 22 22 A7 32 31 00 6D 0C 16 00 |:.X$.."".21.m...| 00000460: A1 58 24 3A 8B 58 24 B2 22 22 A7 32 32 00 7E 0C |.X$:.X$."".22.~.| 00000470: 17 00 8B 58 24 B2 C7 28 31 33 29 A7 32 38 00 B4 |...X$..(13).28..| 00000480: 0C 18 00 44 55 B2 C6 28 58 24 29 3A 8B 28 44 55 |...DU..(X$):.(DU| 00000490: B3 33 32 AF 44 55 B1 34 29 B0 44 55 B2 34 34 B0 |.32.DU.4).DU.44.| 000004A0: 44 55 B2 35 39 B0 44 55 B1 31 33 33 A7 8D 39 31 |DU.59.DU.133..91| 000004B0: 3A 89 32 32 00 CF 0C 1C 00 99 22 20 9D 22 48 57 |:.22......" ."HW| 000004C0: 24 28 31 37 29 3B 3A 97 32 30 34 2C 31 3A 8E 00 |$(17);:.204,1:..| 000004D0: FE 0C 28 00 44 55 24 B2 C8 28 42 4C 24 2C 51 4C |..(.DU$..(BL$,QL| 000004E0: 29 3A 9E 35 30 31 37 36 3A 99 48 57 24 28 31 38 |):.50176:.HW$(18| 000004F0: 29 22 20 9D 22 48 57 24 28 31 37 29 3A 8E 00 48 |)" ."HW$(17):..H| 00000500: 0D 32 00 4E 46 B2 30 3A 99 22 93 22 3A 97 32 31 |.2.NF.0:.".":.21| 00000510: 34 2C 32 3A 97 32 31 31 2C 32 30 AB C3 28 53 43 |4,2:.211,20..(SC| 00000520: 24 28 30 29 29 AD 32 3A 9E 56 48 3A 99 53 43 24 |$(0)).2:.VH:.SC$| 00000530: 28 30 29 3A 97 32 31 31 2C 31 39 AB C3 28 4D 55 |(0):.211,19..(MU| 00000540: 24 28 4D 43 29 29 AD 32 00 61 0D 34 00 9E 56 48 |$(MC)).2.a.4..VH| 00000550: 3A 99 22 12 20 22 4D 55 24 28 4D 43 29 22 20 92 |:.". "MU$(MC)" .| 00000560: 22 00 96 0D 36 00 8B 52 46 B2 30 A7 97 32 31 34 |"...6..RF.0..214| 00000570: 2C 36 3A 97 32 31 31 2C 31 34 3A 9E 56 48 3A 99 |,6:.211,14:.VH:.| 00000580: 22 12 20 3D 20 92 22 3B 3A 99 22 20 4D 45 41 4E |". = .";:." MEAN| 00000590: 53 20 41 4C 4C 22 00 9C 0D 38 00 8E 00 D5 0D 3C |S ALL"...8.....<| 000005A0: 00 58 4C B2 30 3A 81 53 4C B2 31 A4 31 30 3A 8D |.XL.0:.SL.1.10:.| 000005B0: 31 38 30 30 3A 8B 53 4C 24 28 53 4C 29 B3 B1 22 |1800:.SL$(SL).."| 000005C0: 49 4E 41 43 54 49 56 45 22 A7 58 4C B2 58 4C AA |INACTIVE".XL.XL.| 000005D0: 31 3A 82 3A 8E 00 F9 0D 46 00 5A B2 30 3A 81 53 |1:.:....F.Z.0:.S| 000005E0: 4C B2 31 A4 31 31 3A 4E 24 28 53 4C 29 B2 22 22 |L.1.11:N$(SL).""| 000005F0: 3A 53 4F 28 53 4C 29 B2 30 00 26 0E 48 00 8D 31 |:SO(SL).0.&.H..1| 00000600: 38 30 30 3A 8B 53 4C 24 28 53 4C 29 B3 B1 22 49 |800:.SL$(SL).."I| 00000610: 4E 41 43 54 49 56 45 22 AF 53 4C B3 31 31 A7 58 |NACTIVE".SL.11.X| 00000620: 4C B2 58 4C AA 31 00 2E 0E 4A 00 82 3A 8E 00 3D |L.XL.1...J..:..=| 00000630: 0E 50 00 8B 50 53 25 B2 30 A7 89 39 31 00 5D 0E |.P..PS%.0..91.].| 00000640: 51 00 A0 34 3A 9F 34 2C 34 2C 30 3A 9D 34 3A 9E |Q..4:.4,4,0:.4:.| 00000650: 34 39 31 35 32 3A 98 34 3A A0 34 3A 8E 00 A3 0E |49152:.4:.4:....| 00000660: 52 00 99 22 93 22 3A 97 32 31 34 2C 38 3A 9E 56 |R..".":.214,8:.V| 00000670: 48 3A 99 41 53 24 3A 99 3A 99 22 20 20 20 52 45 |H:.AS$:.:." RE| 00000680: 4D 4F 56 45 20 41 4E 59 20 44 49 53 4B 20 46 52 |MOVE ANY DISK FR| 00000690: 4F 4D 20 44 52 49 56 45 20 23 22 4E 44 25 22 41 |OM DRIVE #"ND%"A| 000006A0: 4E 44 22 00 DC 0E 53 00 8D 39 31 3A 97 32 31 31 |ND"...S..91:.211| 000006B0: 2C 31 34 AB C3 28 53 43 24 28 30 29 29 AD 32 3A |,14..(SC$(0)).2:| 000006C0: 9E 56 48 3A 99 22 49 4E 53 45 52 54 20 22 53 43 |.VH:."INSERT "SC| 000006D0: 24 28 30 29 22 20 44 41 54 41 2E 22 00 0B 0F 54 |$(0)" DATA."...T| 000006E0: 00 97 32 31 31 2C 38 3A 9E 56 48 3A 99 CA 28 53 |..211,8:.VH:..(S| 000006F0: 4D 24 28 32 29 2C 31 32 29 3A 99 3A 99 41 53 24 |M$(2),12):.:.AS$| 00000700: 48 57 24 28 31 38 29 3A 89 32 31 00 4D 0F 55 00 |HW$(18):.21.M.U.| 00000710: 99 22 93 22 3A 97 32 31 34 2C 38 3A 9E 56 48 3A |.".":.214,8:.VH:| 00000720: 99 41 53 24 3A 99 3A 99 22 A0 20 52 45 4D 4F 56 |.AS$:.:.". REMOV| 00000730: 45 20 41 4E 59 20 44 49 53 4B 20 46 52 4F 4D 20 |E ANY DISK FROM | 00000740: 44 52 49 56 45 20 23 38 20 41 4E 44 22 00 89 0F |DRIVE #8 AND"...| 00000750: 56 00 8D 39 31 3A 97 32 31 31 2C 31 32 AB C3 28 |V..91:.211,12..(| 00000760: 53 43 24 28 30 29 29 AD 32 3A 9E 56 48 3A 99 22 |SC$(0)).2:.VH:."| 00000770: 49 4E 53 45 52 54 20 22 53 43 24 28 30 29 22 20 |INSERT "SC$(0)" | 00000780: 50 52 4F 47 52 41 4D 2E 22 00 B8 0F 57 00 97 32 |PROGRAM."...W..2| 00000790: 31 31 2C 38 3A 9E 56 48 3A 99 CA 28 53 4D 24 28 |11,8:.VH:..(SM$(| 000007A0: 32 29 2C 31 32 29 3A 99 3A 99 41 53 24 48 57 24 |2),12):.:.AS$HW$| 000007B0: 28 31 38 29 3A 89 32 31 00 F4 0F 5A 00 41 58 B2 |(18):.21...Z.AX.| 000007C0: 35 34 32 37 32 3A 81 57 B2 30 A4 32 34 3A 97 41 |54272:.W.0.24:.A| 000007D0: 58 AA 57 2C 30 3A 82 3A 97 41 58 AA 31 38 2C 31 |X.W,0:.:.AX.18,1| 000007E0: 36 3A 97 41 58 AA 31 34 2C 35 3A 97 41 58 AA 33 |6:.AX.14,5:.AX.3| 000007F0: 2C 31 3A 8E 00 30 10 5B 00 8D 39 30 3A 97 41 58 |,1:..0.[..90:.AX| 00000800: AA 32 34 2C 31 34 33 3A 97 41 58 AA 36 2C 32 34 |.24,143:.AX.6,24| 00000810: 30 3A 97 41 58 AA 34 2C 36 35 3A 46 30 B2 37 33 |0:.AX.4,65:F0.73| 00000820: 39 31 3A 81 54 30 B2 31 A4 39 3A 46 31 B2 46 30 |91:.T0.1.9:F1.F0| 00000830: 00 6B 10 5C 00 46 33 B2 B5 28 46 31 AD 32 35 36 |.k.\.F3..(F1.256| 00000840: 29 3A 46 32 B2 46 31 AB 46 33 AC 32 35 36 3A 97 |):F2.F1.F3.256:.| 00000850: 41 58 2C 46 32 3A 97 41 58 AA 31 2C 46 33 3A 82 |AX,F2:.AX.1,F3:.| 00000860: 3A 97 41 58 AA 32 34 2C 30 3A 8E 00 99 10 5D 00 |:.AX.24,0:....].| 00000870: 8D 39 31 3A 8D 39 31 3A 99 22 93 22 3A 97 32 31 |.91:.91:.".":.21| 00000880: 34 2C 38 3A 9E 56 48 3A 99 41 53 24 3A 99 3A 97 |4,8:.VH:.AS$:.:.| 00000890: 32 31 31 2C 36 3A 9E 56 48 00 D4 10 5E 00 99 22 |211,6:.VH...^.."| 000008A0: 44 49 53 4B 20 45 52 52 20 23 22 45 31 25 3A 99 |DISK ERR #"E1%:.| 000008B0: 3A 97 32 31 31 2C 36 3A 9E 56 48 3A 99 45 52 24 |:.211,6:.VH:.ER$| 000008C0: 22 20 54 52 4B 22 45 32 25 22 20 53 45 43 22 45 |" TRK"E2%" SEC"E| 000008D0: 33 25 3A 99 00 F2 10 5F 00 8B 20 45 31 25 B2 32 |3%:...._.. E1%.2| 000008E0: 36 B0 45 31 25 B2 32 39 B0 45 31 25 B2 37 34 A7 |6.E1%.29.E1%.74.| 000008F0: 39 37 00 21 11 60 00 99 3A 97 32 31 31 2C 36 3A |97.!.`..:.211,6:| 00000900: 9E 56 48 3A 99 22 49 4E 53 45 52 54 20 47 4F 4F |.VH:."INSERT GOO| 00000910: 44 20 50 52 4F 47 52 41 4D 20 44 49 53 4B 22 3A |D PROGRAM DISK":| 00000920: 99 00 50 11 61 00 97 32 31 31 2C 36 3A 9E 56 48 |..P.a..211,6:.VH| 00000930: 3A 99 CA 28 53 4D 24 28 32 29 2C 31 32 29 3A 99 |:..(SM$(2),12):.| 00000940: 3A 99 41 53 24 48 57 24 28 31 38 29 3A 8D 32 31 |:.AS$HW$(18):.21| 00000950: 00 6D 11 62 00 8B 20 45 31 25 B2 32 36 B0 45 31 |.m.b.. E1%.26.E1| 00000960: 25 B2 32 39 B0 45 31 25 B2 37 34 A7 8E 00 7E 11 |%.29.E1%.74...~.| 00000970: 63 00 4D 43 B2 36 3A A0 32 3A 89 35 30 30 00 9F |c.MC.6:.2:.500..| 00000980: 11 64 00 54 53 B2 33 3A 81 59 B2 31 A4 33 3A 8B |.d.TS.3:.Y.1.3:.| 00000990: 54 4E 28 59 29 B2 30 A7 54 53 B2 54 53 AB 31 00 |TN(Y).0.TS.TS.1.| 000009A0: A7 11 6E 00 82 3A 8E 00 BE 11 C8 00 53 46 B2 53 |..n..:......SF.S| 000009B0: 46 AA 31 3A 8B 53 46 B2 34 A7 53 46 B2 30 00 FC |F.1:.SF.4.SF.0..| 000009C0: 11 D2 00 97 32 31 34 2C 56 54 AA 31 32 3A 97 32 |....214,VT.12:.2| 000009D0: 31 31 2C 31 34 3A 9E 56 48 3A 99 C8 28 42 4C 24 |11,14:.VH:..(BL$| 000009E0: 2C 32 35 29 3B 3A 97 32 31 31 2C 31 34 3A 9E 56 |,25);:.211,14:.V| 000009F0: 48 3A 99 53 46 24 28 53 46 29 3A 8E 00 41 12 FA |H:.SF$(SF):..A..| 00000A00: 00 97 32 31 34 2C 35 3A 97 32 31 31 2C 32 32 3A |..214,5:.211,22:| 00000A10: 9E 56 48 3A 99 C8 28 42 4C 24 2C 31 37 29 3A 97 |.VH:..(BL$,17):.| 00000A20: 32 31 34 2C 56 54 AA 31 31 3A 97 32 31 31 2C 31 |214,VT.11:.211,1| 00000A30: 31 3A 9E 56 48 3A 99 C8 28 42 4C 24 2C 32 38 29 |1:.VH:..(BL$,28)| 00000A40: 3B 00 5D 12 FC 00 97 32 31 31 2C 31 35 3A 9E 56 |;.]....211,15:.V| 00000A50: 48 3A 99 44 46 24 3A 8D 32 31 30 3A 8E 00 79 12 |H:.DF$:.210:..y.| 00000A60: 2C 01 A0 32 3A 9F 32 2C 38 2C 32 2C 4E 41 24 28 |,..2:.2,8,2,NA$(| 00000A70: 4E 41 25 29 3A 89 33 39 30 00 97 12 31 01 A0 32 |NA%):.390...1..2| 00000A80: 3A 9F 32 2C 4E 44 25 2C 32 2C 4E 41 24 28 4E 41 |:.2,ND%,2,NA$(NA| 00000A90: 25 29 3A 89 33 39 30 00 A3 12 36 01 A0 32 3A 89 |%):.390...6..2:.| 00000AA0: 33 39 30 00 B7 12 40 01 44 55 B2 30 3A 84 32 2C |390...@.DU.0:.2,| 00000AB0: 44 55 3A 89 33 39 30 00 DD 12 45 01 44 55 24 B2 |DU:.390...E.DU$.| 00000AC0: 22 22 3A 84 32 2C 44 55 24 3A 8B 20 44 55 24 B2 |"":.2,DU$:. DU$.| 00000AD0: C7 28 31 36 30 29 A7 44 55 24 B2 22 22 00 E3 12 |.(160).DU$.""...| 00000AE0: 49 01 8E 00 F2 12 4A 01 98 32 2C 44 55 3A 89 33 |I.....J..2,DU:.3| 00000AF0: 39 30 00 09 13 4F 01 8B 44 55 24 B2 22 22 A7 44 |90...O..DU$."".D| 00000B00: 55 24 B2 C7 28 31 36 30 29 00 19 13 50 01 98 32 |U$..(160)...P..2| 00000B10: 2C 44 55 24 3A 89 33 39 30 00 30 13 51 01 8B 44 |,DU$:.390.0.Q..D| 00000B20: 55 24 B2 22 22 A7 44 55 24 B2 C7 28 31 36 30 29 |U$."".DU$..(160)| 00000B30: 00 41 13 52 01 98 32 2C 44 55 24 3B 3A 89 33 39 |.A.R..2,DU$;:.39| 00000B40: 30 00 51 13 54 01 A1 23 32 2C 58 24 3A 89 33 39 |0.Q.T..#2,X$:.39| 00000B50: 30 00 69 13 86 01 84 31 35 2C 45 31 25 2C 45 52 |0.i....15,E1%,ER| 00000B60: 24 2C 45 32 25 2C 45 33 25 00 78 13 87 01 8B 45 |$,E2%,E3%.x....E| 00000B70: 31 25 B1 32 30 A7 39 33 00 7E 13 8B 01 8E 00 92 |1%.20.93.~......| 00000B80: 13 90 01 44 45 24 B2 22 22 3A 50 46 B2 31 3A 5A |...DE$."":PF.1:Z| 00000B90: B2 30 00 D7 13 92 01 99 22 93 22 3A 97 32 31 34 |.0......".":.214| 00000BA0: 2C 35 3A 97 32 31 31 2C 32 31 AB C3 28 53 43 24 |,5:.211,21..(SC$| 00000BB0: 28 30 29 29 AD 32 3A 9E 56 48 3A 99 53 43 24 28 |(0)).2:.VH:.SC$(| 00000BC0: 30 29 3A 97 32 31 31 2C 32 31 AB C3 28 43 4C 24 |0):.211,21..(CL$| 00000BD0: 29 AD 32 3A 9E 56 48 00 04 14 94 01 99 43 4C 24 |).2:.VH......CL$| 00000BE0: 3A 97 32 31 31 2C 32 30 AB C3 28 4D 55 24 28 31 |:.211,20..(MU$(1| 00000BF0: 29 29 AD 32 3A 99 22 12 20 22 4D 55 24 28 31 29 |)).2:.". "MU$(1)| 00000C00: 22 20 92 22 00 3F 14 9A 01 97 32 31 34 2C 31 30 |" .".?....214,10| 00000C10: 3A 9E 56 48 3A 81 58 B2 31 A4 36 3A 97 32 31 31 |:.VH:.X.1.6:.211| 00000C20: 2C 33 3A 9E 56 48 3A 99 22 12 22 58 22 9D 20 92 |,3:.VH:."."X". .| 00000C30: 22 3B 3A 99 22 20 22 4D 55 24 28 58 29 3A 82 00 |";:." "MU$(X):..| 00000C40: 6F 14 A4 01 97 32 31 34 2C 32 32 3A 97 32 31 31 |o....214,22:.211| 00000C50: 2C 37 3A 9E 56 48 3A 99 53 43 24 28 32 29 22 20 |,7:.VH:.SC$(2)" | 00000C60: 28 31 2D 36 29 20 22 3B C7 28 31 37 35 29 3B 00 |(1-6) ";.(175);.| 00000C70: 92 14 AE 01 97 32 31 34 2C 32 32 3A 97 32 31 31 |.....214,22:.211| 00000C80: 2C 32 39 3A 9E 56 48 3A 8D 32 30 3A 4D 43 24 B2 |,29:.VH:.20:MC$.| 00000C90: 58 24 00 B0 14 B0 01 8B 4D 43 24 B3 22 31 22 B0 |X$......MC$."1".| 00000CA0: 4D 43 24 B1 22 36 22 A7 8D 39 31 3A 89 34 33 30 |MC$."6"..91:.430| 00000CB0: 00 E7 14 EA 01 99 4D 43 24 3A 4D 43 B2 C6 28 4D |......MC$:MC..(M| 00000CC0: 43 24 29 AB 34 38 3A 91 4D 43 8D 38 30 30 2C 36 |C$).48:.MC.800,6| 00000CD0: 30 30 2C 37 30 30 2C 38 30 30 2C 35 30 30 2C 35 |00,700,800,500,5| 00000CE0: 30 30 3A 89 34 30 30 00 F5 14 F4 01 8D 33 30 37 |00:.400......307| 00000CF0: 30 3A A0 31 35 00 34 15 FE 01 99 22 93 22 3A 97 |0:.15.4....".":.| 00000D00: 32 31 34 2C 31 30 3A 9E 56 48 3A 99 41 53 24 3A |214,10:.VH:.AS$:| 00000D10: 97 32 31 34 2C 31 36 3A 9E 56 48 3A 99 41 53 24 |.214,16:.VH:.AS$| 00000D20: 3A 97 32 31 34 2C 31 32 3A 97 32 31 31 2C 31 33 |:.214,12:.211,13| 00000D30: 3A 9E 56 48 00 77 15 00 02 99 22 12 20 4E 4F 57 |:.VH.w....". NOW| 00000D40: 20 4C 4F 41 44 49 4E 47 20 92 22 3A 99 3A 97 32 | LOADING .":.:.2| 00000D50: 31 31 2C 31 39 AB C3 28 4D 55 24 28 4D 43 29 29 |11,19..(MU$(MC))| 00000D60: AD 32 3A 9E 56 48 3A 99 22 12 20 22 4D 55 24 28 |.2:.VH:.". "MU$(| 00000D70: 4D 43 29 22 20 92 22 00 87 15 08 02 97 32 31 34 |MC)" ."......214| 00000D80: 2C 31 38 3A 9E 56 48 00 95 15 0D 02 8B 4D 43 B2 |,18:.VH......MC.| 00000D90: 35 A7 35 35 30 00 C5 15 12 02 99 48 57 24 28 31 |5.550......HW$(1| 00000DA0: 38 29 22 4E 45 57 3A 13 4C 4F 41 44 22 C7 28 33 |8)"NEW:.LOAD".(3| 00000DB0: 34 29 22 4D 52 4D 45 4E 55 22 C7 28 33 34 29 22 |4)"MRMENU".(34)"| 00000DC0: 2C 38 2C 31 22 00 FB 15 1C 02 97 36 33 31 2C 31 |,8,1"......631,1| 00000DD0: 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 38 |9:.632,13:.633,8| 00000DE0: 32 3A 97 36 33 34 2C 32 31 33 3A 97 36 33 35 2C |2:.634,213:.635,| 00000DF0: 31 33 3A 97 31 39 38 2C 35 3A 80 00 2B 16 26 02 |13:.198,5:..+.&.| 00000E00: 99 48 57 24 28 31 38 29 22 4E 45 57 3A 13 4C 4F |.HW$(18)"NEW:.LO| 00000E10: 41 44 22 C7 28 33 34 29 22 52 45 43 4F 52 44 22 |AD".(34)"RECORD"| 00000E20: C7 28 33 34 29 22 2C 38 2C 31 22 00 61 16 30 02 |.(34)",8,1".a.0.| 00000E30: 97 36 33 31 2C 31 39 3A 97 36 33 32 2C 31 33 3A |.631,19:.632,13:| 00000E40: 97 36 33 33 2C 38 32 3A 97 36 33 34 2C 32 31 33 |.633,82:.634,213| 00000E50: 3A 97 36 33 35 2C 31 33 3A 97 31 39 38 2C 35 3A |:.635,13:.198,5:| 00000E60: 80 00 94 16 58 02 81 58 B2 31 A4 33 3A 53 4E 24 |....X..X.1.3:SN$| 00000E70: 28 58 29 B2 53 46 24 28 58 29 3A 4E 54 28 58 29 |(X).SF$(X):NT(X)| 00000E80: B2 54 4E 28 58 29 3A 82 3A 54 54 B2 54 53 3A 44 |.TN(X):.:TT.TS:D| 00000E90: 45 25 B2 30 00 D1 16 62 02 52 46 B2 31 3A 8D 35 |E%.0...b.RF.1:.5| 00000EA0: 30 3A 52 46 B2 30 3A 97 32 31 34 2C 35 3A 9E 56 |0:RF.0:.214,5:.V| 00000EB0: 48 3A 81 58 B2 31 A4 33 3A 99 3A 99 3A 99 C7 28 |H:.X.1.3:.:.:..(| 00000EC0: 58 AA 36 34 29 22 2E 20 22 53 4E 24 28 58 29 3A |X.64)". "SN$(X):| 00000ED0: 82 00 12 17 64 02 8B 54 54 B2 33 AF 28 4D 43 B2 |....d..TT.3.(MC.| 00000EE0: 31 B0 4D 43 B2 34 29 A7 99 3A 99 22 12 4F 4E 45 |1.MC.4)..:.".ONE| 00000EF0: 20 4D 55 53 54 20 42 45 20 44 45 4C 45 54 45 44 | MUST BE DELETED| 00000F00: 20 54 4F 20 53 4F 52 54 20 41 4E 4F 54 48 45 52 | TO SORT ANOTHER| 00000F10: 92 22 00 4F 17 6C 02 99 3A 99 3A 99 22 28 52 29 |.".O.l..:.:."(R)| 00000F20: 52 45 54 55 52 4E 20 20 28 58 29 43 41 4E 43 45 |RETURN (X)CANCE| 00000F30: 4C 22 3A 99 3A 99 22 43 54 52 4C 28 41 2D 43 29 |L":.:."CTRL(A-C)| 00000F40: 20 44 45 4C 45 54 45 20 46 49 4C 45 22 3A 99 00 | DELETE FILE":..| 00000F50: 86 17 6E 02 97 32 31 31 2C 34 3A 9E 56 48 3A 99 |..n..211,4:.VH:.| 00000F60: 22 45 4E 54 45 52 20 53 45 4C 45 43 54 49 4F 4E |"ENTER SELECTION| 00000F70: 20 22 3B C7 28 31 37 35 29 3B 3A 97 32 31 31 2C | ";.(175);:.211,| 00000F80: 32 30 3A 9E 56 48 00 95 17 76 02 8D 32 30 3A 44 |20:.VH...v..20:D| 00000F90: 45 24 B2 58 24 00 C9 17 7A 02 8B 44 45 24 B3 B1 |E$.X$...z..DE$..| 00000FA0: 22 52 22 AF 44 45 24 B3 B1 22 58 22 AF 28 44 45 |"R".DE$.."X".(DE| 00000FB0: 24 B3 C7 28 31 29 B0 44 45 24 B1 C7 28 33 29 29 |$..(1).DE$..(3))| 00000FC0: A7 8D 39 31 3A 89 36 33 30 00 DF 17 80 02 99 44 |..91:.630......D| 00000FD0: 45 24 3A 8B 44 45 24 B2 22 52 22 A7 36 39 30 00 |E$:.DE$."R".690.| 00000FE0: F0 17 82 02 8B 44 45 24 B2 22 58 22 A7 36 30 30 |.....DE$."X".600| 00000FF0: 00 FA 17 84 02 44 45 25 B2 31 00 39 18 8A 02 44 |.....DE%.1.9...D| 00001000: 45 B2 C6 28 44 45 24 29 3A 4E 54 28 44 45 29 B2 |E..(DE$):NT(DE).| 00001010: 30 3A 53 4E 24 28 44 45 29 B2 22 4E 4F 54 20 53 |0:SN$(DE)."NOT S| 00001020: 4F 52 54 45 44 22 3A 54 54 B2 54 54 AB 31 3A 8B |ORTED":TT.TT.1:.| 00001030: 54 54 B3 30 A7 54 54 B2 30 00 42 18 94 02 89 36 |TT.0.TT.0.B....6| 00001040: 31 30 00 6F 18 B2 02 81 58 B2 31 A4 33 3A 53 46 |10.o....X.1.3:SF| 00001050: 24 28 58 29 B2 53 4E 24 28 58 29 3A 54 4E 28 58 |$(X).SN$(X):TN(X| 00001060: 29 B2 4E 54 28 58 29 3A 82 3A 54 53 B2 54 54 00 |).NT(X):.:TS.TT.| 00001070: 8A 18 B4 02 8B 44 45 25 A7 8D 33 31 30 30 3A 8D |.....DE%..3100:.| 00001080: 33 31 32 30 3A 8D 33 31 39 30 00 90 18 B6 02 8E |3120:.3190......| 00001090: 00 B0 18 BC 02 8D 38 32 3A 8D 33 30 39 30 3A 8D |......82:.3090:.| 000010A0: 33 31 30 30 3A 8D 33 31 36 30 3A 89 33 31 39 30 |3100:.3160:.3190| 000010B0: 00 C4 18 20 03 8D 31 30 30 30 3A 8B 54 53 B2 33 |... ..1000:.TS.3| 000010C0: A7 38 39 30 00 D5 18 22 03 8B 44 45 24 B2 22 58 |.890..."..DE$."X| 000010D0: 22 A7 38 39 30 00 17 19 28 03 4B B2 30 3A 54 4C |".890...(.K.0:TL| 000010E0: B2 30 3A 52 4E 24 B2 22 22 3A 45 50 24 B2 22 20 |.0:RN$."":EP$." | 000010F0: 20 20 22 3A 45 46 B2 30 3A 58 4C B2 30 3A 8D 37 | ":EF.0:XL.0:.7| 00001100: 31 30 30 3A 8D 37 30 3A 97 32 31 34 2C 31 37 3A |100:.70:.214,17:| 00001110: 97 32 31 31 2C 31 34 00 3D 19 34 03 9E 56 48 3A |.211,14.=.4..VH:| 00001120: 99 C8 28 42 4C 24 2C 32 35 29 3A 8D 37 31 34 30 |..(BL$,25):.7140| 00001130: 3A 8B 53 4C 24 B2 22 58 22 A7 38 36 30 00 57 19 |:.SL$."X".860.W.| 00001140: 36 03 8B 53 4C 24 B2 22 53 22 A7 99 3A 8D 32 30 |6..SL$."S"..:.20| 00001150: 30 30 3A 89 38 39 30 00 68 19 3E 03 8B 53 4C 24 |00:.890.h.>..SL$| 00001160: B2 22 4D 22 A7 38 39 30 00 71 19 5C 03 89 38 30 |."M".890.q.\..80| 00001170: 38 00 77 19 7A 03 8E 00 9E 19 84 03 99 22 93 22 |8.w.z........"."| 00001180: 3A 97 32 31 34 2C 38 3A 9E 56 48 3A 99 41 53 24 |:.214,8:.VH:.AS$| 00001190: 3A 99 3A 97 32 31 31 2C 31 33 3A 9E 56 48 00 EA |:.:.211,13:.VH..| 000011A0: 19 8E 03 99 22 12 20 22 4D 53 24 22 20 46 49 4C |....". "MS$" FIL| 000011B0: 45 53 20 92 22 3A 99 3A 97 32 31 31 2C 38 3A 9E |ES .":.:.211,8:.| 000011C0: 56 48 3A 99 22 12 20 50 4C 45 41 53 45 20 44 4F |VH:.". PLEASE DO| 000011D0: 20 4E 4F 54 20 49 4E 54 45 52 52 55 50 54 20 92 | NOT INTERRUPT .| 000011E0: 22 3A 99 3A 99 41 53 24 3A 8E 00 09 1A E8 03 8D |":.:.AS$:.......| 000011F0: 31 30 30 3A 8B 54 53 B2 33 A7 8D 36 30 30 3A 8B |100:.TS.3..600:.| 00001200: 54 53 B2 33 A7 31 30 34 30 00 24 1A ED 03 99 22 |TS.3.1040.$...."| 00001210: 93 22 3A 97 32 31 34 2C 38 3A 9E 56 48 3A 99 41 |.":.214,8:.VH:.A| 00001220: 53 24 3A 99 00 59 1A F2 03 99 22 20 45 4E 54 45 |S$:..Y...." ENTE| 00001230: 52 20 4E 41 4D 45 20 4F 46 20 4E 45 57 20 53 4F |R NAME OF NEW SO| 00001240: 52 54 20 46 49 4C 45 22 3A 97 32 31 34 2C 31 34 |RT FILE":.214,14| 00001250: 3A 9E 56 48 3A 99 41 53 24 00 8F 1A FC 03 97 32 |:.VH:.AS$......2| 00001260: 31 34 2C 31 32 3A 97 32 31 31 2C 31 34 3A 9E 56 |14,12:.211,14:.V| 00001270: 48 3A 99 C8 28 55 4C 24 2C 32 35 29 3B 3A 97 32 |H:..(UL$,25);:.2| 00001280: 31 31 2C 31 34 3A 9E 56 48 3A 51 4C B2 32 35 00 |11,14:.VH:QL.25.| 00001290: BB 1A 06 04 8D 34 30 3A 53 4B 24 B2 44 55 24 3A |.....40:SK$.DU$:| 000012A0: 8B C3 28 53 4B 24 29 B1 32 35 B0 53 4B 24 B2 22 |..(SK$).25.SK$."| 000012B0: 22 A7 8D 39 31 3A 89 31 30 32 30 00 DA 1A 10 04 |"..91:.1020.....| 000012C0: 97 32 31 34 2C 31 32 3A 97 32 31 31 2C 31 34 3A |.214,12:.211,14:| 000012D0: 9E 56 48 3A 99 53 4B 24 3A 8E 00 09 1B DC 05 4B |.VH:.SK$:......K| 000012E0: B2 4B AA 31 3A 54 4C B2 30 3A 53 4F 28 4B 29 B2 |.K.1:TL.0:SO(K).| 000012F0: 53 4C 3A 81 58 B2 31 A4 4B 3A 54 4C B2 54 4C AA |SL:.X.1.K:TL.TL.| 00001300: 4C 46 28 53 4F 28 58 29 29 00 31 1B E0 05 8B 53 |LF(SO(X)).1....S| 00001310: 4C B2 53 4F 28 58 29 AF 4B B3 B1 58 A7 4E 47 B2 |L.SO(X).K..X.NG.| 00001320: 31 3A 4B B2 4B AB 31 3A 58 B2 4B 3A 89 31 35 39 |1:K.K.1:X.K:.159| 00001330: 30 00 54 1B F0 05 82 3A 97 32 31 34 2C 31 37 3A |0.T....:.214,17:| 00001340: 97 32 31 31 2C 31 34 AA 32 AC 4B 3A 9E 56 48 3A |.211,14.2.K:.VH:| 00001350: 99 53 4C 24 00 5A 1B 36 06 8E 00 62 1B 3F 06 8D |.SL$.Z.6...b.?..| 00001360: 39 31 00 81 1B 40 06 45 46 B2 31 3A 97 32 31 34 |91...@.EF.1:.214| 00001370: 2C 36 AA 53 4C 3A 97 32 31 31 2C 31 34 3A 9E 56 |,6.SL:.211,14:.V| 00001380: 48 00 AB 1B 4A 06 99 C8 28 55 4C 24 2C 4C 46 28 |H...J...(UL$,LF(| 00001390: 53 4C 29 29 3B 3A 97 32 31 31 2C 31 34 3A 9E 56 |SL));:.211,14:.V| 000013A0: 48 3A 99 44 46 24 28 53 4C 29 3B 00 D4 1B 4E 06 |H:.DF$(SL);...N.| 000013B0: 97 32 31 31 2C 31 34 3A 9E 56 48 3A 51 4C B2 4C |.211,14:.VH:QL.L| 000013C0: 46 28 53 4C 29 3A 8D 34 30 3A 4E 24 28 53 4C 29 |F(SL):.40:N$(SL)| 000013D0: B2 44 55 24 00 F8 1B 50 06 8B 4E 24 28 53 4C 29 |.DU$...P..N$(SL)| 000013E0: B2 22 22 A7 4E 24 28 53 4C 29 B2 44 46 24 28 53 |."".N$(SL).DF$(S| 000013F0: 4C 29 3A 89 31 37 30 30 00 14 1C 54 06 8B 20 C3 |L):.1700...T.. .| 00001400: 28 4E 24 28 53 4C 29 29 B1 4C 46 28 53 4C 29 A7 |(N$(SL)).LF(SL).| 00001410: 31 35 39 39 00 2F 1C 5E 06 8B 4E 24 28 53 4C 29 |1599./.^..N$(SL)| 00001420: B2 C7 28 34 29 A7 4E 24 28 53 4C 29 B2 22 22 00 |..(4).N$(SL)."".| 00001430: 55 1C 62 06 4E 47 B2 30 3A 8B 4E 24 28 53 4C 29 |U.b.NG.0:.N$(SL)| 00001440: B2 22 3D 22 A7 8D 31 35 30 30 3A 8B 4E 47 B2 31 |."="..1500:.NG.1| 00001450: A7 31 35 39 39 00 95 1C A4 06 97 32 31 34 2C 36 |.1599......214,6| 00001460: AA 53 4C 3A 97 32 31 31 2C 31 34 AA 48 52 3A 9E |.SL:.211,14.HR:.| 00001470: 56 48 3A 8B 53 4C B3 B1 31 31 A7 99 C8 28 42 4C |VH:.SL..11...(BL| 00001480: 24 2C 32 35 AB 48 52 29 3B 3A 97 32 31 31 2C 31 |$,25.HR);:.211,1| 00001490: 34 3A 9E 56 48 00 B2 1C A8 06 99 C8 28 4E 24 28 |4:.VH.......(N$(| 000014A0: 53 4C 29 2C 4C 46 28 53 4C 29 29 3A 48 52 B2 30 |SL),LF(SL)):HR.0| 000014B0: 3A 8E 00 D6 1C 08 07 97 32 31 34 2C 36 AA 53 4C |:.......214,6.SL| 000014C0: 3A 97 32 31 31 2C 33 3A 9E 56 48 3A 99 53 4C 24 |:.211,3:.VH:.SL$| 000014D0: 28 53 4C 29 3A 8E 00 13 1D 6C 07 97 32 31 34 2C |(SL):....l..214,| 000014E0: 36 AA 53 4C 3A 97 32 31 31 2C 31 33 3A 9E 56 48 |6.SL:.211,13:.VH| 000014F0: 3A 99 C8 28 42 4C 24 2C 32 35 29 3B 3A 97 32 31 |:..(BL$,25);:.21| 00001500: 31 2C 31 34 3A 9E 56 48 3A 99 44 46 24 28 53 4C |1,14:.VH:.DF$(SL| 00001510: 29 3A 8E 00 32 1D D0 07 43 53 25 B2 30 3A 53 46 |):..2...CS%.0:SF| 00001520: B2 30 3A 54 43 B2 30 3A 8B 54 52 B2 30 A7 32 36 |.0:TC.0:.TR.0.26| 00001530: 39 30 00 4D 1D E4 07 81 58 B2 31 A4 31 30 3A 8B |90.M....X.1.10:.| 00001540: 4E 24 28 58 29 B2 22 22 A7 32 30 34 30 00 85 1D |N$(X)."".2040...| 00001550: EE 07 54 43 B2 54 43 AA 31 3A 53 54 28 54 43 29 |..TC.TC.1:ST(TC)| 00001560: B2 58 3A 54 4B 24 28 54 43 29 B2 4E 24 28 58 29 |.X:TK$(TC).N$(X)| 00001570: 3A 8B 54 4B 24 28 54 43 29 B2 22 3D 22 A7 54 43 |:.TK$(TC)."=".TC| 00001580: B2 54 43 AB 31 00 9A 1D F8 07 82 3A 8B 4B B2 30 |.TC.1......:.K.0| 00001590: AF 54 43 B2 30 A7 32 36 39 30 00 DD 1D 00 08 97 |.TC.0.2690......| 000015A0: 32 31 34 2C 31 38 3A 9E 56 48 3A 99 42 4C 24 3B |214,18:.VH:.BL$;| 000015B0: 3A 97 32 31 31 2C 31 33 3A 9E 56 48 3A 99 22 12 |:.211,13:.VH:.".| 000015C0: 2A 2A 53 45 41 52 43 48 49 4E 47 2A 2A 92 20 3C |**SEARCHING**. <| 000015D0: 46 31 3E 20 54 4F 20 41 42 4F 52 54 22 00 F5 1D |F1> TO ABORT"...| 000015E0: 02 08 8D 33 31 30 30 3A 81 52 4E B2 31 A4 54 52 |...3100:.RN.1.TR| 000015F0: 3A 52 46 B2 30 00 1E 1E 98 08 A1 58 24 3A 8B 58 |:RF.0......X$:.X| 00001600: 24 B2 C7 28 31 33 33 29 A7 52 4E B2 54 52 3A 43 |$..(133).RN.TR:C| 00001610: 53 25 B2 30 3A 8D 39 31 3A 89 32 35 30 30 00 4A |S%.0:.91:.2500.J| 00001620: 1E A2 08 97 32 31 34 2C 35 3A 97 32 31 31 2C 32 |....214,5:.211,2| 00001630: 31 3A 9E 56 48 3A 99 52 4E 3A 8D 33 31 38 30 3A |1:.VH:.RN:.3180:| 00001640: 8B 54 43 B2 30 A7 32 33 30 30 00 80 1E DE 08 81 |.TC.0.2300......| 00001650: 58 B2 31 A4 54 43 3A 8B 54 4B 24 28 58 29 B3 B1 |X.1.TC:.TK$(X)..| 00001660: C8 28 4E 24 28 53 54 28 58 29 29 2C C3 28 54 4B |.(N$(ST(X)),.(TK| 00001670: 24 28 58 29 29 29 A7 58 B2 54 43 3A 52 46 B2 31 |$(X))).X.TC:RF.1| 00001680: 00 86 1E E8 08 82 00 95 1E FC 08 8B 52 46 B1 30 |............RF.0| 00001690: A7 32 35 30 30 00 B9 1E 60 09 43 53 25 B2 43 53 |.2500...`.CS%.CS| 000016A0: 25 AA 31 3A 53 52 24 28 43 53 25 29 B2 22 22 3A |%.1:SR$(CS%)."":| 000016B0: 8B 4B B2 30 A7 32 34 31 38 00 FA 1E 6A 09 8B 4D |.K.0.2418...j..M| 000016C0: 43 B3 B1 34 A7 81 58 B2 31 A4 4B 3A 53 52 24 28 |C..4..X.1.K:SR$(| 000016D0: 43 53 25 29 B2 53 52 24 28 43 53 25 29 AA C8 28 |CS%).SR$(CS%)..(| 000016E0: 4E 24 28 53 4F 28 58 29 29 AA 45 58 24 2C 4C 46 |N$(SO(X)).EX$,LF| 000016F0: 28 53 4F 28 58 29 29 29 3A 82 00 2E 1F 6E 09 8B |(SO(X))):....n..| 00001700: 4D 43 B2 34 A7 81 58 B2 31 A4 4B 3A 53 52 24 28 |MC.4..X.1.K:SR$(| 00001710: 43 53 25 29 B2 53 52 24 28 43 53 25 29 AA C8 28 |CS%).SR$(CS%)..(| 00001720: 4E 24 28 53 4F 28 58 29 29 2C 34 29 3A 82 00 5F |N$(SO(X)),4):.._| 00001730: 1F 72 09 53 52 24 28 43 53 25 29 B2 53 52 24 28 |.r.SR$(CS%).SR$(| 00001740: 43 53 25 29 AA C9 28 42 4C 24 AA C4 28 52 4E 29 |CS%)..(BL$..(RN)| 00001750: 2C 33 29 3A 53 52 25 28 43 53 25 29 B2 52 4E 00 |,3):SR%(CS%).RN.| 00001760: 7D 1F C4 09 82 52 4E 3A 8D 33 31 39 30 3A 8B 58 |}....RN:.3190:.X| 00001770: 24 B2 C7 28 31 33 33 29 A7 32 36 33 30 00 A7 1F |$..(133).2630...| 00001780: 28 0A 81 58 B2 43 53 25 AA 31 A4 37 35 31 3A 53 |(..X.CS%.1.751:S| 00001790: 52 24 28 58 29 B2 C7 28 31 37 35 29 3A 53 52 25 |R$(X)..(175):SR%| 000017A0: 28 58 29 B2 30 3A 82 00 B8 1F 2A 0A 8B 20 43 53 |(X).0:....*.. CS| 000017B0: 25 B2 30 A7 32 36 33 30 00 D4 1F 2D 0A 8B 4B B1 |%.0.2630...-..K.| 000017C0: 30 A7 4D 53 24 B2 22 53 4F 52 54 49 4E 47 22 3A |0.MS$."SORTING":| 000017D0: 8D 39 30 30 00 F1 1F 34 0A 81 58 B2 31 A4 33 3A |.900...4..X.1.3:| 000017E0: 8B 54 4E 28 58 29 B2 30 A7 53 46 B2 58 3A 58 B2 |.TN(X).0.SF.X:X.| 000017F0: 33 00 0A 20 37 0A 82 3A 53 52 25 28 30 29 B2 30 |3.. 7..:SR%(0).0| 00001800: 3A 8B 4B B2 30 A7 32 36 32 34 00 25 20 3A 0A 8B |:.K.0.2624.% :..| 00001810: 4B B2 31 AF 54 43 B2 30 A7 53 52 25 28 30 29 B2 |K.1.TC.0.SR%(0).| 00001820: 53 4F 28 31 29 00 51 20 3C 0A 9E 34 39 36 36 34 |SO(1).Q <..49664| 00001830: 3A 81 58 B2 31 A4 54 52 3A 53 52 25 28 58 29 B2 |:.X.1.TR:SR%(X).| 00001840: C5 28 C9 28 53 52 24 28 58 29 2C 33 29 29 3A 82 |.(.(SR$(X),3)):.| 00001850: 58 00 62 20 3E 0A 8B 20 4D 43 B2 34 A7 8D 34 31 |X.b >.. MC.4..41| 00001860: 30 30 00 96 20 40 0A 53 46 24 28 53 46 29 B2 53 |00.. @.SF$(SF).S| 00001870: 4B 24 3A 4D 53 24 B2 22 57 52 49 54 49 4E 47 22 |K$:MS$."WRITING"| 00001880: 3A 8D 39 30 30 3A 54 4E 28 53 46 29 B2 43 53 25 |:.900:TN(SF).CS%| 00001890: 3A 8D 33 33 30 30 00 AC 20 44 0A 8D 33 31 30 30 |:.3300.. D..3100| 000018A0: 3A 8D 33 31 32 30 3A 8D 33 31 39 30 00 D9 20 46 |:.3120:.3190.. F| 000018B0: 0A 81 58 B2 31 A4 37 35 31 3A 53 52 24 28 58 29 |..X.1.751:SR$(X)| 000018C0: B2 22 22 3A 53 52 25 28 58 29 B2 30 3A 82 3A 58 |."":SR%(X).0:.:X| 000018D0: B2 B8 28 30 29 3A 8D 39 31 00 1D 21 50 0A 99 22 |..(0):.91..!P.."| 000018E0: 93 22 3A 97 32 31 34 2C 38 3A 9E 56 48 3A 99 41 |.":.214,8:.VH:.A| 000018F0: 53 24 3A 99 3A 99 22 20 20 20 22 43 53 25 22 20 |S$:.:." "CS%" | 00001900: 45 4E 54 52 49 45 53 20 57 52 49 54 54 45 4E 20 |ENTRIES WRITTEN | 00001910: 54 4F 20 53 4F 52 54 20 46 49 4C 45 22 00 5C 21 |TO SORT FILE".\!| 00001920: 5A 0A 99 3A 99 22 20 20 20 20 20 20 20 20 20 20 |Z..:." | 00001930: 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |HIT ANY KEY TO C| 00001940: 4F 4E 54 49 4E 55 45 22 3A 99 3A 99 41 53 24 48 |ONTINUE":.:.AS$H| 00001950: 57 24 28 31 38 29 3A 8D 32 31 3A 8E 00 62 21 82 |W$(18):.21:..b!.| 00001960: 0A 8E 00 91 21 B8 0B 98 31 35 2C 22 49 30 22 3A |....!...15,"I0":| 00001970: 44 55 24 B2 22 22 3A 8D 33 39 30 3A A0 32 3A 9F |DU$."":.390:.2:.| 00001980: 32 2C 4E 43 25 2C 30 2C 22 24 30 22 3A 8D 33 39 |2,NC%,0,"$0":.39| 00001990: 30 00 A3 21 C0 0B 81 58 B2 31 A4 36 3A 8D 33 34 |0..!...X.1.6:.34| 000019A0: 30 3A 82 00 BC 21 C2 0B 8D 33 34 30 3A 8B 58 24 |0:...!...340:.X$| 000019B0: B3 B1 C7 28 33 34 29 A7 33 30 31 30 00 E1 21 C4 |...(34).3010..!.| 000019C0: 0B 8D 33 34 30 3A 8B 58 24 B3 B1 C7 28 33 34 29 |..340:.X$...(34)| 000019D0: A7 44 55 24 B2 44 55 24 AA 58 24 3A 89 33 30 31 |.DU$.DU$.X$:.301| 000019E0: 32 00 EA 21 C6 0B 89 33 31 30 00 1D 22 FE 0B A0 |2..!...310.."...| 000019F0: 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 4E 43 25 B2 |15:.15,8,15:NC%.| 00001A00: 38 3A 8D 33 30 30 30 3A 8B C8 28 44 55 24 2C 37 |8:.3000:..(DU$,7| 00001A10: 29 B2 22 50 52 4F 47 52 41 4D 22 A7 8E 00 2B 22 |)."PROGRAM"...+"| 00001A20: 03 0C 8D 38 35 3A 89 33 30 37 30 00 5F 22 12 0C |...85:.3070._"..| 00001A30: A0 31 35 3A 9F 31 35 2C 4E 44 25 2C 31 35 3A 4E |.15:.15,ND%,15:N| 00001A40: 43 25 B2 4E 44 25 3A 8D 33 30 30 30 3A 8B C8 28 |C%.ND%:.3000:..(| 00001A50: 44 55 24 2C 34 29 B2 22 44 41 54 41 22 A7 8E 00 |DU$,4)."DATA"...| 00001A60: 6D 22 16 0C 8D 38 32 3A 89 33 30 39 30 00 7C 22 |m"...82:.3090.|"| 00001A70: 1C 0C 4E 41 25 B2 30 3A 89 33 30 35 00 9D 22 30 |..NA%.0:.305.."0| 00001A80: 0C 98 31 35 2C 22 50 22 AA C7 28 39 38 29 AA C7 |..15,"P"..(98)..| 00001A90: 28 31 29 AA C7 28 30 29 AA C7 28 31 29 00 DC 22 |(1)..(0)..(1).."| 00001AA0: 34 0C 44 55 24 B2 C4 28 54 52 29 3A 81 59 B2 31 |4.DU$..(TR):.Y.1| 00001AB0: A4 33 3A 44 55 24 B2 44 55 24 AA C7 28 31 33 29 |.3:DU$.DU$..(13)| 00001AC0: AA C4 28 54 4E 28 59 29 29 AA C7 28 31 33 29 AA |..(TN(Y))..(13).| 00001AD0: 53 46 24 28 59 29 3A 82 3A 59 B2 30 00 E5 22 35 |SF$(Y):.:Y.0.."5| 00001AE0: 0C 89 33 33 37 00 0B 23 44 0C 52 32 25 B2 28 52 |..337..#D.R2%.(R| 00001AF0: 4E AA 31 29 AD 32 35 36 3A 52 31 25 B2 52 4E AA |N.1).256:R1%.RN.| 00001B00: 31 AB 28 52 32 25 AC 32 35 36 29 00 30 23 46 0C |1.(R2%.256).0#F.| 00001B10: 98 31 35 2C 22 50 22 AA C7 28 39 38 29 AA C7 28 |.15,"P"..(98)..(| 00001B20: 52 31 25 29 AA C7 28 52 32 25 29 AA C7 28 31 29 |R1%)..(R2%)..(1)| 00001B30: 00 49 23 48 0C 44 55 24 B2 C8 28 4E 24 28 5A 2C |.I#H.DU$..(N$(Z,| 00001B40: 31 29 2C 4C 46 28 31 29 29 00 76 23 4A 0C 81 42 |1),LF(1)).v#J..B| 00001B50: B2 32 A4 58 4C 3A 44 55 24 B2 44 55 24 AA C7 28 |.2.XL:DU$.DU$..(| 00001B60: 31 33 29 AA C8 28 4E 24 28 5A 2C 42 29 2C 4C 46 |13)..(N$(Z,B),LF| 00001B70: 28 42 29 29 3A 82 00 A3 23 4C 0C 8B 58 4C B3 31 |(B)):...#L..XL.1| 00001B80: 30 A7 81 42 B2 58 4C AA 31 A4 31 30 3A 44 55 24 |0..B.XL.1.10:DU$| 00001B90: B2 44 55 24 AA C7 28 31 33 29 AA C7 28 31 36 30 |.DU$..(13)..(160| 00001BA0: 29 3A 82 00 AC 23 50 0C 89 33 33 37 00 CD 23 58 |):...#P..337..#X| 00001BB0: 0C 98 31 35 2C 22 50 22 AA C7 28 39 38 29 AA C7 |..15,"P"..(98)..| 00001BC0: 28 31 29 AA C7 28 30 29 AA C7 28 31 29 00 E0 23 |(1)..(0)..(1)..#| 00001BD0: 5A 0C 8D 33 32 35 3A 54 52 B2 C5 28 44 55 24 29 |Z..325:TR..(DU$)| 00001BE0: 00 13 24 5C 0C 81 59 B2 31 A4 33 3A 8D 33 32 35 |..$\..Y.1.3:.325| 00001BF0: 3A 54 4E 28 59 29 B2 C5 28 44 55 24 29 3A 8D 33 |:TN(Y)..(DU$):.3| 00001C00: 32 35 3A 53 46 24 28 59 29 B2 44 55 24 3A 82 3A |25:SF$(Y).DU$:.:| 00001C10: 59 B2 30 00 19 24 5E 0C 8E 00 3F 24 6C 0C 52 32 |Y.0..$^...?$l.R2| 00001C20: 25 B2 28 52 4E AA 31 29 AD 32 35 36 3A 52 31 25 |%.(RN.1).256:R1%| 00001C30: B2 52 4E AA 31 AB 28 52 32 25 AC 32 35 36 29 00 |.RN.1.(R2%.256).| 00001C40: 64 24 6E 0C 98 31 35 2C 22 50 22 AA C7 28 39 38 |d$n..15,"P"..(98| 00001C50: 29 AA C7 28 52 31 25 29 AA C7 28 52 32 25 29 AA |)..(R1%)..(R2%).| 00001C60: C7 28 31 29 00 A8 24 6F 0C 84 32 2C 4E 24 28 31 |.(1)..$o..2,N$(1| 00001C70: 29 2C 4E 24 28 32 29 2C 4E 24 28 33 29 2C 4E 24 |),N$(2),N$(3),N$| 00001C80: 28 34 29 2C 4E 24 28 35 29 2C 4E 24 28 36 29 2C |(4),N$(5),N$(6),| 00001C90: 4E 24 28 37 29 2C 4E 24 28 38 29 2C 4E 24 28 39 |N$(7),N$(8),N$(9| 00001CA0: 29 2C 4E 24 28 31 30 29 00 CB 24 70 0C 81 42 B2 |),N$(10)..$p..B.| 00001CB0: 31 A4 58 4C 3A 8B 4E 24 28 42 29 B2 C7 28 31 36 |1.XL:.N$(B)..(16| 00001CC0: 30 29 A7 4E 24 28 42 29 B2 22 22 00 D3 24 72 0C |0).N$(B).""..$r.| 00001CD0: 82 3A 8E 00 DC 24 76 0C 89 33 31 30 00 0B 25 E4 |.:...$v..310..%.| 00001CE0: 0C 4E 41 25 B2 32 AA 53 46 3A 8D 33 30 35 3A 81 |.NA%.2.SF:.305:.| 00001CF0: 5A B2 30 A4 54 4E 28 53 46 29 3A 98 32 2C 53 52 |Z.0.TN(SF):.2,SR| 00001D00: 25 28 5A 29 3A 82 3A 89 33 31 30 00 44 25 48 0D |%(Z):.:.310.D%H.| 00001D10: 4E 41 25 B2 31 3A 8D 33 30 35 3A 8D 33 32 35 3A |NA%.1:.305:.325:| 00001D20: 43 4C 24 B2 44 55 24 3A 58 4C B2 30 3A 81 58 B2 |CL$.DU$:XL.0:.X.| 00001D30: 31 A4 31 30 3A 8D 33 32 35 3A 53 4C 24 28 58 29 |1.10:.325:SL$(X)| 00001D40: B2 44 55 24 00 80 25 54 0D 8D 33 32 30 3A 4C 46 |.DU$..%T..320:LF| 00001D50: 28 58 29 B2 44 55 3A 54 46 25 B2 54 46 25 AA 4C |(X).DU:TF%.TF%.L| 00001D60: 46 28 58 29 3A 8B 53 4C 24 28 58 29 B3 B1 22 49 |F(X):.SL$(X).."I| 00001D70: 4E 41 43 54 49 56 45 22 A7 58 4C B2 58 4C AA 31 |NACTIVE".XL.XL.1| 00001D80: 00 97 25 56 0D 82 3A 8B 43 4C 24 B2 22 22 A7 43 |..%V..:.CL$."".C| 00001D90: 4C 24 B2 22 20 20 22 00 D0 25 58 0D 81 58 B2 31 |L$." "..%X..X.1| 00001DA0: A4 31 30 3A 8D 33 32 35 3A 44 46 24 28 58 29 B2 |.10:.325:DF$(X).| 00001DB0: 44 55 24 3A 82 3A 8D 33 32 30 3A 4C 57 B2 44 55 |DU$:.:.320:LW.DU| 00001DC0: 3A 8D 33 32 30 3A 4C 48 B2 44 55 3A 8D 33 32 30 |:.320:LH.DU:.320| 00001DD0: 00 14 26 5A 0D 4C 41 B2 44 55 3A 8D 33 32 35 3A |..&Z.LA.DU:.325:| 00001DE0: 4D 53 24 B2 44 55 24 3A 81 58 B2 31 A4 39 3A 8D |MS$.DU$:.X.1.9:.| 00001DF0: 33 32 30 3A 4D 53 25 28 58 29 B2 44 55 3A 4D 53 |320:MS%(X).DU:MS| 00001E00: 24 28 58 AC B6 28 4D 53 25 28 58 29 B2 31 29 29 |$(X..(MS%(X).1))| 00001E10: B2 4D 53 24 00 4E 26 5E 0D 81 59 B2 31 A4 35 3A |.MS$.N&^..Y.1.5:| 00001E20: 8D 33 32 30 3A 4C 50 25 28 58 2C 59 29 B2 44 55 |.320:LP%(X,Y).DU| 00001E30: 3A 82 59 2C 58 3A 81 59 B2 31 A4 35 3A 8D 33 32 |:.Y,X:.Y.1.5:.32| 00001E40: 35 3A 45 46 24 28 59 29 B2 44 55 24 3A 82 00 7E |5:EF$(Y).DU$:..~| 00001E50: 26 62 0D 4D 45 B2 C5 28 45 46 24 28 33 29 29 3A |&b.ME..(EF$(3)):| 00001E60: 48 45 B2 C5 28 45 46 24 28 34 29 29 3A 4C 42 B2 |HE..(EF$(4)):LB.| 00001E70: C5 28 45 46 24 28 35 29 29 3A 89 33 31 30 00 B5 |.(EF$(5)):.310..| 00001E80: 26 D8 0E 4E 41 25 B2 32 3A 8D 33 30 30 3A 8D 33 |&..NA%.2:.300:.3| 00001E90: 32 30 3A 46 54 25 B2 44 55 3A 81 53 4C B2 31 A4 |20:FT%.DU:.SL.1.| 00001EA0: 31 38 3A 8D 33 32 35 3A 48 57 24 28 53 4C 29 B2 |18:.325:HW$(SL).| 00001EB0: 44 55 24 3A 82 00 D8 26 F6 0E 99 48 57 24 28 31 |DU$:...&...HW$(1| 00001EC0: 37 29 3A 4E 44 25 B2 37 AA C5 28 48 57 24 28 31 |7):ND%.7..(HW$(1| 00001ED0: 34 29 29 3A 89 33 31 30 00 08 27 04 10 54 53 25 |4)):.310..'..TS%| 00001EE0: B2 43 53 25 3A 43 53 25 B2 30 3A 44 46 B2 30 3A |.CS%:CS%.0:DF.0:| 00001EF0: 5A B2 C3 28 53 52 24 28 31 29 29 AB 33 3A 81 58 |Z..(SR$(1)).3:.X| 00001F00: B2 31 A4 54 53 25 AB 31 00 37 27 18 10 59 B2 58 |.1.TS%.1.7'..Y.X| 00001F10: AA 31 3A 8B C8 28 53 52 24 28 58 29 2C 5A 29 B3 |.1:..(SR$(X),Z).| 00001F20: B1 C8 28 53 52 24 28 59 29 2C 5A 29 A7 44 46 B2 |..(SR$(Y),Z).DF.| 00001F30: 30 3A 89 34 31 38 30 00 61 27 1A 10 43 53 25 B2 |0:.4180.a'..CS%.| 00001F40: 43 53 25 AA 31 3A 8B 44 46 B2 31 A7 53 52 25 28 |CS%.1:.DF.1.SR%(| 00001F50: 43 53 25 29 B2 53 52 25 28 59 29 3A 89 34 31 38 |CS%).SR%(Y):.418| 00001F60: 30 00 94 27 22 10 53 52 25 28 43 53 25 29 B2 53 |0..'".SR%(CS%).S| 00001F70: 52 25 28 58 29 3A 43 53 25 B2 43 53 25 AA 31 3A |R%(X):CS%.CS%.1:| 00001F80: 53 52 25 28 43 53 25 29 B2 53 52 25 28 59 29 3A |SR%(CS%).SR%(Y):| 00001F90: 44 46 B2 31 00 9C 27 54 10 82 3A 8E 00 AB 27 BC |DF.1..'T..:...'.| 00001FA0: 1B 8D 35 30 3A 97 32 31 34 2C 35 00 E4 27 C6 1B |..50:.214,5..'..| 00001FB0: 97 32 31 31 2C 33 3A 9E 56 48 3A 99 22 50 52 4F |.211,3:.VH:."PRO| 00001FC0: 43 45 53 53 49 4E 47 20 45 4E 54 52 59 20 23 20 |CESSING ENTRY # | 00001FD0: 20 20 20 20 4F 46 22 54 52 3A 97 32 31 34 2C 37 | OF"TR:.214,7| 00001FE0: 3A 9E 56 48 00 03 28 CE 1B 81 58 B2 31 A4 31 30 |:.VH..(...X.1.10| 00001FF0: 3A 99 22 12 22 C7 28 36 34 AA 58 29 22 92 22 3A |:.".".(64.X)".":| 00002000: 82 3A 99 00 3F 28 D0 1B 97 32 31 34 2C 32 30 3A |.:..?(...214,20:| 00002010: 97 32 31 31 2C 31 30 3A 9E 56 48 3A 99 53 43 24 |.211,10:.VH:.SC$| 00002020: 28 33 29 22 20 28 41 2D 22 C7 28 37 34 AA 28 4D |(3)" (A-".(74.(M| 00002030: 43 B1 31 29 AA 28 4D 43 B2 34 29 29 22 29 22 00 |C.1).(MC.4))")".| 00002040: 60 28 D4 1B 99 53 43 24 28 36 29 3A 97 32 31 31 |`(...SC$(6):.211| 00002050: 2C 31 32 3A 9E 56 48 3A 99 53 43 24 28 32 29 3B |,12:.VH:.SC$(2);| 00002060: 00 8C 28 D6 1B 8B 50 53 25 B3 B1 30 A7 97 32 31 |..(...PS%..0..21| 00002070: 34 2C 32 31 3A 97 32 31 31 2C 31 34 3A 9E 56 48 |4,21:.211,14:.VH| 00002080: 3A 99 22 28 50 29 50 52 49 4E 54 22 00 C3 28 DE |:."(P)PRINT"..(.| 00002090: 1B 97 32 31 34 2C 32 32 3A 9E 56 48 3A 99 22 28 |..214,22:.VH:."(| 000020A0: 4D 29 20 4D 45 4E 55 22 3B 3A 97 32 31 31 2C 33 |M) MENU";:.211,3| 000020B0: 30 3A 9E 56 48 3A 99 22 28 53 29 20 53 4F 52 54 |0:.VH:."(S) SORT| 000020C0: 22 3A 8E 00 FB 28 E4 1B 97 32 31 34 2C 32 32 3A |":...(...214,22:| 000020D0: 97 32 31 31 2C 32 38 3A 9E 56 48 3A 99 C7 28 31 |.211,28:.VH:..(1| 000020E0: 37 35 29 3B 3A 97 32 31 31 2C 32 38 3A 9E 56 48 |75);:.211,28:.VH| 000020F0: 3A 8D 32 30 3A 53 4C 24 B2 58 24 00 1F 29 E6 1B |:.20:SL$.X$..)..| 00002100: 99 53 4C 24 3A 8B 53 4C 24 B2 22 4D 22 B0 53 4C |.SL$:.SL$."M".SL| 00002110: 24 B2 22 58 22 B0 53 4C 24 B2 22 53 22 A7 8E 00 |$."X".SL$."S"...| 00002120: 36 29 EA 1B 8B 53 4C 24 B2 22 50 22 A7 8D 38 30 |6)...SL$."P"..80| 00002130: 3A 89 37 31 34 30 00 61 29 F8 1B 53 4C B2 C6 28 |:.7140.a)..SL..(| 00002140: 53 4C 24 29 AB 36 34 3A 8B 28 53 4C B1 58 4C 29 |SL$).64:.(SL.XL)| 00002150: B0 28 53 4C B3 30 29 A7 8D 39 31 3A 89 37 31 34 |.(SL.0)..91:.714| 00002160: 30 00 7D 29 02 1C 8D 31 36 30 30 3A 8B 54 4C AC |0.})...1600:.TL.| 00002170: 54 52 B3 32 35 30 30 31 A7 37 31 34 30 00 B8 29 |TR.25001.7140..)| 00002180: 06 1C 8D 39 31 3A 97 32 31 34 2C 31 37 3A 9E 56 |...91:.214,17:.V| 00002190: 48 3A 99 42 4C 24 3B 3A 97 32 31 31 2C 31 34 3A |H:.BL$;:.211,14:| 000021A0: 9E 56 48 3A 99 22 53 4F 52 54 20 4B 45 59 20 54 |.VH:."SORT KEY T| 000021B0: 4F 4F 20 4C 4F 4E 47 22 00 D6 29 08 1C 81 58 B2 |OO LONG"..)...X.| 000021C0: 30 A4 32 30 30 30 3A 82 3A 53 4C 24 B2 22 58 22 |0.2000:.:SL$."X"| 000021D0: 3A 89 37 31 34 32 00 00 00 |:.7142... |
..N...VH.58732:.SR$(751),SR%(751),HW$(18
),LF(11),DF$(11),SL$(11),N$(11),SO(11)..
....X.O.38:BL$.BL$." ":UL$.UL$.G(175)::A
S$.AS$."*":QM$.QM$."?".L...EX$.EX$.G(01)
:.:AS$." ".H(AS$,38):.90:NL$." NOW LOADI
NG ".....LF(11).4:SL$(11)."SORT ORDER":T
W%.2:MS$."READING":SM$(1)."DATA".]....SO
RT ENTRIES,EXAMINE SORT FILES,CHANGE DAT
A DISK,CREATE DUPLICATES FILE......RECOR
D/EDIT/PRINT ENTRIES,MAIN MENU,** F.C.M.
**,ADD/EDIT ENTRIES......ENTER SELECTIO
N,LETTER TO EDIT,(R) RECORD,(P) PRINT,(X
) CANCEL......X.1.6:.MU$(X):.:.X.0.6:.SC
$(X):.:SM$(0)."PROGRAM".N...SM$(2)." DIS
KETTE. PRESS ANY KEY WHEN READY.":NA$(0)
."0:MRENTRY,L,".G(142).....NA$(1)."0:CUS
TOM,S,R":NA$(2)."0:HARDWARE,S,R":NA$(5).
"@0:SORTFILE3,S,W".....NA$(3)."@0:SORTFI
LE1,S,W":NA$(4)."@0:SORTFILE2,S,W":.3070
:.3800.1....53280,E(HW$(16)):.53281,E(HW
$(16)):.3090:.900.A....3400:.3100:.3160:
.3190:PF$(0)."":PF$(1).""......X.1.10:.D
F$(X)."*".DF%(X).1:DF$(X)."".I....:.HW.4
.8:CH..(E(HW$(HW))..5):.CH..0.PF$(0).PF$
(0).G(CH)......:.HW.9.13:CH..(E(HW$(HW))
..5):.CH..0.PF$(1).PF$(1).G(CH).4....:PS
%.0:SD%.E(HW$(2)):.HW$(1).."N".PS%.1.=..
..400.H....204,0.[....X$:.X$.."".21.M...
.X$:.X$."".22.~....X$.G(13).28.....DU.F(
X$):.(DU.32.DU.4).DU.44.DU.59.DU.133..91
:.22.O...." ."HW$(17);:.204,1:....(.DU$.
H(BL$,QL):.50176:.HW$(18)" ."HW$(17):..H
.2.NF.0:.".":.214,2:.211,20.C(SC$(0)).2:
.VH:.SC$(0):.211,19.C(MU$(MC)).2.A.4..VH
:.". "MU$(MC)" ."...6..RF.0..214,6:.211,
14:.VH:.". = .";:." MEANS ALL"...8...U.<
.XL.0:.SL.1.10:.1800:.SL$(SL).."INACTIVE
".XL.XL.1:.:....F.Z.0:.SL.1.11:N$(SL).""
:SO(SL).0.&.H..1800:.SL$(SL).."INACTIVE"
.SL.11.XL.XL.1...J..:..=.P..PS%.0..91.].
Q. 4:.4,4,0:.4:.49152:.4: 4:....R..".":.
214,8:.VH:.AS$:.:." REMOVE ANY DISK FR
OM DRIVE #"ND%"AND"...S..91:.211,14.C(SC
$(0)).2:.VH:."INSERT "SC$(0)" DATA."...T
..211,8:.VH:.J(SM$(2),12):.:.AS$HW$(18):
.21.M.U..".":.214,8:.VH:.AS$:.:." REMOV
E ANY DISK FROM DRIVE #8 AND"...V..91:.2
11,12.C(SC$(0)).2:.VH:."INSERT "SC$(0)"
PROGRAM."...W..211,8:.VH:.J(SM$(2),12):.
:.AS$HW$(18):.21...Z.AX.54272:.W.0.24:.A
X.W,0:.:.AX.18,16:.AX.14,5:.AX.3,1:..0.[
..90:.AX.24,143:.AX.6,240:.AX.4,65:F0.73
91:.T0.1.9:F1.F0.K.\.F3..(F1.256):F2.F1.
F3.256:.AX,F2:.AX.1,F3:.:.AX.24,0:....].
.91:.91:.".":.214,8:.VH:.AS$:.:.211,6:.V
H.T.^.."DISK ERR #"E1%:.:.211,6:.VH:.ER$
" TRK"E2%" SEC"E3%:...._.. E1%.26.E1%.29
.E1%.74.97.!.`..:.211,6:.VH:."INSERT GOO
D PROGRAM DISK":..P.A..211,6:.VH:.J(SM$(
2),12):.:.AS$HW$(18):.21.M.B.. E1%.26.E1
%.29.E1%.74...~.C.MC.6: 2:.500...D.TS.3:
.Y.1.3:.TN(Y).0.TS.TS.1...N..:....H.SF.S
F.1:.SF.4.SF.0...R..214,VT.12:.211,14:.V
H:.H(BL$,25);:.211,14:.VH:.SF$(SF):..A..
..214,5:.211,22:.VH:.H(BL$,17):.214,VT.1
1:.211,11:.VH:.H(BL$,28);.]....211,15:.V
H:.DF$:.210:..Y.,. 2:.2,8,2,NA$(NA%):.39
0...1. 2:.2,ND%,2,NA$(NA%):.390...6. 2:.
390...@.DU.0:.2,DU:.390...E.DU$."":.2,DU
$:. DU$.G(160).DU$.""...I.....J..2,DU:.3
90...O..DU$."".DU$.G(160)...P..2,DU$:.39
0.0.Q..DU$."".DU$.G(160).A.R..2,DU$;:.39
0.Q.T..#2,X$:.390.I....15,E1%,ER$,E2%,E3
%.X....E1%.20.93.~.........DE$."":PF.1:Z
.0.W....".":.214,5:.211,21.C(SC$(0)).2:.
VH:.SC$(0):.211,21.C(CL$).2:.VH......CL$
:.211,20.C(MU$(1)).2:.". "MU$(1)" .".?..
..214,10:.VH:.X.1.6:.211,3:.VH:."."X". .
";:." "MU$(X):..O....214,22:.211,7:.VH:.
SC$(2)" (1-6) ";G(175);......214,22:.211
,29:.VH:.20:MC$.X$......MC$."1".MC$."6".
.91:.430......MC$:MC.F(MC$).48:.MC.800,6
00,700,800,500,500:.400......3070: 15.4.
...".":.214,10:.VH:.AS$:.214,16:.VH:.AS$
:.214,12:.211,13:.VH.W....". NOW LOADING
.":.:.211,19.C(MU$(MC)).2:.VH:.". "MU$(
MC)" ."......214,18:.VH......MC.5.550.E.
...HW$(18)"NEW:.LOAD"G(34)"MRMENU"G(34)"
,8,1"......631,19:.632,13:.633,82:.634,2
13:.635,13:.198,5:..+.&..HW$(18)"NEW:.LO
AD"G(34)"RECORD"G(34)",8,1".A.0..631,19:
.632,13:.633,82:.634,213:.635,13:.198,5:
....X..X.1.3:SN$(X).SF$(X):NT(X).TN(X):.
:TT.TS:DE%.0.Q.B.RF.1:.50:RF.0:.214,5:.V
H:.X.1.3:.:.:.G(X.64)". "SN$(X):....D..T
T.3.(MC.1.MC.4)..:.".ONE MUST BE DELETED
TO SORT ANOTHER.".O.L..:.:."(R)RETURN
(X)CANCEL":.:."CTRL(A-C) DELETE FILE":..
..N..211,4:.VH:."ENTER SELECTION ";G(175
);:.211,20:.VH...V..20:DE$.X$.I.Z..DE$..
"R".DE$.."X".(DE$.G(1).DE$.G(3))..91:.63
0......DE$:.DE$."R".690......DE$."X".600
.....DE%.1.9...DE.F(DE$):NT(DE).0:SN$(DE
)."NOT SORTED":TT.TT.1:.TT.0.TT.0.B....6
10.O....X.1.3:SF$(X).SN$(X):TN(X).NT(X):
.:TS.TT......DE%..3100:.3120:.3190......
......82:.3090:.3100:.3160:.3190.D. ..10
00:.TS.3.890.U."..DE$."X".890...(.K.0:TL
.0:RN$."":EP$." ":EF.0:XL.0:.7100:.70:
.214,17:.211,14.=.4..VH:.H(BL$,25):.7140
:.SL$."X".860.W.6..SL$."S"..:.2000:.890.
H.>..SL$."M".890.Q.\..808.W.Z........"."
:.214,8:.VH:.AS$:.:.211,13:.VH......". "
MS$" FILES .":.:.211,8:.VH:.". PLEASE DO
NOT INTERRUPT .":.:.AS$:.......100:.TS.
3..600:.TS.3.1040.$....".":.214,8:.VH:.A
S$:..Y...." ENTER NAME OF NEW SORT FILE"
:.214,14:.VH:.AS$......214,12:.211,14:.V
H:.H(UL$,25);:.211,14:.VH:QL.25......40:
SK$.DU$:.C(SK$).25.SK$.""..91:.1020.Z...
.214,12:.211,14:.VH:.SK$:......K.K.1:TL.
0:SO(K).SL:.X.1.K:TL.TL.LF(SO(X)).1....S
L.SO(X).K..X.NG.1:K.K.1:X.K:.1590.T....:
.214,17:.211,14.2.K:.VH:.SL$.Z.6...B.?..
91...@.EF.1:.214,6.SL:.211,14:.VH...J..H
(UL$,LF(SL));:.211,14:.VH:.DF$(SL);.T.N.
.211,14:.VH:QL.LF(SL):.40:N$(SL).DU$...P
..N$(SL)."".N$(SL).DF$(SL):.1700...T.. C
(N$(SL)).LF(SL).1599./.^..N$(SL).G(4).N$
(SL)."".U.B.NG.0:.N$(SL)."="..1500:.NG.1
.1599......214,6.SL:.211,14.HR:.VH:.SL..
11..H(BL$,25.HR);:.211,14:.VH......H(N$(
SL),LF(SL)):HR.0:..V....214,6.SL:.211,3:
.VH:.SL$(SL):....L..214,6.SL:.211,13:.VH
:.H(BL$,25);:.211,14:.VH:.DF$(SL):..2.P.
CS%.0:SF.0:TC.0:.TR.0.2690.M....X.1.10:.
N$(X)."".2040.....TC.TC.1:ST(TC).X:TK$(T
C).N$(X):.TK$(TC)."=".TC.TC.1......:.K.0
.TC.0.2690......214,18:.VH:.BL$;:.211,13
:.VH:.".**SEARCHING**. <F1> TO ABORT"...
...3100:.RN.1.TR:RF.0......X$:.X$.G(133)
.RN.TR:CS%.0:.91:.2500.J....214,5:.211,2
1:.VH:.RN:.3180:.TC.0.2300......X.1.TC:.
TK$(X)..H(N$(ST(X)),C(TK$(X))).X.TC:RF.1
............RF.0.2500...`.CS%.CS%.1:SR$(
CS%)."":.K.0.2418...J..MC..4..X.1.K:SR$(
CS%).SR$(CS%).H(N$(SO(X)).EX$,LF(SO(X)))
:....N..MC.4..X.1.K:SR$(CS%).SR$(CS%).H(
N$(SO(X)),4):.._.R.SR$(CS%).SR$(CS%).I(B
L$.D(RN),3):SR%(CS%).RN.}.D..RN:.3190:.X
$.G(133).2630...(..X.CS%.1.751:SR$(X).G(
175):SR%(X).0:....*.. CS%.0.2630.T.-..K.
0.MS$."SORTING":.900...4..X.1.3:.TN(X).0
.SF.X:X.3.. 7..:SR%(0).0:.K.0.2624.% :..
K.1.TC.0.SR%(0).SO(1).Q <..49664:.X.1.TR
:SR%(X).E(I(SR$(X),3)):.X.B >.. MC.4..41
00.. @.SF$(SF).SK$:MS$."WRITING":.900:TN
(SF).CS%:.3300.. D..3100:.3120:.3190.Y F
..X.1.751:SR$(X)."":SR%(X).0:.:X..(0):.9
1..!P..".":.214,8:.VH:.AS$:.:." "CS%"
ENTRIES WRITTEN TO SORT FILE".\!Z..:."
HIT ANY KEY TO CONTINUE":.:.AS$H
W$(18):.21:..B!.....!...15,"I0":DU$."":.
390: 2:.2,NC%,0,"$0":.390..!...X.1.6:.34
0:...!B..340:.X$..G(34).3010..!D..340:.X
$..G(34).DU$.DU$.X$:.3012..!F..310.."..
15:.15,8,15:NC%.8:.3000:.H(DU$,7)."PROGR
AM"...+"...85:.3070._".. 15:.15,ND%,15:N
C%.ND%:.3000:.H(DU$,4)."DATA"...M"...82:
.3090.|"..NA%.0:.305.."0..15,"P".G(98).G
(1).G(0).G(1).."4.DU$.D(TR):.Y.1.3:DU$.D
U$.G(13).D(TN(Y)).G(13).SF$(Y):.:Y.0.."5
..337..#D.R2%.(RN.1).256:R1%.RN.1.(R2%.2
56).0#F..15,"P".G(98).G(R1%).G(R2%).G(1)
.I#H.DU$.H(N$(Z,1),LF(1)).V#J..B.2.XL:DU
$.DU$.G(13).H(N$(Z,B),LF(B)):...#L..XL.1
0..B.XL.1.10:DU$.DU$.G(13).G(160):...#P.
.337.M#X..15,"P".G(98).G(1).G(0).G(1)..#
Z..325:TR.E(DU$)..$\..Y.1.3:.325:TN(Y).E
(DU$):.325:SF$(Y).DU$:.:Y.0..$^...?$L.R2
%.(RN.1).256:R1%.RN.1.(R2%.256).D$N..15,
"P".G(98).G(R1%).G(R2%).G(1)..$O..2,N$(1
),N$(2),N$(3),N$(4),N$(5),N$(6),N$(7),N$
(8),N$(9),N$(10).K$P..B.1.XL:.N$(B).G(16
0).N$(B)."".S$R..:...$V..310..%..NA%.2.S
F:.305:.Z.0.TN(SF):.2,SR%(Z):.:.310.D%H.
NA%.1:.305:.325:CL$.DU$:XL.0:.X.1.10:.32
5:SL$(X).DU$..%T..320:LF(X).DU:TF%.TF%.L
F(X):.SL$(X).."INACTIVE".XL.XL.1..%V..:.
CL$."".CL$." ".P%X..X.1.10:.325:DF$(X).
DU$:.:.320:LW.DU:.320:LH.DU:.320..&Z.LA.
DU:.325:MS$.DU$:.X.1.9:.320:MS%(X).DU:MS
$(X..(MS%(X).1)).MS$.N&^..Y.1.5:.320:LP%
(X,Y).DU:.Y,X:.Y.1.5:.325:EF$(Y).DU$:..~
&B.ME.E(EF$(3)):HE.E(EF$(4)):LB.E(EF$(5)
):.310..&X.NA%.2:.300:.320:FT%.DU:.SL.1.
18:.325:HW$(SL).DU$:..X&...HW$(17):ND%.7
.E(HW$(14)):.310..'..TS%.CS%:CS%.0:DF.0:
Z.C(SR$(1)).3:.X.1.TS%.1.7'..Y.X.1:.H(SR
$(X),Z)..H(SR$(Y),Z).DF.0:.4180.A'..CS%.
CS%.1:.DF.1.SR%(CS%).SR%(Y):.4180..'".SR
%(CS%).SR%(X):CS%.CS%.1:SR%(CS%).SR%(Y):
DF.1..'T..:...'...50:.214,5..'F..211,3:.
VH:."PROCESSING ENTRY # OF"TR:.214,7
:.VH..(N..X.1.10:."."G(64.X)".":.:..?(P.
.214,20:.211,10:.VH:.SC$(3)" (A-"G(74.(M
C.1).(MC.4))")".`(T..SC$(6):.211,12:.VH:
.SC$(2);..(V..PS%..0..214,21:.211,14:.VH
:."(P)PRINT".C(...214,22:.VH:."(M) MENU"
;:.211,30:.VH:."(S) SORT":...(...214,22:
.211,28:.VH:.G(175);:.211,28:.VH:.20:SL$
.X$..)...SL$:.SL$."M".SL$."X".SL$."S"...
6)...SL$."P"..80:.7140.A)..SL.F(SL$).64:
.(SL.XL).(SL.0)..91:.7140.})...1600:.TL.
TR.25001.7140..)...91:.214,17:.VH:.BL$;:
.211,14:.VH:."SORT KEY TOO LONG".V)...X.
0.2000:.:SL$."X":.7142...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL