_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL