DISK HOUSEKEEPER
FILE INFORMATION
FILENAME(S): DISK HOUSEKEEPER
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-11-30 18:24:51
APPEARS ON: 1 disk(s)
FILE HASH
b97bf1f6d94890f1488f1460fbc1d17bfbc80017a4bfe4f2992a12ed041a595a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK UTILLITES | DISK HOUSEKEEPER | PRG | Sailor, Sensei | 21 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 00 00 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D |..$....---------| 00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000020: 2D 2D 2D 2D 00 40 08 01 00 8F 20 20 20 20 20 20 |----.@.... | 00000030: 20 44 49 53 4B 2D 48 4F 55 53 4B 45 45 50 45 52 | DISK-HOUSKEEPER| 00000040: 00 61 08 02 00 8F 20 20 20 53 54 5B 44 4E 49 4E |.a.... ST[DNIN| 00000050: 47 20 41 56 20 44 49 53 4B 49 4E 4E 45 48 5D 4C |G AV DISKINNEH]L| 00000060: 4C 00 81 08 03 00 8F 20 20 20 20 55 52 20 43 4F |L...... UR CO| 00000070: 4D 50 55 54 45 20 20 41 50 52 49 4C 20 31 39 38 |MPUTE APRIL 198| 00000080: 34 00 9A 08 04 00 8F 20 20 20 20 20 20 20 20 20 |4...... | 00000090: 4C 2E 46 52 49 44 4C 55 4E 44 00 BD 08 05 00 8F |L.FRIDLUND......| 000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000000B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 DB 08 |-------------...| 000000C0: 06 00 97 35 33 32 38 30 2C 31 32 3A 97 35 33 32 |...53280,12:.532| 000000D0: 38 31 2C 31 32 3A 99 22 93 97 22 00 1A 09 0A 00 |81,12:."..".....| 000000E0: 86 41 28 32 35 35 29 2C 43 25 28 37 37 2C 32 38 |.A(255),C%(77,28| 000000F0: 29 2C 44 25 28 31 29 2C 54 25 28 32 32 34 2C 31 |),D%(1),T%(224,1| 00000100: 29 2C 53 25 28 32 32 34 2C 31 29 2C 4C 25 28 32 |),S%(224,1),L%(2| 00000110: 32 34 29 2C 52 25 28 37 37 29 00 47 09 0B 00 44 |24),R%(77).G...D| 00000120: 25 28 30 29 B2 35 38 3A 44 25 28 31 29 B2 34 32 |%(0).58:D%(1).42| 00000130: 3A 5A 24 B2 C7 28 30 29 3A 42 24 B2 C7 28 33 29 |:Z$..(0):B$..(3)| 00000140: 3A 44 24 B2 22 30 22 00 6B 09 14 00 99 22 93 20 |:D$."0".k....". | 00000150: 20 20 20 20 20 20 20 20 20 20 44 49 53 4B 2D 48 | DISK-H| 00000160: 4F 55 53 45 4B 45 45 50 45 52 22 00 98 09 15 00 |OUSEKEEPER".....| 00000170: 99 22 11 20 20 20 20 50 52 4F 47 52 41 4D 20 53 |.". PROGRAM S| 00000180: 4F 4D 20 53 54 5B 44 41 52 20 50 5D 20 44 49 53 |OM ST[DAR P] DIS| 00000190: 4B 45 4E 20 4F 43 48 22 00 C5 09 16 00 99 22 20 |KEN OCH"......" | 000001A0: 20 20 20 53 4F 4D 20 4B 41 4E 20 52 5B 44 44 41 | SOM KAN R[DDA| 000001B0: 20 27 53 43 52 41 54 43 48 41 44 45 27 20 46 49 | 'SCRATCHADE' FI| 000001C0: 4C 45 52 2E 22 00 F4 09 17 00 99 22 2D 2D 2D 2D |LER."......"----| 000001D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000001E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000001F0: 2D 2D 2D 22 00 09 0A 1D 00 99 22 11 11 11 1D 54 |---"......"....T| 00000200: 52 59 43 4B 20 50 5D 3A 22 00 37 0A 1E 00 99 22 |RYCK P]:".7...."| 00000210: 11 11 27 1C 53 97 27 2D 4F 4D 20 44 55 20 56 49 |..'.S.'-OM DU VI| 00000220: 4C 4C 20 27 1C 53 97 43 52 41 54 43 48 41 27 20 |LL '.S.CRATCHA' | 00000230: 46 49 4C 45 52 2E 22 00 63 0A 1F 00 99 22 20 20 |FILER.".c...." | 00000240: 20 20 44 2E 56 2E 53 20 54 41 20 42 4F 52 54 20 | D.V.S TA BORT | 00000250: 46 49 4C 45 52 20 46 52 5D 4E 20 44 49 53 4B 45 |FILER FR]N DISKE| 00000260: 4E 2E 22 00 92 0A 20 00 99 22 11 27 1C 55 97 27 |N."... ..".'.U.'| 00000270: 2D 4F 4D 20 44 55 20 56 49 4C 4C 20 27 1C 55 97 |-OM DU VILL '.U.| 00000280: 4E 53 43 52 41 54 43 48 41 27 20 46 49 4C 45 52 |NSCRATCHA' FILER| 00000290: 2E 22 00 BE 0A 21 00 99 22 20 20 20 20 44 2E 56 |."...!.." D.V| 000002A0: 2E 53 20 4C 45 54 41 20 45 46 54 45 52 20 42 4F |.S LETA EFTER BO| 000002B0: 52 54 54 41 47 4E 41 20 46 49 4C 45 52 22 00 E4 |RTTAGNA FILER"..| 000002C0: 0A 22 00 99 22 20 20 20 20 4F 43 48 20 46 5D 20 |.".." OCH F] | 000002D0: 44 45 4D 20 41 54 54 20 5D 54 45 52 55 50 50 53 |DEM ATT ]TERUPPS| 000002E0: 54 5D 2E 22 00 F6 0A 28 00 A1 51 24 3A 8B 51 24 |T]."...(..Q$:.Q$| 000002F0: B2 22 22 A7 34 30 00 06 0B 2D 00 8B 51 24 B2 22 |."".40...-..Q$."| 00000300: 55 22 A7 34 30 30 00 16 0B 2E 00 8B 51 24 B3 B1 |U".400......Q$..| 00000310: 22 53 22 A7 34 30 00 25 0B 32 00 99 22 93 11 12 |"S".40.%.2.."...| 00000320: 44 49 53 4B 22 00 35 0B 3C 00 9F 31 2C 38 2C 30 |DISK".5.<..1,8,0| 00000330: 2C 22 24 30 22 00 41 0B 46 00 4E 24 B2 C7 28 30 |,"$0".A.F.N$..(0| 00000340: 29 00 4F 0B 50 00 A1 23 31 2C 41 24 2C 41 24 00 |).O.P..#1,A$,A$.| 00000350: 67 0B 5A 00 46 24 B2 22 22 3A 42 B2 30 3A A1 23 |g.Z.F$."":B.0:.#| 00000360: 31 2C 41 24 2C 41 24 00 76 0B 5F 00 8B 43 B2 30 |1,A$,A$.v._..C.0| 00000370: A7 99 22 12 22 3B 00 8A 0B 64 00 8B 41 24 B2 22 |..".";...d..A$."| 00000380: 22 A7 58 B2 31 3A 89 32 30 30 00 98 0B 6E 00 A1 |".X.1:.200...n..| 00000390: 23 31 2C 41 24 2C 42 24 00 A2 0B 78 00 99 A3 35 |#1,A$,B$...x...5| 000003A0: 29 3B 00 AD 0B 82 00 A1 23 31 2C 41 24 00 C5 0B |);......#1,A$...| 000003B0: 8C 00 8B 41 24 B2 22 22 A7 99 3A 41 B2 41 AA 31 |...A$.""..:A.A.1| 000003C0: 3A 89 31 39 30 00 DD 0B 96 00 8B 41 24 B2 C7 28 |:.190......A$..(| 000003D0: 33 34 29 A7 42 B2 31 3A 41 24 B2 22 22 00 F4 0B |34).B.1:A$.""...| 000003E0: A0 00 8B 42 B2 31 A7 46 24 B2 46 24 AA 41 24 3A |...B.1.F$.F$.A$:| 000003F0: 99 41 24 3B 00 0C 0C AA 00 8B C3 28 46 24 29 B1 |.A$;.......(F$).| 00000400: 31 36 A7 43 B2 43 AA 31 3A 89 39 30 00 15 0C B4 |16.C.C.1:.90....| 00000410: 00 89 31 33 30 00 22 0C BE 00 8B 41 B3 31 30 A7 |..130."....A.10.| 00000420: 39 30 00 4C 0C C8 00 99 22 56 49 4C 4C 20 44 55 |90.L...."VILL DU| 00000430: 20 1C 27 53 43 52 41 54 43 48 41 27 97 20 50 52 | .'SCRATCHA'. PR| 00000440: 4F 47 52 41 4D 20 3F 20 4A 2F 4E 22 00 5F 0C D2 |OGRAM ? J/N"._..| 00000450: 00 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 32 31 30 00 |..Z$:.Z$."".210.| 00000460: 6F 0C DC 00 8B 5A 24 B2 22 4A 22 A7 32 37 30 00 |o....Z$."J".270.| 00000470: 7F 0C E6 00 8B 5A 24 B2 22 4E 22 A7 32 35 30 00 |.....Z$."N".250.| 00000480: 88 0C F0 00 89 32 31 30 00 99 0C FA 00 8B 58 B2 |.....210......X.| 00000490: 31 A7 A0 31 3A 89 33 39 30 00 AC 0C 04 01 99 22 |1..1:.390......"| 000004A0: 93 11 11 22 3A 41 B2 30 3A 89 39 30 00 D2 0C 0E |...":A.0:.90....| 000004B0: 01 A0 31 3A 85 22 11 56 49 4C 4B 45 54 20 50 52 |..1:.".VILKET PR| 000004C0: 4F 47 52 41 4D 22 3B 50 24 3A 8B 50 24 B2 22 22 |OGRAM";P$:.P$.""| 000004D0: A7 80 00 DB 0C 18 01 8D 33 34 30 00 EC 0C 22 01 |........340...".| 000004E0: 99 22 93 11 11 11 11 11 11 11 11 22 00 FF 0C 2C |."........."...,| 000004F0: 01 99 22 4F 50 45 4E 31 35 2C 38 2C 31 35 22 00 |.."OPEN15,8,15".| 00000500: 20 0D 36 01 99 22 11 11 50 D2 31 35 2C 22 C7 28 | .6.."..P.15,".(| 00000510: 33 34 29 22 53 30 3A 22 58 24 C7 28 33 34 29 22 |34)"S0:"X$.(34)"| 00000520: 00 3B 0D 40 01 99 22 11 11 52 55 4E 22 3A 99 22 |.;.@.."..RUN":."| 00000530: 91 91 91 91 91 91 91 91 91 91 22 00 60 0D 4A 01 |..........".`.J.| 00000540: 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A |.631,13:.632,13:| 00000550: 97 36 33 33 2C 31 33 3A 97 31 39 38 2C 33 3A 80 |.633,13:.198,3:.| 00000560: 00 7E 0D 54 01 81 41 34 B2 31 A4 C3 28 50 24 29 |.~.T..A4.1..(P$)| 00000570: 3A 52 24 B2 CA 28 50 24 2C 41 34 2C 31 29 00 8B |:R$..(P$,A4,1)..| 00000580: 0D 5E 01 58 24 B2 58 24 AA 52 24 00 91 0D 68 01 |.^.X$.X$.R$...h.| 00000590: 82 00 97 0D 69 01 8E 00 A1 0D 86 01 A0 31 35 3A |....i........15:| 000005A0: 8A 00 E0 0D 90 01 99 22 11 11 11 20 20 20 20 20 |......."... | 000005B0: 20 20 4C 41 44 44 41 52 20 46 52 49 41 20 53 45 | LADDAR FRIA SE| 000005C0: 43 54 4F 52 45 52 2E 2E 2E 22 3A 9F 31 35 2C 38 |CTORER...":.15,8| 000005D0: 2C 31 35 2C 22 49 22 AA 44 24 3A 8D 33 30 32 30 |,15,"I".D$:.3020| 000005E0: 00 F8 0D 9A 01 9F 33 2C 38 2C 33 2C 22 24 22 AA |......3,8,3,"$".| 000005F0: 44 24 3A 8D 33 30 32 30 00 13 0E A4 01 41 30 B2 |D$:.3020.....A0.| 00000600: 31 3A A1 23 33 2C 41 24 3A 41 B2 C6 28 41 24 AA |1:.#3,A$:A..(A$.| 00000610: 5A 24 29 00 25 0E AE 01 87 41 31 3A 8B 41 B2 41 |Z$).%....A1:.A.A| 00000620: 31 A7 34 37 30 00 3B 0E B8 01 46 25 B2 46 25 AA |1.470.;...F%.F%.| 00000630: 31 3A 8B 46 25 B2 33 A7 35 31 30 00 4D 0E C2 01 |1:.F%.3.510.M...| 00000640: 87 41 31 3A 8B 41 31 B2 30 A7 34 33 30 00 56 0E |.A1:.A1.0.430.V.| 00000650: CC 01 89 34 35 30 00 68 0E D6 01 87 41 31 3A 8B |...450.h....A1:.| 00000660: 41 31 B2 30 A7 34 39 30 00 8F 0E E0 01 87 42 31 |A1.0.490......B1| 00000670: 3A 81 4A B2 41 30 A4 41 31 3A 52 25 28 4A 29 B2 |:.J.A0.A1:R%(J).| 00000680: 42 31 3A 82 4A 3A 41 30 B2 4A 3A 89 34 37 30 00 |B1:.J:A0.J:.470.| 00000690: B3 0E EA 01 8B 41 B2 31 B0 41 B2 36 35 A7 44 31 |.....A.1.A.65.D1| 000006A0: B2 31 3A 54 39 B2 33 35 3A 53 39 B2 33 3A 44 39 |.1:T9.35:S9.3:D9| 000006B0: B2 31 38 00 D5 0E F4 01 8B 41 B2 36 37 A7 44 31 |.18......A.67.D1| 000006C0: B2 32 35 37 3A 54 39 B2 37 37 3A 53 39 B2 34 3A |.257:T9.77:S9.4:| 000006D0: 44 39 B2 33 39 00 0C 0F FE 01 8B 54 39 B2 30 A7 |D9.39......T9.0.| 000006E0: A0 33 3A 99 22 11 1C 3F 3F 20 4A 41 47 20 4B 5B |.3:."..?? JAG K[| 000006F0: 4E 4E 45 52 20 49 4E 54 45 20 49 47 45 4E 20 44 |NNER INTE IGEN D| 00000700: 49 53 4B 45 4E 20 3F 3F 97 22 3A 90 00 22 0F 08 |ISKEN ??.":.."..| 00000710: 02 81 4A B2 31 A4 44 31 3A A1 23 33 2C 41 24 3A |..J.1.D1:.#3,A$:| 00000720: 82 4A 00 33 0F 12 02 81 4A B2 31 A4 54 39 3A 54 |.J.3....J.1.T9:T| 00000730: 31 B2 30 00 4D 0F 1C 02 8B 4A B2 35 31 A7 A1 23 |1.0.M....J.51..#| 00000740: 33 2C 41 24 2C 41 24 2C 41 24 2C 41 24 00 63 0F |3,A$,A$,A$,A$.c.| 00000750: 26 02 A1 23 33 2C 41 24 3A 43 B2 C6 28 41 24 AA |&..#3,A$:C..(A$.| 00000760: 5A 24 29 00 88 0F 30 02 4B 31 B2 30 3A 81 4B B2 |Z$)...0.K1.0:.K.| 00000770: 30 A4 53 39 AB 31 3A A1 23 33 2C 41 24 3A 41 B2 |0.S9.1:.#3,A$:A.| 00000780: C6 28 41 24 AA 5A 24 29 00 BB 0F 3A 02 81 4C B2 |.(A$.Z$)...:..L.| 00000790: 30 A4 37 3A 41 25 B2 41 AD 32 3A 44 31 B2 41 AB |0.7:A%.A.2:D1.A.| 000007A0: 41 25 AC 32 3A 8B 4B 31 B3 B2 52 25 28 4A 29 A7 |A%.2:.K1..R%(J).| 000007B0: 43 25 28 4A 2C 4B 31 29 B2 44 31 00 DA 0F 44 02 |C%(J,K1).D1...D.| 000007C0: 41 B2 41 25 3A 54 31 B2 54 31 AA 44 31 3A 4B 31 |A.A%:T1.T1.D1:K1| 000007D0: B2 4B 31 AA 31 3A 82 4C 2C 4B 00 E1 0F 4E 02 82 |.K1.1:.L,K...N..| 000007E0: 4A 00 E8 0F 58 02 A0 33 00 FE 0F 62 02 9F 32 2C |J...X..3...b..2,| 000007F0: 38 2C 32 2C 22 23 30 22 3A 8D 33 30 32 30 00 2C |8,2,"#0":.3020.,| 00000800: 10 84 03 4B B2 30 3A 99 22 93 4C 45 54 41 52 20 |...K.0:.".LETAR | 00000810: 45 46 54 45 52 20 27 53 43 52 41 54 43 48 41 44 |EFTER 'SCRATCHAD| 00000820: 45 27 20 46 49 4C 45 52 2E 2E 2E 22 00 39 10 8E |E' FILER...".9..| 00000830: 03 54 B2 44 39 3A 53 B2 31 00 43 10 98 03 8D 32 |.T.D9:S.1.C....2| 00000840: 30 30 30 00 69 10 A2 03 81 44 B2 32 A4 32 35 35 |000.i....D.2.255| 00000850: A9 33 32 3A 8B 41 28 44 29 B3 B1 30 B0 41 28 44 |.32:.A(D)..0.A(D| 00000860: AA 31 29 B2 30 A7 39 38 30 00 8F 10 AC 03 8B 4B |.1).0.980......K| 00000870: B2 30 A7 99 22 56 49 4C 4C 20 44 55 20 5D 54 45 |.0.."VILL DU ]TE| 00000880: 52 4B 41 4C 4C 41 20 3A 20 28 4A 2F 4E 29 22 00 |RKALLA : (J/N)".| 00000890: B7 10 B6 03 A1 58 24 3A 81 4B B2 44 AA 33 A4 44 |.....X$:.K.D.3.D| 000008A0: AA 31 38 3A 99 C7 28 41 28 4B 29 29 3B 3A 82 4B |.18:..(A(K));:.K| 000008B0: 3A 99 22 3F 20 22 3B 00 D4 10 C0 03 A1 58 24 3A |:."? ";......X$:| 000008C0: 8B 58 24 B3 B1 22 4A 22 AF 58 24 B3 B1 22 4E 22 |.X$.."J".X$.."N"| 000008D0: A7 39 36 30 00 E9 10 CA 03 99 58 24 3A 8B 58 24 |.960......X$:.X$| 000008E0: B2 22 4A 22 A7 31 30 31 30 00 F0 10 D4 03 82 44 |."J".1010......D| 000008F0: 00 0C 11 DE 03 54 B2 41 28 30 29 3A 53 B2 41 28 |.....T.A(0):S.A(| 00000900: 31 29 3A 8B 54 B2 44 39 A7 39 32 30 00 2A 11 E8 |1):.T.D9.920.*..| 00000910: 03 99 22 1F 44 45 54 20 56 41 52 20 41 4C 4C 54 |..".DET VAR ALLT| 00000920: 20 21 97 22 3A 89 31 32 37 30 00 6E 11 F2 03 54 | !.":.1270.n...T| 00000930: 36 B2 54 3A 53 36 B2 53 3A 44 36 B2 44 3A 54 B2 |6.T:S6.S:D6.D:T.| 00000940: 41 28 44 AA 31 29 3A 53 B2 41 28 44 AA 32 29 3A |A(D.1):S.A(D.2):| 00000950: 4C 25 28 30 29 B2 41 28 44 AA 32 38 29 AA 41 28 |L%(0).A(D.28).A(| 00000960: 44 AA 32 39 29 AC 32 35 36 3A 4C 25 B2 30 00 8B |D.29).256:L%.0..| 00000970: 11 FC 03 A1 58 24 3A 99 22 5B 52 20 46 49 4C 45 |....X$:."[R FILE| 00000980: 4E 20 41 56 20 54 59 50 3A 22 3B 00 A6 11 06 04 |N AV TYP:";.....| 00000990: 99 22 20 20 20 1C 31 97 2E 20 53 45 51 55 45 4E |." .1.. SEQUEN| 000009A0: 54 49 41 4C 22 22 00 BF 11 10 04 99 A3 31 39 29 |TIAL"".......19)| 000009B0: 3B 22 1C 32 97 2E 20 50 52 4F 47 52 41 4D 22 00 |;".2.. PROGRAM".| 000009C0: D4 11 1A 04 99 A3 31 39 29 3B 22 1C 33 97 2E 20 |......19);".3.. | 000009D0: 55 53 52 22 00 E8 11 24 04 8B 41 28 44 AA 31 39 |USR"...$..A(D.19| 000009E0: 29 B2 30 A7 31 30 38 30 00 02 12 2E 04 99 A3 31 |).0.1080.......1| 000009F0: 39 29 3B 22 1C 34 97 2E 20 52 45 4C 41 54 49 56 |9);".4.. RELATIV| 00000A00: 45 22 00 26 12 38 04 99 A3 31 30 29 3B 22 11 41 |E".&.8...10);".A| 00000A10: 4E 47 45 20 4E 55 4D 4D 45 52 20 28 1C 31 2D 34 |NGE NUMMER (.1-4| 00000A20: 97 29 3A 20 22 3B 00 3A 12 42 04 A1 58 24 3A 8B |.): ";.:.B..X$:.| 00000A30: 58 24 B2 22 22 A7 31 30 39 30 00 57 12 4C 04 58 |X$."".1090.W.L.X| 00000A40: B2 C6 28 58 24 29 AB 34 38 3A 8B 58 B3 31 B0 58 |..(X$).48:.X.1.X| 00000A50: B1 34 89 31 30 39 30 00 67 12 56 04 99 58 24 3A |.4.1090.g.V..X$:| 00000A60: 58 B2 58 AA 31 32 38 00 A2 12 60 04 8B 58 B2 31 |X.X.128...`..X.1| 00000A70: 33 32 A7 54 25 28 30 2C 31 29 B2 41 28 44 AA 31 |32.T%(0,1).A(D.1| 00000A80: 39 29 3A 53 25 28 30 2C 31 29 B2 41 28 44 AA 32 |9):S%(0,1).A(D.2| 00000A90: 30 29 3A 8B 54 25 28 30 2C 31 29 B2 30 A7 31 30 |0):.T%(0,1).0.10| 00000AA0: 32 30 00 B4 12 6A 04 8B 54 B1 54 39 B0 53 B3 30 |20...j..T.T9.S.0| 00000AB0: A7 54 B2 30 00 E5 12 74 04 8B 54 B3 31 B0 53 B1 |.T.0...t..T.1.S.| 00000AC0: 52 25 28 54 29 A7 99 22 1C 20 46 45 4C 41 4B 54 |R%(T)..". FELAKT| 00000AD0: 49 47 20 4C 5B 4E 4B 4E 49 4E 47 20 21 97 22 3A |IG L[NKNING !.":| 00000AE0: 89 31 32 36 30 00 13 13 7E 04 8B 43 25 28 54 2C |.1260...~..C%(T,| 00000AF0: 53 29 B2 30 A7 99 22 1C 20 55 54 4E 59 54 54 4A |S).0..". UTNYTTJ| 00000B00: 41 44 45 20 42 4C 4F 43 4B 20 21 97 22 3A 89 31 |ADE BLOCK !.":.1| 00000B10: 32 36 30 00 25 13 88 04 8D 33 30 30 30 3A 4C 25 |260.%....3000:L%| 00000B20: B2 4C 25 AA 31 00 4A 13 92 04 81 4A B2 30 A4 31 |.L%.1.J....J.0.1| 00000B30: 3A 98 31 35 2C 22 4D 2D 52 22 3B C7 28 4A 29 3B |:.15,"M-R";.(J);| 00000B40: 42 24 3A A1 23 31 35 2C 41 24 00 5F 13 9C 04 41 |B$:.#15,A$._...A| 00000B50: 28 4A 29 B2 C6 28 41 24 AA 5A 24 29 3A 82 4A 00 |(J)..(A$.Z$):.J.| 00000B60: 86 13 A6 04 54 34 B2 54 3A 53 34 B2 53 3A 54 B2 |....T4.T:S4.S:T.| 00000B70: 41 28 30 29 3A 53 B2 41 28 31 29 3A 8B 54 B3 B1 |A(0):S.A(1):.T..| 00000B80: 30 A7 31 31 33 30 00 B3 13 B0 04 54 B2 54 25 28 |0.1130.....T.T%(| 00000B90: 30 2C 31 29 3A 53 B2 53 25 28 30 2C 31 29 3A 54 |0,1):S.S%(0,1):T| 00000BA0: 25 28 30 2C 31 29 B2 30 3A 8B 54 B3 B1 30 A7 31 |%(0,1).0:.T..0.1| 00000BB0: 31 33 30 00 E7 13 BA 04 8B 4C 25 B3 B1 4C 25 28 |130......L%..L%(| 00000BC0: 30 29 A7 99 22 1C 20 46 45 4C 41 4B 54 49 47 20 |0)..". FELAKTIG | 00000BD0: 27 42 4C 4F 43 4B 20 43 4F 55 4E 54 27 20 21 97 |'BLOCK COUNT' !.| 00000BE0: 22 3A 89 31 32 36 30 00 FA 13 C4 04 54 B2 54 36 |":.1260.....T.T6| 00000BF0: 3A 53 B2 53 36 3A 44 B2 44 36 00 04 14 CE 04 8D |:S.S6:D.D6......| 00000C00: 33 30 30 30 00 24 14 D8 04 98 31 35 2C 22 4D 2D |3000.$....15,"M-| 00000C10: 57 22 3B C7 28 44 29 3B 42 24 3B C7 28 31 29 3B |W";.(D);B$;.(1);| 00000C20: C7 28 58 29 00 47 14 E2 04 98 31 35 2C 22 55 32 |.(X).G....15,"U2| 00000C30: 3A 32 2C 22 3B 44 24 3B 54 3B 53 3A 8D 33 30 32 |:2,";D$;T;S:.302| 00000C40: 30 3A 89 31 33 30 30 00 6B 14 EC 04 99 22 1F 54 |0:.1300.k....".T| 00000C50: 59 56 5B 52 52 20 2D 20 44 45 54 20 46 55 4E 4B |YV[RR - DET FUNK| 00000C60: 41 52 20 49 4E 54 45 20 21 97 22 00 72 14 F6 04 |AR INTE !.".r...| 00000C70: A0 32 00 96 14 14 05 A0 32 3A 98 31 35 2C 22 56 |.2......2:.15,"V| 00000C80: 30 22 3A A0 31 35 3A 81 51 57 B2 31 A4 31 30 30 |0":.15:.QW.1.100| 00000C90: 30 30 3A 82 3A 8A 00 B1 14 D0 07 8F 20 47 52 41 |00:.:....... GRA| 00000CA0: 42 20 46 55 4C 4C 20 44 49 53 4B 20 42 4C 4F 43 |B FULL DISK BLOC| 00000CB0: 4B 00 BB 14 DA 07 8D 33 30 30 30 00 E2 14 E4 07 |K......3000.....| 00000CC0: 81 4A B2 30 A4 32 35 35 3A 98 31 35 2C 22 4D 2D |.J.0.255:.15,"M-| 00000CD0: 52 22 3B C7 28 4A 29 3B 42 24 3A A1 23 31 35 2C |R";.(J);B$:.#15,| 00000CE0: 41 24 00 F9 14 EE 07 41 28 4A 29 B2 C6 28 41 24 |A$.....A(J)..(A$| 00000CF0: AA 5A 24 29 3A 82 4A 3A 8E 00 0A 15 B8 0B 8F 20 |.Z$):.J:....... | 00000D00: 52 45 41 44 20 42 4C 4F 41 44 00 23 15 C2 0B 98 |READ BLOAD.#....| 00000D10: 31 35 2C 22 42 2D 52 22 32 3B C5 28 44 24 29 3B |15,"B-R"2;.(D$);| 00000D20: 54 3B 53 00 3A 15 CC 0B 8F 20 47 45 54 20 45 52 |T;S.:.... GET ER| 00000D30: 52 4F 52 20 53 54 41 54 55 53 00 4D 15 D6 0B 84 |ROR STATUS.M....| 00000D40: 31 35 2C 45 2C 45 24 2C 45 31 2C 45 32 00 72 15 |15,E,E$,E1,E2.r.| 00000D50: E0 0B 8B 45 B3 B1 30 A7 99 22 12 44 49 53 4B 20 |...E..0..".DISK | 00000D60: 45 52 52 4F 52 3A 92 22 45 3B 45 24 2C 45 31 3B |ERROR:."E;E$,E1;| 00000D70: 45 32 00 78 15 EA 0B 8E 00 99 15 10 27 83 31 2C |E2.x........'.1,| 00000D80: 31 37 2C 32 30 2C 32 34 2C 31 39 2C 33 30 2C 31 |17,20,24,19,30,1| 00000D90: 37 2C 33 35 2C 31 36 2C 30 00 BB 15 1A 27 83 36 |7,35,16,0....'.6| 00000DA0: 35 2C 31 37 2C 32 30 2C 32 34 2C 31 38 2C 33 30 |5,17,20,24,18,30| 00000DB0: 2C 31 37 2C 33 35 2C 31 36 2C 30 00 DD 15 24 27 |,17,35,16,0...$'| 00000DC0: 83 36 37 2C 33 39 2C 32 38 2C 35 33 2C 32 36 2C |.67,39,28,53,26,| 00000DD0: 36 34 2C 32 34 2C 37 37 2C 32 32 2C 30 00 00 00 |64,24,77,22,0...| 00000DE0: FF 00 |.. |
..$....-----------------------------.@.. .. DISK-HOUSKEEPER.A.... ST[DNIN G AV DISKINNEH]LL...... UR COMPUTE A PRIL 1984...... L.FRIDLUND...... -----------------------------......53280 ,12:.53281,12:.".."......A(255),C%(77,28 ),D%(1),T%(224,1),S%(224,1),L%(224),R%(7 7).G...D%(0).58:D%(1).42:Z$.G(0):B$.G(3) :D$."0".K....". DISK-HOUSEKEEP ER"......". PROGRAM SOM ST[DAR P] DIS KEN OCH".E...." SOM KAN R[DDA 'SCRATC HADE' FILER."......"-------------------- -------------------"......"....TRYCK P]: ".7...."..'.S.'-OM DU VILL '.S.CRATCHA' FILER.".C...." D.V.S TA BORT FILER FR ]N DISKEN."... ..".'.U.'-OM DU VILL '.U. NSCRATCHA' FILER."...!.." D.V.S LETA EFTER BORTTAGNA FILER"...".." OCH F] DEM ATT ]TERUPPST]."...(..Q$:.Q$."".40.. .-..Q$."U".400......Q$.."S".40.%.2.."... DISK".5.<..1,8,0,"$0".A.F.N$.G(0).O.P..# 1,A$,A$.G.Z.F$."":B.0:.#1,A$,A$.V._..C.0 ..".";...D..A$."".X.1:.200...N..#1,A$,B$ ...X...5);......#1,A$.E....A$.""..:A.A.1 :.190......A$.G(34).B.1:A$.""... ..B.1.F $.F$.A$:.A$;......C(F$).16.C.C.1:.90.... ..130."....A.10.90.L.H.."VILL DU .'SCRAT CHA'. PROGRAM ? J/N"._.R..Z$:.Z$."".210. O....Z$."J".270.....Z$."N".250......210 ......X.1. 1:.390......"...":A.0:.90.R.. . 1:.".VILKET PROGRAM";P$:.P$.""........ 340...".."........."...,.."OPEN15,8,15". .6.."..PR15,"G(34)"S0:"X$G(34)".;.@..". .RUN":."..........".`.J..631,13:.632,13: .633,13:.198,3:..~.T..A4.1.C(P$):R$.J(P$ ,A4,1)...^.X$.X$.R$...H.....I....... 15: ......."... LADDAR FRIA SECTORER.. .":.15,8,15,"I".D$:.3020......3,8,3,"$". D$:.3020.....A0.1:.#3,A$:A.F(A$.Z$).%... .A1:.A.A1.470.;...F%.F%.1:.F%.3.510.M.B. .A1:.A1.0.430.V.L..450.H.V..A1:.A1.0.490 ......B1:.J.A0.A1:R%(J).B1:.J:A0.J:.470. .....A.1.A.65.D1.1:T9.35:S9.3:D9.18.U... .A.67.D1.257:T9.77:S9.4:D9.39......T9.0. 3:."..?? JAG K[NNER INTE IGEN DISKEN ?? .":.."....J.1.D1:.#3,A$:.J.3....J.1.T9:T 1.0.M....J.51..#3,A$,A$,A$,A$.C.&..#3,A$ :C.F(A$.Z$)...0.K1.0:.K.0.S9.1:.#3,A$:A. F(A$.Z$)...:..L.0.7:A%.A.2:D1.A.A%.2:.K1 ..R%(J).C%(J,K1).D1.Z.D.A.A%:T1.T1.D1:K1 .K1.1:.L,K...N..J...X. 3...B..2,8,2,"#0" :.3020.,...K.0:.".LETAR EFTER 'SCRATCHAD E' FILER...".9...T.D9:S.1.C....2000.I... .D.2.255.32:.A(D)..0.A(D.1).0.980......K .0.."VILL DU ]TERKALLA : (J/N)"......X$: .K.D.3.D.18:.G(A(K));:.K:."? ";.T....X$: .X$.."J".X$.."N".960...J..X$:.X$."J".101 0...T..D.....T.A(0):S.A(1):.T.D9.920.*.. ..".DET VAR ALLT !.":.1270.N...T6.T:S6.S :D6.D:T.A(D.1):S.A(D.2):L%(0).A(D.28).A( D.29).256:L%.0......X$:."[R FILEN AV TYP :";......" .1.. SEQUENTIAL"".......19) ;".2.. PROGRAM".T.....19);".3.. USR"...$ ..A(D.19).0.1080.......19);".4.. RELATIV E".&.8...10);".ANGE NUMMER (.1-4.): ";.: .B..X$:.X$."".1090.W.L.X.F(X$).48:.X.1.X .4.1090.G.V..X$:X.X.128...`..X.132.T%(0, 1).A(D.19):S%(0,1).A(D.20):.T%(0,1).0.10 20...J..T.T9.S.0.T.0...T..T.1.S.R%(T).." . FELAKTIG L[NKNING !.":.1260...~..C%(T, S).0..". UTNYTTJADE BLOCK !.":.1260.%... .3000:L%.L%.1.J....J.0.1:.15,"M-R";G(J); B$:.#15,A$._...A(J).F(A$.Z$):.J.....T4.T :S4.S:T.A(0):S.A(1):.T..0.1130.....T.T%( 0,1):S.S%(0,1):T%(0,1).0:.T..0.1130..... .L%..L%(0)..". FELAKTIG 'BLOCK COUNT' !. ":.1260...D.T.T6:S.S6:D.D6...N..3000.$.X ..15,"M-W";G(D);B$;G(1);G(X).G....15,"U2 :2,";D$;T;S:.3020:.1300.K....".TYV[RR - DET FUNKAR INTE !.".R... 2..... 2:.15,"V 0": 15:.QW.1.10000:.:....P.. GRAB FULL D ISK BLOCK...Z..3000......J.0.255:.15,"M- R";G(J);B$:.#15,A$.....A(J).F(A$.Z$):.J: ....... READ BLOAD.#.B..15,"B-R"2;E(D$); T;S.:.L.. GET ERROR STATUS.M.V..15,E,E$, E1,E2.R....E..0..".DISK ERROR:."E;E$,E1; E2.X........'.1,17,20,24,19,30,17,35,16, 0....'.65,17,20,24,18,30,17,35,16,0...$' .67,39,28,53,26,64,24,77,22,0.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL