******************************************************************
*** ***
*** comp.binaries.cbm is a moderated binaries- ***
*** only newsgroup (no discussion or ***
*** crossposting allowed) for Commodore 8-bits ***
*** ***
*** For information on comp.binaries.cbm visit ***
***
http://www.floodgap.com/comp.binaries.cbm/ ***
*** ***
*** This file is available via mailing list at ***
***
http://lists.trikaliotis.net/listinfo/comp-binaries-cbm/ ***
*** to list subscribers ***
*** Allow time for submission to be received ***
*** ***
******************************************************************
* One from the Vault is a collection of frequently requested, useful or just
plain interesting past posts sent to comp.binaries.cbm, as archived by the
moderators. If you have a request, please send it to the address in the
headers. In addition to being selected and reposted by moderation staff,
some of these postings are regularly posted on Mondays and Fridays on a
rotating schedule.
Take care when replying to these messages, as many were posted years ago.
From: John Iannetta <[email protected]>
Reply-to: John Iannetta <[email protected]>
X-Original-Posting-Date: Mon, 7 Sep 1998 10:52:37 -0400
[ Converted from PETSCII by hand -- Moderator ]
This is DRIVEAID.BIN, uuencoded. It is a program for the Commodore-64 and the 1541/1571 drive. A one-block file is written to disk; you select which of
two things that you want the file to do. One option is to disable bumps,
useful for running copy-protected programs. The other option is to instruct
DOS to make every effort to read sectors. That can be useful when hard-to-read sectors start appearing in important files. The idea is to use either a disk-copy or a file-copy utility to copy the file, and then get rid of it.
Once you have the one-block file, do a:
LOAD"FILENAME",D,1 <RETURN>
(where D is the drive device number) to do the "memory-write" to DOS address 106. Don't try to run the file, just loading it does the job. And any BASIC program in memory is preserved. Docs included with this program.
begin 644 driveaid.bin M`0@M"`H`ES4U+"XZES4V+#$V,#J<.E$DLL<H,S0I.DTDLL<H,3,I.IXR-S8U M`#<(%`"9(I..(@!>"!X`F2)%3E1%4B!$25-+($12259%($1%5DE#12!.54U" M15(N(@!Y""@`F2(1*$5.5$52(#`@5$\@15A)5"XI(@"0"#(`F2(1("`XD2(Z MA40ZBT2R+J>``+T(/`"+1+,TL$2Q,S"GF2*3$DE,3$5'04P@1$5624-%($Y5 M34)%4B(ZB3,P`/4(1@"?,34L1"PQ-3J@,34ZBU-4IYDBDQ(_1$5624-%(CM$ M.R*=($Y/5"!04D5314Y4(CJ),S``"`E0`)\Q-2Q$+#$U.IDBDR([`",)6@"9 M(A%%3E1%4B!!($9)3$5.04U%+A$B`#D)9`!&)+(B(CJ%1B0ZBT8DIS$R,`!' M"6X`F3J@,34ZB3(P`&D)>`"9(A%04D534R!$(%1/($1)4T%"3$4@0E5-4%,N M(@","8(`F2(14%)%4U,@4B!43R!214-/5D52(%-%0U1/4BXB`*L)C`"A020Z MBT$DLB)$(J>7,C8Y,BPQ,S,ZB3$W,`#$"98`BT$DLB)2(J>7,C8Y,BPP.HDQ M-S``S0F@`(DQ-#``ZPFJ`)\X+$0L,2Q&)#J--3`P.HM&IZ`X.HDQ,3``(PJT M`)DBDU=2251)3D<@(CM1)#M&)#M1)#LB+BXN(CLZGC(W-#`ZF:,S,RD[(BXN M+D1/3D4B.P`L"KX`B3$Q,`!`"O0!A#$U+$HD+$\D+$@D+$XD`'0*_@%&LBXZ MBTHDL[$B,#`BIYDBDQ(B.THD.R(L(CM/)#LB+"([2"0[(BPB.TXD.D:R,0!Z M"@@"C@```,X"32U7:@`!!:D'HLZ@`B"]_ZD/J*:Z(+K_(,#_J0\@P_^E(FD" MA2VE(VD`A2X@4^1,>^.+X]4"H@@@R?^BR+VT"2#2_^C0]R#,_ZD(3,/_`*E@ MA8H@B@`XH`"$D+$MA0*8D2VZBND"JIIH:;>%_:IH:0"%_JB*:2"JF&D`J(:; MA)R*:7:%^YAI`(7\BFD?JIAI`*B*(!ZK(.3_R0W0^:D$(+'_J6<@D_^I%XT` MW:T`W1!`($3EH`&B%['[\!T@%N?F^]`"YOSDUK#OI?VD_B`>JR#D_\D-T/GP MV!BB&*``(/#_I9NDG"`>JR#D_\D-T/GP$Z``L?OP#2"H_R`6Y\C0\^;\T.^@ M`*4"D2U,KO\2T%)%4U,@/-+%U-72SCX@1D]2($Y%6%0@4$%'12Z2`!+%3D0@ M3T8@1DE,13L@4%)%4U,@/-+%U-72SCXND@"3$0[)1B!04DE.5$52("A$159) M0T4@-"D@25,@S\X@5TA%3@T1/-+%U-72SCX@25,@4%)%4U-%1"P@3U544%54 M(%=)3$P@0D4@5$\@(!%04DE.5$52+@"3DPX@("`@U$A)4R!04D]'4D%-+"!& M3U(@5$A%(,,M-C0@04Y$(%1(10TQ-30Q+S$U-S$@1$E32R!$4DE612P@34%9 M($)%(%53140@1D]2#5173R!$249&15)%3E0@4%524$]315,N("#/3D4@25,@ M5$\-1$E304),12!(14%$(")"54U04R(L(%1(050@4D%4+51!5"U4050-4T]5 M3D0@5$A!5"!42$4@1%))5D4@4D5!1"]74DE412!(14%$#4U!2T53(%=(14X@ M250@4D5014%4141,62!(2513(%1(12!35$]0#4%4(%1204-+(#$N("#42$4@ M1%))5D4@5TE,3"!$3R!42$%4#4%55$]-051)0T%,3%DL(%=(14X@250@2$%3 M(%123U5"3$4-4D5!1$E.1R!!(%-%0U1/4BX@(,U!3ED@0T]062U04D]414-4 M140-4%)/1U)!35,@05)%(%-/3$0@5TE42"!33TU%($-/4E)54%1%1`U$25-+ M(%-%0U1/4E,N("#72$5.(%1(12!04D]'4D%-($E3(%)53BP-250@04-#15-3 M15,@3TY%($]&(%1(3U-%(%-%0U1/4E,N("#42$4-4%)/1U)!32!42$5.($-( M14-+4R!&3U(@02!$25-+($524D]2.PU)1B!)5"!)4R!&3U5.1"P@5$A%(%!2 M3T=204T@4%)/0T5$15,N#<5,4T4L(%1(12!04D]'4D%-($9)1U5215,@5$A! M5"!93U4-0T]0245$(%1(12!04D]'4D%-(%1/($$@1T]/1"!$25-++"!!3D0- M04)/4E13("A33TU%5$E-15,@5TE42"!2541%($%#0U53051)3TY3#4%"3U54 M(%E/55(@2$].15-462DN("#42$E3(%!23T=204T@5TE,3`U,150@64]5($1) M4T%"3$4@5$A/4T4@0E5-4%,L(%-/(%1(050@00U#3U!9+5!23U1%0U1%1"!7 M24Q,(%!23T-%1$4@5TE42$]55`U704M)3D<@55`@5$A%(%=(3TQ%($Y%24=( M0D]22$]/1"!!3D0-5$%+24Y'(#8@34].5$A3($]&1B!42$4@3$E&12!/1B!9 M3U52#412259%+@T-("`@(-1(12!/5$A%4B!54T4@1D]2(%1(25,@4%)/1U)! M32!)4PU43R!214-/5D52($)!1"!314-43U)3+B`@TT]-151)3453($%.#4E- M4$]25$%.5"!&24Q%($-!3DY/5"!"12!214%$.R!44EE)3D<-5$\@1$\@4T\@ M4D5354Q44R!)3B#$S],@4D5!1"!%4E)/4E,N#=1(12!214%33TX@0T%.($)% M($1)4TL@5T5!4B!&4D]-#5)%4$5!5$5$(%5312P@4U1/4DE.1R!42$4@1$E3 M2R!/3B!!#4U!1TY%5%)/3B!-04=.150L(%5324Y'($E4($%3($$-0T]!4U1% M4B!&3U(@64]54B!#2$]#3TQ!5$4@34E,2R!32$%+15,L#51264E.1R!43R!& M250@250@24Y43R!93U52(#$U.#$L($]2($%.60U/3D4@3T8@34%.62!/5$A% M4B!214%33TY3+"!43T\-2%5-3U)/55,@5$\@345.5$E/3BX@(-1(25,@4%)/ M1U)!32!724Q,#51%3$P@Q,_3($Y/5"!43R!'259%(%50($].(%)%041)3D<@ M00U314-43U(@54Y424P@250@5%))15,@,C4V(%1)3453+"!42$5.#41/15,@ M02!3145+("@R-38@4D5!1"!!5%1%35!44R!7251((%1(10U(14%$($U/5D5$ M(#$O,B!44D%#2R!)3E=!4D0L($%.1"!42$5.#3(U-B!!5%1%35!44R!7251( M(%1(12!(14%$($U/5D5$(#$O,@U44D%#2R!/551705)$($923TT@5$A%($]2 M24=)3D%,#5!/4TE424].*2P@04Y$(%1(14X@02!"54U0+"!&3TQ,3U=%1"!" M60TR-38@34]212!214%$($%45$5-4%13+B`@U$A%($E$14$@25,@5$\-5%)9 M(%1/($-/4%D@5$A%($9)3$4@55-)3D<@02!$25-++4-/4%D-3U(@1DE,12U# M3U!9(%5424Q)5%DL($%.1"!42$5.($=%5"!2240-3T8@5$A%($]&1D5.1$E. M1R!$25-++@T-("`@(-1/($Q%5"!93U4@1$\@14E42$52($]&(%1(12!!0D]6 M12P-5$A)4R!04D]'4D%-(%=)3$P@3U9%4E=2251%($$@0EE412!)3@W$S],@ M6D523RU004=%($U%34]262`H041$4D534R`Q,#8I+@W215-%5%1)3D<@5$A% M($12259%(%!55%,@5$A%($1%1D%53%0-5D%,544@*#4I($)!0TL@24XN("#% M3E1%4B!42$4@1$E32PU$4DE612!$159)0T4@3E5-0D52($%4(%1(12!&25)3 M5`U04D]-4%0L($%.1"!!($9)3$5.04U%($%4(%1(12!314-/3D0-4%)/35!4 M+B`@U$A%3B!314Q%0U0@14E42$52(")$(B!43PU$25-!0DQ%($)535!3($]2 M(")2(B!43R!214-/5D52($)!1`U314-43U)3+B`@P2!/3D4M0DQ/0TL@1DE, M12!724Q,(%1(14X@0D4-5U))5%1%3B!43R!$25-++"!54TE.1R!42$4@4T5, M14-4140-1DE,14Y!344N("#72$5.(%)%0419(%1/(%5312!42$4@1DE,12P- M3$]!1")&24Q%3D%-12(LSBPQ("A72$5212#.($E3(%1(10U$159)0T4@3E5- M0D52*2X@(,1/(,[/U"!44ED@5$\@4E5.(%1(10U04D]'4D%-.R!*55-4($Q/ M041)3D<@250@5TE,3"!$3R!42$4-2D]"+B`@P4Y$($%.62#"P=/)PR!04D]' M4D%-($E.($U%34]260U724Q,($)%(%!215-%4E9%1"X@(-1(25,@4%)/1U)! M32!)4PW054),24,@Q$]-04E.+@T-("`@("`@("`@("`@("#*3TA.(,E!3DY% M5%1!#2`@("`@("`@("`@("`@-S8W,#,N-#(T-$!#3TU055-%4E9%+D-/30T-
`
end
--
Cameron Kaiser *
[email protected] * posting with a Commodore 128
Floodgap Systems:
http://www.floodgap.com/
personal page:
http://www.cameronkaiser.com/
--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)