SUB.DISK NAME
FILE INFORMATION
FILENAME(S): SUB.DISK NAME
FILE TYPE(S): PRG
FILE SIZE: 1.3K
FIRST SEEN: 2025-11-02 17:01:56
APPEARS ON: 1 disk(s)
FILE HASH
46f510d841491068cda10d80b67d920d7c2a4213c0e19391f481950f29072494
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MISC02 | SUB.DISK NAME | PRG | Treasure Chest - Spook | 9 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 AE 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 B8 01 8F 20 2A 20 |*******.M.... * |
00000030: 54 48 45 20 4E 45 58 54 20 52 4F 55 54 49 4E 45 |THE NEXT ROUTINE|
00000040: 20 57 49 4C 4C 20 52 45 41 44 20 20 2A 00 73 08 | WILL READ *.s.|
00000050: C2 01 8F 20 2A 20 4F 52 20 43 48 41 4E 47 45 20 |... * OR CHANGE |
00000060: 54 48 45 20 43 55 52 52 45 4E 54 20 44 49 53 4B |THE CURRENT DISK|
00000070: 2D 20 2A 00 99 08 CC 01 8F 20 2A 20 4E 41 4D 45 |- *...... * NAME|
00000080: 20 4F 52 20 44 49 53 4B 2D 49 44 2E 2E 2E 2E 2E | OR DISK-ID.....|
00000090: 2E 2E 2E 2E 2E 2E 2E 20 2A 00 BF 08 D6 01 8F 20 |....... *...... |
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000000C0: C5 08 E0 01 8F 00 CE 08 EA 01 99 22 93 22 00 E9 |..........."."..|
000000D0: 08 F4 01 55 24 B2 22 30 22 3A 42 47 B2 C5 28 55 |...U$."0":BG..(U|
000000E0: 24 29 3A 48 54 24 B2 55 24 00 FC 08 FE 01 8B 28 |$):HT$.U$......(|
000000F0: 42 47 AF 32 35 34 29 A7 89 35 30 30 00 30 09 08 |BG.254)..500.0..|
00000100: 02 99 22 05 20 20 20 56 49 45 57 2F 43 48 41 4E |..". VIEW/CHAN|
00000110: 47 45 20 44 49 53 4B 2D 12 9E 4E 05 92 41 4D 45 |GE DISK-..N..AME|
00000120: 20 4F 52 20 44 49 53 4B 2D 12 9E 49 05 92 44 22 | OR DISK-..I..D"|
00000130: 00 38 09 12 02 A1 59 24 00 58 09 1C 02 8B 59 24 |.8....Y$.X....Y$|
00000140: B3 B1 22 4E 22 AF 59 24 B3 B1 22 49 22 A7 8D 32 |.."N".Y$.."I"..2|
00000150: 30 39 30 3A 89 35 33 30 00 67 09 26 02 99 3A 9F |090:.530.g.&..:.|
00000160: 31 35 2C 38 2C 31 35 00 71 09 30 02 9D 31 35 2C |15,8,15.q.0..15,|
00000170: 3B 00 83 09 3A 02 98 31 35 2C 28 22 49 22 AA 48 |;...:..15,("I".H|
00000180: 54 24 29 00 92 09 44 02 9F 31 2C 38 2C 33 2C 22 |T$)...D..1,8,3,"|
00000190: 23 22 00 9C 09 4E 02 9D 31 35 2C 3B 00 A9 09 58 |#"...N..15,;...X|
000001A0: 02 99 22 55 31 3A 33 22 3B 00 B2 09 62 02 99 42 |.."U1:3";...b..B|
000001B0: 47 3B 00 C2 09 6C 02 98 31 35 2C 22 2C 31 38 2C |G;...l..15,",18,|
000001C0: 30 22 00 D4 09 76 02 8B 20 59 24 B2 22 4E 22 A7 |0"...v.. Y$."N".|
000001D0: 89 38 36 30 00 DE 09 80 02 9D 31 35 2C 3B 00 F2 |.860......15,;..|
000001E0: 09 8A 02 98 31 35 2C 22 42 2D 50 3A 33 2C 31 36 |....15,"B-P:3,16|
000001F0: 32 22 00 19 0A 94 02 A1 23 31 2C 41 24 3A A1 23 |2"......#1,A$:.#|
00000200: 31 2C 42 24 3A A1 23 31 2C 43 24 3A A1 23 31 2C |1,B$:.#1,C$:.#1,|
00000210: 44 24 3A A1 23 31 2C 45 24 00 3D 0A 9E 02 99 22 |D$:.#1,E$.=...."|
00000220: 93 11 05 20 20 20 43 55 52 52 45 4E 54 20 44 49 |... CURRENT DI|
00000230: 53 4B 2D 49 44 20 49 53 3A 20 12 22 3B 00 5E 0A |SK-ID IS: .";.^.|
00000240: A8 02 99 41 24 3B 3A 99 42 24 3B 3A 99 43 24 3B |...A$;:.B$;:.C$;|
00000250: 3A 99 44 24 3B 3A 99 45 24 3A 99 22 9E 22 00 68 |:.D$;:.E$:.".".h|
00000260: 0A B2 02 8D 31 31 31 30 00 98 0A BC 02 99 22 11 |....1110......".|
00000270: 05 20 45 4E 54 45 52 20 4E 45 57 20 44 49 53 4B |. ENTER NEW DISK|
00000280: 2D 49 44 20 28 4D 41 58 20 35 20 43 48 41 52 41 |-ID (MAX 5 CHARA|
00000290: 43 54 45 52 53 29 11 22 00 A1 0A C6 02 85 42 47 |CTERS)."......BG|
000002A0: 24 00 C5 0A D0 02 8B 20 C3 28 42 47 24 29 B3 B1 |$...... .(BG$)..|
000002B0: 34 20 A7 20 49 24 B2 C8 28 28 42 47 24 AA 22 20 |4 . I$..((BG$." |
000002C0: 22 29 2C 35 29 00 CF 0A DA 02 9D 31 35 2C 3B 00 |"),5)......15,;.|
000002D0: E3 0A E4 02 98 31 35 2C 22 42 2D 50 3A 33 2C 31 |.....15,"B-P:3,1|
000002E0: 36 32 22 00 EC 0A EE 02 9D 31 2C 3B 00 F6 0A F8 |62"......1,;....|
000002F0: 02 99 42 47 24 3B 00 FF 0A 02 03 98 31 2C 3B 00 |..BG$;......1,;.|
00000300: 09 0B 0C 03 9D 31 35 2C 3B 00 16 0B 16 03 99 22 |.....15,;......"|
00000310: 55 32 3A 33 22 3B 00 1F 0B 20 03 99 42 47 3B 00 |U2:3";... ..BG;.|
00000320: 2F 0B 2A 03 98 31 35 2C 22 2C 31 38 2C 30 22 00 |/.*..15,",18,0".|
00000330: 4B 0B 34 03 49 24 B2 28 22 49 22 AA CA 28 C4 28 |K.4.I$.("I"..(.(|
00000340: 42 47 29 2C 32 2C 32 35 35 29 29 00 55 0B 3E 03 |BG),2,255)).U.>.|
00000350: 9D 31 35 2C 3B 00 60 0B 48 03 98 31 35 2C 49 24 |.15,;.`.H..15,I$|
00000360: 00 78 0B 52 03 A0 31 3A A0 31 35 3A 99 22 9E 22 |.x.R..1:.15:."."|
00000370: 3A 8D 32 30 36 30 3A 8E 00 82 0B 5C 03 9D 31 35 |:.2060:....\..15|
00000380: 2C 3B 00 96 0B 66 03 98 31 35 2C 22 42 2D 50 3A |,;...f..15,"B-P:|
00000390: 33 2C 31 34 34 22 00 A1 0B 70 03 44 4E 24 B2 22 |3,144"...p.DN$."|
000003A0: 22 00 A9 0B 7A 03 4C B2 31 00 B5 0B 84 03 81 4C |"...z.L.1......L|
000003B0: B2 4C A4 31 36 00 C0 0B 8E 03 A1 23 31 2C 41 24 |.L.16......#1,A$|
000003C0: 00 D1 0B 98 03 44 4E 24 B2 28 44 4E 24 AA 41 24 |.....DN$.(DN$.A$|
000003D0: 29 00 D7 0B A2 03 82 00 FB 0B AC 03 99 22 93 11 |)............"..|
000003E0: 05 20 43 55 52 52 45 4E 54 20 44 49 53 4B 2D 4E |. CURRENT DISK-N|
000003F0: 41 4D 45 20 49 53 3A 20 12 22 3B 00 0F 0C B6 03 |AME IS: .";.....|
00000400: 99 44 4E 24 3A 99 22 9E 22 3A 8D 31 31 31 30 00 |.DN$:.".":.1110.|
00000410: 40 0C C0 03 99 22 11 05 45 4E 54 45 52 20 4E 45 |@...."..ENTER NE|
00000420: 57 20 44 49 53 4B 2D 4E 41 4D 45 20 28 4D 41 58 |W DISK-NAME (MAX|
00000430: 20 31 36 20 43 48 41 52 41 43 54 45 52 53 29 22 | 16 CHARACTERS)"|
00000440: 00 4A 0C CA 03 99 22 11 1D 22 00 53 0C D4 03 85 |.J...."..".S....|
00000450: 4E 44 24 00 59 0C DE 03 99 00 7E 0C E8 03 4E 44 |ND$.Y.....~...ND|
00000460: 24 B2 C8 28 28 4E 44 24 AA 22 20 20 20 20 20 20 |$..((ND$." |
00000470: 20 20 20 20 20 20 20 20 22 29 2C 31 36 29 00 88 | "),16)..|
00000480: 0C F2 03 9D 31 35 2C 3B 00 9C 0C FC 03 98 31 35 |....15,;......15|
00000490: 2C 22 42 2D 50 3A 33 2C 31 34 34 22 00 A5 0C 06 |,"B-P:3,144"....|
000004A0: 04 9D 31 2C 3B 00 AF 0C 10 04 99 4E 44 24 3B 00 |..1,;......ND$;.|
000004B0: B8 0C 1A 04 98 31 2C 3B 00 C2 0C 24 04 9D 31 35 |.....1,;...$..15|
000004C0: 2C 3B 00 CF 0C 2E 04 99 22 55 32 3A 33 22 3B 00 |,;......"U2:3";.|
000004D0: D8 0C 38 04 99 42 47 3B 00 E8 0C 42 04 98 31 35 |..8..BG;...B..15|
000004E0: 2C 22 2C 31 38 2C 30 22 00 F1 0C 4C 04 89 38 32 |,",18,0"...L..82|
000004F0: 30 00 1E 0D 56 04 99 22 11 11 1D 1D 1D 1D 44 4F |0...V.."......DO|
00000500: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 43 48 41 | YOU WANT TO CHA|
00000510: 4E 47 45 20 49 54 3F 20 12 59 2F 4E 92 22 00 26 |NGE IT? .Y/N.".&|
00000520: 0D 60 04 A1 58 24 00 41 0D 6A 04 8B 58 24 B3 B1 |.`..X$.A.j..X$..|
00000530: 22 59 22 AF 58 24 B3 B1 22 4E 22 A7 89 31 31 32 |"Y".X$.."N"..112|
00000540: 30 00 5A 0D 74 04 8B 58 24 B2 22 4E 22 A7 A0 31 |0.Z.t..X$."N"..1|
00000550: 3A A0 31 35 3A 9C 3A 89 32 30 00 60 0D 7E 04 8E |:.15:.:.20.`.~..|
00000560: 00 00 00 |... |
..'.... *******************************.
M.... * THE NEXT ROUTINE WILL READ *.S.
B.. * OR CHANGE THE CURRENT DISK- *...L.
. * NAME OR DISK-ID............ *...V..
*******************************.E.....N.
...".".....U$."0":BG.E(U$):HT$.U$......(
BG.254)..500.0....". VIEW/CHANGE DISK-
..N..AME OR DISK-..I..D".8....Y$.X....Y$
.."N".Y$.."I"..2090:.530.G.&..:.15,8,15.
Q.0..15,;...:..15,("I".HT$)...D..1,8,3,"
#"...N..15,;...X.."U1:3";...B..BG;.B.L..
15,",18,0".T.V.. Y$."N"..860......15,;..
....15,"B-P:3,162"......#1,A$:.#1,B$:.#1
,C$:.#1,D$:.#1,E$.=...."... CURRENT DI
SK-ID IS: .";.^....A$;:.B$;:.C$;:.D$;:.E
$:.".".H....1110......".. ENTER NEW DISK
-ID (MAX 5 CHARACTERS)."...F..BG$.E.P..
C(BG$)..4 . I$.H((BG$." "),5).O.Z..15,;.
.....15,"B-P:3,162"......1,;......BG$;..
....1,;......15,;......"U2:3";... ..BG;.
/.*..15,",18,0".K.4.I$.("I".J(D(BG),2,25
5)).U.>..15,;.`.H..15,I$.X.R. 1: 15:."."
:.2060:....\..15,;...F..15,"B-P:3,144"..
.P.DN$.""...Z.L.1......L.L.16......#1,A$
.Q...DN$.(DN$.A$).W.........."... CURREN
T DISK-NAME IS: .";......DN$:.".":.1110.
@...."..ENTER NEW DISK-NAME (MAX 16 CHAR
ACTERS)".J.J.."..".S.T..ND$.Y.....~...ND
$.H((ND$." "),16)......15,;
......15,"B-P:3,144"......1,;......ND$;.
.....1,;.B.$..15,;.O...."U2:3";.X.8..BG;
...B..15,",18,0"...L..820...V.."......DO
YOU WANT TO CHANGE IT? .Y/N.".&.`..X$.A
.J..X$.."Y".X$.."N"..1120.Z.T..X$."N". 1
: 15:.:.20.`.~.....
> CLICK IMAGE PREVIEW FOR FULL MODAL