DISKY
FILE INFORMATION
FILENAME(S): DISKY
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-10-20 00:34:55
APPEARS ON: 1 disk(s)
FILE HASH
744af0f84ff7f155eb1ad4a49c145773ce67c3263e4bee35491c6800fe8e92f0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 037B | DISKY | PRG | Robin Albicker | 31 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 96 00 99 22 93 11 11 C6 C6 C6 C6 C6 |..#...."........|
00000010: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
00000020: C6 C6 22 00 42 08 A0 00 99 22 44 49 53 50 4C 41 |..".B...."DISPLA|
00000030: 59 20 42 4C 4F 43 4B 53 20 43 4F 4E 54 45 4E 54 |Y BLOCKS CONTENT|
00000040: 53 22 00 62 08 A5 00 99 22 C5 C5 C5 C5 C5 C5 C5 |S".b....".......|
00000050: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00000060: 22 3A 00 8E 08 C8 00 53 50 24 B2 22 20 22 3A 4E |":.....SP$." ":N|
00000070: 4C 24 B2 C7 28 30 29 3A 48 58 24 B2 22 30 31 32 |L$..(0):HX$."012|
00000080: 33 34 35 36 37 38 39 41 42 43 44 45 46 22 00 BA |3456789ABCDEF"..|
00000090: 08 D2 00 46 53 24 B2 22 22 3A 81 49 B2 36 34 A4 |...FS$."":.I.64.|
000000A0: 39 35 3A 46 53 24 B2 46 53 24 AA 22 12 22 AA C7 |95:FS$.FS$."."..|
000000B0: 28 49 29 AA 22 92 22 3A 82 49 00 CC 08 F0 00 86 |(I).".":.I......|
000000C0: 41 24 28 31 35 29 2C 4E 42 28 32 29 00 D7 08 FB |A$(15),NB(2)....|
000000D0: 00 44 24 B2 22 30 22 00 07 09 FD 00 99 22 20 20 |.D$."0"......" |
000000E0: 20 20 20 20 20 12 53 92 43 52 45 45 4E 11 9D 9D | .S.CREEN...|
000000F0: 9D 9D 9D 9D 9D 9D 4F 52 20 11 9D 9D 11 12 50 92 |......OR .....P.|
00000100: 52 49 4E 54 45 52 22 00 1C 09 FE 00 A1 4A 4A 24 |RINTER"......JJ$|
00000110: 3A 8B 4A 4A 24 B2 22 22 A7 32 35 34 00 3D 09 FF |:.JJ$."".254.=..|
00000120: 00 8B 4A 4A 24 B2 22 53 22 A7 99 22 20 20 20 20 |..JJ$."S".." |
00000130: 20 20 20 11 12 53 43 52 45 45 4E 92 22 00 5F 09 | ..SCREEN."._.|
00000140: 00 01 8B 4A 4A 24 B2 22 50 22 A7 99 22 20 20 20 |...JJ$."P".." |
00000150: 20 20 20 20 11 12 50 52 49 4E 54 45 52 92 22 00 | ..PRINTER.".|
00000160: 79 09 04 01 9F 31 35 2C 38 2C 31 35 2C 22 49 22 |y....15,8,15,"I"|
00000170: AA 44 24 3A 8D 20 36 35 30 00 82 09 09 01 9F 34 |.D$:. 650......4|
00000180: 2C 34 00 97 09 0E 01 9F 32 2C 38 2C 32 2C 22 23 |,4......2,8,2,"#|
00000190: 22 3A 8D 20 36 35 30 00 B3 09 40 01 85 22 11 1D |":. 650...@.."..|
000001A0: 1D 54 52 41 43 4B 2C 20 53 45 43 54 4F 52 22 3B |.TRACK, SECTOR";|
000001B0: 54 2C 53 00 DE 09 4A 01 8B 54 B2 30 B0 54 B1 33 |T,S...J..T.0.T.3|
000001C0: 35 A7 23 31 35 2C 22 49 22 44 24 3A A0 32 3A A0 |5.#15,"I"D$:.2:.|
000001D0: 34 3A A0 31 35 3A 99 22 45 4E 44 22 3A 80 00 07 |4:.15:."END":...|
000001E0: 0A 54 01 8B 4A 4A 24 B2 22 53 22 20 A7 20 99 22 |.T..JJ$."S" . ."|
000001F0: 11 1D 1D 54 52 41 43 4B 22 54 22 20 53 45 43 54 |...TRACK"T" SECT|
00000200: 4F 52 22 53 3A 98 34 00 22 0A 5E 01 98 31 35 2C |OR"S:.4.".^..15,|
00000210: 22 55 31 3A 32 2C 22 44 24 3B 54 3B 53 3A 8D 36 |"U1:2,"D$;T;S:.6|
00000220: 35 30 00 32 0A 90 01 99 20 22 42 2D 50 3A 32 2C |50.2.... "B-P:2,|
00000230: 31 22 00 47 0A 9A 01 99 20 20 22 4D 2D 52 22 C7 |1".G.... "M-R".|
00000240: 28 30 29 C7 28 35 29 00 6A 0A A4 01 A1 23 31 35 |(0).(5).j....#15|
00000250: 2C 41 24 28 30 29 3A 8B 41 24 28 30 29 B2 22 22 |,A$(0):.A$(0).""|
00000260: A7 41 24 28 30 29 B2 4E 4C 24 00 7B 0A AC 01 8B |.A$(0).NL$.{....|
00000270: 4A 4A 24 B2 22 53 22 A7 34 33 30 00 8C 0A AE 01 |JJ$."S".430.....|
00000280: 8B 4A 4A 24 B2 22 50 22 A7 34 36 30 00 A3 0A B4 |.JJ$."P".460....|
00000290: 01 4B B2 31 3A 4E 42 28 31 29 B2 C6 28 41 24 28 |.K.1:NB(1)..(A$(|
000002A0: 30 29 29 00 CC 0A B6 01 81 4A B2 30 A4 36 33 3A |0))......J.0.63:|
000002B0: 8B 4A B2 33 32 A7 8D 37 31 30 3A 8B 5A 24 B2 22 |.J.32..710:.Z$."|
000002C0: 4E 22 A7 4A B2 38 30 3A 89 34 35 38 00 D7 0A B8 |N".J.80:.458....|
000002D0: 01 81 49 B2 4B A4 33 00 F9 0A BA 01 A1 23 32 2C |..I.K.3......#2,|
000002E0: 41 24 28 49 29 3A 8B 41 24 28 49 29 B2 22 22 A7 |A$(I):.A$(I)."".|
000002F0: 41 24 28 49 29 B2 4E 4C 24 00 15 0B BC 01 8B 4B |A$(I).NL$......K|
00000300: B2 31 AF 49 B3 32 A7 4E 42 28 32 29 B2 C6 28 41 |.1.I.2.NB(2)..(A|
00000310: 24 28 49 29 29 00 20 0B BE 01 82 49 3A 4B B2 30 |$(I)). ....I:K.0|
00000320: 00 46 0B C0 01 41 24 B2 22 22 3A 42 24 B2 22 3A |.F...A$."":B$.":|
00000330: 22 3A 4E B2 4A AC 34 3A 8D 37 39 30 3A 41 24 B2 |":N.J.4:.790:A$.|
00000340: 41 24 AA 22 3A 22 00 61 0B C2 01 81 49 B2 30 A4 |A$.":".a....I.0.|
00000350: 33 3A 4E B2 C6 28 41 24 28 49 29 29 3A 8D 37 39 |3:N..(A$(I)):.79|
00000360: 30 00 7C 0B C4 01 43 24 B2 41 24 28 49 29 3A 8D |0.|...C$.A$(I):.|
00000370: 38 35 30 3A 42 24 B2 42 24 AA 43 24 00 92 0B C6 |850:B$.B$.C$....|
00000380: 01 82 49 3A 8B 4A 4A 24 B2 22 53 22 A7 99 41 24 |..I:.JJ$."S"..A$|
00000390: 42 24 00 9E 0B CA 01 82 4A 3A 89 35 37 31 00 A6 |B$......J:.571..|
000003A0: 0B CC 01 8F 2A 2A 00 BD 0B D2 01 4B B2 31 3A 4E |....**.....K.1:N|
000003B0: 42 28 31 29 B2 C6 28 41 24 28 30 29 29 00 C9 0B |B(1)..(A$(0))...|
000003C0: D4 01 81 49 B2 4B A4 31 35 00 EB 0B D8 01 A1 23 |...I.K.15......#|
000003D0: 32 2C 41 24 28 49 29 3A 8B 41 24 28 49 29 B2 22 |2,A$(I):.A$(I)."|
000003E0: 22 A7 41 24 28 49 29 B2 4E 4C 24 00 07 0C DA 01 |".A$(I).NL$.....|
000003F0: 8B 4B B2 31 AF 49 B3 32 A7 4E 42 28 32 29 B2 C6 |.K.1.I.2.NB(2)..|
00000400: 28 41 24 28 49 29 29 00 12 0C DC 01 82 49 3A 4B |(A$(I))......I:K|
00000410: B2 30 00 39 0C DE 01 41 24 B2 22 22 3A 42 24 B2 |.0.9...A$."":B$.|
00000420: 22 3A 22 3A 4E B2 4A AC 31 36 3A 8D 37 39 30 3A |":":N.J.16:.790:|
00000430: 41 24 B2 41 24 AA 22 3A 22 00 67 0C E0 01 81 49 |A$.A$.":".g....I|
00000440: B2 30 A4 31 35 3A 4E B2 C6 28 41 24 28 49 29 29 |.0.15:N..(A$(I))|
00000450: 3A 8D 37 39 30 3A 8B 5A 24 B2 22 4E 22 A7 4A B2 |:.790:.Z$."N".J.|
00000460: 34 30 3A 89 35 37 31 00 82 0C E2 01 43 24 B2 41 |40:.571.....C$.A|
00000470: 24 28 49 29 3A 8D 38 35 30 3A 42 24 B2 42 24 AA |$(I):.850:B$.B$.|
00000480: 43 24 00 89 0C E4 01 82 49 00 9F 0C E6 01 8B 4A |C$......I......J|
00000490: 4A 24 B2 22 54 22 A7 99 23 34 2C 41 24 42 24 00 |J$."T"..#4,A$B$.|
000004A0: AB 0C E8 01 82 4A 3A 89 35 37 31 00 B7 0C 3B 02 |.....J:.571...;.|
000004B0: 8F 20 4D 4F 4E 47 4F 00 E2 0C 3F 02 99 22 4E 45 |. MONGO...?.."NE|
000004C0: 58 54 20 54 52 41 43 4B 20 41 4E 44 20 53 45 43 |XT TRACK AND SEC|
000004D0: 54 4F 52 22 4E 42 28 31 29 4E 42 28 32 29 20 22 |TOR"NB(1)NB(2) "|
000004E0: 11 22 00 0B 0D 44 02 99 22 44 4F 20 59 4F 55 20 |."...D.."DO YOU |
000004F0: 57 41 4E 54 20 4E 45 58 54 20 54 52 41 43 4B 20 |WANT NEXT TRACK |
00000500: 41 4E 44 20 53 45 43 54 4F 52 22 00 1E 0D 4E 02 |AND SECTOR"...N.|
00000510: A1 5A 24 3A 8B 5A 24 B2 22 22 A7 35 39 30 00 3F |.Z$:.Z$."".590.?|
00000520: 0D 58 02 8B 5A 24 B2 22 59 22 A7 54 B2 4E 42 28 |.X..Z$."Y".T.NB(|
00000530: 31 29 3A 53 B2 4E 42 28 32 29 3A 89 33 33 30 00 |1):S.NB(2):.330.|
00000540: 4F 0D 62 02 8B 5A 24 B2 22 4E 22 A7 33 32 30 00 |O.b..Z$."N".320.|
00000550: 58 0D 6C 02 89 35 39 30 00 60 0D 8A 02 8F 2A 2A |X.l..590.`....**|
00000560: 00 7D 0D A8 02 84 31 35 2C 45 4E 2C 45 4D 24 2C |.}....15,EN,EM$,|
00000570: 45 54 2C 45 53 3A 8B 45 4E B2 30 A7 8E 00 9D 0D |ET,ES:.EN.0.....|
00000580: B2 02 99 22 12 44 49 53 4B 20 45 52 52 4F 52 92 |...".DISK ERROR.|
00000590: 22 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 A3 0D |"EN,EM$,ET,ES...|
000005A0: BC 02 80 00 AB 0D C6 02 8F 2A 2A 00 C8 0D E4 02 |.........**.....|
000005B0: 99 22 11 1D 1D 1D 1D 43 4F 4E 54 49 4E 55 45 20 |.".....CONTINUE |
000005C0: 28 59 2F 4E 29 20 3F 22 00 DB 0D EE 02 A1 5A 24 |(Y/N) ?"......Z$|
000005D0: 3A 8B 5A 24 B2 22 22 A7 37 35 30 00 E9 0D F8 02 |:.Z$."".750.....|
000005E0: 8B 5A 24 B2 22 4E 22 A7 8E 00 FA 0D 02 03 8B 5A |.Z$."N"........Z|
000005F0: 24 B3 B1 22 59 22 A7 37 35 30 00 1B 0E 0C 03 99 |$.."Y".750......|
00000600: 22 93 54 52 41 43 4B 22 20 54 20 22 20 53 45 43 |".TRACK" T " SEC|
00000610: 54 4F 52 22 53 20 22 93 22 3A 8E 00 23 0E 16 03 |TOR"S ".":..#...|
00000620: 8F 2A 2A 00 46 0E 34 03 41 31 B2 B5 28 4E AD 31 |.**.F.4.A1..(N.1|
00000630: 36 29 3A 41 24 B2 41 24 AA CA 28 48 58 24 2C 41 |6):A$.A$..(HX$,A|
00000640: 31 AA 31 2C 31 29 00 6C 0E 3E 03 41 32 B2 B5 28 |1.1,1).l.>.A2..(|
00000650: 4E AB 31 36 AC 41 31 29 3A 41 24 B2 41 24 AA CA |N.16.A1):A$.A$..|
00000660: 28 48 58 24 2C 41 32 AA 31 2C 31 29 00 7C 0E 48 |(HX$,A2.1,1).|.H|
00000670: 03 41 24 B2 41 24 AA 53 50 24 3A 8E 00 84 0E 52 |.A$.A$.SP$:....R|
00000680: 03 8F 2A 2A 00 9B 0E 7A 03 8B C6 28 43 24 29 B3 |..**...z...(C$).|
00000690: 33 32 A7 43 24 B2 22 20 22 3A 8E 00 B6 0E 8E 03 |32.C$." ":......|
000006A0: 8B C6 28 43 24 29 B3 31 32 38 B0 C6 28 43 24 29 |..(C$).128..(C$)|
000006B0: B1 31 35 39 A7 8E 00 D6 0E 98 03 43 24 B2 CA 28 |.159.......C$..(|
000006C0: 53 53 24 2C 33 AC 28 C6 28 43 24 29 AB 31 32 37 |SS$,3.(.(C$).127|
000006D0: 29 2C 33 29 3A 8E 00 00 00 |),3):.... |
..#...."...FFFFFFFFFFFFFFFFFFFFFFF".B. .
."DISPLAY BLOCKS CONTENTS".B...."EEEEEEE
EEEEEEEEEEEEEEEE":...H.SP$." ":NL$.G(0):
HX$."0123456789ABCDEF"...R.FS$."":.I.64.
95:FS$.FS$.".".G(I).".":.I.L....A$(15),N
B(2).W...D$."0"......" .S.CREEN...
......OR .....P.RINTER"......JJ$:.JJ$.""
.254.=....JJ$."S".." ..SCREEN."._.
...JJ$."P".." ..PRINTER.".Y....15,
8,15,"I".D$:. 650......4,4......2,8,2,"#
":. 650...@.."...TRACK, SECTOR";T,S...J.
.T.0.T.35.#15,"I"D$: 2: 4: 15:."END":...
.T..JJ$."S" . ."...TRACK"T" SECTOR"S:.4.
".^..15,"U1:2,"D$;T;S:.650.2.... "B-P:2,
1".G.... "M-R"G(0)G(5).J....#15,A$(0):.
A$(0)."".A$(0).NL$.{....JJ$."S".430.....
.JJ$."P".460.....K.1:NB(1).F(A$(0)).L...
.J.0.63:.J.32..710:.Z$."N".J.80:.458.W..
..I.K.3......#2,A$(I):.A$(I)."".A$(I).NL
$......K.1.I.2.NB(2).F(A$(I)). ....I:K.0
.F...A$."":B$.":":N.J.4:.790:A$.A$.":".A
.B..I.0.3:N.F(A$(I)):.790.|.D.C$.A$(I):.
850:B$.B$.C$...F..I:.JJ$."S"..A$B$...J..
J:.571...L..**...R.K.1:NB(1).F(A$(0)).I.
T..I.K.15...X..#2,A$(I):.A$(I)."".A$(I).
NL$...Z..K.1.I.2.NB(2).F(A$(I))......I:K
.0.9...A$."":B$.":":N.J.16:.790:A$.A$.":
".G....I.0.15:N.F(A$(I)):.790:.Z$."N".J.
40:.571.....C$.A$(I):.850:B$.B$.C$......
I......JJ$."T"..#4,A$B$......J:.571...;.
. MONGO...?.."NEXT TRACK AND SECTOR"NB(1
)NB(2) "."...D.."DO YOU WANT NEXT TRACK
AND SECTOR"...N..Z$:.Z$."".590.?.X..Z$."
Y".T.NB(1):S.NB(2):.330.O.B..Z$."N".320.
X.L..590.`....**.}....15,EN,EM$,ET,ES:.E
N.0........".DISK ERROR."EN,EM$,ET,ES...
......F..**.H....".....CONTINUE (Y/N) ?"
......Z$:.Z$."".750......Z$."N"........Z
$.."Y".750......".TRACK" T " SECTOR"S ".
":..#....**.F.4.A1..(N.16):A$.A$.J(HX$,A
1.1,1).L.>.A2..(N.16.A1):A$.A$.J(HX$,A2.
1,1).|.H.A$.A$.SP$:....R..**...Z..F(C$).
32.C$." ":.......F(C$).128.F(C$).159...V
...C$.J(SS$,3.(F(C$).127),3):....
> CLICK IMAGE PREVIEW FOR FULL MODAL