DISKHULP
FILE INFORMATION
FILENAME(S): DISKHULP
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-12-01 20:43:44
APPEARS ON: 1 disk(s)
FILE HASH
ea7138d7ce8cb8a30426649c081a76e963eb4b51597907408ee6762f8f966f46
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| H SOFT WARE | DISKHULP | PRG | mace | 31 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 0A 00 86 20 4E 24 28 31 34 34 29 2C |..A.... N$(144),|
00000010: 4E 28 31 34 34 29 3A 4C 24 B2 C7 28 30 29 3A 52 |N(144):L$..(0):R|
00000020: 24 B2 C7 28 31 33 29 3A 97 35 33 32 38 30 2C 36 |$..(13):.53280,6|
00000030: 3A 97 35 33 32 38 31 2C 36 3A 50 24 B2 22 20 20 |:.53281,6:P$." |
00000040: 22 00 91 08 14 00 44 24 B2 52 24 AA 22 44 52 55 |".....D$.R$."DRU|
00000050: 4B 20 4F 50 20 45 45 4E 20 54 4F 45 54 53 2E 22 |K OP EEN TOETS."|
00000060: 3A 53 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |:S$." |
00000070: 20 20 20 20 20 20 20 20 20 22 3A 4C B2 31 35 3A | ":L.15:|
00000080: 55 31 24 B2 22 55 31 20 32 20 30 20 31 38 20 30 |U1$."U1 2 0 18 0|
00000090: 22 00 D9 08 1E 00 4D 24 B2 C7 28 38 29 AA C7 28 |".....M$..(8)..(|
000000A0: 31 34 32 29 AA 22 93 05 44 49 53 4B 2D 48 55 4C |142)."..DISK-HUL|
000000B0: 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |P |
000000C0: 20 53 2E 45 2E 43 20 26 20 53 4F 46 54 20 5A 2E | S.E.C & SOFT Z.|
000000D0: 22 3A 81 49 B2 31 A4 34 30 00 1E 09 28 00 4D 24 |":.I.1.40...(.M$|
000000E0: B2 4D 24 AA 22 23 22 3A 82 3A 99 4D 24 22 11 4D |.M$."#":.:.M$".M|
000000F0: 41 41 4B 20 55 57 20 4B 45 55 5A 45 20 28 58 20 |AAK UW KEUZE (X |
00000100: 3D 20 53 54 4F 50 50 45 4E 29 3A 22 3A 55 32 24 |= STOPPEN):":U2$|
00000110: B2 22 55 32 20 32 20 30 20 31 38 20 30 22 00 6B |."U2 2 0 18 0".k|
00000120: 09 32 00 99 22 11 41 20 3D 20 44 49 52 45 43 54 |.2..".A = DIRECT|
00000130: 4F 52 59 22 52 24 22 42 20 3D 20 56 41 4C 49 44 |ORY"R$"B = VALID|
00000140: 41 54 45 20 45 45 4E 20 44 49 53 4B 22 52 24 22 |ATE EEN DISK"R$"|
00000150: 43 20 3D 20 53 43 52 41 54 43 48 20 22 3B 3A 4B |C = SCRATCH ";:K|
00000160: 24 28 31 29 B2 22 12 4E 45 45 22 00 B2 09 3C 00 |$(1).".NEE"...<.|
00000170: 99 22 45 45 4E 20 46 49 4C 45 22 52 24 22 44 20 |."EEN FILE"R$"D |
00000180: 3D 20 56 45 52 41 4E 44 45 52 20 46 49 4C 45 4E |= VERANDER FILEN|
00000190: 41 41 4D 22 52 24 22 45 20 3D 20 53 43 52 41 54 |AAM"R$"E = SCRAT|
000001A0: 43 48 20 4D 45 45 52 44 45 52 45 20 46 49 4C 45 |CH MEERDERE FILE|
000001B0: 53 22 00 FA 09 46 00 99 22 46 20 3D 20 46 4F 52 |S"...F.."F = FOR|
000001C0: 4D 41 54 54 45 52 45 4E 22 52 24 22 47 20 3D 20 |MATTEREN"R$"G = |
000001D0: 57 49 53 20 44 49 52 45 43 54 4F 52 59 22 52 24 |WIS DIRECTORY"R$|
000001E0: 22 48 20 3D 20 44 49 53 4B 2D 4E 41 41 4D 20 56 |"H = DISK-NAAM V|
000001F0: 45 52 41 4E 44 45 52 45 4E 22 00 40 0A 50 00 99 |ERANDEREN".@.P..|
00000200: 22 49 20 3D 20 44 49 53 4B 2D 49 44 20 56 45 52 |"I = DISK-ID VER|
00000210: 41 4E 44 45 52 45 4E 22 52 24 22 4A 20 3D 20 4F |ANDEREN"R$"J = O|
00000220: 52 49 47 49 4E 45 4C 45 20 44 49 53 4B 2D 48 45 |RIGINELE DISK-HE|
00000230: 41 44 45 52 20 48 45 52 53 54 45 4C 4C 45 4E 22 |ADER HERSTELLEN"|
00000240: 00 81 0A 5A 00 4B 24 28 30 29 B2 22 12 4A 41 22 |...Z.K$(0).".JA"|
00000250: 3A 97 36 34 39 2C 31 3A 97 31 39 38 2C 30 3A 92 |:.649,1:.198,0:.|
00000260: 20 31 39 38 2C 31 3A A1 20 41 24 3A 41 B2 C6 28 | 198,1:. A$:A..(|
00000270: 41 24 29 AB 36 34 3A 8B 41 B3 30 20 A7 20 41 B2 |A$).64:.A.0 . A.|
00000280: 30 00 95 0A 64 00 8B 20 41 B2 32 34 20 A7 20 99 |0...d.. A.24 . .|
00000290: 22 93 22 3A 80 00 D0 0A 6E 00 91 20 41 20 89 20 |".":....n.. A . |
000002A0: 31 35 30 2C 32 31 30 2C 32 32 30 2C 32 34 30 2C |150,210,220,240,|
000002B0: 32 37 30 2C 34 32 30 2C 34 36 30 2C 34 38 30 2C |270,420,460,480,|
000002C0: 35 32 30 2C 35 36 30 3A 9F 20 31 2C 38 2C 31 35 |520,560:. 1,8,15|
000002D0: 00 DB 0A 78 00 98 31 2C 22 49 22 00 1A 0B 82 00 |...x..1,"I".....|
000002E0: 84 31 2C 45 24 2C 41 24 2C 42 24 2C 43 24 3A 99 |.1,E$,A$,B$,C$:.|
000002F0: 22 11 44 49 53 4B 2D 53 54 41 54 55 53 3A 20 12 |".DISK-STATUS: .|
00000300: 22 45 24 22 2C 22 41 24 22 2C 22 42 24 22 2C 22 |"E$","A$","B$","|
00000310: 43 24 52 24 44 24 3A A0 20 31 00 2F 0B 8C 00 97 |C$R$D$:. 1./....|
00000320: 31 39 38 2C 30 3A 92 20 31 39 38 2C 31 3A 8A 00 |198,0:. 198,1:..|
00000330: 69 0B 96 00 99 22 93 44 49 52 45 43 54 4F 52 59 |i....".DIRECTORY|
00000340: 22 3A 8D 20 37 30 30 3A 9F 20 31 2C 38 2C 30 2C |":. 700:. 1,8,0,|
00000350: 22 24 22 3A A1 23 31 2C 41 24 2C 41 24 2C 41 24 |"$":.#1,A$,A$,A$|
00000360: 2C 41 24 3A 8D 20 37 39 30 00 8B 0B A0 00 A1 20 |,A$:. 790...... |
00000370: 23 31 2C 41 24 2C 41 24 3A 8B 20 41 24 B2 22 22 |#1,A$,A$:. A$.""|
00000380: A7 20 A0 20 31 3A 89 20 31 38 30 00 A9 0B AA 00 |. . 1:. 180.....|
00000390: 8D 20 37 39 30 3A 43 B2 43 AA 42 3A 92 31 39 37 |. 790:C.C.B:.197|
000003A0: 2C 36 34 3A 89 20 31 36 30 00 E5 0B B4 00 99 22 |,64:. 160......"|
000003B0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 20 28 |.............. (|
000003C0: 3D 22 B5 28 42 AD 36 2E 36 34 AA 2E 35 29 22 25 |=".(B.6.64..5)"%|
000003D0: 29 2E 22 3A 8B 20 43 B2 36 36 34 A7 20 99 44 24 |).":. C.664. .D$|
000003E0: 3A 89 31 34 30 00 19 0C BE 00 99 22 11 57 45 52 |:.140......".WER|
000003F0: 4B 45 4C 49 4A 4B 45 20 41 41 4E 54 41 4C 20 42 |KELIJKE AANTAL B|
00000400: 4C 4F 43 4B 53 20 46 52 45 45 20 49 53 22 36 36 |LOCKS FREE IS"66|
00000410: 34 AA 42 AB 43 22 9D 21 22 00 55 0C C8 00 99 22 |4.B.C".!".U...."|
00000420: 11 57 49 4C 54 20 55 20 45 45 4E 20 56 41 4C 49 |.WILT U EEN VALI|
00000430: 44 41 54 45 20 28 4A 2F 4E 29 3F 22 3A 8D 20 36 |DATE (J/N)?":. 6|
00000440: 32 30 3A 9F 20 31 2C 38 2C 31 35 2C 22 56 22 3A |20:. 1,8,15,"V":|
00000450: 89 20 31 33 30 00 6C 0C D2 00 99 22 93 56 41 4C |. 130.l....".VAL|
00000460: 49 44 41 54 45 22 3A 89 20 32 30 30 00 9B 0C DC |IDATE":. 200....|
00000470: 00 99 22 93 53 43 52 41 54 43 48 20 45 45 4E 20 |..".SCRATCH EEN |
00000480: 46 49 4C 45 11 22 3A 99 22 46 49 4C 45 4E 41 41 |FILE.":."FILENAA|
00000490: 4D 3A 20 22 3B 3A 8D 20 36 34 30 00 DF 0C E6 00 |M: ";:. 640.....|
000004A0: 99 22 11 57 49 4C 54 20 55 20 12 22 4E 24 22 92 |.".WILT U ."N$".|
000004B0: 20 53 43 52 41 54 43 48 45 4E 20 28 4A 2F 4E 29 | SCRATCHEN (J/N)|
000004C0: 3F 22 3A 8D 20 36 32 30 3A 9F 20 31 2C 38 2C 31 |?":. 620:. 1,8,1|
000004D0: 35 2C 22 53 3A 22 AA 4E 24 3A 89 20 31 33 30 00 |5,"S:".N$:. 130.|
000004E0: 1D 0D F0 00 99 22 93 56 45 52 41 4E 44 45 52 46 |.....".VERANDERF|
000004F0: 49 4C 45 4E 41 41 4D 22 52 24 22 11 4F 55 44 45 |ILENAAM"R$".OUDE|
00000500: 20 4E 41 41 4D 20 20 20 3A 22 3B 3A 8D 20 36 34 | NAAM :";:. 64|
00000510: 30 3A 4F 24 B2 4E 24 3A 4E 24 B2 22 22 00 50 0D |0:O$.N$:N$."".P.|
00000520: FA 00 99 22 11 4E 49 45 55 57 45 20 4E 41 41 4D |...".NIEUWE NAAM|
00000530: 20 3A 22 3B 3A 8D 20 36 34 30 3A 99 22 11 56 45 | :";:. 640:.".VE|
00000540: 52 41 4E 44 45 52 45 4E 20 28 4A 2F 4E 29 3F 22 |RANDEREN (J/N)?"|
00000550: 00 78 0D 04 01 8D 20 36 32 30 3A 9F 20 31 2C 38 |.x.... 620:. 1,8|
00000560: 2C 31 35 2C 22 52 3A 22 AA 4E 24 AA 22 3D 22 AA |,15,"R:".N$."=".|
00000570: 4F 24 3A 89 20 31 33 30 00 BC 0D 0E 01 99 22 93 |O$:. 130......".|
00000580: 53 43 52 41 54 43 48 20 4D 45 45 52 44 45 52 45 |SCRATCH MEERDERE|
00000590: 20 46 49 4C 45 53 22 52 24 22 11 44 49 52 45 43 | FILES"R$".DIREC|
000005A0: 54 4F 52 59 20 57 4F 52 44 54 20 49 4E 47 45 4C |TORY WORDT INGEL|
000005B0: 45 5A 45 4E 2E 22 3A 8D 20 37 30 30 00 E6 0D 18 |EZEN.":. 700....|
000005C0: 01 9F 20 31 2C 38 2C 30 2C 22 24 22 3A A1 23 31 |.. 1,8,0,"$":.#1|
000005D0: 2C 41 24 2C 41 24 2C 41 24 2C 41 24 2C 41 24 2C |,A$,A$,A$,A$,A$,|
000005E0: 41 24 3A 41 B2 30 00 0F 0E 22 01 A1 23 31 2C 41 |A$:A.0..."..#1,A|
000005F0: 24 3A 91 20 C3 28 41 24 29 89 20 32 39 30 3A A1 |$:. .(A$). 290:.|
00000600: 20 23 31 2C 41 24 2C 41 24 2C 41 24 2C 41 24 00 | #1,A$,A$,A$,A$.|
00000610: 31 0E 2C 01 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 |1.,..#1,A$:.A$..|
00000620: C7 28 33 34 29 AF 41 24 B3 B1 22 22 A7 20 33 30 |.(34).A$.."". 30|
00000630: 30 00 4D 0E 36 01 8B 41 24 B2 22 22 20 A7 20 A0 |0.M.6..A$."" . .|
00000640: 31 3A 41 B2 41 AB 31 3A 89 20 33 34 30 00 7B 0E |1:A.A.1:. 340.{.|
00000650: 40 01 A1 20 23 31 2C 41 24 3A 8B 20 41 24 B3 B1 |@.. #1,A$:. A$..|
00000660: C7 28 33 34 29 A7 20 4E 24 28 41 29 B2 4E 24 28 |.(34). N$(A).N$(|
00000670: 41 29 AA 41 24 3A 89 20 33 32 30 00 8B 0E 4A 01 |A).A$:. 320...J.|
00000680: 41 B2 41 AA 31 3A 89 20 32 39 30 00 CA 0E 54 01 |A.A.1:. 290...T.|
00000690: 99 3A 81 49 B2 30 A4 41 3A 99 4E 24 28 49 29 A6 |.:.I.0.A:.N$(I).|
000006A0: 32 30 AB B9 28 30 29 29 22 53 43 52 41 54 43 48 |20..(0))"SCRATCH|
000006B0: 45 4E 20 28 4A 2F 4E 29 3F 9D 9D 9D 9D 9D 9D 9D |EN (J/N)?.......|
000006C0: 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 F8 0E 5E 01 8D |........";...^..|
000006D0: 20 37 33 30 3A 4B B2 31 3A 99 22 9D 22 3B 3A 8B | 730:K.1:.".";:.|
000006E0: 41 24 B2 22 4A 22 A7 20 4B B2 30 3A 4E 28 49 29 |A$."J". K.0:N(I)|
000006F0: B2 31 3A 47 B2 47 AA 31 00 26 0F 68 01 99 4B 24 |.1:G.G.1.&.h..K$|
00000700: 28 4B 29 22 92 20 20 20 20 20 20 20 20 20 20 20 |(K)". |
00000710: 20 20 20 22 3A 82 3A 8B 20 47 B2 30 A7 99 44 24 | ":.:. G.0..D$|
00000720: 3A 89 20 31 34 30 00 63 0F 72 01 99 22 11 56 41 |:. 140.c.r..".VA|
00000730: 4C 49 44 41 54 45 20 4E 41 20 48 45 54 20 53 43 |LIDATE NA HET SC|
00000740: 52 41 54 43 48 45 4E 20 28 4A 2F 4E 29 3F 22 3A |RATCHEN (J/N)?":|
00000750: 8D 20 37 33 30 3A 8B 20 41 24 B2 22 4A 22 A7 20 |. 730:. A$."J". |
00000760: 56 B2 31 00 A4 0F 7C 01 99 22 11 44 4F 4F 52 47 |V.1...|..".DOORG|
00000770: 41 41 4E 20 4D 45 54 20 53 43 52 41 54 43 48 45 |AAN MET SCRATCHE|
00000780: 4E 20 28 4A 2F 4E 29 3F 22 3A 8D 20 36 32 30 3A |N (J/N)?":. 620:|
00000790: 99 22 11 47 45 53 43 52 41 54 43 48 54 20 5A 49 |.".GESCRATCHT ZI|
000007A0: 4A 4E 3A 22 00 D8 0F 86 01 9F 20 31 2C 38 2C 31 |JN:"...... 1,8,1|
000007B0: 35 3A 81 49 B2 30 A4 41 3A 8B 4E 28 49 29 A7 20 |5:.I.0.A:.N(I). |
000007C0: 98 31 2C 22 53 3A 22 AA 4E 24 28 49 29 3A 99 22 |.1,"S:".N$(I):."|
000007D0: 2D 20 22 4E 24 28 49 29 00 EA 0F 90 01 82 3A 8B |- "N$(I)......:.|
000007E0: 56 B2 31 A7 98 31 2C 22 56 22 00 F4 0F 9A 01 89 |V.1..1,"V"......|
000007F0: 20 31 33 30 00 3E 10 A4 01 99 22 93 46 4F 52 4D | 130.>....".FORM|
00000800: 41 54 54 45 52 45 4E 20 28 47 45 42 52 55 49 4B |ATTEREN (GEBRUIK|
00000810: 20 53 55 50 45 52 46 41 53 54 46 4F 52 4D 41 54 | SUPERFASTFORMAT|
00000820: 29 11 22 52 24 E7 AB 4E 41 41 4D 3A 20 22 3B 3A |)."R$..NAAM: ";:|
00000830: 47 4F 53 55 42 36 34 30 3A 4F 24 3D 4E 24 00 52 |GOSUB640:O$=N$.R|
00000840: 10 A9 01 4E 24 B2 22 22 3A 99 22 11 49 44 3A 20 |...N$."":.".ID: |
00000850: 22 3B 00 91 10 AE 01 4C B2 31 3A 8D 20 36 34 30 |";.....L.1:. 640|
00000860: 3A 4E 24 B2 22 2C 22 AA 4E 24 3A 99 22 11 57 49 |:N$.",".N$:.".WI|
00000870: 4C 54 55 45 43 48 54 20 46 4F 52 4D 41 54 54 45 |LTUECHT FORMATTE|
00000880: 52 45 4E 20 28 4A 2F 4E 29 3F 22 3A 8D 20 36 32 |REN (J/N)?":. 62|
00000890: 30 00 BD 10 B8 01 9F 31 2C 38 2C 31 35 3A 98 31 |0......1,8,15:.1|
000008A0: 2C 22 4D 2D 57 22 C7 28 38 31 29 C7 28 30 29 C7 |,"M-W".(81).(0).|
000008B0: 28 31 29 C7 28 32 35 35 29 3A A0 20 31 00 DB 10 |(1).(255):. 1...|
000008C0: C2 01 9F 20 31 2C 38 2C 31 35 2C 22 4E 3A 22 AA |... 1,8,15,"N:".|
000008D0: 4F 24 AA 4E 24 3A 89 20 31 33 30 00 18 11 CC 01 |O$.N$:. 130.....|
000008E0: 99 22 93 57 49 53 20 44 49 52 45 43 54 4F 52 59 |.".WIS DIRECTORY|
000008F0: 11 22 52 24 22 44 49 53 4B 2D 4E 41 41 4D 3A 20 |."R$"DISK-NAAM: |
00000900: 22 3B 3A 8D 20 36 34 30 3A 99 22 11 57 49 4C 54 |";:. 640:.".WILT|
00000910: 20 55 20 44 45 20 22 3B 00 59 11 D6 01 99 22 44 | U DE ";.Y...."D|
00000920: 49 52 45 43 54 4F 52 59 20 45 43 48 54 20 57 49 |IRECTORY ECHT WI|
00000930: 53 53 45 4E 20 28 4A 2F 4E 29 3F 22 3A 8D 20 36 |SSEN (J/N)?":. 6|
00000940: 32 30 3A 9F 20 31 2C 38 2C 31 35 2C 22 4E 3A 22 |20:. 1,8,15,"N:"|
00000950: AA 4E 24 3A 89 20 31 33 30 00 98 11 E0 01 99 22 |.N$:. 130......"|
00000960: 93 44 49 53 4B 2D 4E 41 41 4D 20 56 45 52 41 4E |.DISK-NAAM VERAN|
00000970: 44 45 52 45 4E 22 3A 8D 20 37 35 30 3A 99 22 11 |DEREN":. 750:.".|
00000980: 4F 55 44 45 20 4E 41 41 4D 20 20 20 3A 20 12 22 |OUDE NAAM : ."|
00000990: C8 28 48 24 2C 31 36 29 00 D6 11 EA 01 99 22 11 |.(H$,16)......".|
000009A0: 4E 49 45 55 57 45 20 4E 41 41 4D 20 3A 20 22 3B |NIEUWE NAAM : ";|
000009B0: 3A 8D 20 36 34 30 3A 99 22 11 44 49 53 4B 2D 4E |:. 640:.".DISK-N|
000009C0: 41 41 4D 20 56 45 52 41 4E 44 45 52 45 4E 20 28 |AAM VERANDEREN (|
000009D0: 4A 2F 4E 29 3F 22 00 0B 12 F4 01 8D 20 36 32 30 |J/N)?"...... 620|
000009E0: 3A 9F 20 31 2C 38 2C 31 35 3A 9F 20 32 2C 38 2C |:. 1,8,15:. 2,8,|
000009F0: 32 2C 22 23 22 3A 98 31 2C 55 31 24 3A 98 31 2C |2,"#":.1,U1$:.1,|
00000A00: 22 42 2D 50 20 32 20 31 34 34 22 00 35 12 FE 01 |"B-P 2 144".5...|
00000A10: 98 32 2C 4E 24 AA C8 28 53 24 2C 31 36 AB C3 28 |.2,N$..(S$,16..(|
00000A20: 4E 24 29 29 3B 3A 98 31 2C 55 32 24 3A A0 32 3A |N$));:.1,U2$:.2:|
00000A30: 89 20 31 32 30 00 6D 12 08 02 99 22 93 44 49 53 |. 120.m....".DIS|
00000A40: 4B 2D 49 44 20 56 45 52 41 4E 44 45 52 45 4E 22 |K-ID VERANDEREN"|
00000A50: 3A 8D 20 37 35 30 3A 99 22 11 4F 55 44 45 20 49 |:. 750:.".OUDE I|
00000A60: 44 20 20 3A 20 22 C9 28 48 24 2C 35 29 00 B0 12 |D : ".(H$,5)...|
00000A70: 12 02 99 22 11 4E 49 45 55 57 45 20 49 44 3A 20 |...".NIEUWE ID: |
00000A80: 20 20 20 20 20 20 20 20 28 35 20 54 45 4B 45 4E | (5 TEKEN|
00000A90: 53 29 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |S)..............|
00000AA0: 9D 9D 9D 9D 22 3B 3A 4C B2 34 3A 8D 20 36 34 30 |....";:L.4:. 640|
00000AB0: 00 E7 12 1C 02 99 22 11 49 44 20 56 45 52 41 4E |......".ID VERAN|
00000AC0: 44 45 52 45 4E 20 28 4A 2F 4E 29 3F 22 3A 8D 20 |DEREN (J/N)?":. |
00000AD0: 36 32 30 3A 9F 20 31 2C 38 2C 31 35 3A 9F 32 2C |620:. 1,8,15:.2,|
00000AE0: 38 2C 32 2C 22 23 22 00 18 13 26 02 98 31 2C 55 |8,2,"#"...&..1,U|
00000AF0: 31 24 3A 98 31 2C 22 42 2D 50 20 32 20 31 36 32 |1$:.1,"B-P 2 162|
00000B00: 22 3A 98 32 2C 4E 24 3B 3A 98 31 2C 55 32 24 3A |":.2,N$;:.1,U2$:|
00000B10: A0 32 3A 89 20 31 32 30 00 57 13 30 02 99 22 93 |.2:. 120.W.0..".|
00000B20: 4F 52 49 47 49 4E 45 4C 45 20 44 49 53 4B 2D 48 |ORIGINELE DISK-H|
00000B30: 45 41 44 45 52 20 48 45 52 53 54 45 4C 4C 45 4E |EADER HERSTELLEN|
00000B40: 22 52 24 3A 9F 20 31 2C 38 2C 35 3A 9F 20 32 2C |"R$:. 1,8,5:. 2,|
00000B50: 38 2C 32 2C 22 23 22 00 78 13 3A 02 98 31 2C 55 |8,2,"#".x.:..1,U|
00000B60: 31 24 3A 98 31 2C 22 42 2D 50 20 32 20 32 30 30 |1$:.1,"B-P 2 200|
00000B70: 22 3A A1 23 32 2C 41 24 00 AF 13 44 02 8B 20 41 |":.#2,A$...D.. A|
00000B80: 24 B2 22 22 A7 20 A0 31 3A A0 32 3A 99 22 48 45 |$."". .1:.2:."HE|
00000B90: 41 44 45 52 20 57 41 53 20 41 4C 20 4F 52 49 47 |ADER WAS AL ORIG|
00000BA0: 49 4E 45 45 4C 11 22 44 24 3A 89 20 31 34 30 00 |INEEL."D$:. 140.|
00000BB0: E4 13 4E 02 48 24 B2 41 24 3A 81 49 B2 31 A4 32 |..N.H$.A$:.I.1.2|
00000BC0: 32 3A A1 23 32 2C 41 24 3A 48 24 B2 48 24 AA 41 |2:.#2,A$:H$.H$.A|
00000BD0: 24 3A 82 3A 99 22 4F 52 49 47 49 4E 45 45 4C 3A |$:.:."ORIGINEEL:|
00000BE0: 12 22 48 24 00 19 14 58 02 99 22 11 48 45 52 53 |."H$...X..".HERS|
00000BF0: 54 45 4C 4C 45 4E 20 28 4A 2F 4E 29 3F 22 3A 8D |TELLEN (J/N)?":.|
00000C00: 36 32 30 3A 98 31 2C 22 42 2D 50 20 32 20 31 34 |620:.1,"B-P 2 14|
00000C10: 34 22 3A 98 32 2C 48 24 3B 00 4C 14 62 02 98 31 |4":.2,H$;.L.b..1|
00000C20: 2C 22 42 2D 50 20 32 20 32 30 30 22 3A 81 49 B2 |,"B-P 2 200":.I.|
00000C30: 31 A4 32 33 3A 98 32 2C 4C 24 3B 3A 82 3A 98 31 |1.23:.2,L$;:.:.1|
00000C40: 2C 55 32 24 3A A0 32 3A 89 31 32 30 00 67 14 6C |,U2$:.2:.120.g.l|
00000C50: 02 8D 20 37 33 30 3A 8B 20 41 24 B2 22 4E 22 A7 |.. 730:. A$."N".|
00000C60: 20 A0 32 20 3A 20 8A 00 6D 14 76 02 8E 00 9F 14 | .2 : ..m.v.....|
00000C70: 80 02 99 22 12 3C 92 9D 22 3B 3A 97 31 39 38 2C |...".<..";:.198,|
00000C80: 30 3A 92 31 39 38 2C 31 3A A1 41 24 3A 41 B2 C6 |0:.198,1:.A$:A..|
00000C90: 28 41 24 AA 4C 24 29 3A 42 B2 C3 28 4E 24 29 00 |(A$.L$):B..(N$).|
00000CA0: B9 14 8A 02 8B 20 4C B3 B1 31 35 AF 20 42 B3 B1 |..... L..15. B..|
00000CB0: 4C AA 31 20 A7 20 36 37 30 00 D1 14 94 02 8B 20 |L.1 . 670...... |
00000CC0: 41 B2 31 33 AF 20 42 B1 30 A7 20 99 22 20 22 3A |A.13. B.0. ." ":|
00000CD0: 8E 00 FF 14 9E 02 8B 20 41 B2 32 30 20 AF 20 42 |....... A.20 . B|
00000CE0: B1 30 20 A7 20 99 22 20 9D 9D 22 3B 3A 4E 24 B2 |.0 . ." ..";:N$.|
00000CF0: C8 28 4E 24 2C 42 AB 31 29 3A 89 20 36 34 30 00 |.(N$,B.1):. 640.|
00000D00: 1F 15 A8 02 8B 20 42 B1 4C B0 41 B2 33 34 B0 28 |..... B.L.A.34.(|
00000D10: 41 AF 31 32 37 29 B3 33 32 20 A7 20 36 34 30 00 |A.127).32 . 640.|
00000D20: 36 15 B2 02 4E 24 B2 4E 24 AA 41 24 3A 99 41 24 |6...N$.N$.A$:.A$|
00000D30: 3B 3A 89 36 34 30 00 5A 15 BC 02 9F 20 31 2C 38 |;:.640.Z.... 1,8|
00000D40: 2C 31 35 2C 22 49 22 3A 84 31 2C 45 24 2C 41 24 |,15,"I":.1,E$,A$|
00000D50: 2C 42 24 2C 43 24 3A A0 20 31 00 98 15 C6 02 8B |,B$,C$:. 1......|
00000D60: 20 45 24 B3 B1 22 30 30 22 A7 20 99 22 11 44 49 | E$.."00". .".DI|
00000D70: 53 4B 2D 53 54 41 54 55 53 3A 20 12 22 45 24 22 |SK-STATUS: ."E$"|
00000D80: 2C 22 41 24 22 2C 22 42 24 22 2C 22 43 24 52 24 |,"A$","B$","C$R$|
00000D90: 44 24 3A 89 20 31 34 30 00 9E 15 D0 02 8E 00 BE |D$:. 140........|
00000DA0: 15 DA 02 A1 20 41 24 3A 8B 41 24 B3 B1 22 4A 22 |.... A$:.A$.."J"|
00000DB0: AF 20 41 24 B3 B1 22 4E 22 A7 20 37 33 30 00 C4 |. A$.."N". 730..|
00000DC0: 15 E4 02 8E 00 E9 15 EE 02 8D 20 37 30 30 3A 9F |.......... 700:.|
00000DD0: 20 31 2C 38 2C 31 35 3A 9F 32 2C 38 2C 32 2C 22 | 1,8,15:.2,8,2,"|
00000DE0: 23 22 3A 98 31 2C 55 31 24 00 16 16 F8 02 98 31 |#":.1,U1$......1|
00000DF0: 2C 22 42 2D 50 20 32 20 31 34 34 22 3A 81 49 B2 |,"B-P 2 144":.I.|
00000E00: 31 A4 32 33 3A A1 23 32 2C 41 24 3A 48 24 B2 48 |1.23:.#2,A$:H$.H|
00000E10: 24 AA 41 24 3A 82 00 42 16 02 03 98 31 2C 22 42 |$.A$:..B....1,"B|
00000E20: 2D 50 20 32 20 32 30 30 22 3A A1 23 32 2C 41 24 |-P 2 200":.#2,A$|
00000E30: 3A 8B 20 41 24 B3 B1 22 22 A7 20 A0 31 3A A0 32 |:. A$.."". .1:.2|
00000E40: 3A 8E 00 6D 16 0C 03 98 31 2C 22 42 2D 50 20 32 |:..m....1,"B-P 2|
00000E50: 20 32 30 30 22 3A 98 32 2C 48 24 3B 3A 98 31 2C | 200":.2,H$;:.1,|
00000E60: 55 32 24 3A A0 20 31 3A A0 20 32 3A 8E 00 A3 16 |U2$:. 1:. 2:....|
00000E70: 16 03 A1 23 31 2C 41 24 2C 42 24 3A 42 B2 C6 28 |...#1,A$,B$:B..(|
00000E80: 41 24 AA 4C 24 29 AA 32 35 36 AC C6 28 42 24 AA |A$.L$).256..(B$.|
00000E90: 4C 24 29 3A 99 52 24 CA 28 C4 28 42 29 2C 32 29 |L$):.R$.(.(B),2)|
00000EA0: 50 24 3B 00 C7 16 20 03 A1 23 31 2C 41 24 3A 99 |P$;... ..#1,A$:.|
00000EB0: 41 24 3B 3A 91 C3 28 41 24 29 89 38 30 30 3A 50 |A$;:..(A$).800:P|
00000EC0: 24 B2 22 20 22 3A 8E 00 00 00 |$." ":.... |
..A.... N$(144),N(144):L$.G(0):R$.G(13):
.53280,6:.53281,6:P$." ".....D$.R$."DRU
K OP EEN TOETS.":S$."
":L.15:U1$."U1 2 0 18 0".Y...M$.G(8).G(
142)."..DISK-HULP S.E.C &
SOFT Z.":.I.1.40...(.M$.M$."#":.:.M$".M
AAK UW KEUZE (X = STOPPEN):":U2$."U2 2 0
18 0".K.2..".A = DIRECTORY"R$"B = VALID
ATE EEN DISK"R$"C = SCRATCH ";:K$(1).".N
EE"...<.."EEN FILE"R$"D = VERANDER FILEN
AAM"R$"E = SCRATCH MEERDERE FILES"...F..
"F = FORMATTEREN"R$"G = WIS DIRECTORY"R$
"H = DISK-NAAM VERANDEREN".@.P.."I = DIS
K-ID VERANDEREN"R$"J = ORIGINELE DISK-HE
ADER HERSTELLEN"...Z.K$(0).".JA":.649,1:
.198,0:. 198,1:. A$:A.F(A$).64:.A.0 . A.
0...D.. A.24 . .".":..P.N.. A . 150,210,
220,240,270,420,460,480,520,560:. 1,8,15
...X..1,"I"......1,E$,A$,B$,C$:.".DISK-S
TATUS: ."E$","A$","B$","C$R$D$: 1./....
198,0:. 198,1:..I....".DIRECTORY":. 700:
. 1,8,0,"$":.#1,A$,A$,A$,A$:. 790... ..
#1,A$,A$:. A$."". 1:. 180...... 790:C.
C.B:.197,64:. 160......".............. (
=".(B.6.64..5)"%).":. C.664. .D$:.140...
...".WERKELIJKE AANTAL BLOCKS FREE IS"66
4.B.C".!".U.H..".WILT U EEN VALIDATE (J/
N)?":. 620:. 1,8,15,"V":. 130.L.R..".VAL
IDATE":. 200......".SCRATCH EEN FILE.":.
"FILENAAM: ";:. 640......".WILT U ."N$".
SCRATCHEN (J/N)?":. 620:. 1,8,15,"S:".N
$:. 130......".VERANDERFILENAAM"R$".OUDE
NAAM :";:. 640:O$.N$:N$."".P....".NIE
UWE NAAM :";:. 640:.".VERANDEREN (J/N)?"
.X.... 620:. 1,8,15,"R:".N$."=".O$:. 130
......".SCRATCH MEERDERE FILES"R$".DIREC
TORY WORDT INGELEZEN.":. 700...... 1,8,0
,"$":.#1,A$,A$,A$,A$,A$,A$:A.0..."..#1,A
$:. C(A$). 290:. #1,A$,A$,A$,A$.1.,..#1,
A$:.A$..G(34).A$.."". 300.M.6..A$."" .
1:A.A.1:. 340.{.@.. #1,A$:. A$..G(34). N
$(A).N$(A).A$:. 320...J.A.A.1:. 290.J.T.
.:.I.0.A:.N$(I).20..(0))"SCRATCHEN (J/N)
?...............";...^.. 730:K.1:.".";:.
A$."J". K.0:N(I).1:G.G.1.&.H..K$(K)".
":.:. G.0..D$:. 140.C.R..".VA
LIDATE NA HET SCRATCHEN (J/N)?":. 730:.
A$."J". V.1...|..".DOORGAAN MET SCRATCHE
N (J/N)?":. 620:.".GESCRATCHT ZIJN:".X..
.. 1,8,15:.I.0.A:.N(I). .1,"S:".N$(I):."
- "N$(I)......:.V.1..1,"V"...... 130.>..
..".FORMATTEREN (GEBRUIK SUPERFASTFORMAT
)."R$..NAAM: ";:GOSUB640:O$=N$.R...N$.""
:.".ID: ";.....L.1:. 640:N$.",".N$:.".WI
LTUECHT FORMATTEREN (J/N)?":. 620......1
,8,15:.1,"M-W"G(81)G(0)G(1)G(255): 1...
B.. 1,8,15,"N:".O$.N$:. 130...L..".WIS D
IRECTORY."R$"DISK-NAAM: ";:. 640:.".WILT
U DE ";.Y.V.."DIRECTORY ECHT WISSEN (J/
N)?":. 620:. 1,8,15,"N:".N$:. 130......"
.DISK-NAAM VERANDEREN":. 750:.".OUDE NAA
M : ."H(H$,16).V....".NIEUWE NAAM : ";
:. 640:.".DISK-NAAM VERANDEREN (J/N)?"..
.... 620:. 1,8,15:. 2,8,2,"#":.1,U1$:.1,
"B-P 2 144".5....2,N$.H(S$,16.C(N$));:.1
,U2$: 2:. 120.M....".DISK-ID VERANDEREN"
:. 750:.".OUDE ID : "I(H$,5)......".NIE
UWE ID: (5 TEKENS)..............
....";:L.4:. 640......".ID VERANDEREN (J
/N)?":. 620:. 1,8,15:.2,8,2,"#"...&..1,U
1$:.1,"B-P 2 162":.2,N$;:.1,U2$: 2:. 120
.W.0..".ORIGINELE DISK-HEADER HERSTELLEN
"R$:. 1,8,5:. 2,8,2,"#".X.:..1,U1$:.1,"B
-P 2 200":.#2,A$...D.. A$."". 1: 2:."HE
ADER WAS AL ORIGINEEL."D$:. 140...N.H$.A
$:.I.1.22:.#2,A$:H$.H$.A$:.:."ORIGINEEL:
."H$...X..".HERSTELLEN (J/N)?":.620:.1,"
B-P 2 144":.2,H$;.L.B..1,"B-P 2 200":.I.
1.23:.2,L$;:.:.1,U2$: 2:.120.G.L.. 730:.
A$."N". 2 : ..M.V........".<..";:.198,
0:.198,1:.A$:A.F(A$.L$):B.C(N$)...... L.
.15. B..L.1 . 670.Q.... A.13. B.0. ." ":
....... A.20 . B.0 . ." ..";:N$.H(N$,B.1
):. 640...... B.L.A.34.(A.127).32 . 640.
6...N$.N$.A$:.A$;:.640.Z.... 1,8,15,"I":
.1,E$,A$,B$,C$: 1...F.. E$.."00". .".DI
SK-STATUS: ."E$","A$","B$","C$R$D$:. 140
...P.....Z.. A$:.A$.."J". A$.."N". 730.D
.......... 700:. 1,8,15:.2,8,2,"#":.1,U1
$......1,"B-P 2 144":.I.1.23:.#2,A$:H$.H
$.A$:..B....1,"B-P 2 200":.#2,A$:. A$.."
". 1: 2:..M....1,"B-P 2 200":.2,H$;:.1,
U2$: 1: 2:.......#1,A$,B$:B.F(A$.L$).2
56.F(B$.L$):.R$J(D(B),2)P$;.G. ..#1,A$:.
A$;:.C(A$).800:P$." ":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL