D1
FILE INFORMATION
FILENAME(S): D1
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-12-02 00:15:03
APPEARS ON: 1 disk(s)
FILE HASH
162e398ae02828a539510290196582271f60c103bfe3d3c3feb72c6c0d78ee8d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CABANA DEMOS | D1 | PRG | Maestro | 19 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 36 08 E8 03 97 35 33 32 38 30 2C 30 3A 97 |..6....53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 97 36 35 30 2C 31 32 38 |53281,0:.650,128|
00000020: 3A 97 36 34 36 2C 31 31 3A 97 36 35 37 2C 31 32 |:.646,11:.657,12|
00000030: 38 3A 99 22 93 22 00 69 08 10 04 99 22 93 9F B9 |8:.".".i...."...|
00000040: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000050: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000060: B9 B9 B9 B9 B9 B9 B9 22 3B 00 9D 08 15 04 99 22 |.......";......"|
00000070: 12 9A 20 20 20 20 20 20 43 41 42 41 4E 41 20 44 |.. CABANA D|
00000080: 49 53 4B 20 49 4E 44 45 58 49 4E 47 20 55 54 49 |ISK INDEXING UTI|
00000090: 4C 49 54 59 20 20 20 20 20 20 92 22 3B 00 D0 08 |LITY .";...|
000000A0: 1A 04 99 22 1F B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |..."............|
000000B0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000000C0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 98 22 3B |..............";|
000000D0: 00 D6 08 1F 04 99 00 EC 08 24 04 99 22 53 45 4C |.........$.."SEL|
000000E0: 45 43 54 20 46 52 4F 4D 20 3A 11 22 00 0D 09 29 |ECT FROM :."...)|
000000F0: 04 99 22 96 12 31 92 1C 2E 20 43 48 41 4E 47 45 |.."..1... CHANGE|
00000100: 20 44 49 53 4B 20 48 45 41 44 45 52 22 00 2A 09 | DISK HEADER".*.|
00000110: 2E 04 99 22 96 12 32 92 1C 2E 20 43 48 41 4E 47 |..."..2... CHANG|
00000120: 45 20 44 49 53 4B 20 49 44 22 00 42 09 31 04 99 |E DISK ID".B.1..|
00000130: 22 96 12 33 92 1C 2E 20 54 45 52 4D 49 4E 41 54 |"..3... TERMINAT|
00000140: 45 22 00 63 09 33 04 99 22 11 1E 57 48 49 43 48 |E".c.3.."..WHICH|
00000150: 20 28 31 20 4F 52 20 32 29 20 3A 22 3B 3A 8D 31 | (1 OR 2) :";:.1|
00000160: 32 35 30 00 75 09 38 04 8B 4E 24 B2 22 31 22 A7 |250.u.8..N$."1".|
00000170: 20 31 35 30 30 00 87 09 3D 04 8B 4E 24 B2 22 32 | 1500...=..N$."2|
00000180: 22 A7 20 31 34 30 30 00 99 09 3E 04 8B 4E 24 B2 |". 1400...>..N$.|
00000190: 22 33 22 A7 20 31 36 30 30 00 A4 09 42 04 89 20 |"3". 1600...B.. |
000001A0: 31 30 34 30 00 AA 09 47 04 3A 00 BE 09 B0 04 A1 |1040...G.:......|
000001B0: 41 24 3A 8B 41 24 B2 22 22 A7 31 32 30 30 00 C4 |A$:.A$."".1200..|
000001C0: 09 B5 04 8E 00 CA 09 BA 04 3A 00 E0 09 E2 04 97 |.........:......|
000001D0: 31 39 2C 31 3A 85 4E 24 3A 97 31 39 2C 30 3A 99 |19,1:.N$:.19,0:.|
000001E0: 00 E6 09 E7 04 8E 00 EC 09 EC 04 3A 00 09 0A 14 |...........:....|
000001F0: 05 8F 20 2A 2A 2A 20 52 45 41 44 20 45 52 52 4F |.. *** READ ERRO|
00000200: 52 20 43 48 41 4E 4E 45 4C 00 1E 0A 19 05 84 31 |R CHANNEL......1|
00000210: 35 2C 45 31 2C 45 32 24 2C 45 33 2C 45 34 00 2A |5,E1,E2$,E3,E4.*|
00000220: 0A 1E 05 8B 45 31 B2 30 A7 8E 00 4A 0A 28 05 99 |....E1.0...J.(..|
00000230: 22 44 49 53 4B 20 45 52 52 4F 52 22 3A 99 22 A3 |"DISK ERROR":.".|
00000240: A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 64 0A 32 05 99 |.........".d.2..|
00000250: 22 98 45 52 52 4F 52 20 4E 55 4D 42 45 52 20 3A |".ERROR NUMBER :|
00000260: 22 3B 45 31 00 80 0A 37 05 99 22 98 45 52 52 4F |";E1...7..".ERRO|
00000270: 52 20 54 45 58 54 20 20 20 3A 20 22 3B 45 32 24 |R TEXT : ";E2$|
00000280: 00 9A 0A 3C 05 99 22 98 45 52 52 4F 52 20 54 52 |...<..".ERROR TR|
00000290: 41 43 4B 20 20 3A 22 3B 45 33 00 B4 0A 41 05 99 |ACK :";E3...A..|
000002A0: 22 98 45 52 52 4F 52 20 53 45 43 54 4F 52 20 3A |".ERROR SECTOR :|
000002B0: 22 3B 45 34 00 C1 0A 46 05 A0 31 35 3A A0 31 3A |";E4...F..15:.1:|
000002C0: 80 00 C7 0A 4B 05 3A 00 E0 0A 78 05 8F 20 2A 2A |....K.:...x.. **|
000002D0: 2A 20 43 48 41 4E 47 45 20 44 49 53 4B 20 49 44 |* CHANGE DISK ID|
000002E0: 00 13 0B 79 05 99 22 93 9F B9 B9 B9 B9 B9 B9 B9 |...y..".........|
000002F0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000300: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000310: B9 22 3B 00 47 0B 7A 05 99 22 12 9A 20 20 20 20 |.";.G.z..".. |
00000320: 20 20 43 41 42 41 4E 41 20 44 49 53 4B 20 49 4E | CABANA DISK IN|
00000330: 44 45 58 49 4E 47 20 55 54 49 4C 49 54 59 20 20 |DEXING UTILITY |
00000340: 20 20 20 20 92 22 3B 00 7A 0B 7B 05 99 22 1F B8 | .";.z.{.."..|
00000350: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000360: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000370: B8 B8 B8 B8 B8 B8 B8 98 22 3B 00 92 0B 7C 05 99 |........";...|..|
00000380: 22 1E 43 48 41 4E 47 45 20 44 49 53 4B 20 49 44 |".CHANGE DISK ID|
00000390: 98 22 00 A9 0B 7D 05 99 22 A3 A3 A3 A3 A3 A3 A3 |."...}..".......|
000003A0: A3 A3 A3 A3 A3 A3 A3 11 22 00 C0 0B 82 05 9F 31 |........"......1|
000003B0: 35 2C 38 2C 31 35 2C 22 49 22 3A 8D 31 33 30 30 |5,8,15,"I":.1300|
000003C0: 00 CF 0B 87 05 9F 31 2C 38 2C 33 2C 22 23 22 00 |......1,8,3,"#".|
000003D0: E5 0B 8C 05 98 31 35 2C 22 55 31 20 33 20 30 20 |.....15,"U1 3 0 |
000003E0: 31 38 20 30 22 00 21 0C 91 05 98 31 35 2C 22 42 |18 0".!....15,"B|
000003F0: 2D 50 20 33 20 31 36 32 22 3A A1 23 31 2C 41 24 |-P 3 162":.#1,A$|
00000400: 2C 42 24 2C 43 24 2C 44 24 2C 45 24 3A 99 22 4F |,B$,C$,D$,E$:."O|
00000410: 4C 44 20 44 49 53 4B 2D 49 44 20 49 53 20 3A 22 |LD DISK-ID IS :"|
00000420: 3B 00 35 0C 96 05 99 41 24 3B 42 24 3B 43 24 3B |;.5....A$;B$;C$;|
00000430: 44 24 3B 45 24 00 54 0C 9B 05 99 22 4E 45 57 20 |D$;E$.T...."NEW |
00000440: 44 49 53 4B 2D 49 44 20 49 53 20 3A 22 3B 3A 8D |DISK-ID IS :";:.|
00000450: 31 32 35 30 00 75 0C A0 05 8B C3 28 4E 24 29 B3 |1250.u.....(N$).|
00000460: B1 35 A7 4E 24 B2 C8 28 4E 24 AA 22 20 20 20 20 |.5.N$..(N$." |
00000470: 20 22 2C 35 29 00 A2 0C A5 05 98 31 35 2C 22 42 | ",5)......15,"B|
00000480: 2D 50 20 33 20 31 36 32 22 3A 98 31 2C 4E 24 3B |-P 3 162":.1,N$;|
00000490: 3A 98 31 35 2C 22 55 32 20 33 20 30 20 31 38 20 |:.15,"U2 3 0 18 |
000004A0: 30 22 00 AE 0C AA 05 98 31 35 2C 22 49 22 00 BF |0"......15,"I"..|
000004B0: 0C AF 05 A0 31 35 3A A0 31 3A 89 31 30 34 30 00 |....15:.1:.1040.|
000004C0: C5 0C D7 05 3A 00 E2 0C DC 05 8F 20 2A 2A 2A 20 |....:...... *** |
000004D0: 43 48 41 4E 47 45 20 44 49 53 4B 20 48 45 41 44 |CHANGE DISK HEAD|
000004E0: 45 52 00 15 0D DD 05 99 22 93 9F B9 B9 B9 B9 B9 |ER......".......|
000004F0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000500: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000510: B9 B9 B9 22 3B 00 49 0D DE 05 99 22 12 9A 20 20 |...";.I....".. |
00000520: 20 20 20 20 43 41 42 41 4E 41 20 44 49 53 4B 20 | CABANA DISK |
00000530: 49 4E 44 45 58 49 4E 47 20 55 54 49 4C 49 54 59 |INDEXING UTILITY|
00000540: 20 20 20 20 20 20 92 22 3B 00 7C 0D DF 05 99 22 | .";.|...."|
00000550: 1F B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000560: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000570: B8 B8 B8 B8 B8 B8 B8 B8 B8 98 22 3B 00 98 0D E0 |..........";....|
00000580: 05 99 22 1E 43 48 41 4E 47 45 20 44 49 53 4B 20 |..".CHANGE DISK |
00000590: 48 45 41 44 45 52 98 22 00 B3 0D E1 05 99 22 A3 |HEADER."......".|
000005A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000005B0: A3 11 22 00 CA 0D E6 05 9F 31 35 2C 38 2C 31 35 |.."......15,8,15|
000005C0: 2C 22 49 22 3A 8D 31 33 30 30 00 D9 0D EB 05 9F |,"I":.1300......|
000005D0: 31 2C 38 2C 33 2C 22 23 22 00 EF 0D F0 05 98 31 |1,8,3,"#"......1|
000005E0: 35 2C 22 55 31 20 33 20 30 20 31 38 20 30 22 00 |5,"U1 3 0 18 0".|
000005F0: 26 0E 0E 06 98 31 35 2C 22 42 2D 50 20 33 20 31 |&....15,"B-P 3 1|
00000600: 34 34 22 3A 44 4E 24 B2 22 22 3A 81 4C B2 31 A4 |44":DN$."":.L.1.|
00000610: 31 36 3A A1 23 31 2C 41 24 3A 44 4E 24 B2 44 4E |16:.#1,A$:DN$.DN|
00000620: 24 AA 41 24 3A 82 00 48 0E 13 06 56 B2 30 3A 99 |$.A$:..H...V.0:.|
00000630: 22 4F 4C 44 20 44 49 53 4B 2D 4E 41 4D 45 20 49 |"OLD DISK-NAME I|
00000640: 53 20 3A 22 3B 44 4E 24 00 66 0E 18 06 99 22 4E |S :";DN$.f...."N|
00000650: 45 57 20 44 49 53 4B 2D 4E 41 4D 45 20 3A 22 3B |EW DISK-NAME :";|
00000660: 3A 8D 31 32 35 30 00 87 0E 1D 06 4E 24 B2 C8 28 |:.1250.....N$..(|
00000670: 4E 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 |N$." |
00000680: 20 20 22 2C 31 36 29 00 9B 0E 22 06 98 31 35 2C | ",16)..."..15,|
00000690: 22 42 2D 50 20 33 20 31 34 34 22 00 A6 0E 23 06 |"B-P 3 144"...#.|
000006A0: 98 31 2C 4E 24 3B 00 BC 0E 24 06 98 31 35 2C 22 |.1,N$;...$..15,"|
000006B0: 55 32 20 33 20 30 20 31 38 20 30 22 00 C8 0E 27 |U2 3 0 18 0"...'|
000006C0: 06 98 31 35 2C 22 49 22 00 D9 0E 2C 06 A0 31 35 |..15,"I"...,..15|
000006D0: 3A A0 31 3A 89 31 30 34 30 00 DF 0E 3B 06 3A 00 |:.1:.1040...;.:.|
000006E0: FC 0E 40 06 8F 20 2A 2A 2A 20 43 48 41 4E 47 45 |..@.. *** CHANGE|
000006F0: 20 44 49 53 4B 20 48 45 41 44 45 52 00 02 0F 4A | DISK HEADER...J|
00000700: 06 80 00 00 00 |..... |
..6....53280,0:.53281,0:.650,128:.646,11
:.657,128:.".".I...."...................
.......................";......"..
CABANA DISK INDEXING UTILITY .";.P.
..."....................................
......";.V.......$.."SELECT FROM :."...)
.."..1... CHANGE DISK HEADER".*...."..2.
.. CHANGE DISK ID".B.1.."..3... TERMINAT
E".C.3.."..WHICH (1 OR 2) :";:.1250.U.8.
.N$."1". 1500...=..N$."2". 1400...>..N$.
"3". 1600...B.. 1040...G.:......A$:.A$."
".1200.D.....J...:......19,1:.N$:.19,0:.
...........:...... *** READ ERROR CHANNE
L......15,E1,E2$,E3,E4.*....E1.0...J.(..
"DISK ERROR":."..........".D.2..".ERROR
NUMBER :";E1...7..".ERROR TEXT : ";E2$
...<..".ERROR TRACK :";E3...A..".ERROR
SECTOR :";E4.A.F. 15: 1:..G.K.:...X.. **
* CHANGE DISK ID...Y..".................
.........................";.G.Z.."..
CABANA DISK INDEXING UTILITY .";.
Z.{.."..................................
........";...|..".CHANGE DISK ID."...}..
"..............."......15,8,15,"I":.1300
.O....1,8,3,"#"......15,"U1 3 0 18 0".!.
...15,"B-P 3 162":.#1,A$,B$,C$,D$,E$:."O
LD DISK-ID IS :";.5....A$;B$;C$;D$;E$.T.
..."NEW DISK-ID IS :";:.1250.U. ..C(N$).
.5.N$.H(N$." ",5)......15,"B-P 3 162
":.1,N$;:.15,"U2 3 0 18 0"......15,"I"..
... 15: 1:.1040.E.W.:...... *** CHANGE D
ISK HEADER......".......................
...................";.I....".. CABA
NA DISK INDEXING UTILITY .";.|...."
........................................
..";......".CHANGE DISK HEADER."......".
..................".J....15,8,15,"I":.13
00.Y....1,8,3,"#"......15,"U1 3 0 18 0".
&....15,"B-P 3 144":DN$."":.L.1.16:.#1,A
$:DN$.DN$.A$:..H...V.0:."OLD DISK-NAME I
S :";DN$.F...."NEW DISK-NAME :";:.1250..
...N$.H(N$." ",16)..."..15,
"B-P 3 144"...#..1,N$;...$..15,"U2 3 0 1
8 0".H.'..15,"I".Y.,. 15: 1:.1040...;.:.
..@.. *** CHANGE DISK HEADER...J.....
> CLICK IMAGE PREVIEW FOR FULL MODAL