1541 SAVER.C
FILE INFORMATION
FILENAME(S): 1541 SAVER.C
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 21:07:08
APPEARS ON: 1 disk(s)
FILE HASH
8e96498cf9313bac708dbcda3c59b0686b89959a130dd640eaba29e7670ff72f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG FEB 85 C | 1541 SAVER.C | PRG | DuncanTwain | 34 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 0A 00 3A 00 56 08 14 00 8F 2A 2A 2A |......:.V....***| 00000010: 20 54 48 49 53 20 52 4F 55 54 49 4E 45 20 57 49 | THIS ROUTINE WI| 00000020: 4C 4C 20 50 52 45 56 45 4E 54 20 2A 2A 2A 20 20 |LL PREVENT *** | 00000030: 20 20 20 20 20 2A 2A 2A 20 54 48 45 20 44 49 53 | *** THE DIS| 00000040: 4B 20 48 45 41 44 20 46 52 4F 4D 20 20 20 20 20 |K HEAD FROM | 00000050: 20 20 20 2A 2A 2A 00 A5 08 1E 00 8F 2A 2A 2A 20 | ***......*** | 00000060: 43 48 41 54 54 45 52 49 4E 47 20 41 47 41 49 4E |CHATTERING AGAIN| 00000070: 53 54 20 54 48 45 20 20 20 20 2A 2A 2A 20 20 20 |ST THE *** | 00000080: 20 20 20 20 2A 2A 2A 20 53 54 4F 50 20 49 4E 20 | *** STOP IN | 00000090: 54 48 45 20 44 52 49 56 45 20 57 48 45 4E 20 49 |THE DRIVE WHEN I| 000000A0: 54 20 2A 2A 2A 00 F4 08 28 00 8F 2A 2A 2A 20 49 |T ***...(..*** I| 000000B0: 53 20 4C 4F 41 44 49 4E 47 20 41 20 50 52 4F 47 |S LOADING A PROG| 000000C0: 52 41 4D 20 46 52 4F 4D 20 2A 2A 2A 20 20 20 20 |RAM FROM *** | 000000D0: 20 20 20 2A 2A 2A 20 41 20 44 4F 53 20 50 52 4F | *** A DOS PRO| 000000E0: 54 45 43 54 45 44 20 44 49 53 4B 2E 20 20 20 20 |TECTED DISK. | 000000F0: 20 2A 2A 2A 00 FA 08 32 00 3A 00 49 09 3C 00 8F | ***...2.:.I.<..| 00000100: 2A 2A 2A 20 41 4C 54 48 4F 55 47 48 20 54 48 45 |*** ALTHOUGH THE| 00000110: 20 44 4F 53 20 20 20 20 20 20 20 20 20 20 2A 2A | DOS **| 00000120: 2A 20 20 20 20 20 20 20 2A 2A 2A 20 50 52 4F 54 |* *** PROT| 00000130: 45 43 54 49 4F 4E 20 53 43 48 45 4D 45 20 49 53 |ECTION SCHEME IS| 00000140: 20 55 53 45 44 20 2A 2A 2A 00 98 09 46 00 8F 2A | USED ***...F..*| 00000150: 2A 2A 20 46 52 45 51 55 45 4E 54 4C 59 20 4F 4E |** FREQUENTLY ON| 00000160: 20 44 49 53 4B 53 20 4E 4F 57 2C 20 20 2A 2A 2A | DISKS NOW, ***| 00000170: 20 20 20 20 20 20 20 2A 2A 2A 20 43 4F 4E 54 49 | *** CONTI| 00000180: 4E 55 41 4C 20 42 41 4E 47 49 4E 47 20 4F 46 20 |NUAL BANGING OF | 00000190: 54 48 45 20 20 2A 2A 2A 00 E7 09 50 00 8F 2A 2A |THE ***...P..**| 000001A0: 2A 20 52 45 41 44 2F 57 52 49 54 45 20 48 45 41 |* READ/WRITE HEA| 000001B0: 44 20 41 47 41 49 4E 53 54 20 20 20 2A 2A 2A 20 |D AGAINST *** | 000001C0: 20 20 20 20 20 20 2A 2A 2A 20 54 48 45 20 53 54 | *** THE ST| 000001D0: 4F 50 20 49 53 20 42 4F 55 4E 44 20 54 4F 20 20 |OP IS BOUND TO | 000001E0: 20 20 20 20 2A 2A 2A 00 36 0A 5A 00 8F 2A 2A 2A | ***.6.Z..***| 000001F0: 20 48 41 53 54 45 4E 20 4D 49 53 41 4C 49 4E 45 | HASTEN MISALINE| 00000200: 4D 45 4E 54 20 4F 46 20 20 20 20 2A 2A 2A 20 20 |MENT OF *** | 00000210: 20 20 20 20 20 2A 2A 2A 20 54 48 45 20 48 45 41 | *** THE HEA| 00000220: 44 2E 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |D. THIS PROGRAM | 00000230: 20 20 20 2A 2A 2A 00 85 0A 5B 00 8F 2A 2A 2A 20 | ***...[..*** | 00000240: 53 48 4F 55 4C 44 20 42 45 20 52 55 4E 20 46 49 |SHOULD BE RUN FI| 00000250: 52 53 54 2C 20 41 4E 44 20 20 2A 2A 2A 20 20 20 |RST, AND *** | 00000260: 20 20 20 20 2A 2A 2A 20 54 48 45 4E 20 4C 4F 41 | *** THEN LOA| 00000270: 44 20 41 4E 44 20 52 55 4E 20 54 48 45 20 44 4F |D AND RUN THE DO| 00000280: 53 20 2A 2A 2A 00 AC 0A 5C 00 8F 2A 2A 2A 20 50 |S ***...\..*** P| 00000290: 52 4F 54 45 43 54 45 44 20 44 49 53 4B 2E 20 20 |ROTECTED DISK. | 000002A0: 20 20 20 20 20 20 20 20 20 2A 2A 2A 00 B2 0A 5D | ***...]| 000002B0: 00 3A 00 D9 0A 5E 00 8F 2A 2A 2A 20 54 41 2D 44 |.:...^..*** TA-D| 000002C0: 41 21 21 20 4E 4F 20 43 48 41 54 54 45 52 21 20 |A!! NO CHATTER! | 000002D0: 20 20 20 20 20 20 2A 2A 2A 00 DF 0A 5F 00 3A 00 | ***..._.:.| 000002E0: 2E 0B 60 00 8F 2A 2A 2A 20 54 48 41 4E 4B 53 20 |..`..*** THANKS | 000002F0: 54 4F 20 47 49 4C 42 45 52 54 20 48 45 4C 4C 41 |TO GILBERT HELLA| 00000300: 4E 44 20 2A 2A 2A 20 20 20 20 20 20 20 2A 2A 2A |ND *** ***| 00000310: 20 46 4F 52 20 44 49 53 43 4F 56 45 52 49 4E 47 | FOR DISCOVERING| 00000320: 20 54 48 49 53 2C 20 41 4E 44 20 2A 2A 2A 00 7D | THIS, AND ***.}| 00000330: 0B 61 00 8F 2A 2A 2A 20 45 53 50 45 43 49 41 4C |.a..*** ESPECIAL| 00000340: 4C 59 20 46 4F 52 20 53 48 41 52 49 4E 47 20 49 |LY FOR SHARING I| 00000350: 54 20 2A 2A 2A 20 20 20 20 20 20 20 2A 2A 2A 20 |T *** *** | 00000360: 55 53 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |US. | 00000370: 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 00 CC 0B | ***...| 00000380: 62 00 8F 2A 2A 2A 20 42 4F 42 20 43 4F 4B 45 4C |b..*** BOB COKEL| 00000390: 2C 20 39 30 36 20 57 20 36 54 48 20 41 56 45 20 |, 906 W 6TH AVE | 000003A0: 20 2A 2A 2A 20 20 20 20 20 20 20 2A 2A 2A 20 4D | *** *** M| 000003B0: 4F 4E 4D 4F 55 54 48 2C 20 49 4C 4C 2C 20 55 53 |ONMOUTH, ILL, US| 000003C0: 41 20 36 31 34 36 32 20 20 2A 2A 2A 00 D2 0B 63 |A 61462 ***...c| 000003D0: 00 3A 00 0B 0C 64 00 97 35 33 32 38 30 2C 30 3A |.:...d..53280,0:| 000003E0: 97 35 33 32 38 31 2C 30 3A 99 22 93 22 3A 99 A3 |.53281,0:.".":..| 000003F0: 35 29 22 31 35 34 31 20 53 41 56 45 52 20 42 59 |5)"1541 SAVER BY| 00000400: 20 42 4F 42 20 43 4F 4B 45 4C 22 00 53 0C 6E 00 | BOB COKEL".S.n.| 00000410: 99 22 90 11 4F D0 31 35 2C 38 2C 31 35 3A 50 D2 |."..O.15,8,15:P.| 00000420: 31 35 2C 22 C7 28 33 34 29 22 4D 2D 57 22 C7 28 |15,".(34)"M-W".(| 00000430: 33 34 29 22 3B 43 C8 28 31 30 36 29 43 C8 28 30 |34)";C.(106)C.(0| 00000440: 29 43 C8 28 31 29 43 C8 28 31 33 33 29 3A 43 4C |)C.(1)C.(133):CL| 00000450: CF 31 35 00 6E 0C 78 00 99 22 13 9F 22 3A 97 36 |.15.n.x.."..":.6| 00000460: 33 31 2C 31 33 3A 97 31 39 38 2C 31 3A 80 00 B8 |31,13:.198,1:...| 00000470: 0C 8C 00 8F 3F 22 05 11 4F D0 31 35 2C 38 2C 31 |....?"..O.15,8,1| 00000480: 35 2C 22 43 48 52 24 28 33 34 29 22 4D 2D 57 22 |5,"CHR$(34)"M-W"| 00000490: 43 48 52 24 28 33 34 29 22 3B 43 C8 28 31 30 36 |CHR$(34)";C.(106| 000004A0: 29 43 C8 28 30 29 43 C8 28 31 29 43 C8 28 31 33 |)C.(0)C.(1)C.(13| 000004B0: 33 29 3A 43 4C CF 31 35 00 00 00 |3):CL.15... |
......:.V....*** THIS ROUTINE WILL PREVE
NT *** *** THE DISK HEAD FROM
***......*** CHATTERING AGAINST THE
*** *** STOP IN THE DRIVE WHEN I
T ***...(..*** IS LOADING A PROGRAM FROM
*** *** A DOS PROTECTED DISK.
***...2.:.I.<..*** ALTHOUGH THE DOS
*** *** PROTECTION SCHEME IS
USED ***...F..*** FREQUENTLY ON DISKS N
OW, *** *** CONTINUAL BANGING OF
THE ***...P..*** READ/WRITE HEAD AGAINS
T *** *** THE STOP IS BOUND TO
***.6.Z..*** HASTEN MISALINEMENT OF
*** *** THE HEAD. THIS PROGRAM
***...[..*** SHOULD BE RUN FIRST, AND
*** *** THEN LOAD AND RUN THE DO
S ***...\..*** PROTECTED DISK.
***...].:.Y.^..*** TA-DA!! NO CHATTER!
***..._.:...`..*** THANKS TO GILBE
RT HELLAND *** *** FOR DISCOVERING
THIS, AND ***.}.A..*** ESPECIALLY FOR S
HARING IT *** *** US.
***.L.B..*** BOB COKEL, 906 W
6TH AVE *** *** MONMOUTH, ILL, US
A 61462 ***.R.C.:...D..53280,0:.53281,0
:.".":..5)"1541 SAVER BY BOB COKEL".S.N.
."..OP15,8,15:PR15,"G(34)"M-W"G(34)";CH(
106)CH(0)CH(1)CH(133):CLO15.N.X.."..":.6
31,13:.198,1:.......?"..OP15,8,15,"CHR$(
34)"M-W"CHR$(34)";CH(106)CH(0)CH(1)CH(13
3):CLO15...
> CLICK IMAGE PREVIEW FOR FULL MODAL