SUPERSORT
FILE INFORMATION
FILENAME(S): SUPERSORT
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-12-02 00:01:57
APPEARS ON: 1 disk(s)
FILE HASH
323680daa7dd3f3078760afa5546360e6989a69cf702ec71e33726f233c74bdf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | SUPERSORT | PRG | earthshaker | 6 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 64 00 8F 20 53 55 50 45 52 20 53 4F |.. .d.. SUPER SO| 00000010: 52 54 20 42 59 20 4A 4F 53 20 42 45 45 4E 45 4E |RT BY JOS BEENEN| 00000020: 00 3F 08 6E 00 8F 20 44 44 2E 20 32 33 2D 35 2D |.?.n.. DD. 23-5-| 00000030: 38 34 20 49 4E 20 45 49 4E 44 48 4F 56 45 4E 00 |84 IN EINDHOVEN.| 00000040: 5C 08 73 00 8B C2 28 34 39 31 35 32 29 B3 B1 31 |\.s...(49152)..1| 00000050: 36 32 A7 93 22 4D 43 22 2C 38 2C 31 00 92 08 78 |62.."MC",8,1...x| 00000060: 00 8B C2 28 35 36 29 B3 B1 33 32 A7 97 35 35 2C |...(56)..32..55,| 00000070: 30 3A 97 35 36 2C 33 32 3A 9C 3A 97 31 37 34 2C |0:.56,32:.:.174,| 00000080: 30 3A 97 31 37 35 2C 33 32 3A 97 36 35 30 2C 31 |0:.175,32:.650,1| 00000090: 32 38 00 A9 08 82 00 97 35 33 32 38 30 2C 31 31 |28......53280,11| 000000A0: 3A 97 35 33 32 38 31 2C 37 00 D2 08 8C 00 99 22 |:.53281,7......"| 000000B0: 93 1F 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |................| 000000C0: 1D 1D 1D 1D 1D 1D 1D 53 55 50 45 52 20 53 4F 52 |.......SUPER SOR| 000000D0: 54 22 00 F2 08 96 00 99 22 1D 1D 1D 1D 1D 1D 1D |T"......".......| 000000E0: 1D 1D 1D 1D 1D 1D 1D C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 000000F0: C5 22 00 01 09 9B 00 8C 3A 99 22 11 11 20 20 22 |."......:.".. "| 00000100: 3B 00 24 09 9D 00 87 41 24 3A 8B 41 24 B3 B1 22 |;.$....A$:.A$.."| 00000110: 4E 4F 50 22 A7 99 41 24 3B 22 20 20 20 22 3B 3A |NOP"..A$;" ";:| 00000120: 89 31 35 37 00 54 09 A0 00 54 B2 30 3A 99 3A 41 |.157.T...T.0:.:A| 00000130: 24 B2 22 3D 22 3A 8C 3A 99 22 11 11 1D 1D 1D 1D |$."=":.:."......| 00000140: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 4F 4D 4D 41 4E |..........COMMAN| 00000150: 44 20 22 3B 00 67 09 A5 00 A1 41 24 3A 8B 41 24 |D ";.g....A$:.A$| 00000160: B2 22 22 A7 31 36 35 00 83 09 AA 00 54 B2 54 AA |."".165.....T.T.| 00000170: 31 3A 87 43 24 3A 8B 43 24 B2 22 4E 4F 50 22 A7 |1:.C$:.C$."NOP".| 00000180: 32 32 30 00 9C 09 B4 00 8B C8 28 43 24 2C C3 28 |220.......(C$,.(| 00000190: 41 24 29 29 B3 B1 41 24 A7 31 37 30 00 E9 09 BE |A$))..A$.170....| 000001A0: 00 83 22 41 52 52 41 4E 47 45 22 2C 22 52 45 41 |.."ARRANGE","REA| 000001B0: 44 22 2C 22 4B 49 4C 4C 22 2C 22 50 52 49 4E 54 |D","KILL","PRINT| 000001C0: 22 2C 22 56 49 45 57 20 22 2C 22 48 45 41 44 45 |","VIEW ","HEADE| 000001D0: 52 20 22 2C 22 45 44 49 54 22 2C 22 53 41 56 45 |R ","EDIT","SAVE| 000001E0: 22 2C 22 4C 4F 41 44 20 22 00 FB 09 C8 00 83 22 |","LOAD "......"| 000001F0: 51 55 49 54 22 2C 22 4E 4F 50 22 00 0E 0A CD 00 |QUIT","NOP".....| 00000200: 99 43 24 3A 81 59 B2 31 A4 31 30 30 3A 82 00 48 |.C$:.Y.1.100:..H| 00000210: 0A D2 00 91 54 89 31 30 30 30 2C 32 30 30 30 2C |....T.1000,2000,| 00000220: 33 30 30 30 2C 34 30 30 30 2C 35 30 30 30 2C 36 |3000,4000,5000,6| 00000230: 30 30 30 2C 37 30 30 30 2C 38 30 30 30 2C 39 30 |000,7000,8000,90| 00000240: 30 30 2C 31 30 30 30 30 00 81 0A DC 00 99 3A 99 |00,10000......:.| 00000250: 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1C 49 |"..............I| 00000260: 4E 56 41 4C 49 44 20 20 43 4F 4D 4D 41 4E 44 1F |NVALID COMMAND.| 00000270: 22 3A 81 54 B2 31 A4 35 30 30 3A 82 3A 89 31 34 |":.T.1.500:.:.14| 00000280: 30 00 AE 0A E8 03 97 31 34 34 2C 32 35 35 3A 97 |0......144,255:.| 00000290: 31 37 32 2C 30 3A 97 31 37 33 2C 33 32 3A 9E 34 |172,0:.173,32:.4| 000002A0: 39 32 38 30 3A 8B 53 54 B2 30 A7 31 34 30 00 D5 |9280:.ST.0.140..| 000002B0: 0A ED 03 99 22 93 11 11 11 11 11 11 11 1D 1D 1D |...."...........| 000002C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 52 54 20 41 |..........SORT A| 000002D0: 52 52 41 59 22 00 F4 0A F2 03 99 22 1D 1D 1D 1D |RRAY"......"....| 000002E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D C5 C5 C5 C5 C5 C5 C5 |................| 000002F0: C5 C5 C5 22 00 1D 0B FC 03 99 22 11 11 11 20 20 |..."......"... | 00000300: 20 57 48 49 43 48 20 46 49 45 4C 44 20 3F 20 28 | WHICH FIELD ? (| 00000310: 20 4E 41 4D 45 2F 49 44 20 29 20 22 3B 00 31 0B | NAME/ID ) ";.1.| 00000320: 06 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 30 33 |...A$:.A$."".103| 00000330: 30 00 54 0B 10 04 8B 41 24 B2 22 4E 22 A7 99 22 |0.T....A$."N".."| 00000340: 4E 41 4D 45 22 3A 97 34 39 34 37 39 2C 30 3A 89 |NAME":.49479,0:.| 00000350: 31 32 30 30 00 76 0B 1A 04 8B 41 24 B2 22 49 22 |1200.v....A$."I"| 00000360: A7 99 22 49 44 22 3A 97 34 39 34 37 39 2C 31 36 |.."ID":.49479,16| 00000370: 3A 89 31 32 30 30 00 8C 0B B0 04 81 59 B2 31 A4 |:.1200......Y.1.| 00000380: 31 30 30 3A 82 3A 9E 34 39 34 33 39 00 95 0B C6 |100:.:.49439....| 00000390: 07 89 31 34 30 00 C0 0B D0 07 99 22 93 11 11 11 |..140......"....| 000003A0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 000003B0: 1D 52 45 41 44 20 44 49 52 45 43 54 4F 52 59 22 |.READ DIRECTORY"| 000003C0: 00 E7 0B DA 07 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |......".........| 000003D0: 1D 1D 1D 1D C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 000003E0: C5 C5 11 11 11 11 22 00 0F 0C E4 07 99 22 91 20 |......"......". | 000003F0: 20 20 20 20 20 20 20 20 49 4E 53 45 52 54 20 53 | INSERT S| 00000400: 4F 55 52 43 45 20 44 49 53 4B 45 54 54 45 22 00 |OURCE DISKETTE".| 00000410: 33 0C EE 07 A1 41 24 3A 8B 41 24 B2 22 22 A7 97 |3....A$:.A$.""..| 00000420: 36 34 36 2C 31 30 AB C2 28 36 34 36 29 3A 89 32 |646,10..(646):.2| 00000430: 30 32 30 00 42 0C F8 07 9F 31 2C 38 2C 30 2C 22 |020.B....1,8,0,"| 00000440: 24 22 00 69 0C 02 08 8D 32 30 30 30 30 3A 99 22 |$".i....20000:."| 00000450: 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1F 44 49 53 4B 4E |...........DISKN| 00000460: 41 4D 45 3A 20 22 3B 42 24 00 94 0C 0C 08 8D 32 |AME: ";B$......2| 00000470: 30 30 34 30 3A 8D 32 30 30 34 30 3A 49 44 24 B2 |0040:.20040:ID$.| 00000480: 41 24 3A 8D 32 30 30 34 30 3A 49 44 24 B2 49 44 |A$:.20040:ID$.ID| 00000490: 24 AA 41 24 00 C8 0C 11 08 99 22 11 11 1D 1D 1D |$.A$......".....| 000004A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 49 44 20 4E 55 4D |..........ID NUM| 000004B0: 42 45 52 20 3F 20 22 3B 49 44 24 3B 3A 85 22 9D |BER ? ";ID$;:.".| 000004C0: 9D 9D 9D 22 3B 49 44 24 00 F5 0C 16 08 97 31 33 |...";ID$......13| 000004D0: 39 2C C6 28 C8 28 49 44 24 2C 31 29 29 3A 97 31 |9,.(.(ID$,1)):.1| 000004E0: 34 30 2C C6 28 C9 28 49 44 24 2C 31 29 29 3A 9E |40,.(.(ID$,1)):.| 000004F0: 34 39 31 35 32 00 1D 0D 20 08 A0 31 3A 99 22 20 |49152... ..1:." | 00000500: 20 20 20 20 20 20 20 20 20 46 41 4E 43 59 20 41 | FANCY A| 00000510: 4E 4F 54 48 45 52 20 4F 4E 45 20 3F 22 00 31 0D |NOTHER ONE ?".1.| 00000520: 9A 0B A1 41 24 3A 8B 41 24 B2 22 22 A7 32 39 37 |...A$:.A$."".297| 00000530: 30 00 4D 0D A4 0B 8B 28 41 24 B2 22 59 22 29 B0 |0.M....(A$."Y").| 00000540: 28 41 24 B2 22 4A 22 29 A7 32 30 34 30 00 56 0D |(A$."J").2040.V.| 00000550: AE 0B 89 31 34 30 00 7E 0D B8 0B 99 22 93 11 11 |...140.~...."...| 00000560: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000570: 1D 1D 1D 4B 49 4C 4C 20 41 52 52 41 59 22 00 9E |...KILL ARRAY"..| 00000580: 0D C2 0B 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |...."...........| 00000590: 1D 1D 1D C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 C8 |............."..| 000005A0: 0D CC 0B 99 22 11 11 11 1C 20 20 20 20 20 20 20 |....".... | 000005B0: 20 20 41 52 45 20 59 4F 55 20 53 55 52 45 20 3F | ARE YOU SURE ?| 000005C0: 3F 20 28 59 2F 4E 29 22 00 DC 0D D6 0B A1 41 24 |? (Y/N)"......A$| 000005D0: 3A 8B 41 24 B2 22 22 A7 33 30 33 30 00 F7 0D E0 |:.A$."".3030....| 000005E0: 0B 8B 41 24 B2 22 59 22 A7 97 31 37 34 2C 30 3A |..A$."Y"..174,0:| 000005F0: 97 31 37 35 2C 33 32 00 00 0E 96 0F 89 31 34 30 |.175,32......140| 00000600: 00 2D 0E A0 0F 97 31 34 34 2C 32 35 35 3A 97 31 |.-....144,255:.1| 00000610: 37 32 2C 30 3A 97 31 37 33 2C 33 32 3A 9E 34 39 |72,0:.173,32:.49| 00000620: 32 38 30 3A 8B 53 54 B2 30 A7 31 34 30 00 56 0E |280:.ST.0.140.V.| 00000630: AA 0F 99 22 93 11 11 11 11 11 11 11 1D 1D 1D 1D |..."............| 00000640: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 50 52 49 4E 54 20 |..........PRINT | 00000650: 41 52 52 41 59 22 00 7C 0E B4 0F 54 B2 30 3A 99 |ARRAY".|...T.0:.| 00000660: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C5 |"...............| 00000670: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 91 0E DC |..........."....| 00000680: 0F 9F 31 2C 34 3A 9D 31 3A 97 31 34 34 2C 32 35 |..1,4:.1:.144,25| 00000690: 35 00 99 0E EB 0F 54 B2 30 00 CC 0E F0 0F 99 22 |5.....T.0......"| 000006A0: 50 52 4F 47 52 41 4D 20 4E 41 4D 45 20 20 20 20 |PROGRAM NAME | 000006B0: 49 44 22 3B 3A 54 B2 54 AA 31 3A 8B 54 B3 34 A7 |ID";:T.T.1:.T.4.| 000006C0: 99 22 20 A5 22 3B 3A 89 34 30 38 30 00 D6 0E F5 |." .";:.4080....| 000006D0: 0F 54 B2 30 3A 99 00 03 0F FA 0F 99 22 C3 C3 C3 |.T.0:......."...| 000006E0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 20 |............... | 000006F0: A5 22 3B 3A 54 B2 54 AA 31 3A 8B 54 B3 34 A7 34 |.";:T.T.1:.T.4.4| 00000700: 30 39 30 00 0D 0F FF 0F 54 B2 30 3A 99 00 2A 0F |090.....T.0:..*.| 00000710: 04 10 9E 34 39 32 35 35 3A 54 B2 54 AA 31 3A 8B |...49255:T.T.1:.| 00000720: 54 B3 34 A7 99 22 20 A5 22 3B 00 39 0F 0E 10 8B |T.4.." .";.9....| 00000730: 54 B2 34 A7 54 B2 30 3A 99 00 49 0F 18 10 8B 53 |T.4.T.0:..I....S| 00000740: 54 B3 B1 30 A7 34 31 30 30 00 58 0F 22 10 98 31 |T..0.4100.X."..1| 00000750: 3A A0 31 3A 89 31 34 30 00 85 0F 88 13 97 31 34 |:.1:.140......14| 00000760: 34 2C 32 35 35 3A 97 31 37 32 2C 30 3A 97 31 37 |4,255:.172,0:.17| 00000770: 33 2C 33 32 3A 9E 34 39 32 38 30 3A 8B 53 54 B2 |3,32:.49280:.ST.| 00000780: 30 A7 31 34 30 00 AD 0F 9C 13 99 22 93 11 11 22 |0.140......"..."| 00000790: 3A 81 59 B2 31 A4 31 30 3A 81 58 B2 31 A4 32 3A |:.Y.1.10:.X.1.2:| 000007A0: 8B 53 54 B3 B1 30 A7 9E 34 39 32 35 35 00 BE 0F |.ST..0..49255...| 000007B0: A6 13 99 22 20 20 22 3B 3A 82 3A 99 3A 82 00 D2 |..." ";:.:.:...| 000007C0: 0F 48 17 A1 41 24 3A 8B 41 24 B2 22 22 A7 35 39 |.H..A$:.A$."".59| 000007D0: 36 30 00 E0 0F 52 17 8B 53 54 B2 30 A7 31 34 30 |60...R..ST.0.140| 000007E0: 00 F2 0F 5C 17 8B 41 24 B3 B1 22 51 22 A7 35 30 |...\..A$.."Q".50| 000007F0: 32 30 00 02 10 66 17 97 31 34 34 2C 30 3A 89 31 |20...f..144,0:.1| 00000800: 34 30 00 2B 10 70 17 99 22 93 11 11 11 11 11 11 |40.+.p..".......| 00000810: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 50 52 |..............PR| 00000820: 49 4E 54 20 48 45 41 44 45 52 22 00 4C 10 7A 17 |INT HEADER".L.z.| 00000830: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C5 |."..............| 00000840: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 5E 10 84 |...........".^..| 00000850: 17 8B 4E 41 24 B3 B1 22 22 A7 36 31 30 30 00 78 |..NA$.."".6100.x| 00000860: 10 8E 17 85 22 11 11 20 20 4E 41 4D 45 20 20 20 |....".. NAME | 00000870: 20 20 20 22 3B 4E 41 24 00 92 10 98 17 85 22 11 | ";NA$......".| 00000880: 11 20 20 41 44 52 45 53 20 20 20 20 20 22 3B 41 |. ADRES ";A| 00000890: 44 24 00 AC 10 A2 17 85 22 11 11 20 20 43 49 54 |D$......".. CIT| 000008A0: 59 20 20 20 20 20 20 22 3B 43 49 24 00 C6 10 AC |Y ";CI$....| 000008B0: 17 85 22 11 11 20 20 54 45 4C 45 50 48 4F 4E 45 |..".. TELEPHONE| 000008C0: 20 22 3B 54 45 24 00 EF 10 D4 17 9F 31 2C 34 3A | ";TE$......1,4:| 000008D0: 98 31 2C C7 28 31 34 29 22 20 20 20 20 20 48 45 |.1,.(14)" HE| 000008E0: 4C 4C 4F 2C 20 49 20 41 4D 20 22 3B 4E 41 24 00 |LLO, I AM ";NA$.| 000008F0: 33 11 DE 17 98 31 2C 22 49 46 20 59 4F 55 20 57 |3....1,"IF YOU W| 00000900: 41 4E 54 20 54 4F 20 45 58 43 48 41 4E 47 45 20 |ANT TO EXCHANGE | 00000910: 50 52 4F 47 52 41 4D 53 2C 22 3A 98 31 2C 22 53 |PROGRAMS,":.1,"S| 00000920: 45 4E 44 20 41 20 4C 49 53 54 20 54 4F 20 22 3B |END A LIST TO ";| 00000930: 41 44 24 00 5D 11 E8 17 98 31 2C 22 49 4E 20 22 |AD$.]....1,"IN "| 00000940: 3B 43 49 24 3B 22 2E 20 59 4F 55 20 43 41 4E 20 |;CI$;". YOU CAN | 00000950: 41 4C 53 4F 20 43 41 4C 4C 20 4D 45 22 00 8B 11 |ALSO CALL ME"...| 00000960: F2 17 98 31 2C 22 4D 59 20 54 45 4C 45 50 48 4F |...1,"MY TELEPHO| 00000970: 4E 45 20 4E 55 4D 42 45 52 20 49 53 20 22 3B 54 |NE NUMBER IS ";T| 00000980: 45 24 3B C7 28 31 35 29 3A A0 31 00 94 11 4E 1B |E$;.(15):.1...N.| 00000990: 89 31 34 30 00 C1 11 58 1B 97 31 34 34 2C 32 35 |.140...X..144,25| 000009A0: 35 3A 97 31 37 32 2C 30 3A 97 31 37 33 2C 33 32 |5:.172,0:.173,32| 000009B0: 3A 9E 34 39 32 38 30 3A 8B 53 54 B2 30 A7 31 34 |:.49280:.ST.0.14| 000009C0: 30 00 E8 11 5D 1B 99 22 93 11 11 11 11 11 11 11 |0...].."........| 000009D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 |..............ED| 000009E0: 49 54 20 4D 4F 44 45 22 00 07 12 62 1B 99 22 1D |IT MODE"...b..".| 000009F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C5 C5 C5 |................| 00000A00: C5 C5 C5 C5 C5 C5 22 00 3F 12 6C 1B 99 22 11 11 |......".?.l.."..| 00000A10: 11 11 11 11 11 11 11 11 20 51 55 49 54 20 20 20 |........ QUIT | 00000A20: 20 20 44 45 4C 45 54 45 20 20 20 20 20 49 4E 53 | DELETE INS| 00000A30: 45 52 54 20 20 20 20 20 43 48 41 4E 47 45 22 00 |ERT CHANGE".| 00000A40: 6A 12 76 1B 99 22 11 20 20 20 20 53 45 41 52 43 |j.v..". SEARC| 00000A50: 48 20 41 52 52 41 59 20 57 49 54 48 20 46 55 43 |H ARRAY WITH FUC| 00000A60: 54 49 4F 4E 20 4B 45 59 53 22 00 79 12 80 1B 8B |TION KEYS".y....| 00000A70: 53 54 B2 30 A7 37 30 30 30 00 A2 12 8A 1B 99 22 |ST.0.7000......"| 00000A80: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 1D |................| 00000A90: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 3A 9E 34 39 32 |.........";:.492| 00000AA0: 35 35 00 BA 12 94 1B 59 B2 C2 28 31 39 37 29 3A |55.....Y..(197):| 00000AB0: 8B 59 B2 36 34 A7 37 30 36 30 00 D2 12 9E 1B 8B |.Y.64.7060......| 00000AC0: 59 B2 35 A7 81 58 B2 31 A4 31 32 30 3A 82 3A 59 |Y.5..X.1.120:.:Y| 00000AD0: B2 34 00 EA 12 A8 1B 8B 59 B2 36 A7 81 58 B2 31 |.4......Y.6..X.1| 00000AE0: A4 31 32 30 3A 82 3A 59 B2 33 00 09 13 B2 1B 8B |.120:.:Y.3......| 00000AF0: 59 B2 34 A7 9E 34 39 32 39 37 3A 97 31 34 34 2C |Y.4..49297:.144,| 00000B00: 32 35 35 3A 89 37 30 34 30 00 17 13 BC 1B 8B 59 |255:.7040......Y| 00000B10: B2 33 A7 37 30 34 30 00 2D 13 C6 1B 8B 59 B2 36 |.3.7040.-....Y.6| 00000B20: 32 A7 97 31 39 38 2C 30 3A 89 31 34 30 00 44 13 |2..198,0:.140.D.| 00000B30: D0 1B 8B 59 B2 31 38 A7 9E 34 39 33 33 33 3A 89 |...Y.18..49333:.| 00000B40: 37 30 34 30 00 5B 13 D5 1B 8B 59 B2 32 30 A7 9E |7040.[....Y.20..| 00000B50: 34 39 33 32 34 3A 89 37 31 34 30 00 6B 13 DA 1B |49324:.7140.k...| 00000B60: 8B 59 B3 B1 33 33 A7 37 30 36 30 00 76 13 DF 1B |.Y..33.7060.v...| 00000B70: 9E 34 39 33 38 34 00 A0 13 E4 1B 97 31 39 38 2C |.49384......198,| 00000B80: 30 3A 85 22 13 11 11 11 1D 1D 1D 1D 1D 1D 1D 4E |0:."...........N| 00000B90: 41 4D 45 2C 49 44 20 20 20 22 3B 4E 24 2C 42 24 |AME,ID ";N$,B$| 00000BA0: 00 CE 13 E9 1B 99 22 91 20 20 20 20 20 20 20 20 |......". | 00000BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000BC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 00 | "..| 00000BD0: 14 EE 1B 41 24 B2 22 20 20 20 20 20 20 20 20 20 |...A$." | 00000BE0: 20 20 20 20 20 20 20 22 3A 4E 24 B2 4E 24 AA C8 | ":N$.N$..| 00000BF0: 28 41 24 2C 31 36 AB C3 28 4E 24 29 29 AA 42 24 |(A$,16..(N$)).B$| 00000C00: 00 36 14 F8 1B 41 44 B2 C2 28 31 37 32 29 AA C2 |.6...AD..(172)..| 00000C10: 28 31 37 33 29 AC 32 35 36 AB 31 3A 81 59 B2 31 |(173).256.1:.Y.1| 00000C20: A4 31 38 3A 97 41 44 AA 59 2C C6 28 CA 28 4E 24 |.18:.AD.Y,.(.(N$| 00000C30: 2C 59 29 29 3A 82 00 40 14 02 1C 89 37 30 34 30 |,Y)):..@....7040| 00000C40: 00 6D 14 40 1F 97 31 34 34 2C 32 35 35 3A 97 31 |.m.@..144,255:.1| 00000C50: 37 32 2C 30 3A 97 31 37 33 2C 33 32 3A 9E 34 39 |72,0:.173,32:.49| 00000C60: 32 38 30 3A 8B 53 54 B2 30 A7 31 34 30 00 95 14 |280:.ST.0.140...| 00000C70: 45 1F 99 22 93 11 11 11 11 11 11 11 1D 1D 1D 1D |E.."............| 00000C80: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 41 56 45 20 41 |..........SAVE A| 00000C90: 52 52 41 59 22 00 B5 14 4A 1F 99 22 1D 1D 1D 1D |RRAY"...J.."....| 00000CA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C5 C5 C5 C5 C5 C5 |................| 00000CB0: C5 C5 C5 C5 22 00 E4 14 54 1F 99 22 11 11 11 20 |...."...T.."... | 00000CC0: 20 20 49 4E 53 45 52 54 20 44 45 53 54 49 4E 41 | INSERT DESTINA| 00000CD0: 54 49 4F 4E 20 44 49 53 4B 45 54 54 45 20 46 49 |TION DISKETTE FI| 00000CE0: 52 53 54 22 00 FB 14 5E 1F 85 22 11 11 20 20 20 |RST"...^..".. | 00000CF0: 20 20 4E 41 4D 45 20 22 3B 41 24 00 1F 15 68 1F | NAME ";A$...h.| 00000D00: 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 41 24 AA 22 |.2,8,2,"0:".A$."| 00000D10: 2C 53 2C 57 22 3A 9E 34 39 35 31 31 3A A0 32 00 |,S,W":.49511:.2.| 00000D20: 28 15 1E 23 89 31 34 30 00 50 15 28 23 99 22 93 |(..#.140.P.(#.".| 00000D30: 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000D40: 1D 1D 1D 1D 1D 4C 4F 41 44 20 41 52 52 41 59 22 |.....LOAD ARRAY"| 00000D50: 00 70 15 32 23 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.p.2#.".........| 00000D60: 1D 1D 1D 1D 1D C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 |..............."| 00000D70: 00 9F 15 3C 23 99 22 11 11 11 20 20 20 49 4E 53 |...<#."... INS| 00000D80: 45 52 54 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 |ERT DESTINATION | 00000D90: 44 49 53 4B 45 54 54 45 20 46 49 52 53 54 22 00 |DISKETTE FIRST".| 00000DA0: C9 15 46 23 99 22 11 11 1C 20 20 20 20 20 20 20 |..F#."... | 00000DB0: 20 4B 49 4C 4C 20 4F 4C 44 20 41 52 52 41 59 20 | KILL OLD ARRAY | 00000DC0: 3F 3F 20 28 59 2F 4E 29 22 00 DD 15 50 23 A1 41 |?? (Y/N)"...P#.A| 00000DD0: 24 3A 8B 41 24 B2 22 22 A7 39 30 34 30 00 F8 15 |$:.A$."".9040...| 00000DE0: 5A 23 8B 41 24 B2 22 59 22 A7 97 31 37 34 2C 30 |Z#.A$."Y"..174,0| 00000DF0: 3A 97 31 37 35 2C 33 32 00 0F 16 64 23 85 22 11 |:.175,32...d#.".| 00000E00: 11 20 20 20 20 20 4E 41 4D 45 20 22 3B 41 24 00 |. NAME ";A$.| 00000E10: 33 16 6E 23 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA |3.n#.2,8,2,"0:".| 00000E20: 41 24 AA 22 2C 53 2C 52 22 3A 9E 34 39 35 34 34 |A$.",S,R":.49544| 00000E30: 3A A0 32 00 3C 16 06 27 89 31 34 30 00 79 16 10 |:.2.<..'.140.y..| 00000E40: 27 99 22 93 11 11 11 11 11 11 11 11 11 11 11 11 |'.".............| 00000E50: 1C 20 51 55 49 54 3F 20 48 49 54 20 54 48 45 20 |. QUIT? HIT THE | 00000E60: 53 50 41 43 45 20 42 41 52 20 54 4F 20 41 43 4B |SPACE BAR TO ACK| 00000E70: 4E 4F 57 4C 45 44 47 45 22 00 8E 16 1A 27 A1 41 |NOWLEDGE"....'.A| 00000E80: 24 3A 8B 41 24 B2 22 22 A7 31 30 30 31 30 00 9F |$:.A$."".10010..| 00000E90: 16 24 27 8B 41 24 B3 B1 22 20 22 A7 31 34 30 00 |.$'.A$.." ".140.| 00000EA0: DC 16 2E 27 99 22 11 11 11 20 20 20 53 45 45 20 |...'."... SEE | 00000EB0: 59 4F 55 20 4E 45 58 54 20 54 49 4D 45 20 2C 42 |YOU NEXT TIME ,B| 00000EC0: 59 45 45 45 2E 2E 2E 2E 2E 22 3A 81 58 B2 31 A4 |YEEE.....":.X.1.| 00000ED0: 31 30 30 3A 82 3A 9E 36 34 37 33 38 00 E6 16 20 |100:.:.64738... | 00000EE0: 4E 42 24 B2 22 22 00 05 17 2A 4E 8B 53 54 B2 30 |NB$.""...*N.ST.0| 00000EF0: A7 8D 32 30 30 34 30 3A 8B 41 53 B3 B1 33 34 A7 |..20040:.AS..34.| 00000F00: 32 30 30 31 30 00 2E 17 34 4E 8B 53 54 B2 30 A7 |20010...4N.ST.0.| 00000F10: 8D 32 30 30 34 30 3A 8B 41 53 B3 B1 33 34 A7 42 |.20040:.AS..34.B| 00000F20: 24 B2 42 24 AA 41 24 3A 89 32 30 30 32 30 00 34 |$.B$.A$:.20020.4| 00000F30: 17 3E 4E 8E 00 4D 17 48 4E A1 23 31 2C 41 24 3A |.>N..M.HN.#1,A$:| 00000F40: 8B 41 24 B2 22 22 A7 41 53 B2 30 3A 8E 00 5C 17 |.A$."".AS.0:..\.| 00000F50: 52 4E 41 53 B2 C6 28 41 24 29 3A 8E 00 00 00 FF |RNAS..(A$):.....| 00000F60: 00 |. |
.. .D.. SUPER SORT BY JOS BEENEN.?.N.. D
D. 23-5-84 IN EINDHOVEN.\.S..B(49152)..1
62.."MC",8,1...X..B(56)..32..55,0:.56,32
:.:.174,0:.175,32:.650,128......53280,11
:.53281,7.R....".......................S
UPER SORT"......"..............EEEEEEEEE
E"......:.".. ";.$....A$:.A$.."NOP"..A$
;" ";:.157.T. .T.0:.:A$."=":.:."......
..........COMMAND ";.G....A$:.A$."".165.
....T.T.1:.C$:.C$."NOP".220......H(C$,C(
A$))..A$.170......"ARRANGE","READ","KILL
","PRINT","VIEW ","HEADER ","EDIT","SAVE
","LOAD "...H.."QUIT","NOP"...M..C$:.Y.1
.100:..H.R..T.1000,2000,3000,4000,5000,6
000,7000,8000,9000,10000......:.".......
.......INVALID COMMAND.":.T.1.500:.:.14
0......144,255:.172,0:.173,32:.49280:.ST
.0.140.U....".....................SORT A
RRAY"......".............EEEEEEEEEE"....
.."... WHICH FIELD ? ( NAME/ID ) ";.1.
...A$:.A$."".1030.T....A$."N".."NAME":.4
9479,0:.1200.V....A$."I".."ID":.49479,16
:.1200......Y.1.100:.:.49439...F..140...
P..".....................READ DIRECTORY"
...Z..".............EEEEEEEEEEEEEE....".
.....". INSERT SOURCE DISKETTE".
3....A$:.A$.""..646,10.B(646):.2020.B...
.1,8,0,"$".I....20000:."...........DISKN
AME: ";B$......20040:.20040:ID$.A$:.2004
0:ID$.ID$.A$.H...."...............ID NUM
BER ? ";ID$;:."....";ID$......139,F(H(ID
$,1)):.140,F(I(ID$,1)):.49152... . 1:."
FANCY ANOTHER ONE ?".1....A$:.A
$."".2970.M....(A$."Y").(A$."J").2040.V.
...140.~...."......................KILL
ARRAY"...B.."..............EEEEEEEEEE".H
.L..".... ARE YOU SURE ?? (Y/N)"
...V..A$:.A$."".3030......A$."Y"..174,0:
.175,32......140.-. ..144,255:.172,0:.17
3,32:.49280:.ST.0.140.V...."............
..........PRINT ARRAY".|...T.0:.".......
.......EEEEEEEEEEEE"......1,4:.1:.144,25
5.....T.0.L...."PROGRAM NAME ID";:T.T
.1:.T.4.." .";:.4080.V...T.0:......."CCC
CCCCCCCCCCCCCCC .";:T.T.1:.T.4.4090.....
T.0:..*....49255:T.T.1:.T.4.." .";.9....
T.4.T.0:..I....ST..0.4100.X."..1: 1:.140
......144,255:.172,0:.173,32:.49280:.ST.
0.140......"...":.Y.1.10:.X.1.2:.ST..0..
49255......" ";:.:.:..R.H..A$:.A$."".59
60...R..ST.0.140...\..A$.."Q".5020...F..
144,0:.140.+.P..".....................PR
INT HEADER".L.Z..".............EEEEEEEEE
EEE".^....NA$.."".6100.X....".. NAME
";NA$......".. ADRES ";AD$......
".. CITY ";CI$.F....".. TELEPHONE
";TE$...T..1,4:.1,G(14)" HELLO, I A
M ";NA$.3....1,"IF YOU WANT TO EXCHANGE
PROGRAMS,":.1,"SEND A LIST TO ";AD$.]...
.1,"IN ";CI$;". YOU CAN ALSO CALL ME"...
...1,"MY TELEPHONE NUMBER IS ";TE$;G(15)
: 1...N..140.A.X..144,255:.172,0:.173,32
:.49280:.ST.0.140...].."................
......EDIT MODE"...B.."..............EEE
EEEEEE".?.L..".......... QUIT DELETE
INSERT CHANGE".J.V..". SEARC
H ARRAY WITH FUCTION KEYS".Y....ST.0.700
0......".........................";:.492
55.....Y.B(197):.Y.64.7060.R....Y.5..X.1
.120:.:Y.4......Y.6..X.1.120:.:Y.3......
Y.4..49297:.144,255:.7040......Y.3.7040.
-.F..Y.62..198,0:.140.D.P..Y.18..49333:.
7040.[.U..Y.20..49324:.7140.K.Z..Y..33.7
060.V....49384. ....198,0:."...........N
AME,ID ";N$,B$.N....".
".....A$."
":N$.N$.H(A$,16.C(N$)).B$.6...AD.
B(172).B(173).256.1:.Y.1.18:.AD.Y,F(J(N$
,Y)):..@....7040.M.@..144,255:.172,0:.17
3,32:.49280:.ST.0.140...E.."............
..........SAVE ARRAY"...J.."............
..EEEEEEEEEE"...T.."... INSERT DESTINA
TION DISKETTE FIRST"...^..".. NAME "
;A$...H..2,8,2,"0:".A$.",S,W":.49511: 2.
(..#.140.P.(#."......................LOA
D ARRAY".P.2#."..............EEEEEEEEEE"
...<#."... INSERT DESTINATION DISKETTE
FIRST".I.F#."... KILL OLD ARRAY
?? (Y/N)"...P#.A$:.A$."".9040...Z#.A$."Y
"..174,0:.175,32...D#.".. NAME ";A$.
3.N#.2,8,2,"0:".A$.",S,R":.49544: 2.<..'
.140.Y..'.".............. QUIT? HIT THE
SPACE BAR TO ACKNOWLEDGE"....'.A$:.A$.""
.10010...$'.A$.." ".140....'."... SEE
YOU NEXT TIME ,BYEEE.....":.X.1.100:.:.6
4738... NB$.""...*N.ST.0..20040:.AS..34.
20010...4N.ST.0..20040:.AS..34.B$.B$.A$:
.20020.4.>N..M.HN.#1,A$:.A$."".AS.0:..\.
RNAS.F(A$):......
> CLICK IMAGE PREVIEW FOR FULL MODAL