DISKSORT V1
FILE INFORMATION
FILENAME(S): DISKSORT V1
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-12-02 00:01:59
APPEARS ON: 1 disk(s)
FILE HASH
f944ecbae0a7540b409e5aecbd488a650379c8fa446be0ce78507aab7d201870
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | DISKSORT V1 | PRG | earthshaker | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 39 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |..9....53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 9C 3A 99 22 93 9E 22 3A |53281,0:.:."..":|
00000020: 86 44 49 24 28 31 30 30 30 29 3A 4D B2 30 3A 86 |.DI$(1000):M.0:.|
00000030: 49 44 24 28 31 30 30 30 29 00 68 08 0F 00 41 24 |ID$(1000).h...A$|
00000040: B2 22 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |."..............|
00000050: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000060: C0 C0 C0 C0 C0 C0 C9 22 00 97 08 14 00 42 24 B2 |.......".....B$.|
00000070: 22 DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 DD 22 00 C6 08 19 00 43 24 B2 22 | .".....C$."|
000000A0: CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000C0: C0 C0 C0 C0 CB 22 00 EC 08 1E 00 99 22 93 22 3A |....."......".":|
000000D0: 99 41 24 3A 99 42 24 3A 99 42 24 3A 99 42 24 3A |.A$:.B$:.B$:.B$:|
000000E0: 99 42 24 3A 99 42 24 20 3A 99 43 24 00 15 09 23 |.B$:.B$ :.C$...#|
000000F0: 00 99 22 91 91 91 91 91 1D 1D 1D 44 49 53 4B 53 |.."........DISKS|
00000100: 4F 52 54 45 52 20 20 3D 20 48 41 52 44 43 4F 50 |ORTER = HARDCOP|
00000110: 59 20 20 20 22 00 3A 09 28 00 99 22 11 1D 1D 1D |Y ".:.(.."....|
00000120: 44 45 20 47 52 4F 4F 54 20 53 4F 46 54 20 20 4C |DE GROOT SOFT L|
00000130: 45 4C 59 53 54 41 44 20 20 22 00 46 09 2D 00 8D |ELYSTAD ".F.-..|
00000140: 35 30 3A 89 39 35 00 63 09 32 00 99 22 11 22 3A |50:.95.c.2..".":|
00000150: 99 41 24 3A 99 42 24 3A 99 42 24 3A 99 42 24 3A |.A$:.B$:.B$:.B$:|
00000160: 99 43 24 00 8B 09 37 00 99 22 91 91 91 1D 1D 1D |.C$...7.."......|
00000170: 50 4C 41 41 54 53 20 44 49 53 4B 45 54 54 45 20 |PLAATS DISKETTE |
00000180: 49 4E 20 44 52 49 56 45 23 30 22 00 A8 09 3C 00 |IN DRIVE#0"...<.|
00000190: 99 22 11 22 3A 99 41 24 3A 99 42 24 3A 99 42 24 |.".":.A$:.B$:.B$|
000001A0: 3A 99 42 24 3A 99 43 24 00 D2 09 41 00 99 22 91 |:.B$:.C$...A..".|
000001B0: 91 91 1D 1D 1D 41 4C 53 20 55 20 4B 4C 41 41 52 |.....ALS U KLAAR|
000001C0: 20 42 45 4E 54 20 4A 20 49 4E 44 52 55 4B 4B 45 | BENT J INDRUKKE|
000001D0: 4E 22 00 EF 09 46 00 99 22 11 22 3A 99 41 24 3A |N"...F..".":.A$:|
000001E0: 99 42 24 3A 99 42 24 3A 99 42 24 3A 99 43 24 00 |.B$:.B$:.B$:.C$.|
000001F0: 19 0A 4B 00 99 22 91 91 91 1D 1D 1D 4F 4D 20 54 |..K.."......OM T|
00000200: 45 20 53 54 4F 50 50 45 4E 20 5C 20 49 4E 44 52 |E STOPPEN \ INDR|
00000210: 55 4B 4B 45 4E 20 20 20 22 00 2C 0A 50 00 A1 58 |UKKEN ".,.P..X|
00000220: 24 3A 8B 58 24 B3 B1 22 22 A7 38 30 00 48 0A 55 |$:.X$.."".80.H.U|
00000230: 00 A1 58 24 3A 8B 58 24 B3 B1 22 4A 22 AF 58 24 |..X$:.X$.."J".X$|
00000240: B3 B1 22 5C 22 A7 38 35 00 4E 0A 5A 00 8E 00 5E |.."\".85.N.Z...^|
00000250: 0A 5F 00 8B 58 24 B2 22 5C 22 A7 32 36 35 00 84 |._..X$."\".265..|
00000260: 0A 64 00 4C 24 B2 22 22 3A 49 44 24 B2 22 22 3A |.d.L$."":ID$."":|
00000270: 41 41 24 B2 22 22 3A 42 42 24 B2 22 22 3A 43 43 |AA$."":BB$."":CC|
00000280: 24 B2 22 22 00 BD 0A 69 00 9F 31 2C 38 2C 30 2C |$.""...i..1,8,0,|
00000290: 22 24 22 3A 81 49 B2 31 A4 33 30 3A A1 23 31 2C |"$":.I.1.30:.#1,|
000002A0: 41 41 24 3A 4C 24 B2 4C 24 AA 41 41 24 3A 82 3A |AA$:L$.L$.AA$:.:|
000002B0: 99 22 93 22 C8 28 4C 24 2C 32 37 29 3B 00 CF 0A |.".".(L$,27);...|
000002C0: 6E 00 99 22 2D 2D 49 54 45 4D 53 3D 22 3B 4D 00 |n.."--ITEMS=";M.|
000002D0: EE 0A 73 00 49 44 24 B2 CA 28 4C 24 2C 32 35 2C |..s.ID$..(L$,25,|
000002E0: 32 29 3A A1 23 31 2C 41 41 24 2C 42 42 24 00 11 |2):.#1,AA$,BB$..|
000002F0: 0B 78 00 A1 23 31 2C 41 41 24 2C 42 42 24 2C 41 |.x..#1,AA$,BB$,A|
00000300: 41 24 2C 42 42 24 3A 43 B2 30 3A 44 49 24 B2 22 |A$,BB$:C.0:DI$."|
00000310: 22 00 27 0B 7D 00 8B 41 41 24 B3 B1 22 22 A7 43 |".'.}..AA$.."".C|
00000320: B2 C6 28 41 41 24 29 00 43 0B 82 00 8B 42 42 24 |..(AA$).C....BB$|
00000330: B3 B1 22 22 A7 43 B2 43 AA C6 28 42 42 24 29 AC |.."".C.C..(BB$).|
00000340: 32 35 36 00 70 0B 87 00 42 4C 24 B2 CA 28 C4 28 |256.p...BL$..(.(|
00000350: 43 29 2C 32 29 3A 42 4C 24 B2 42 4C 24 AA 22 2E |C),2):BL$.BL$.".|
00000360: 2E 2E 22 3A 42 4C 24 B2 C8 28 42 4C 24 2C 33 29 |..":BL$..(BL$,3)|
00000370: 00 8B 0B 8C 00 A1 23 31 2C 42 42 24 3A 8B 53 54 |......#1,BB$:.ST|
00000380: B3 B1 30 A7 A0 31 3A 89 32 32 35 00 9F 0B 91 00 |..0..1:.225.....|
00000390: 8B 42 42 24 B3 B1 C7 28 33 34 29 A7 31 34 30 00 |.BB$...(34).140.|
000003A0: C8 0B 96 00 A1 23 31 2C 42 42 24 3A 8B 42 42 24 |.....#1,BB$:.BB$|
000003B0: B3 B1 C7 28 33 34 29 A7 44 49 24 B2 44 49 24 AA |...(34).DI$.DI$.|
000003C0: 42 42 24 3A 89 31 35 30 00 E3 0B 9B 00 A1 23 31 |BB$:.150......#1|
000003D0: 2C 42 42 24 3A 8B 42 42 24 B2 C7 28 33 32 29 A7 |,BB$:.BB$..(32).|
000003E0: 31 35 35 00 EE 0B A0 00 43 43 24 B2 22 22 00 13 |155.....CC$.""..|
000003F0: 0C A5 00 43 43 24 B2 43 43 24 AA 42 42 24 3A A1 |...CC$.CC$.BB$:.|
00000400: 23 31 2C 42 42 24 3A 8B 42 42 24 B3 B1 22 22 A7 |#1,BB$:.BB$.."".|
00000410: 31 36 35 00 24 0C AA 00 46 49 24 B2 C8 28 43 43 |165.$...FI$..(CC|
00000420: 24 2C 31 29 00 43 0C AF 00 49 44 24 28 4D 29 B2 |$,1).C...ID$(M).|
00000430: 49 44 24 AA 22 2D 22 AA 46 49 24 AA 22 2D 22 AA |ID$."-".FI$."-".|
00000440: 42 4C 24 00 8B 0C B4 00 44 49 24 28 4D 29 B2 44 |BL$.....DI$(M).D|
00000450: 49 24 3A 57 51 24 B2 44 49 24 AA 22 20 20 20 20 |I$:WQ$.DI$." |
00000460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000470: 20 20 20 20 20 22 3A 57 51 24 B2 C8 28 57 51 24 | ":WQ$..(WQ$|
00000480: 2C 32 30 29 AA 22 20 4A 2F 4E 22 00 95 0C B9 00 |,20)." J/N".....|
00000490: 99 57 51 24 3B 00 A8 0C C3 00 A1 51 24 3A 8B 51 |.WQ$;......Q$:.Q|
000004A0: 24 B2 22 22 A7 31 39 35 00 CB 0C C8 00 8B 51 24 |$."".195......Q$|
000004B0: B2 22 4A 22 A7 99 22 9D 9D 9D 12 20 4A 41 20 22 |."J"..".... JA "|
000004C0: 3A 4D B2 4D AA 31 3A 89 32 32 30 00 F3 0C CD 00 |:M.M.1:.220.....|
000004D0: 8B 51 24 B2 22 5C 22 A7 A0 31 3A 44 49 24 28 4D |.Q$."\"..1:DI$(M|
000004E0: 29 B2 22 22 3A 49 44 24 28 4D 29 B2 22 22 3A 89 |)."":ID$(M)."":.|
000004F0: 32 32 35 00 04 0D D2 00 8B 51 24 B3 B1 22 4E 22 |225......Q$.."N"|
00000500: A7 31 39 35 00 28 0D D7 00 99 22 9D 9D 9D 20 4E |.195.(...."... N|
00000510: 45 45 20 22 3A 44 49 24 28 4D 29 B2 22 22 3A 49 |EE ":DI$(M)."":I|
00000520: 44 24 28 4D 29 B2 22 22 00 36 0D DC 00 8B 53 54 |D$(M)."".6....ST|
00000530: B2 30 A7 31 32 30 00 6B 0D E1 00 99 22 93 22 41 |.0.120.k...."."A|
00000540: 24 3A 99 42 24 3A 99 43 24 3A 99 22 91 91 1D 1D |$:.B$:.C$:."....|
00000550: 1D 4E 4F 47 20 45 45 4E 20 53 43 48 49 4A 46 20 |.NOG EEN SCHIJF |
00000560: 28 4A 2F 4E 29 22 3A 8D 32 35 30 00 7F 0D E6 00 |(J/N)":.250.....|
00000570: A1 58 24 3A 8B 58 24 B3 B1 22 22 A7 32 33 30 00 |.X$:.X$.."".230.|
00000580: 9C 0D EB 00 A1 58 24 3A 8B 58 24 B3 B1 22 4A 22 |.....X$:.X$.."J"|
00000590: AF 58 24 B3 B1 22 4E 22 A7 32 33 35 00 AD 0D F0 |.X$.."N".235....|
000005A0: 00 8B 58 24 B2 22 4E 22 A7 89 32 36 35 00 BB 0D |..X$."N"..265...|
000005B0: F5 00 99 22 93 22 3A 89 31 30 30 00 CC 0D FA 00 |...".":.100.....|
000005C0: 54 49 24 B2 22 30 30 30 30 30 30 22 00 E2 0D FF |TI$."000000"....|
000005D0: 00 8B 54 49 24 B3 22 30 30 30 30 30 31 22 A7 32 |..TI$."000001".2|
000005E0: 35 35 00 E8 0D 04 01 8E 00 13 0E 09 01 99 22 93 |55............".|
000005F0: 22 41 24 3A 99 42 24 3A 99 42 24 3A 99 42 24 3A |"A$:.B$:.B$:.B$:|
00000600: 99 42 24 3A 99 42 24 3A 99 42 24 3A 99 42 24 3A |.B$:.B$:.B$:.B$:|
00000610: 99 43 24 00 43 0E 0E 01 99 22 91 91 91 91 91 91 |.C$.C...."......|
00000620: 91 1D 1D 1D 31 3D 41 4C 46 41 53 4F 52 54 20 20 |....1=ALFASORT |
00000630: 20 20 20 20 20 33 3D 46 49 4C 45 20 4C 41 44 45 | 3=FILE LADE|
00000640: 4E 20 22 00 6C 0E 13 01 99 22 11 1D 1D 1D 32 3D |N ".l...."....2=|
00000650: 50 52 49 4E 54 4F 55 54 20 20 20 20 20 20 20 34 |PRINTOUT 4|
00000660: 3D 46 49 4C 45 20 53 41 56 45 4E 22 00 95 0E 18 |=FILE SAVEN"....|
00000670: 01 99 22 11 1D 1D 1D 35 3D 53 43 48 45 52 4D 20 |.."....5=SCHERM |
00000680: 50 52 49 4E 54 20 20 20 36 3D 55 49 54 42 52 45 |PRINT 6=UITBRE|
00000690: 49 44 45 4E 22 00 A9 0E 1D 01 A1 58 24 3A 8B 58 |IDEN"......X$:.X|
000006A0: 24 B3 B1 22 22 A7 32 38 35 00 E6 0E 22 01 A1 58 |$.."".285..."..X|
000006B0: 24 3A 8B 58 24 B3 B1 22 31 22 AF 58 24 B3 B1 22 |$:.X$.."1".X$.."|
000006C0: 32 22 AF 58 24 B3 B1 22 33 22 AF 58 24 B3 B1 22 |2".X$.."3".X$.."|
000006D0: 34 22 AF 58 24 B3 B1 22 35 22 AF 58 24 B3 B1 22 |4".X$.."5".X$.."|
000006E0: 36 22 A7 32 39 30 00 08 0F 27 01 91 C5 28 58 24 |6".290...'...(X$|
000006F0: 29 89 33 30 30 2C 34 35 35 2C 33 39 35 2C 33 35 |).300,455,395,35|
00000700: 30 2C 36 35 30 2C 33 30 00 27 0F 2C 01 99 22 93 |0,650,30.'.,..".|
00000710: 11 11 11 11 22 41 24 3A 99 42 24 3A 99 42 24 3A |...."A$:.B$:.B$:|
00000720: 99 42 24 3A 99 43 24 00 4B 0F 31 01 99 22 91 91 |.B$:.C$.K.1.."..|
00000730: 91 91 1D 1D 1D 41 4C 46 41 20 53 4F 52 54 45 52 |.....ALFA SORTER|
00000740: 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 22 00 6C 0F 36 01 |EN........".l.6.|
00000750: 99 22 11 1D 1D 1D 44 49 54 20 4B 41 4E 20 45 56 |."....DIT KAN EV|
00000760: 45 4E 20 44 55 52 45 4E 2E 2E 2E 22 00 86 0F 3B |EN DUREN..."...;|
00000770: 01 99 22 11 11 22 41 24 3A 99 42 24 3A 99 43 24 |..".."A$:.B$:.C$|
00000780: 3A 99 22 91 22 3B 00 BE 0F 40 01 81 49 B2 30 A4 |:.".";...@..I.0.|
00000790: 4D 3A 99 22 91 1D 1D 1D 1D 1D 1D 22 3B 49 3B 22 |M:.".......";I;"|
000007A0: 20 45 4C 45 4D 45 4E 54 45 4E 20 47 45 53 4F 52 | ELEMENTEN GESOR|
000007B0: 54 45 45 52 44 20 22 3A 81 4A B2 30 A4 4D 00 D6 |TEERD ":.J.0.M..|
000007C0: 0F 45 01 8B 44 49 24 28 49 29 B3 44 49 24 28 4A |.E..DI$(I).DI$(J|
000007D0: 29 A7 8D 33 34 30 00 DF 0F 4A 01 82 4A 2C 49 00 |)..340...J..J,I.|
000007E0: E8 0F 4F 01 89 32 36 35 00 10 10 54 01 48 4E 24 |..O..265...T.HN$|
000007F0: B2 44 49 24 28 49 29 3A 44 49 24 28 49 29 B2 44 |.DI$(I):DI$(I).D|
00000800: 49 24 28 4A 29 3A 44 49 24 28 4A 29 B2 48 4E 24 |I$(J):DI$(J).HN$|
00000810: 00 3A 10 59 01 48 41 24 B2 49 44 24 28 49 29 3A |.:.Y.HA$.ID$(I):|
00000820: 49 44 24 28 49 29 B2 49 44 24 28 4A 29 3A 49 44 |ID$(I).ID$(J):ID|
00000830: 24 28 4A 29 B2 48 41 24 3A 8E 00 58 10 5E 01 99 |$(J).HA$:..X.^..|
00000840: 22 93 11 22 3A 99 41 24 3A 99 42 24 3A 99 42 24 |"..":.A$:.B$:.B$|
00000850: 3A 99 42 24 3A 99 43 24 00 80 10 63 01 99 22 91 |:.B$:.C$...c..".|
00000860: 91 91 1D 1D 1D 48 45 54 20 53 41 56 45 4E 20 56 |.....HET SAVEN V|
00000870: 41 4E 20 45 45 4E 20 46 49 4C 45 20 20 20 20 22 |AN EEN FILE "|
00000880: 00 88 10 68 01 8D 35 30 00 98 10 6D 01 8B 58 24 |...h..50...m..X$|
00000890: B2 22 5C 22 A7 32 36 35 00 CA 10 72 01 9F 31 35 |."\".265...r..15|
000008A0: 2C 38 2C 31 35 3A 9F 33 2C 38 2C 33 2C 22 40 30 |,8,15:.3,8,3,"@0|
000008B0: 3A 47 52 4F 4F 54 20 53 4F 46 54 20 44 49 53 4B |:GROOT SOFT DISK|
000008C0: 2C 53 2C 57 22 3A 98 33 2C 4D 00 E2 10 77 01 81 |,S,W":.3,M...w..|
000008D0: 50 B2 30 A4 4D 3A 98 33 2C 44 49 24 28 50 29 3A |P.0.M:.3,DI$(P):|
000008E0: 82 50 00 07 11 7C 01 84 31 35 2C 53 24 2C 57 24 |.P...|..15,S$,W$|
000008F0: 2C 51 24 2C 45 24 3A 99 22 93 22 3A 99 41 24 3A |,Q$,E$:.".":.A$:|
00000900: 99 42 24 3A 99 43 24 00 38 11 81 01 99 22 91 91 |.B$:.C$.8...."..|
00000910: 1D 1D 1D 22 3B 53 24 3B 22 20 22 3B 57 24 3B 22 |...";S$;" ";W$;"|
00000920: 20 22 3B 51 24 3B 22 20 22 3B 45 24 3A 81 4C B2 | ";Q$;" ";E$:.L.|
00000930: 31 A4 32 30 30 30 3A 82 00 48 11 86 01 A0 33 3A |1.2000:..H....3:|
00000940: A0 31 35 3A 89 32 36 35 00 66 11 8B 01 99 22 93 |.15:.265.f....".|
00000950: 11 22 3A 99 41 24 3A 99 42 24 3A 99 42 24 3A 99 |.":.A$:.B$:.B$:.|
00000960: 42 24 3A 99 43 24 00 92 11 90 01 99 22 91 91 91 |B$:.C$......"...|
00000970: 1D 1D 1D 48 45 54 20 4C 41 44 45 4E 20 56 41 4E |...HET LADEN VAN|
00000980: 20 45 45 4E 20 46 49 4C 45 20 20 20 20 22 3A 8D | EEN FILE ":.|
00000990: 35 30 00 A2 11 95 01 8B 58 24 B2 22 5C 22 A7 32 |50......X$."\".2|
000009A0: 36 35 00 CA 11 9A 01 9F 32 2C 38 2C 32 2C 22 30 |65......2,8,2,"0|
000009B0: 3A 47 52 4F 4F 54 20 53 4F 46 54 20 44 49 53 4B |:GROOT SOFT DISK|
000009C0: 2C 53 2C 52 22 3A 84 32 2C 4D 00 F8 11 9F 01 81 |,S,R":.2,M......|
000009D0: 50 B2 30 A4 4D AB 31 3A 84 32 2C 44 49 24 3A 44 |P.0.M.1:.2,DI$:D|
000009E0: 49 24 28 50 29 B2 44 49 24 3A 82 50 3A A0 32 3A |I$(P).DI$:.P:.2:|
000009F0: 9F 31 35 2C 38 2C 31 35 00 1B 12 A4 01 84 31 35 |.15,8,15......15|
00000A00: 2C 53 24 2C 57 24 2C 51 24 2C 45 24 3A 99 22 93 |,S$,W$,Q$,E$:.".|
00000A10: 22 41 24 3A 99 42 24 3A 99 43 24 00 49 12 A9 01 |"A$:.B$:.C$.I...|
00000A20: 99 22 91 91 1D 1D 1D 22 3B 53 24 3B 22 20 22 3B |.".....";S$;" ";|
00000A30: 57 24 3B 22 20 22 3B 51 24 3B 22 20 22 3B 45 24 |W$;" ";Q$;" ";E$|
00000A40: 3A 8D 32 35 30 3A A0 31 35 00 5E 12 AE 01 99 22 |:.250:.15.^...."|
00000A50: 93 22 3A 99 41 24 3A 99 42 24 3A 99 43 24 00 80 |.":.A$:.B$:.C$..|
00000A60: 12 B3 01 99 22 91 91 1D 1D 1D 46 49 4C 45 20 55 |....".....FILE U|
00000A70: 49 54 42 52 45 49 44 45 4E 20 28 4A 2F 4E 29 22 |ITBREIDEN (J/N)"|
00000A80: 00 9D 12 B8 01 A1 58 24 3A 8B 58 24 B3 B1 22 4A |......X$:.X$.."J|
00000A90: 22 AF 58 24 B3 B1 22 4E 22 A7 34 34 30 00 AC 12 |".X$.."N".440...|
00000AA0: BD 01 8B 58 24 B2 22 4A 22 A7 33 30 00 B5 12 C2 |...X$."J".30....|
00000AB0: 01 89 32 36 35 00 CE 12 C7 01 99 22 93 11 22 41 |..265......".."A|
00000AC0: 24 3A 99 42 24 3A 99 43 24 3A 42 4C B2 31 00 FB |$:.B$:.C$:BL.1..|
00000AD0: 12 CC 01 99 22 91 91 1D 1D 1D 47 45 45 46 20 44 |....".....GEEF D|
00000AE0: 41 54 55 4D 20 49 4E 20 41 2E 55 2E 42 20 42 59 |ATUM IN A.U.B BY|
00000AF0: 56 20 30 33 2D 30 34 2D 38 35 22 00 27 13 D1 01 |V 03-04-85".'...|
00000B00: 99 22 11 D5 C0 C0 C0 C0 C0 C0 C0 C9 22 3A 99 22 |."..........":."|
00000B10: DD 44 41 54 55 4D 2E 2E DD 22 3A 99 22 CA C0 C0 |.DATUM...":."...|
00000B20: C0 C0 C0 C0 C0 CB 22 00 3F 13 D6 01 85 22 91 91 |......".?...."..|
00000B30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 44 41 24 00 |..........";DA$.|
00000B40: 5D 13 DB 01 8B C3 28 44 41 24 29 B2 B3 32 A7 44 |].....(DA$)..2.D|
00000B50: 41 24 B2 22 2D 2D 2D 2D 2D 2D 2D 2D 22 00 7A 13 |A$."--------".z.|
00000B60: E0 01 99 22 11 22 41 24 3A 81 4B B2 31 A4 35 3A |..."."A$:.K.1.5:|
00000B70: 99 42 24 3A 82 4B 3A 99 43 24 00 A4 13 E5 01 99 |.B$:.K:.C$......|
00000B80: 22 91 91 91 91 91 91 1D 1D 1D 50 52 49 4E 54 45 |".........PRINTE|
00000B90: 52 20 41 41 4E 5A 45 54 54 45 4E 2E 2E 2E 2E 2E |R AANZETTEN.....|
00000BA0: 2E 2E 2E 22 00 C9 13 EA 01 99 22 11 1D 1D 1D 45 |..."......"....E|
00000BB0: 4E 20 50 41 50 49 45 52 20 49 4E 53 54 45 4C 4C |N PAPIER INSTELL|
00000BC0: 45 4E 2E 2E 2E 2E 2E 2E 22 00 EE 13 EF 01 99 22 |EN......"......"|
00000BD0: 11 1D 1D 1D 44 52 55 4B 20 28 4A 29 20 41 4C 53 |....DRUK (J) ALS|
00000BE0: 20 55 20 4B 4C 41 41 52 20 42 45 4E 54 22 00 03 | U KLAAR BENT"..|
00000BF0: 14 F4 01 A1 58 24 3A 8B 58 24 B3 B1 22 4A 22 A7 |....X$:.X$.."J".|
00000C00: 35 30 30 00 20 14 F9 01 99 22 11 22 41 24 3A 81 |500. ...."."A$:.|
00000C10: 4B B2 31 A4 35 3A 99 42 24 3A 82 4B 3A 99 43 24 |K.1.5:.B$:.K:.C$|
00000C20: 00 4A 14 FE 01 99 22 91 91 91 91 91 91 1D 1D 1D |.J....".........|
00000C30: 48 4F 55 44 20 28 46 31 29 20 49 4E 47 45 44 52 |HOUD (F1) INGEDR|
00000C40: 55 4B 54 2E 2E 2E 2E 2E 2E 22 00 6F 14 03 02 99 |UKT......".o....|
00000C50: 22 11 1D 1D 1D 41 4C 53 20 55 20 54 55 53 53 45 |"....ALS U TUSSE|
00000C60: 4E 54 49 4A 44 53 2E 2E 2E 2E 2E 2E 2E 2E 22 00 |NTIJDS........".|
00000C70: 94 14 08 02 99 22 11 1D 1D 1D 57 49 4C 54 20 53 |....."....WILT S|
00000C80: 54 4F 50 50 45 4E 20 4D 45 54 20 50 52 49 4E 54 |TOPPEN MET PRINT|
00000C90: 45 4E 2E 22 00 9D 14 0D 02 9F 34 2C 34 00 AD 14 |EN."......4,4...|
00000CA0: 12 02 81 50 52 B2 30 A4 4D A9 31 38 38 00 F6 14 |...PR.0.M.188...|
00000CB0: 17 02 98 34 2C 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |...4,"==========|
00000CC0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000CD0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000CE0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000CF0: 3D 3D 3D 3D 22 3B 00 12 15 1C 02 98 34 2C 22 3D |====";......4,"=|
00000D00: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D10: 3D 22 00 5B 15 21 02 98 34 2C 22 20 50 52 4F 47 |=".[.!..4," PROG|
00000D20: 52 41 4D 4D 41 20 42 45 53 54 41 4E 44 20 44 49 |RAMMA BESTAND DI|
00000D30: 53 4B 45 54 54 45 53 20 20 20 20 20 20 20 50 45 |SKETTES PE|
00000D40: 52 20 44 41 54 55 4D 2D 2D 22 3B 44 41 24 3B 22 |R DATUM--";DA$;"|
00000D50: 20 20 42 4C 41 44 2D 22 3B 42 4C 00 A4 15 26 02 | BLAD-";BL...&.|
00000D60: 98 34 2C 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.4,"============|
00000D70: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D90: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000DA0: 3D 3D 22 3B 00 C8 15 2B 02 98 34 2C 22 3D 3D 3D |==";...+..4,"===|
00000DB0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 |==============="|
00000DC0: 3A 42 4C B2 42 4C AA 31 00 D9 15 30 02 81 50 41 |:BL.BL.1...0..PA|
00000DD0: B2 50 52 A4 50 52 AA 36 33 00 F8 15 35 02 8B C2 |.PR.PR.63...5...|
00000DE0: 28 31 39 37 29 B2 34 A7 50 41 B2 50 52 AA 36 33 |(197).4.PA.PR.63|
00000DF0: 3A A0 34 3A 89 32 36 35 00 0C 16 3A 02 8B 44 49 |:.4:.265...:..DI|
00000E00: 24 28 50 41 29 B2 22 22 A7 36 31 35 00 52 16 3F |$(PA)."".615.R.?|
00000E10: 02 51 24 B2 44 49 24 28 50 41 29 3A 51 24 B2 51 |.Q$.DI$(PA):Q$.Q|
00000E20: 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000E30: 20 20 20 20 20 22 3A 51 24 B2 C8 28 51 24 2C 31 | ":Q$..(Q$,1|
00000E40: 37 29 3A 51 51 24 B2 49 44 24 28 50 41 29 AA 22 |7):QQ$.ID$(PA)."|
00000E50: 20 22 00 61 16 44 02 98 34 2C 51 24 3B 51 51 24 | ".a.D..4,Q$;QQ$|
00000E60: 3B 00 7C 16 49 02 8B 44 49 24 28 50 41 AA 36 34 |;.|.I..DI$(PA.64|
00000E70: 29 B2 22 22 A7 98 34 3A 89 36 31 35 00 C8 16 4E |).""..4:.615...N|
00000E80: 02 51 24 B2 44 49 24 28 50 41 AA 36 34 29 3A 51 |.Q$.DI$(PA.64):Q|
00000E90: 24 B2 51 24 AA 22 20 20 20 20 20 20 20 20 20 20 |$.Q$." |
00000EA0: 20 20 20 20 20 20 20 20 22 3A 51 24 B2 C8 28 51 | ":Q$..(Q|
00000EB0: 24 2C 31 37 29 3A 51 51 24 B2 49 44 24 28 50 41 |$,17):QQ$.ID$(PA|
00000EC0: AA 36 34 29 AA 22 20 22 00 D7 16 53 02 98 34 2C |.64)." "...S..4,|
00000ED0: 51 24 3B 51 51 24 3B 00 F3 16 58 02 8B 44 49 24 |Q$;QQ$;...X..DI$|
00000EE0: 28 50 41 AA 31 32 38 29 B2 22 22 A7 98 34 3A 89 |(PA.128).""..4:.|
00000EF0: 36 31 35 00 3F 17 5D 02 51 24 B2 44 49 24 28 50 |615.?.].Q$.DI$(P|
00000F00: 41 AA 31 32 38 29 3A 51 24 B2 51 24 AA 22 20 20 |A.128):Q$.Q$." |
00000F10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F20: 22 3A 51 24 B2 C8 28 51 24 2C 31 37 29 3A 51 51 |":Q$..(Q$,17):QQ|
00000F30: 24 B2 49 44 24 28 50 41 AA 31 32 38 29 AA 22 00 |$.ID$(PA.128).".|
00000F40: 4D 17 62 02 98 34 2C 51 24 3B 51 51 24 00 55 17 |M.b..4,Q$;QQ$.U.|
00000F50: 67 02 82 50 41 00 9E 17 6C 02 98 34 2C 22 3D 3D |g..PA...l..4,"==|
00000F60: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F70: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F90: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3B 00 BA |============";..|
00000FA0: 17 71 02 98 34 2C 22 3D 3D 3D 3D 3D 3D 3D 3D 3D |.q..4,"=========|
00000FB0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 F9 17 76 02 98 |========="...v..|
00000FC0: 34 2C 22 20 44 45 20 47 52 4F 4F 54 20 53 4F 46 |4," DE GROOT SOF|
00000FD0: 54 20 4C 45 4C 59 53 54 41 44 20 20 44 49 53 4B |T LELYSTAD DISK|
00000FE0: 53 4F 52 54 45 52 20 20 20 30 33 2D 30 34 2D 38 |SORTER 03-04-8|
00000FF0: 35 20 20 20 20 20 20 22 3B 00 1C 18 7B 02 98 34 |5 ";...{..4|
00001000: 2C 22 20 20 20 41 41 4E 54 41 4C 20 50 52 4F 47 |," AANTAL PROG|
00001010: 52 41 4D 4D 41 27 53 22 3B 4D AB 31 00 65 18 80 |RAMMA'S";M.1.e..|
00001020: 02 98 34 2C 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..4,"===========|
00001030: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001040: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001060: 3D 3D 3D 22 3B 00 92 18 85 02 98 34 2C 22 3D 3D |===";......4,"==|
00001070: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001080: 22 3A 98 34 3A 98 34 3A 82 50 52 3A A0 34 3A 89 |":.4:.4:.PR:.4:.|
00001090: 33 30 00 AF 18 8A 02 99 22 93 22 3A 4E 55 B2 30 |30......".":NU.0|
000010A0: 3A 81 50 B2 30 A4 4D 3A 99 44 49 24 28 50 29 00 |:.P.0.M:.DI$(P).|
000010B0: BE 18 8F 02 8B 4E 55 B3 32 31 A7 36 38 30 00 DE |.....NU.21.680..|
000010C0: 18 94 02 99 22 12 20 20 20 20 20 44 52 55 4B 20 |....". DRUK |
000010D0: 52 45 54 55 52 4E 20 20 20 20 20 20 20 22 00 F5 |RETURN "..|
000010E0: 18 99 02 A1 58 24 3A 8B 58 24 B3 B1 C7 28 31 33 |....X$:.X$...(13|
000010F0: 29 A7 36 36 35 00 04 19 9E 02 8B 4E 55 B3 32 31 |).665......NU.21|
00001100: A7 32 36 35 00 13 19 A3 02 4E 55 B2 AB 31 3A 99 |.265.....NU..1:.|
00001110: 22 93 22 00 22 19 A8 02 4E 55 B2 4E 55 AA 31 3A |"."."...NU.NU.1:|
00001120: 82 50 00 2B 19 AD 02 89 36 36 30 00 31 19 B2 02 |.P.+....660.1...|
00001130: 80 00 4E 19 B7 02 42 42 24 B2 22 22 3A 81 49 B2 |..N...BB$."":.I.|
00001140: 31 A4 34 3A A1 23 31 2C 41 41 24 3A 82 49 00 69 |1.4:.#1,AA$:.I.i|
00001150: 19 BC 02 A1 23 31 2C 41 41 24 3A 8B 41 41 24 B2 |....#1,AA$:.AA$.|
00001160: 22 22 A7 46 4C B2 31 3A 8E 00 7D 19 C1 02 8B 41 |"".FL.1:..}....A|
00001170: 41 24 B3 B1 C7 28 33 34 29 A7 37 30 30 00 89 19 |A$...(34).700...|
00001180: C6 02 A1 23 31 2C 41 41 24 00 9C 19 CB 02 8B 41 |...#1,AA$......A|
00001190: 41 24 B2 C7 28 33 34 29 A7 37 32 35 00 B1 19 D0 |A$..(34).725....|
000011A0: 02 42 42 24 B2 42 42 24 AA 41 41 24 3A 89 37 31 |.BB$.BB$.AA$:.71|
000011B0: 30 00 CC 19 D5 02 A1 23 31 2C 41 41 24 3A 8B 41 |0......#1,AA$:.A|
000011C0: 41 24 B2 C7 28 33 32 29 A7 37 32 35 00 D8 19 DA |A$..(32).725....|
000011D0: 02 46 54 24 B2 41 41 24 00 04 1A DF 02 A1 23 31 |.FT$.AA$......#1|
000011E0: 2C 41 41 24 3A 46 54 24 B2 46 54 24 AA 41 41 24 |,AA$:FT$.FT$.AA$|
000011F0: 3A A1 23 31 2C 41 41 24 3A 46 54 24 B2 46 54 24 |:.#1,AA$:FT$.FT$|
00001200: AA 41 41 24 00 1D 1A E4 02 A1 23 31 2C 41 41 24 |.AA$......#1,AA$|
00001210: 3A 8B 41 41 24 B3 B1 22 22 A7 37 34 30 00 23 1A |:.AA$.."".740.#.|
00001220: E9 02 8E 00 00 00 |...... |
..9....53280,0:.53281,0:.:."..":.DI$(100
0):M.0:.ID$(1000).H...A$."U.............
......................I".....B$.".
.".F...C$."
J...................................K"..
....".":.A$:.B$:.B$:.B$:.B$:.B$ :.C$...#
.."........DISKSORTER = HARDCOPY ".:.
(.."....DE GROOT SOFT LELYSTAD ".F.-..
50:.95.C.2..".":.A$:.B$:.B$:.B$:.C$...7.
."......PLAATS DISKETTE IN DRIVE#0"...<.
.".":.A$:.B$:.B$:.B$:.C$.R.A.."......ALS
U KLAAR BENT J INDRUKKEN"...F..".":.A$:
.B$:.B$:.B$:.C$...K.."......OM TE STOPPE
N \ INDRUKKEN ".,.P..X$:.X$.."".80.H.U
..X$:.X$.."J".X$.."\".85.N.Z...^._..X$."
\".265...D.L$."":ID$."":AA$."":BB$."":CC
$.""...I..1,8,0,"$":.I.1.30:.#1,AA$:L$.L
$.AA$:.:."."H(L$,27);.O.N.."--ITEMS=";M.
..S.ID$.J(L$,25,2):.#1,AA$,BB$...X..#1,A
A$,BB$,AA$,BB$:C.0:DI$."".'.}..AA$.."".C
.F(AA$).C....BB$.."".C.C.F(BB$).256.P...
BL$.J(D(C),2):BL$.BL$."...":BL$.H(BL$,3)
......#1,BB$:.ST..0. 1:.225......BB$..G(
34).140.H....#1,BB$:.BB$..G(34).DI$.DI$.
BB$:.150......#1,BB$:.BB$.G(32).155... .
CC$."".....CC$.CC$.BB$:.#1,BB$:.BB$.."".
165.$...FI$.H(CC$,1).C...ID$(M).ID$."-".
FI$."-".BL$.....DI$(M).DI$:WQ$.DI$."
":WQ$.H(WQ$,20)." J
/N"......WQ$;...C..Q$:.Q$."".195.K.H..Q$
."J"..".... JA ":M.M.1:.220...M..Q$."\".
1:DI$(M)."":ID$(M)."":.225...R..Q$.."N"
.195.(.W.."... NEE ":DI$(M)."":ID$(M).""
.6....ST.0.120.K...."."A$:.B$:.C$:."....
.NOG EEN SCHIJF (J/N)":.250.....X$:.X$.
."".230......X$:.X$.."J".X$.."N".235....
..X$."N"..265......".":.100.L...TI$."000
000"......TI$."000001".255............".
"A$:.B$:.B$:.B$:.B$:.B$:.B$:.B$:.C$.C...
."..........1=ALFASORT 3=FILE LADE
N ".L...."....2=PRINTOUT 4=FILE SA
VEN"......"....5=SCHERM PRINT 6=UITBRE
IDEN"......X$:.X$.."".285..."..X$:.X$.."
1".X$.."2".X$.."3".X$.."4".X$.."5".X$.."
6".290...'..E(X$).300,455,395,350,650,30
.'.,.."....."A$:.B$:.B$:.B$:.C$.K.1.."..
.....ALFA SORTEREN........".L.6.."....DI
T KAN EVEN DUREN..."...;..".."A$:.B$:.C$
:.".";...@..I.0.M:.".......";I;" ELEMENT
EN GESORTEERD ":.J.0.M.V.E..DI$(I).DI$(J
)..340...J..J,I...O..265...T.HN$.DI$(I):
DI$(I).DI$(J):DI$(J).HN$.:.Y.HA$.ID$(I):
ID$(I).ID$(J):ID$(J).HA$:..X.^.."..":.A$
:.B$:.B$:.B$:.C$...C.."......HET SAVEN V
AN EEN FILE "...H..50...M..X$."\".265
.J.R..15,8,15:.3,8,3,"@0:GROOT SOFT DISK
,S,W":.3,M...W..P.0.M:.3,DI$(P):.P...|..
15,S$,W$,Q$,E$:.".":.A$:.B$:.C$.8...."..
...";S$;" ";W$;" ";Q$;" ";E$:.L.1.2000:.
.H... 3: 15:.265.F...."..":.A$:.B$:.B$:.
B$:.C$......"......HET LADEN VAN EEN FIL
E ":.50......X$."\".265.J....2,8,2,"0
:GROOT SOFT DISK,S,R":.2,M......P.0.M.1:
.2,DI$:DI$(P).DI$:.P: 2:.15,8,15......15
,S$,W$,Q$,E$:."."A$:.B$:.C$.I...."....."
;S$;" ";W$;" ";Q$;" ";E$:.250: 15.^...."
.":.A$:.B$:.C$......".....FILE UITBREIDE
N (J/N)"......X$:.X$.."J".X$.."N".440...
...X$."J".30...B..265.N.G..".."A$:.B$:.C
$:BL.1...L..".....GEEF DATUM IN A.U.B BY
V 03-04-85".'.Q..".U.......I":.".DATUM..
.":."J.......K".?.V.."............";DA$.
]....C(DA$)..2.DA$."--------".Z...."."A$
:.K.1.5:.B$:.K:.C$......".........PRINTE
R AANZETTEN........".I...."....EN PAPIER
INSTELLEN......"......"....DRUK (J) ALS
U KLAAR BENT"......X$:.X$.."J".500. ...
."."A$:.K.1.5:.B$:.K:.C$.J....".........
HOUD (F1) INGEDRUKT......".O...."....ALS
U TUSSENTIJDS........"......"....WILT S
TOPPEN MET PRINTEN."......4,4......PR.0.
M.188......4,"==========================
====================================";..
....4,"==================".[.!..4," PROG
RAMMA BESTAND DISKETTES PER DATUM-
-";DA$;" BLAD-";BL...&..4,"============
========================================
==========";.H.+..4,"=================="
:BL.BL.1.Y.0..PA.PR.PR.63...5..B(197).4.
PA.PR.63: 4:.265...:..DI$(PA)."".615.R.?
.Q$.DI$(PA):Q$.Q$." ":Q
$.H(Q$,17):QQ$.ID$(PA)." ".A.D..4,Q$;QQ$
;.|.I..DI$(PA.64).""..4:.615.H.N.Q$.DI$(
PA.64):Q$.Q$." ":Q$.H(Q
$,17):QQ$.ID$(PA.64)." ".W.S..4,Q$;QQ$;.
..X..DI$(PA.128).""..4:.615.?.].Q$.DI$(P
A.128):Q$.Q$." ":Q$.H(Q
$,17):QQ$.ID$(PA.128).".M.B..4,Q$;QQ$.U.
G..PA...L..4,"==========================
====================================";..
.Q..4,"=================="...V..4," DE G
ROOT SOFT LELYSTAD DISKSORTER 03-04-8
5 ";...{..4," AANTAL PROGRAMMA'S"
;M.1.E....4,"===========================
===================================";...
...4,"==================":.4:.4:.PR: 4:.
30......".":NU.0:.P.0.M:.DI$(P)......NU.
21.680......". DRUK RETURN "..
....X$:.X$..G(13).665......NU.21.265....
.NU..1:."."."...NU.NU.1:.P.+....660.1...
..N...BB$."":.I.1.4:.#1,AA$:.I.I....#1,A
A$:.AA$."".FL.1:..}.A..AA$..G(34).700...
F..#1,AA$...K..AA$.G(34).725...P.BB$.BB$
.AA$:.710.L.U..#1,AA$:.AA$.G(32).725.X.Z
.FT$.AA$......#1,AA$:FT$.FT$.AA$:.#1,AA$
:FT$.FT$.AA$......#1,AA$:.AA$.."".740.#.
......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL