DISK-MANAGER
FILE INFORMATION
FILENAME(S): DISK-MANAGER
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-11-30 21:23:21
APPEARS ON: 1 disk(s)
FILE HASH
94592541dd2188914e6272767650502fcfa49cb468bc1a680e71ea4dc9e1084b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 12 2 | DISK-MANAGER | PRG | DuncanTwain | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 34 08 64 00 99 22 93 12 05 20 20 20 20 20 |..4.d.."... |
00000010: 20 44 49 53 4B 2D 4D 41 4E 41 47 45 52 20 20 28 | DISK-MANAGER (|
00000020: 43 29 20 42 59 20 52 55 44 49 45 53 4F 46 54 20 |C) BY RUDIESOFT |
00000030: 20 20 20 22 00 6D 08 69 00 86 4B 24 28 34 30 39 | ".m.i..K$(409|
00000040: 36 29 2C 49 44 24 28 38 32 36 29 3A 44 56 B2 33 |6),ID$(826):DV.3|
00000050: 3A 53 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 |:SP$." |
00000060: 20 20 20 20 20 20 22 3A 9F 34 2C 44 56 00 8E 08 | ":.4,DV...|
00000070: 6E 00 9F 31 35 2C 38 2C 31 35 3A 97 35 33 32 38 |n..15,8,15:.5328|
00000080: 30 2C 31 34 3A 97 35 33 32 38 31 2C 31 34 00 C5 |0,14:.53281,14..|
00000090: 08 78 00 9F 32 2C 38 2C 32 2C 22 44 49 52 49 4E |.x..2,8,2,"DIRIN|
000000A0: 44 45 58 22 3A 8D 39 30 30 30 3A 8B 45 4E B2 36 |DEX":.9000:.EN.6|
000000B0: 32 A7 49 44 24 28 31 29 B2 22 01 01 22 3A A0 32 |2.ID$(1)."..":.2|
000000C0: 3A 89 32 30 30 00 D9 08 7D 00 49 4E B2 31 3A 8D |:.200...}.IN.1:.|
000000D0: 32 32 35 30 3A 49 4E B2 30 00 EC 08 82 00 49 4E |2250:IN.0.....IN|
000000E0: B2 49 4E AA 31 3A 84 32 2C 49 4E 24 00 10 09 8C |.IN.1:.2,IN$....|
000000F0: 00 49 44 24 28 49 4E 29 B2 49 4E 24 3A 8B C8 28 |.ID$(IN).IN$:..(|
00000100: 49 4E 24 2C 32 29 B3 B1 22 01 01 22 89 31 33 30 |IN$,2).."..".130|
00000110: 00 17 09 B4 00 A0 32 00 43 09 C8 00 99 22 93 90 |......2.C...."..|
00000120: 20 20 20 20 20 44 49 53 4B 2D 4D 41 4E 41 47 45 | DISK-MANAGE|
00000130: 52 20 20 28 43 29 20 42 59 20 52 55 44 49 45 53 |R (C) BY RUDIES|
00000140: 4F 46 54 00 72 09 CD 00 99 22 20 05 2A 2A 2A 2A |OFT.r...." .****|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000170: 2A 2A 00 8E 09 D2 00 99 A3 31 31 29 22 48 20 4F |**.......11)"H O|
00000180: 20 4F 20 46 20 44 20 4D 20 45 20 4E 20 55 00 BC | O F D M E N U..|
00000190: 09 D7 00 99 22 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...." **********|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D9 09 DC |************....|
000001C0: 00 99 22 11 90 31 2E 20 49 4E 4C 45 5A 45 4E 20 |.."..1. INLEZEN |
000001D0: 44 49 52 45 43 54 4F 52 59 00 F2 09 E6 00 99 22 |DIRECTORY......"|
000001E0: 11 32 2E 20 5A 4F 45 4B 20 50 52 4F 47 52 41 4D |.2. ZOEK PROGRAM|
000001F0: 4D 41 00 0F 0A F0 00 99 22 11 33 2E 20 44 49 53 |MA......".3. DIS|
00000200: 4B 45 54 54 45 2D 4F 56 45 52 5A 49 43 48 54 00 |KETTE-OVERZICHT.|
00000210: 2D 0A FA 00 99 22 11 34 2E 20 41 46 44 52 55 4B |-....".4. AFDRUK|
00000220: 4B 45 4E 20 44 49 52 45 43 54 4F 52 59 00 4D 0A |KEN DIRECTORY.M.|
00000230: 04 01 99 22 11 35 2E 20 41 46 44 52 55 4B 4B 45 |...".5. AFDRUKKE|
00000240: 4E 20 50 52 4F 47 52 41 4D 4D 41 27 53 00 7A 0A |N PROGRAMMA'S.z.|
00000250: 0E 01 99 22 11 36 2E 20 41 46 44 52 55 4B 4B 45 |...".6. AFDRUKKE|
00000260: 4E 20 50 52 4F 47 52 41 4D 4D 41 27 53 20 50 45 |N PROGRAMMA'S PE|
00000270: 52 20 44 49 53 4B 45 54 54 45 00 95 0A 18 01 99 |R DISKETTE......|
00000280: 22 11 37 2E 20 46 49 4C 45 20 55 49 54 20 42 45 |".7. FILE UIT BE|
00000290: 53 54 41 4E 44 00 B8 0A 22 01 99 22 11 38 2E 20 |STAND..."..".8. |
000002A0: 56 45 52 41 4E 44 45 52 20 41 46 44 52 55 4B 2D |VERANDER AFDRUK-|
000002B0: 41 50 50 41 52 41 41 54 00 CA 0A 27 01 99 22 11 |APPARAAT...'..".|
000002C0: 39 2E 20 53 54 4F 50 50 45 4E 00 F1 0A 2C 01 99 |9. STOPPEN...,..|
000002D0: 22 11 1F 20 54 49 45 50 20 48 45 54 20 43 49 4A |".. TIEP HET CIJ|
000002E0: 46 45 52 20 56 41 4E 20 55 57 20 4B 45 55 5A 45 |FER VAN UW KEUZE|
000002F0: 90 00 FC 0A 36 01 8D 31 30 30 30 30 00 0F 0B 40 |....6..10000...@|
00000300: 01 8B 49 4E B3 30 B0 49 4E B1 39 A7 33 31 30 00 |..IN.0.IN.9.310.|
00000310: 43 0B 4A 01 91 49 4E 8D 39 30 30 2C 32 35 30 30 |C.J..IN.900,2500|
00000320: 2C 33 30 30 30 2C 33 36 35 30 2C 33 36 30 30 2C |,3000,3650,3600,|
00000330: 33 38 30 30 2C 33 33 30 30 2C 33 35 30 30 2C 33 |3800,3300,3500,3|
00000340: 35 35 30 00 4C 0B 54 01 89 32 30 30 00 74 0B 84 |550.L.T..200.t..|
00000350: 03 99 22 93 22 A3 38 29 22 05 2A 2A 2A 20 49 4E |..".".8)".*** IN|
00000360: 4C 45 5A 45 4E 20 44 49 52 45 43 54 4F 52 59 20 |LEZEN DIRECTORY |
00000370: 2A 2A 2A 90 00 A6 0B 8E 03 99 22 11 11 11 20 1F |***......."... .|
00000380: 53 54 4F 50 20 44 45 20 44 49 52 45 43 54 4F 52 |STOP DE DIRECTOR|
00000390: 59 2D 44 49 53 4B 45 54 54 45 20 49 4E 20 44 45 |Y-DISKETTE IN DE|
000003A0: 20 44 49 53 4B 91 00 C3 0B 98 03 99 A3 31 31 29 | DISK........11)|
000003B0: 3B 3A 8D 31 30 32 30 30 3A 8B 49 4E 24 B2 22 2A |;:.10200:.IN$."*|
000003C0: 22 A7 8E 00 F5 0B E8 03 98 31 35 2C 22 49 22 3A |"........15,"I":|
000003D0: 99 22 93 22 3B 3A 41 50 B2 30 3A 9F 31 2C 38 2C |.".";:AP.0:.1,8,|
000003E0: 30 2C 22 24 22 3A 81 49 B2 31 A4 36 3A A1 23 31 |0,"$":.I.1.6:.#1|
000003F0: 2C 41 24 3A 82 00 0F 0C F2 03 8D 32 30 30 30 3A |,A$:.......2000:|
00000400: 44 49 24 B2 49 31 24 3A 49 44 24 B2 49 32 24 00 |DI$.I1$:ID$.I2$.|
00000410: 26 0C FC 03 99 22 20 1F 12 22 44 49 24 22 20 22 |&...." .."DI$" "|
00000420: 49 44 24 22 90 11 00 36 0C 1A 04 8B 53 54 B3 B1 |ID$"...6....ST..|
00000430: 30 A7 31 31 30 30 00 6A 0C 24 04 81 49 B2 31 A4 |0.1100.j.$..I.1.|
00000440: 32 3A A1 23 31 2C 41 24 2C 42 24 3A 82 3A 8B 41 |2:.#1,A$,B$:.:.A|
00000450: 24 B3 B1 22 22 A7 42 B2 C6 28 41 24 29 3A 8B 42 |$.."".B..(A$):.B|
00000460: 24 B3 B1 22 22 A7 31 31 30 30 00 83 0C 2E 04 41 |$.."".1100.....A|
00000470: 50 B2 41 50 AA 31 3A 8D 32 30 30 30 3A 46 24 B2 |P.AP.1:.2000:F$.|
00000480: 49 31 24 00 A4 0C 45 04 8B C8 28 49 32 24 2C 31 |I1$...E...(I2$,1|
00000490: 29 B3 B1 22 50 22 A7 41 50 B2 41 50 AB 31 3A 89 |).."P".AP.AP.1:.|
000004A0: 31 30 35 30 00 BF 0C 46 04 42 24 B2 C4 28 42 29 |1050...F.B$..(B)|
000004B0: 3A 99 41 50 A3 35 29 46 24 A3 32 35 29 42 3A 00 |:.AP.5)F$.25)B:.|
000004C0: E7 0C 47 04 4B 24 28 41 50 29 B2 C8 28 46 24 AA |..G.K$(AP)..(F$.|
000004D0: 53 50 24 2C 31 36 29 AA CA 28 42 24 2C 32 2C 33 |SP$,16)..(B$,2,3|
000004E0: 29 3A 89 31 30 35 30 00 01 0D 4C 04 8B 42 24 B3 |):.1050...L..B$.|
000004F0: B1 22 22 A7 42 B2 42 AA C6 28 42 24 29 AC 32 35 |."".B.B..(B$).25|
00000500: 36 00 25 0D 52 04 42 24 B2 C4 28 42 29 3A 99 22 |6.%.R.B$..(B):."|
00000510: 11 22 42 24 22 20 42 4C 4F 43 4B 53 20 46 52 45 |."B$" BLOCKS FRE|
00000520: 45 22 3A A0 31 00 52 0D 56 04 99 22 11 11 20 20 |E":.1.R.V..".. |
00000530: 1F 53 54 4F 50 20 44 45 20 44 41 54 41 2D 44 49 |.STOP DE DATA-DI|
00000540: 53 4B 45 54 54 45 20 49 4E 20 44 45 20 44 49 53 |SKETTE IN DE DIS|
00000550: 4B 91 00 64 0D 60 04 99 A3 31 30 29 3B 3A 8D 31 |K..d.`...10);:.1|
00000560: 30 32 30 30 00 87 0D 74 04 98 31 35 2C 22 49 22 |0200...t..15,"I"|
00000570: 3A 99 22 11 11 57 52 49 54 49 4E 47 20 44 41 54 |:."..WRITING DAT|
00000580: 41 2D 46 49 4C 45 22 00 BD 0D B0 04 98 31 35 2C |A-FILE"......15,|
00000590: 22 53 3A 44 22 49 44 24 3A 9F 32 2C 38 2C 32 2C |"S:D"ID$:.2,8,2,|
000005A0: 22 44 22 AA 49 44 24 AA 22 2C 53 2C 57 22 3A 8D |"D".ID$.",S,W":.|
000005B0: 39 30 30 30 3A 8B 45 4E A7 A0 32 3A 8E 00 F4 0D |9000:.EN..2:....|
000005C0: 14 05 8D 31 30 35 30 30 3A 81 49 B2 31 A4 41 50 |...10500:.I.1.AP|
000005D0: 3A 98 32 2C C8 28 CA 28 4B 24 28 49 29 2C 31 37 |:.2,.(.(K$(I),17|
000005E0: 29 AA 53 50 24 2C 33 29 3B C8 28 4B 24 28 49 29 |).SP$,3);.(K$(I)|
000005F0: 2C 31 36 29 00 06 0E 1E 05 82 3A 98 32 2C 22 30 |,16)......:.2,"0|
00000600: 30 30 45 4F 46 22 00 34 0E 28 05 A0 32 3A 49 B2 |00EOF".4.(..2:I.|
00000610: 31 3A 44 49 24 B2 44 49 24 AA C9 28 22 30 30 30 |1:DI$.DI$..("000|
00000620: 22 AA 42 24 2C 33 29 AA CA 28 C4 28 41 50 29 2C |".B$,3)..(.(AP),|
00000630: 32 2C 33 29 00 68 0E 32 05 8B 49 44 24 28 49 29 |2,3).h.2..ID$(I)|
00000640: B2 22 01 01 22 A7 49 44 24 28 49 29 B2 49 44 24 |."..".ID$(I).ID$|
00000650: AA 44 49 24 3A 49 44 24 28 49 AA 31 29 B2 22 01 |.DI$:ID$(I.1).".|
00000660: 01 22 3A 89 31 33 36 30 00 92 0E 3C 05 8B C8 28 |.":.1360...<...(|
00000670: 49 44 24 28 49 29 2C 32 29 B2 49 44 24 A7 49 44 |ID$(I),2).ID$.ID|
00000680: 24 28 49 29 B2 49 44 24 AA 44 49 24 3A 89 31 33 |$(I).ID$.DI$:.13|
00000690: 36 30 00 A2 0E 46 05 49 B2 49 AA 31 3A 89 31 33 |60...F.I.I.1:.13|
000006A0: 33 30 00 AC 0E 50 05 89 32 31 30 30 00 C4 0E CF |30...P..2100....|
000006B0: 07 8F 2A 2A 2A 44 49 52 45 43 54 4F 52 59 2D 49 |..***DIRECTORY-I|
000006C0: 4E 50 55 54 00 E8 0E D0 07 49 4E B2 33 34 3A 8D |NPUT.....IN.34:.|
000006D0: 32 32 30 30 3A 49 4E B2 33 34 3A 8D 32 32 30 30 |2200:IN.34:.2200|
000006E0: 3A 49 31 24 B2 49 4E 24 00 00 0F DA 07 A1 23 31 |:I1$.IN$......#1|
000006F0: 2C 41 24 3A 8B 41 24 B2 22 20 22 A7 32 30 31 30 |,A$:.A$." ".2010|
00000700: 00 17 0F E4 07 A1 23 31 2C 49 4E 24 3A 49 32 24 |......#1,IN$:I2$|
00000710: B2 41 24 AA 49 4E 24 00 34 0F EE 07 A1 23 31 2C |.A$.IN$.4....#1,|
00000720: 41 24 3A 8B 41 24 B3 B1 22 22 AF 53 54 B2 30 A7 |A$:.A$.."".ST.0.|
00000730: 32 30 33 30 00 3A 0F F8 07 8E 00 50 0F 33 08 8F |2030.:.....P.3..|
00000740: 2A 2A 2A 49 44 24 28 29 20 4F 50 20 44 49 53 4B |***ID$() OP DISK|
00000750: 00 8C 0F 34 08 8D 35 30 30 30 3A 8D 31 30 37 30 |...4..5000:.1070|
00000760: 30 3A 9F 32 2C 38 2C 32 2C 22 44 49 52 49 4E 44 |0:.2,8,2,"DIRIND|
00000770: 45 58 2C 4C 2C 22 AA C7 28 32 35 29 3A 49 4E B2 |EX,L,"..(25):IN.|
00000780: 31 3A 8D 32 32 35 30 3A 49 4E B2 30 00 B0 0F 3E |1:.2250:IN.0...>|
00000790: 08 49 4E B2 49 4E AA 31 3A 8B 49 44 24 28 49 4E |.IN.IN.1:.ID$(IN|
000007A0: 29 B3 B1 22 22 A7 98 32 2C 49 44 24 28 49 4E 29 |)..""..2,ID$(IN)|
000007B0: 00 C8 0F 48 08 8B 49 44 24 28 49 4E 29 B3 B1 22 |...H..ID$(IN).."|
000007C0: 01 01 22 A7 32 31 31 30 00 D1 0F 52 08 A0 32 3A |..".2110...R..2:|
000007D0: 8A 00 DC 0F 98 08 49 4E 24 B2 22 22 00 F9 0F A2 |......IN$.""....|
000007E0: 08 A1 23 31 2C 41 24 3A 8B 41 24 B2 C7 28 49 4E |..#1,A$:.A$..(IN|
000007F0: 29 B0 53 54 B3 B1 30 A7 8E 00 0E 10 AC 08 49 4E |).ST..0.......IN|
00000800: 24 B2 49 4E 24 AA 41 24 3A 89 32 32 31 30 00 46 |$.IN$.A$:.2210.F|
00000810: 10 CA 08 48 49 B2 B5 28 49 4E AD 32 35 36 29 3A |...HI..(IN.256):|
00000820: 4C 4F B2 49 4E AB 32 35 36 AC 48 49 3A 98 31 35 |LO.IN.256.HI:.15|
00000830: 2C 22 50 22 C7 28 32 29 C7 28 4C 4F 29 C7 28 48 |,"P".(2).(LO).(H|
00000840: 49 29 C7 28 31 29 00 4C 10 D4 08 8E 00 69 10 2D |I).(1).L.....i.-|
00000850: 09 8F 2A 2A 2A 5A 4F 45 4B 20 44 49 53 4B 4E 41 |..***ZOEK DISKNA|
00000860: 41 4D 20 42 49 4A 20 49 44 00 72 10 2E 09 41 50 |AM BIJ ID.r...AP|
00000870: B2 30 00 9D 10 38 09 41 50 B2 41 50 AA 31 3A 8B |.0...8.AP.AP.1:.|
00000880: C8 28 49 44 24 28 41 50 29 2C 32 29 B2 22 01 01 |.(ID$(AP),2)."..|
00000890: 22 A7 49 4E 24 B2 22 46 4E 46 22 3A 8E 00 B5 10 |".IN$."FNF":....|
000008A0: 42 09 8B C8 28 49 44 24 28 41 50 29 2C 32 29 B2 |B...(ID$(AP),2).|
000008B0: 49 44 24 A7 8E 00 BF 10 4C 09 89 32 33 36 30 00 |ID$.....L..2360.|
000008C0: E9 10 60 09 99 22 93 1F 49 44 20 4E 41 41 4D 20 |..`.."..ID NAAM |
000008D0: 44 49 53 4B 20 20 20 20 20 20 20 20 42 4C 2E 46 |DISK BL.F|
000008E0: 52 2E 20 23 50 52 47 2E 22 00 15 11 65 09 99 22 |R. #PRG."...e.."|
000008F0: 95 B8 B8 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |... ............|
00000900: B8 B8 B8 B8 20 B8 B8 B8 B8 B8 B8 20 B8 B8 B8 B8 |.... ...... ....|
00000910: B8 90 22 3A 8E 00 23 11 6A 09 8B 49 4E 24 B2 22 |..":..#.j..IN$."|
00000920: 22 A7 8E 00 5D 11 6F 09 99 C8 28 49 4E 24 2C 32 |"...].o...(IN$,2|
00000930: 29 22 20 22 CA 28 49 4E 24 2C 33 2C 31 36 29 A3 |)" ".(IN$,3,16).|
00000940: 32 31 29 CA 28 49 4E 24 2C 31 39 2C 33 29 A3 32 |21).(IN$,19,3).2|
00000950: 38 29 CA 28 49 4E 24 2C 32 32 2C 33 29 00 63 11 |8).(IN$,22,3).c.|
00000960: 74 09 8E 00 87 11 C4 09 99 22 93 22 A3 39 29 22 |t........".".9)"|
00000970: 05 2A 2A 2A 20 5A 4F 45 4B 20 50 52 4F 47 52 41 |.*** ZOEK PROGRA|
00000980: 4D 4D 41 20 2A 2A 2A 00 AB 11 CE 09 49 4E 24 B2 |MMA ***.....IN$.|
00000990: 22 22 3A 85 22 11 11 11 90 50 52 4F 47 52 41 4D |"":."....PROGRAM|
000009A0: 4D 41 4E 41 41 4D 22 3B 49 4E 24 00 BA 11 D3 09 |MANAAM";IN$.....|
000009B0: 8B 49 4E 24 B2 22 2A 22 A7 8E 00 D6 11 D8 09 42 |.IN$."*".......B|
000009C0: B2 C3 28 49 4E 24 29 3A 8B 42 B2 30 B0 42 B1 31 |..(IN$):.B.0.B.1|
000009D0: 36 A7 32 35 31 30 00 FC 11 E2 09 53 45 24 B2 49 |6.2510.....SE$.I|
000009E0: 4E 24 3A 99 22 11 11 53 45 41 52 43 48 49 4E 47 |N$:."..SEARCHING|
000009F0: 20 46 4F 52 20 22 53 45 24 22 2A 22 00 08 12 F6 | FOR "SE$"*"....|
00000A00: 09 58 B2 30 3A 49 B2 31 00 1C 12 00 0A 8B 49 44 |.X.0:I.1......ID|
00000A10: 24 28 49 29 B2 22 22 A7 32 36 31 30 00 46 12 0A |$(I)."".2610.F..|
00000A20: 0A 9F 32 2C 38 2C 32 2C 22 44 22 AA C8 28 49 44 |..2,8,2,"D"..(ID|
00000A30: 24 28 49 29 2C 32 29 3A 8D 39 30 30 30 3A 8B 45 |$(I),2):.9000:.E|
00000A40: 4E A7 A0 32 3A 8E 00 71 12 14 0A 84 32 2C 49 4E |N..2:..q....2,IN|
00000A50: 24 3A 8B 53 45 24 B3 B1 22 22 A7 8B CA 28 49 4E |$:.SE$..""...(IN|
00000A60: 24 2C 33 29 B1 53 45 24 A7 A0 32 3A 89 32 36 31 |$,3).SE$..2:.261|
00000A70: 30 00 91 12 19 0A 8B C8 28 49 4E 24 2C 36 29 B2 |0.......(IN$,6).|
00000A80: 22 30 30 30 45 4F 46 22 A7 A0 32 3A 89 32 36 31 |"000EOF"..2:.261|
00000A90: 30 00 B2 12 1E 0A 8B CA 28 49 4E 24 2C 34 2C 42 |0.......(IN$,4,B|
00000AA0: 29 B2 53 45 24 B0 53 45 24 B2 22 22 A7 8D 32 36 |).SE$.SE$.""..26|
00000AB0: 30 35 00 BC 12 28 0A 89 32 35 38 30 00 F6 12 2D |05...(..2580...-|
00000AC0: 0A 58 B2 58 AA 31 3A 4B 24 28 58 29 B2 C8 28 CA |.X.X.1:K$(X)..(.|
00000AD0: 28 49 4E 24 2C 34 29 AA 53 50 24 2C 31 36 29 AA |(IN$,4).SP$,16).|
00000AE0: C8 28 49 4E 24 2C 33 29 AA C8 28 49 44 24 28 49 |.(IN$,3)..(ID$(I|
00000AF0: 29 2C 32 29 3A 8E 00 13 13 32 0A 49 B2 49 AA 31 |),2):....2.I.I.1|
00000B00: 3A 8B 49 44 24 28 49 29 B3 B1 22 01 01 22 A7 32 |:.ID$(I).."..".2|
00000B10: 35 36 30 00 37 13 5A 0A 99 22 11 53 4F 52 54 49 |560.7.Z..".SORTI|
00000B20: 4E 47 91 22 3A 41 50 B2 58 3A 8D 31 30 35 30 30 |NG.":AP.X:.10500|
00000B30: 3A 8D 31 30 32 30 30 00 4E 13 64 0A 9D 34 3A 8D |:.10200.N.d..4:.|
00000B40: 32 37 30 30 3A 8B 58 B2 30 89 32 36 39 30 00 7D |2700:.X.0.2690.}|
00000B50: 13 69 0A 81 49 B2 31 A4 58 3A 49 44 24 B2 C9 28 |.i..I.1.X:ID$..(|
00000B60: 4B 24 28 49 29 2C 32 29 3A 46 24 B2 C8 28 4B 24 |K$(I),2):F$..(K$|
00000B70: 28 49 29 2C 31 39 29 3A 8D 32 37 32 30 00 94 13 |(I),19):.2720...|
00000B80: 6E 0A A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 8D 31 |n..A$:.A$..""..1|
00000B90: 30 31 30 30 00 9A 13 78 0A 82 00 AC 13 82 0A 98 |0100...x........|
00000BA0: 34 2C 3B 3A 8D 31 30 32 30 30 3A 8E 00 D1 13 8C |4,;:.10200:.....|
00000BB0: 0A 99 22 93 1F 49 44 20 50 52 4F 47 52 41 4D 4D |.."..ID PROGRAMM|
00000BC0: 41 4E 41 41 4D 20 20 20 20 23 42 4C 4F 43 4B 53 |ANAAM #BLOCKS|
00000BD0: 22 00 F8 13 96 0A 99 22 95 B8 B8 20 B8 B8 B8 B8 |"......"... ....|
00000BE0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 20 B8 B8 B8 |............ ...|
00000BF0: B8 B8 B8 B8 90 22 3A 8E 00 17 14 A0 0A 99 49 44 |.....":.......ID|
00000C00: 24 22 20 22 C8 28 46 24 2C 31 36 29 A3 32 31 29 |$" ".(F$,16).21)|
00000C10: C9 28 46 24 2C 33 29 00 1D 14 AA 0A 8E 00 2E 14 |.(F$,3).........|
00000C20: B8 0B 4A B2 30 3A 9D 34 3A 8D 32 34 30 30 00 45 |..J.0:.4:.2400.E|
00000C30: 14 CC 0B A1 41 24 3A 8B 41 24 B3 B1 22 22 A7 8D |....A$:.A$..""..|
00000C40: 31 30 31 30 30 00 74 14 D6 0B 4A B2 4A AA 31 3A |10100.t...J.J.1:|
00000C50: 49 4E 24 B2 49 44 24 28 4A 29 3A 8B 49 44 24 28 |IN$.ID$(J):.ID$(|
00000C60: 4A 29 B3 B1 22 01 01 22 A7 8D 32 34 31 30 3A 89 |J)..".."..2410:.|
00000C70: 33 30 32 30 00 86 14 E0 0B 98 34 2C 3B 3A 8D 31 |3020......4,;:.1|
00000C80: 30 32 30 30 3A 8E 00 AC 14 E4 0C 99 22 93 05 22 |0200:.......".."|
00000C90: A3 38 29 22 2A 2A 2A 20 46 49 4C 45 20 55 49 54 |.8)"*** FILE UIT|
00000CA0: 20 42 45 53 54 41 4E 44 20 2A 2A 2A 00 CA 14 EE | BESTAND ***....|
00000CB0: 0C 49 4E 24 B2 22 22 3A 85 22 11 11 11 90 44 49 |.IN$."":."....DI|
00000CC0: 53 4B 2D 49 44 22 3B 49 4E 24 00 D9 14 F8 0C 8B |SK-ID";IN$......|
00000CD0: 49 4E 24 B2 22 2A 22 A7 8E 00 ED 14 02 0D 8B C3 |IN$."*".........|
00000CE0: 28 49 4E 24 29 B3 B1 32 A7 33 33 31 30 00 26 15 |(IN$)..2.3310.&.|
00000CF0: 0C 0D 49 44 24 B2 49 4E 24 3A 8D 32 33 35 30 3A |..ID$.IN$:.2350:|
00000D00: 8B 49 4E 24 B2 22 46 4E 46 22 A7 99 22 11 1F 49 |.IN$."FNF".."..I|
00000D10: 44 20 42 45 53 54 41 41 54 20 4E 49 45 54 90 22 |D BESTAAT NIET."|
00000D20: 3A 89 33 33 31 30 00 46 15 16 0D 46 24 B2 49 44 |:.3310.F...F$.ID|
00000D30: 24 28 41 50 29 3A 99 22 11 1F 56 45 52 57 49 4A |$(AP):."..VERWIJ|
00000D40: 44 45 52 20 22 3B 00 6C 15 20 0D 99 22 90 44 49 |DER ";.l. ..".DI|
00000D50: 53 4B 3A 22 CA 28 46 24 2C 33 2C 31 36 29 22 20 |SK:".(F$,3,16)" |
00000D60: 20 49 44 3A 22 C8 28 46 24 2C 32 29 00 90 15 2A | ID:".(F$,2)...*|
00000D70: 0D 99 22 90 11 20 20 20 57 45 45 54 20 55 20 44 |..".. WEET U D|
00000D80: 41 54 20 5A 45 4B 45 52 20 3F 20 28 4A 2F 4E 29 |AT ZEKER ? (J/N)|
00000D90: 00 A7 15 34 0D 8D 31 30 30 30 30 3A 8B 49 4E 24 |...4..10000:.IN$|
00000DA0: B3 B1 22 4A 22 A7 8E 00 BD 15 3E 0D 98 31 35 2C |.."J".....>..15,|
00000DB0: 22 53 3A 44 22 C8 28 49 4E 24 2C 32 29 00 D2 15 |"S:D".(IN$,2)...|
00000DC0: 48 0D 49 44 24 28 41 50 29 B2 22 22 3A 89 32 31 |H.ID$(AP)."":.21|
00000DD0: 30 30 00 00 16 AC 0D 99 22 93 05 22 A3 34 29 22 |00......"..".4)"|
00000DE0: 2A 2A 2A 20 56 45 52 41 4E 44 45 52 20 41 46 44 |*** VERANDER AFD|
00000DF0: 52 55 4B 2D 41 50 50 41 52 41 41 54 20 2A 2A 2A |RUK-APPARAAT ***|
00000E00: 00 39 16 B6 0D 99 22 90 11 11 11 41 46 44 52 55 |.9...."....AFDRU|
00000E10: 4B 4B 45 4E 20 4F 50 20 1F 12 50 92 90 52 49 4E |KKEN OP ..P..RIN|
00000E20: 54 45 52 20 4F 46 20 1F 12 42 92 90 45 45 4C 44 |TER OF ..B..EELD|
00000E30: 53 43 48 45 52 4D 20 3F 22 00 5D 16 C0 0D 99 22 |SCHERM ?".]...."|
00000E40: 11 54 49 45 50 20 44 45 20 4C 45 54 54 45 52 20 |.TIEP DE LETTER |
00000E50: 56 41 4E 20 55 57 20 4B 45 55 5A 45 22 00 7B 16 |VAN UW KEUZE".{.|
00000E60: CA 0D 8D 31 30 30 30 30 3A 44 56 B2 33 3A 8B 49 |...10000:DV.3:.I|
00000E70: 4E 24 B2 22 50 22 A7 44 56 B2 34 00 8A 16 D4 0D |N$."P".DV.4.....|
00000E80: A0 34 3A 9F 34 2C 44 56 3A 8E 00 9A 16 DE 0D 99 |.4:.4,DV:.......|
00000E90: 22 93 22 3B 3A A0 31 35 3A 80 00 C6 16 10 0E 99 |".";:.15:.......|
00000EA0: 22 93 05 22 A3 35 29 22 2A 2A 2A 20 41 46 44 52 |"..".5)"*** AFDR|
00000EB0: 55 4B 4B 45 4E 20 50 52 4F 47 52 41 4D 4D 41 27 |UKKEN PROGRAMMA'|
00000EC0: 53 20 2A 2A 2A 90 00 D9 16 1A 0E 49 4E 24 B2 22 |S ***......IN$."|
00000ED0: 22 3A 8D 32 35 33 30 3A 8E 00 03 17 42 0E 99 22 |":.2530:....B.."|
00000EE0: 93 05 22 A3 37 29 22 2A 2A 2A 20 41 46 44 52 55 |..".7)"*** AFDRU|
00000EF0: 4B 4B 45 4E 20 44 49 52 45 43 54 4F 52 59 20 2A |KKEN DIRECTORY *|
00000F00: 2A 2A 90 00 2B 17 4C 0E 49 4E 24 B2 22 22 3A 85 |**..+.L.IN$."":.|
00000F10: 22 11 11 11 44 49 53 4B 2D 49 44 22 3B 49 4E 24 |"...DISK-ID";IN$|
00000F20: 3A 8B 49 4E 24 B2 22 2A 22 A7 8E 00 49 17 56 0E |:.IN$."*"...I.V.|
00000F30: 8B C3 28 49 4E 24 29 B3 B1 32 A7 99 22 91 91 91 |..(IN$)..2.."...|
00000F40: 91 22 3B 3A 89 33 36 36 30 00 8A 17 60 0E 49 44 |.";:.3660...`.ID|
00000F50: 24 B2 49 4E 24 3A 8D 32 33 35 30 3A 8B 49 4E 24 |$.IN$:.2350:.IN$|
00000F60: B2 22 46 4E 46 22 A7 99 22 11 11 1F 49 44 20 42 |."FNF".."...ID B|
00000F70: 45 53 54 41 41 54 20 4E 49 45 54 91 91 91 91 91 |ESTAAT NIET.....|
00000F80: 91 91 90 22 3A 89 33 36 36 30 00 C8 17 6A 0E 9D |...":.3660...j..|
00000F90: 34 3A 49 4E 24 B2 49 44 24 28 41 50 29 3A 99 22 |4:IN$.ID$(AP):."|
00000FA0: 93 1F 49 44 3A 12 22 C8 28 49 4E 24 2C 32 29 22 |..ID:.".(IN$,2)"|
00000FB0: 92 20 20 20 20 20 44 49 53 4B 3A 12 22 CA 28 49 |. DISK:.".(I|
00000FC0: 4E 24 2C 33 2C 31 36 29 00 EF 17 74 0E 99 22 C0 |N$,3,16)...t..".|
00000FD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000FE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 |..............".|
00000FF0: 26 18 7E 0E 99 22 23 20 42 4C 4F 43 4B 53 20 46 |&.~.."# BLOCKS F|
00001000: 52 45 45 3A 22 CA 28 49 4E 24 2C 31 39 2C 33 29 |REE:".(IN$,19,3)|
00001010: 22 20 20 20 23 20 50 52 4F 47 53 3A 22 CA 28 49 |" # PROGS:".(I|
00001020: 4E 24 2C 32 32 29 00 4B 18 88 0E 99 3A 99 22 20 |N$,22).K....:." |
00001030: 50 52 4F 47 52 41 4D 4D 41 4E 41 41 4D 20 20 20 |PROGRAMMANAAM |
00001040: 20 20 20 23 20 42 4C 4F 43 4B 53 00 6F 18 92 0E | # BLOCKS.o...|
00001050: 99 22 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |."..............|
00001060: B8 B8 20 20 20 20 B8 B8 B8 B8 B8 B8 B8 B8 90 00 |.. ..........|
00001070: 9A 18 9C 0E 9F 32 2C 38 2C 32 2C 22 44 22 AA C8 |.....2,8,2,"D"..|
00001080: 28 49 44 24 28 41 50 29 2C 32 29 3A 8D 39 30 30 |(ID$(AP),2):.900|
00001090: 30 3A 8B 45 4E A7 A0 32 3A 8E 00 B8 18 A6 0E 84 |0:.EN..2:.......|
000010A0: 32 2C 49 4E 24 3A 8B 49 4E 24 B2 22 30 30 30 45 |2,IN$:.IN$."000E|
000010B0: 4F 46 22 A7 33 37 39 30 00 CF 18 B0 0E A1 41 24 |OF".3790......A$|
000010C0: 3A 8B 41 24 B3 B1 22 22 A7 8D 31 30 31 30 30 00 |:.A$..""..10100.|
000010D0: F7 18 BA 0E 99 C8 28 CA 28 49 4E 24 2C 34 29 AA |......(.(IN$,4).|
000010E0: 53 50 24 2C 31 36 29 22 20 20 20 20 20 20 22 C8 |SP$,16)" ".|
000010F0: 28 49 4E 24 2C 33 29 00 01 19 C4 0E 89 33 37 35 |(IN$,3)......375|
00001100: 30 00 1A 19 CE 0E A0 32 3A 98 34 2C 3B 3A 8B 44 |0......2:.4,;:.D|
00001110: 56 B2 33 A7 8D 31 30 32 30 30 00 20 19 D3 0E 8E |V.3..10200. ....|
00001120: 00 3B 19 D8 0E 8D 35 30 30 30 3A 8D 31 30 36 30 |.;....5000:.1060|
00001130: 30 3A 58 B2 41 50 3A 41 50 B2 31 00 55 19 E2 0E |0:X.AP:AP.1.U...|
00001140: 8D 33 36 39 30 3A 41 50 B2 41 50 AA 31 3A 8B 41 |.3690:AP.AP.1:.A|
00001150: 50 B2 58 A7 8E 00 5F 19 EC 0E 89 33 38 31 30 00 |P.X..._....3810.|
00001160: 75 19 87 13 8F 2A 2A 2A 49 44 24 28 29 20 49 4E |u....***ID$() IN|
00001170: 20 4B 24 28 29 00 7E 19 88 13 49 4E B2 30 00 AD | K$().~...IN.0..|
00001180: 19 92 13 49 4E B2 49 4E AA 31 3A 4B 24 28 49 4E |...IN.IN.1:K$(IN|
00001190: 29 B2 49 44 24 28 49 4E 29 3A 8B 49 44 24 28 49 |).ID$(IN):.ID$(I|
000011A0: 4E 29 B3 B1 22 01 01 22 89 35 30 31 30 00 B9 19 |N).."..".5010...|
000011B0: 9C 13 41 50 B2 49 4E 3A 8E 00 CE 19 28 23 84 31 |..AP.IN:....(#.1|
000011C0: 35 2C 45 4E 2C 45 4D 24 2C 54 52 2C 53 45 00 DA |5,EN,EM$,TR,SE..|
000011D0: 19 32 23 8B 45 4E B2 30 A7 8E 00 05 1A 3C 23 99 |.2#.EN.0.....<#.|
000011E0: 22 11 11 1F 12 44 49 53 4B 20 45 52 52 4F 52 92 |"....DISK ERROR.|
000011F0: 90 3A 22 45 4E 22 2C 22 45 4D 24 22 2C 22 54 52 |.:"EN","EM$","TR|
00001200: 22 2C 22 53 45 00 12 1A 46 23 8D 31 30 32 30 30 |","SE...F#.10200|
00001210: 3A 8E 00 29 1A 10 27 A1 49 4E 24 3A 8B 49 4E 24 |:..)..'.IN$:.IN$|
00001220: B2 22 22 A7 31 30 30 30 30 00 39 1A 1A 27 49 4E |."".10000.9..'IN|
00001230: B2 C5 28 49 4E 24 29 3A 8E 00 50 1A 74 27 A1 41 |..(IN$):..P.t'.A|
00001240: 24 3A 8B 41 24 B3 B1 22 2A 22 A7 31 30 31 30 30 |$:.A$.."*".10100|
00001250: 00 56 1A A6 27 8E 00 71 1A D8 27 99 22 11 11 1F |.V..'..q..'."...|
00001260: 44 52 55 4B 20 4F 50 20 27 52 45 54 55 52 4E 27 |DRUK OP 'RETURN'|
00001270: 90 00 97 1A E2 27 8D 31 30 30 30 30 3A 8B 49 4E |.....'.10000:.IN|
00001280: 24 B3 B1 C7 28 31 33 29 AF 49 4E 24 B3 B1 22 2A |$...(13).IN$.."*|
00001290: 22 A7 31 30 32 31 30 00 9D 1A EC 27 8E 00 B3 1A |".10210....'....|
000012A0: 03 29 8F 2A 2A 2A 2A 53 4F 52 54 45 45 52 20 4B |.).****SORTEER K|
000012B0: 24 28 29 00 BF 1A 04 29 8B 41 50 B2 31 A7 8E 00 |$()....).AP.1...|
000012C0: E5 1A 09 29 81 49 B2 31 A4 28 41 50 AB 31 29 3A |...).I.1.(AP.1):|
000012D0: 8B 4B 24 28 49 29 B3 B2 4B 24 28 49 AA 31 29 89 |.K$(I)..K$(I.1).|
000012E0: 31 30 35 34 30 00 09 1B 0E 29 81 4A B2 49 A4 31 |10540....).J.I.1|
000012F0: A9 AB 31 3A 8B 4B 24 28 4A 29 B3 B2 4B 24 28 4A |..1:.K$(J)..K$(J|
00001300: AA 31 29 89 31 30 35 34 30 00 2F 1B 18 29 41 24 |.1).10540./..)A$|
00001310: B2 4B 24 28 4A 29 3A 4B 24 28 4A 29 B2 4B 24 28 |.K$(J):K$(J).K$(|
00001320: 4A AA 31 29 3A 4B 24 28 4A AA 31 29 B2 41 24 00 |J.1):K$(J.1).A$.|
00001330: 36 1B 22 29 82 4A 00 3F 1B 2C 29 82 49 3A 8E 00 |6.").J.?.,).I:..|
00001340: 63 1B 67 29 8F 2A 2A 2A 20 5A 4F 45 4B 20 41 41 |c.g).*** ZOEK AA|
00001350: 4E 54 41 4C 20 46 49 4C 45 27 53 20 49 4E 20 4B |NTAL FILE'S IN K|
00001360: 24 28 29 00 6C 1B 68 29 41 50 B2 31 00 8D 1B 72 |$().l.h)AP.1...r|
00001370: 29 8B 4B 24 28 41 50 29 B3 B1 22 01 01 22 A7 41 |).K$(AP).."..".A|
00001380: 50 B2 41 50 AA 31 3A 89 31 30 36 31 30 00 93 1B |P.AP.1:.10610...|
00001390: 7C 29 8E 00 9F 1B CC 29 8B 41 50 B2 32 A7 8E 00 ||).....).AP.2...|
000013A0: C7 1B D1 29 81 49 B2 31 A4 28 41 50 AB 32 29 3A |...).I.1.(AP.2):|
000013B0: 8B 49 44 24 28 49 29 B3 B2 49 44 24 28 49 AA 31 |.ID$(I)..ID$(I.1|
000013C0: 29 89 31 30 37 34 30 00 ED 1B D6 29 81 4A B2 49 |).10740....).J.I|
000013D0: A4 31 A9 AB 31 3A 8B 49 44 24 28 4A 29 B3 B2 49 |.1..1:.ID$(J)..I|
000013E0: 44 24 28 4A AA 31 29 89 31 30 37 34 30 00 17 1C |D$(J.1).10740...|
000013F0: E0 29 41 24 B2 49 44 24 28 4A 29 3A 49 44 24 28 |.)A$.ID$(J):ID$(|
00001400: 4A 29 B2 49 44 24 28 4A AA 31 29 3A 49 44 24 28 |J).ID$(J.1):ID$(|
00001410: 4A AA 31 29 B2 41 24 00 1E 1C EA 29 82 4A 00 27 |J.1).A$....).J.'|
00001420: 1C F4 29 82 49 3A 8E 00 00 00 |..).I:.... |
..4.D.."... DISK-MANAGER (C) BY RU
DIESOFT ".M.I..K$(4096),ID$(826):DV.3
:SP$." ":.4,DV...N..15,8,
15:.53280,14:.53281,14.E.X..2,8,2,"DIRIN
DEX":.9000:.EN.62.ID$(1)."..": 2:.200.Y.
}.IN.1:.2250:IN.0.....IN.IN.1:.2,IN$....
.ID$(IN).IN$:.H(IN$,2).."..".130..... 2.
C.H..".. DISK-MANAGER (C) BY RUDIES
OFT.R.M.." .****************************
**********...R...11)"H O O F D M E N U..
.W.." **********************************
****.Y...."..1. INLEZEN DIRECTORY......"
.2. ZOEK PROGRAMMA......".3. DISKETTE-OV
ERZICHT.-....".4. AFDRUKKEN DIRECTORY.M.
...".5. AFDRUKKEN PROGRAMMA'S.Z....".6.
AFDRUKKEN PROGRAMMA'S PER DISKETTE......
".7. FILE UIT BESTAND..."..".8. VERANDER
AFDRUK-APPARAAT.J.'..".9. STOPPEN...,..
".. TIEP HET CIJFER VAN UW KEUZE....6..1
0000...@..IN.0.IN.9.310.C.J..IN.900,2500
,3000,3650,3600,3800,3300,3500,3550.L.T.
.200.T....".".8)".*** INLEZEN DIRECTORY
***......."... .STOP DE DIRECTORY-DISKET
TE IN DE DISK..C.....11);:.10200:.IN$."*
"........15,"I":.".";:AP.0:.1,8,0,"$":.I
.1.6:.#1,A$:.......2000:DI$.I1$:ID$.I2$.
&...." .."DI$" "ID$"...6....ST..0.1100.J
.$..I.1.2:.#1,A$,B$:.:.A$.."".B.F(A$):.B
$.."".1100.....AP.AP.1:.2000:F$.I1$...E.
.H(I2$,1).."P".AP.AP.1:.1050...F.B$.D(B)
:.AP.5)F$.25)B:...G.K$(AP).H(F$.SP$,16).
J(B$,2,3):.1050...L..B$.."".B.B.F(B$).25
6.%.R.B$.D(B):."."B$" BLOCKS FREE": 1.R.
V..".. .STOP DE DATA-DISKETTE IN DE DIS
K..D.`...10);:.10200...T..15,"I":."..WRI
TING DATA-FILE"......15,"S:D"ID$:.2,8,2,
"D".ID$.",S,W":.9000:.EN. 2:.......10500
:.I.1.AP:.2,H(J(K$(I),17).SP$,3);H(K$(I)
,16)......:.2,"000EOF".4.(. 2:I.1:DI$.DI
$.I("000".B$,3).J(D(AP),2,3).H.2..ID$(I)
."..".ID$(I).ID$.DI$:ID$(I.1)."..":.1360
...<..H(ID$(I),2).ID$.ID$(I).ID$.DI$:.13
60...F.I.I.1:.1330...P..2100.D.O..***DIR
ECTORY-INPUT...P.IN.34:.2200:IN.34:.2200
:I1$.IN$...Z..#1,A$:.A$." ".2010......#1
,IN$:I2$.A$.IN$.4....#1,A$:.A$.."".ST.0.
2030.:.....P.3..***ID$() OP DISK...4..50
00:.10700:.2,8,2,"DIRINDEX,L,".G(25):IN.
1:.2250:IN.0...>.IN.IN.1:.ID$(IN)..""..2
,ID$(IN).H.H..ID$(IN).."..".2110.Q.R. 2:
......IN$.""......#1,A$:.A$.G(IN).ST..0.
......IN$.IN$.A$:.2210.F.J.HI..(IN.256):
LO.IN.256.HI:.15,"P"G(2)G(LO)G(HI)G(1).L
.T...I.-..***ZOEK DISKNAAM BIJ ID.R...AP
.0...8.AP.AP.1:.H(ID$(AP),2)."..".IN$."F
NF":....B..H(ID$(AP),2).ID$.....L..2360.
..`.."..ID NAAM DISK BL.FR. #PRG.
"...E.."... ................ ...... ....
..":..#.J..IN$.""...].O..H(IN$,2)" "J(IN
$,3,16).21)J(IN$,19,3).28)J(IN$,22,3).C.
T.....D..".".9)".*** ZOEK PROGRAMMA ***.
..N.IN$."":."....PROGRAMMANAAM";IN$...S.
.IN$."*"...V.X.B.C(IN$):.B.0.B.16.2510..
...SE$.IN$:."..SEARCHING FOR "SE$"*"....
.X.0:I.1......ID$(I)."".2610.F....2,8,2,
"D".H(ID$(I),2):.9000:.EN. 2:..Q....2,IN
$:.SE$..""..J(IN$,3).SE$. 2:.2610......H
(IN$,6)."000EOF". 2:.2610......J(IN$,4,B
).SE$.SE$.""..2605...(..2580...-.X.X.1:K
$(X).H(J(IN$,4).SP$,16).H(IN$,3).H(ID$(I
),2):....2.I.I.1:.ID$(I).."..".2560.7.Z.
.".SORTING.":AP.X:.10500:.10200.N.D..4:.
2700:.X.0.2690.}.I..I.1.X:ID$.I(K$(I),2)
:F$.H(K$(I),19):.2720...N..A$:.A$..""..1
0100...X........4,;:.10200:..Q...."..ID
PROGRAMMANAAM #BLOCKS"......"... ....
............ ........":.... ..ID$" "H(F$
,16).21)I(F$,3)...........J.0:.4:.2400.E
.L..A$:.A$..""..10100.T.V.J.J.1:IN$.ID$(
J):.ID$(J)..".."..2410:.3020......4,;:.1
0200:......."..".8)"*** FILE UIT BESTAND
***.J...IN$."":."....DISK-ID";IN$.Y....
IN$."*"........C(IN$)..2.3310.&...ID$.IN
$:.2350:.IN$."FNF".."..ID BESTAAT NIET."
:.3310.F...F$.ID$(AP):."..VERWIJDER ";.L
. ..".DISK:"J(F$,3,16)" ID:"H(F$,2)...*
..".. WEET U DAT ZEKER ? (J/N)...4..10
000:.IN$.."J".....>..15,"S:D"H(IN$,2).R.
H.ID$(AP)."":.2100......"..".4)"*** VERA
NDER AFDRUK-APPARAAT ***.9...."....AFDRU
KKEN OP ..P..RINTER OF ..B..EELDSCHERM ?
".]....".TIEP DE LETTER VAN UW KEUZE".{.
J..10000:DV.3:.IN$."P".DV.4...T. 4:.4,DV
:.......".";: 15:..F...."..".5)"*** AFDR
UKKEN PROGRAMMA'S ***..Y...IN$."":.2530:
....B.."..".7)"*** AFDRUKKEN DIRECTORY *
**..+.L.IN$."":."...DISK-ID";IN$:.IN$."*
"...I.V..C(IN$)..2.."....";:.3660...`.ID
$.IN$:.2350:.IN$."FNF".."...ID BESTAAT N
IET........":.3660.H.J..4:IN$.ID$(AP):."
..ID:."H(IN$,2)". DISK:."J(IN$,3,16)
...T.."...............................".
&.~.."# BLOCKS FREE:"J(IN$,19,3)" # PR
OGS:"J(IN$,22).K....:." PROGRAMMANAAM
# BLOCKS.O...."................ ..
.............2,8,2,"D".H(ID$(AP),2):.900
0:.EN. 2:.......2,IN$:.IN$."000EOF".3790
.O....A$:.A$..""..10100......H(J(IN$,4).
SP$,16)" "H(IN$,3)...D..3750...N. 2
:.4,;:.DV.3..10200. .S...;.X..5000:.1060
0:X.AP:AP.1.U....3690:AP.AP.1:.AP.X..._.
...3810.U....***ID$() IN K$().~...IN.0..
...IN.IN.1:K$(IN).ID$(IN):.ID$(IN)..".."
.5010.....AP.IN:..N.(#.15,EN,EM$,TR,SE.Z
.2#.EN.0.....<#."....DISK ERROR..:"EN","
EM$","TR","SE...F#.10200:..)..'.IN$:.IN$
."".10000.9..'IN.E(IN$):..P.T'.A$:.A$.."
*".10100.V..'..Q.X'."...DRUK OP 'RETURN'
.....'.10000:.IN$..G(13).IN$.."*".10210.
...'.....).****SORTEER K$()....).AP.1...
...).I.1.(AP.1):.K$(I)..K$(I.1).10540...
.).J.I.1..1:.K$(J)..K$(J.1).10540./..)A$
.K$(J):K$(J).K$(J.1):K$(J.1).A$.6.").J.?
.,).I:..C.G).*** ZOEK AANTAL FILE'S IN K
$().L.H)AP.1...R).K$(AP).."..".AP.AP.1:.
10610...|)....L).AP.2...G.Q).I.1.(AP.2):
.ID$(I)..ID$(I.1).10740...V).J.I.1..1:.I
D$(J)..ID$(J.1).10740....)A$.ID$(J):ID$(
J).ID$(J.1):ID$(J.1).A$....).J.'..).I:..
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL