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

SHAKE RATTLE ROL

FILE INFORMATION

FILENAME(S): SHAKE RATTLE ROL

FILE TYPE(S): PRG

FILE SIZE: 758b

FIRST SEEN: 2025-11-30 21:23:31

APPEARS ON: 1 disk(s)

FILE HASH

a8c023f86973b1556e6302d716660851b8c3835eef12a62c328f1e6332c79442

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 43 1 SHAKE RATTLE ROL PRG DuncanTwain 23 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 23 08 64 00 8F 20  53 48 41 4B 45 2C 52 41  |..#.d.. SHAKE,RA|
00000010: 54 54 4C 45 2C 20 26 20  52 4F 4C 4C 20 2D 20 31  |TTLE, & ROLL - 1|
00000020: 35 34 31 00 47 08 6E 00  99 22 93 53 48 41 4B 45  |541.G.n..".SHAKE|
00000030: 2C 20 52 41 54 54 4C 45  20 26 20 52 4F 4C 4C 20  |, RATTLE & ROLL |
00000040: 2D 20 31 35 34 31 22 00  68 08 78 00 99 22 11 49  |- 1541".h.x..".I|
00000050: 4E 53 45 52 54 20 44 49  53 4B 45 54 54 45 20 49  |NSERT DISKETTE I|
00000060: 4E 20 44 52 49 56 45 22  00 80 08 82 00 85 22 11  |N DRIVE"......".|
00000070: 43 4C 41 54 54 45 52 20  54 52 41 43 4B 22 3B 54  |CLATTER TRACK";T|
00000080: 00 90 08 8C 00 8B 54 B3  31 B0 54 B1 33 35 A7 80  |......T.1.T.35..|
00000090: 00 AE 08 96 00 85 22 11  41 52 45 20 59 4F 55 20  |......".ARE YOU |
000000A0: 53 55 52 45 20 20 59 9D  9D 9D 22 3B 51 24 00 BD  |SURE  Y...";Q$..|
000000B0: 08 A0 00 8B 51 24 B3 B1  22 59 22 A7 80 00 CA 08  |....Q$.."Y".....|
000000C0: AA 00 9F 31 35 2C 38 2C  31 35 00 D9 08 B4 00 9F  |...15,8,15......|
000000D0: 32 2C 38 2C 32 2C 22 23  22 00 E2 08 BE 00 99 22  |2,8,2,"#"......"|
000000E0: 93 22 00 ED 08 C8 00 8F  20 53 45 45 4B 00 F6 08  |."...... SEEK...|
000000F0: D2 00 8D 33 36 30 00 17  09 DC 00 4E 53 B2 32 30  |...360.....NS.20|
00000100: AA 32 AC 28 54 B1 31 37  29 AA 28 54 B1 32 34 29  |.2.(T.17).(T.24)|
00000110: AA 28 54 B1 33 30 29 00  23 09 E6 00 81 53 B2 30  |.(T.30).#....S.0|
00000120: A4 4E 53 00 2E 09 F0 00  8F 20 52 45 41 44 00 43  |.NS...... READ.C|
00000130: 09 FA 00 98 31 35 2C 22  55 31 22 3B 32 3B 30 3B  |....15,"U1";2;0;|
00000140: 54 3B 53 00 5B 09 04 01  84 31 35 2C 45 4E 24 2C  |T;S.[....15,EN$,|
00000150: 45 4D 24 2C 45 54 24 2C  45 53 24 00 70 09 0E 01  |EM$,ET$,ES$.p...|
00000160: 99 22 54 52 41 43 4B 22  3B 54 3B 22 2D 20 22 3B  |."TRACK";T;"- ";|
00000170: 00 96 09 18 01 8B 45 4E  24 B2 22 30 30 22 A7 99  |......EN$."00"..|
00000180: 22 53 45 43 54 4F 52 22  3B 53 3B 22 3D 20 4F 4B  |"SECTOR";S;"= OK|
00000190: 22 3A 89 33 30 30 00 B6  09 22 01 99 22 53 45 43  |":.300...".."SEC|
000001A0: 54 4F 52 20 22 45 53 24  22 20 3D 20 22 45 4E 24  |TOR "ES$" = "EN$|
000001B0: 22 20 22 45 4D 24 00 BD  09 2C 01 82 53 00 C4 09  |" "EM$...,..S...|
000001C0: 36 01 A0 32 00 DC 09 40  01 84 31 35 2C 45 4E 24  |6..2...@..15,EN$|
000001D0: 2C 45 4D 24 2C 45 54 24  2C 45 53 24 00 E4 09 4A  |,EM$,ET$,ES$...J|
000001E0: 01 A0 31 35 00 EA 09 54  01 80 00 FA 09 5E 01 8F  |..15...T.....^..|
000001F0: 20 4A 4F 42 20 51 55 45  55 45 00 04 0A 68 01 54  | JOB QUEUE...h.T|
00000200: 52 59 B2 30 00 26 0A 72  01 98 31 35 2C 22 4D 2D  |RY.0.&.r..15,"M-|
00000210: 57 22 C7 28 38 29 C7 28  30 29 C7 28 32 29 C7 28  |W".(8).(0).(2).(|
00000220: 54 29 C7 28 53 29 00 46  0A 7C 01 98 31 35 2C 22  |T).(S).F.|..15,"|
00000230: 4D 2D 57 22 C7 28 31 29  C7 28 30 29 C7 28 31 29  |M-W".(1).(0).(1)|
00000240: C7 28 31 37 36 29 00 54  0A 86 01 54 52 59 B2 54  |.(176).T...TRY.T|
00000250: 52 59 AA 31 00 6A 0A 90  01 98 31 35 2C 22 4D 2D  |RY.1.j....15,"M-|
00000260: 57 22 C7 28 31 29 C7 28  30 29 00 76 0A 9A 01 A1  |W".(1).(0).v....|
00000270: 23 31 35 2C 45 24 00 89  0A A4 01 8B 45 24 B2 22  |#15,E$......E$."|
00000280: 22 A7 45 24 B2 C7 28 30  29 00 9B 0A AE 01 8B 54  |".E$..(0)......T|
00000290: 52 55 59 B2 35 30 30 89  34 36 30 00 AE 0A B8 01  |RUY.500.460.....|
000002A0: 8B C6 28 45 24 29 B1 31  32 37 89 33 39 30 00 B4  |..(E$).127.390..|
000002B0: 0A C2 01 8E 00 BB 0A CC  01 A0 32 00 D3 0A D6 01  |..........2.....|
000002C0: 84 31 35 2C 45 4E 24 2C  45 4D 24 2C 45 54 24 2C  |.15,EN$,EM$,ET$,|
000002D0: 45 53 24 00 DB 0A E0 01  A0 31 35 00 EC 0A EA 01  |ES$......15.....|
000002E0: 99 22 11 12 46 41 49 4C  45 44 92 22 00 F2 0A F4  |."..FAILED."....|
000002F0: 01 80 00 00 00 FF                                 |......          |

..#.D.. SHAKE,RATTLE, & ROLL - 1541.G.N.
.".SHAKE, RATTLE & ROLL - 1541".H.X..".I
NSERT DISKETTE IN DRIVE"......".CLATTER 
TRACK";T......T.1.T.35........".ARE YOU 
SURE  Y...";Q$... ..Q$.."Y"...J....15,8,
15.Y....2,8,2,"#"......"."...H.. SEEK...
R..360.....NS.20.2.(T.17).(T.24).(T.30).
#....S.0.NS...... READ.C....15,"U1";2;0;
T;S.[....15,EN$,EM$,ET$,ES$.P...."TRACK"
;T;"- ";......EN$."00".."SECTOR";S;"= OK
":.300...".."SECTOR "ES$" = "EN$" "EM$..
.,..S.D.6. 2...@..15,EN$,EM$,ET$,ES$...J
. 15...T.....^.. JOB QUEUE...H.TRY.0.&.R
..15,"M-W"G(8)G(0)G(2)G(T)G(S).F.|..15,"
M-W"G(1)G(0)G(1)G(176).T...TRY.TRY.1.J..
..15,"M-W"G(1)G(0).V....#15,E$......E$."
".E$.G(0)......TRUY.500.460......F(E$).1
27.390...B.....L. 2.S.V..15,EN$,EM$,ET$,
ES$..... 15......"..FAILED."..........
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL