Path: utzoo!mnetor!uunet!husc6!cmcl2!nrl-cmf!ames!pasteur!ucbvax!agate!saturn!ssyx!koreth From: koreth@ssyx.ucsc.edu (Steven Grimm) Newsgroups: comp.sources.atari.st Subject: v01i022: autodisk -- copies floppy to RAMdisk Message-ID: <3049@saturn.ucsc.edu> Date: 27 Apr 88 21:14:53 GMT Sender: usenet@saturn.ucsc.edu Lines: 201 Keywords: arc, uuencode, Megamax Approved: koreth@ssyx.ucsc.edu Submitted-by: braner@tcgould.tn.cornell.edu (Moshe Braner) Posting-number: Volume 1, Issue 22 Archive-name: autodisk [This does an image copy of a floppy to a ramdisk. Source and executable are in the arcfile. -sg] This is a new version of AUTODISK. It should work with almost any RAMdisk out there (as long as they use 512 byte sectors), unlike the original AUTODISK that was specifically designed for the reset- proof RAMdisk. The catch is that in order to mark the RAMdisk as nonvirgin (to avoid overwriting it upon warm reset) I had to do _something_, and I mark it by setting the 0x8000 bit in the "flags" field of the BPB. I _hope_ that's safe. - Moshe Braner begin 600 autodisk.arc M&@AA=71O9#(Q+G!R9P``+@L``)L0`''SJR(/```,8#0``,#`UT`!0@!`&H!! MH0,G^10.8`!Q(`->*IZH:`.``(@6!*&U`D!!)``.T'@-#`%`!`!IC83Q^K?0 MGXL@+P"\:"#DS`\>`)0X"?*-GT0&(#AB$*%T6KN3'TE.`?3&P`0049#]XY<4 M`(2H'*8*P9!U*PJ.$+(]Y9"BR=:-`!`X&6D`!)NM2-```.1$EP(_6!Z]8/'/ MW@_"^OH.0,/ET<^!?158>QSDL8"A@9W4@<&'@)TA^@"8$`$)`&@`=1-IAJ'C M)*PW`!R`X$9B!AMJ.QK#P01(&,()'P#` MT(Q1"DBP`@`!(!&()&C"P$T0&KPI`!*%:%+G,FRZ"<``U[O"E`3OB`(,!YP`1#A`R%+!.$(`$(0,!XB`;1`]`#/F#"](" MU4)D'`3&`"`*$<"H`C``!<".&#A7988)\--8N'#N*$"'",`#I(A"$GF.D4C& MM:0N_LCR9)2H:0GF0+A@0*:DE%H*9Z9I;CHI`%!PH&>99Z:YYJV"$CIGG7?F MV1&??J8)*,:7,@P#H@S4"@"I*0-P1ZHBF!H`E:^*RL"LL,Z\):P?[+HC#3`0 M,(ZPQ!IP;+*`%`&MM-3Z\]@*?25@@K;<0N+MENR..U"YSPF!K@'K`A6`N_#* M&^*(`)B'G@EH=B2,#V+G@"8#_]"CH@V$T7,.&%#NR("*X@`!Y11WTXTY-^,^/_T#PTH0?^/;C3X\[-#<# MP$,_V#P'>OT8]&.-_FBH'PCZ00W]>:%^`"#@EZA0OP;T0QKZ4P("'_@E(-3O M`/V`QI=L,"WA/:TO!]`%U;K%*`]TD!F/N98N#B"*$5J-4;P:B#0Z@"8,:L-< MSLC0`0#1'#?T0QN/40`(Y="8]/1C&TA(ECOZP8T8":%S2]0&"!!`!4#L1Q?\ MP$)@E`"$&@G#7.[0(1!Z^,,@@G!#CS`B$I7(1"="\8=3K.(5^\&"+7:10L)X MC`I`2`#M(`$8X0!$('/R&!;TQ0#RT(Y+_H.$8,AD(.^!1B!NE[OBY.XQ%CBD M+9K#A@`P($,&($9S]'"]QYC@D)IHS.%X5#?],<`YZ.F+/LSQI+QY`TV)DE(3 M!`8+6)H`E(2@S@$L\Y@!')('G`P`$$!I!MC%Y9!DX&^%$`;VED:.J;UCXD"Y0`.+4U@*(D* M%_4#%3V`PC_PX5&0ZB5Q]BAI#_1"`/*H5"\&J-M+X_(/>,R4;NHH*0Q0$)M@ MN,<>2Y/'8>KV&(SJH@`TV"CN.NI#5,```K!PPT@%]LI.ZJ$O^:"$?YJZ4Z]$ MCUM4A24GL*J'K7X4`&C@EE=*&@.IVH-';)7JYSS2U+;6#35QK6E`S#/?B0!A].`(%&PB(0 M5.*`)8&A6,;*HC$FL")"JJ@;`%7W!!S@"`TMB9(@`CFA,#Z0*CW_H@Z_J M*(U4Z2$#H`C@LC4MS;.BQ8^>4)0?%-7'A9P+%`(P5@3>,$H[5TM52Y(BMHAX M$E`&\`SWW&B\,CA`(P?QT_4:10#0"$+?#C*%(Z@(!$N(T8R2"(NV4(GP$7_41#:G2F*C4@BZUI(LAL>U8,1H`\G8G9Q%+&ED7]P"$?W@' MC)SP%1]_O*(`&/>!P"R-',`5;MUFS%=Z-'E(.T($7\GQ80I;V!__(`=%)QIE MBI(#Q\:]LBX$0`HM"YD`1";=D140F*$NM-#4.G25!Z5H`]ABBB```@Q843>C!E7P1`A'7E MS:\_2)L/6?$8&PQ;"5``9R?UD2$!?)-XK#`SM>R19@;I(@"$^(^V1]KMO@2` M#O^A)"\LR0M2$X*V;!"``C(4`'4]@GBP&#>WR^SM`!!!W&FB%IKY;6X:I!MW MZ^9=NW5A#R+`6P`F!$IROLV+Q@C!%;G;D0&D@'%B,,`5`QD&%'+'$1M=;EY! M@LS9AL.@E:L\Y2V'.<,$GE/"*CH@G1"E(0DU3H`3RI.`+%75"$T1P%WB0X"[L&$SXZY#] M[7>?'=\/OQ/(7]/SDT?]Z-!,^^'!?>^#/_]!0'_FAW[X)QYU<``-H``*D`!( MD`;H%@9ND`<@L`9E(($`D(`)D`1LP`9E<`9AP`8@0`=IT`9E``(H(`9A0`8@ M8`9O(`=M$`;HUH(@\`9U$(-F``)R`(%G4`8ID(`#@8$:R($>"()D`(,E>((I MN((M^((Q*`(,YZ`8[V(,*\(,+6`1R(`(=E MN`8N\@;HQH)UX`9DP!)`.`>=6(*_B(?"2`9N:`(E$,(X0J(+B:(8@ M$(9C\`9M`` MN8_"B`9AP(P%LHB;R(QFX(4E2(,VV(T*F`!_&(B#6(@K&(9E"(EDP`+#.)%K M*`=S8(E6(P`&```:"&%U=&]D:7-K+F,```!P%```FQ`1<=".5R,```PO5"A0 M``+2@"!5J#PADF3*$A`M0,"1\^:,G#!M0-!Y`V+,&SAY0)AA\Q$D"#)IYJS1 MR%%*D"8G4ZZL`^>-&Q!S\LRA4Z:-@@0)Q+QY0X<%B#!NR!QE,X?CG#)T-*(I M@U,GSXQC2(Y9XZ*@`3L@9+B(0="@D)!-WLR9"D+(13=EY(``P4/,V[A`Z(PY M\Z8.&S(NZ+AQX5$.7#9L7)0A4\='P0,X<,"($!MI-_;"SF0@IS!6$&3W+%MP9H9UA7QU-R MF?&&7'2P-48=<@#H1E1TI%'?44F=%`9/W!4T`%)*/45'B6Y4V"%54U!QPGUT MW,%15F]LU=\8A:%4(QMY&-7A;NCYAM5':=AWVXT@W(%&=%2-5%)(YJE(1QA& M&1$$%7,8A1*`8VPD1T@P+L6&438)1R5YYKEPFWM1F9&&'#N)!!H9]_45E95I MC($&3F6DN2%_UAG7ITU4'4=''0B&=.5?%'H)YFUM>@1'E/TAAJBB?()`$VD= MKD@=7`O>EAM5=,H$0A)$@)#@C-/MIB>?\,E'WVC"=09"$T:)44=4:9@!@AM. MU6'H27*D84<9!=[GD1MPI0DL6[="R"@9B0)8WXC`FRU/2D%JIP)( M).$$%5/<9L2BG?4)X'QLT#&'#G,9L2\:2$(G1QNJAJ'?&D8A+!J*(#CW1$QH MJIGD;7`<"]Q-:>2Y9Y_D,>20"U!(<02*2MUXD\0B+T&RR4I.=5/&455WXVU= M(DC=C1FFD>!]>?15)5(DM^J@I%E$8FEM&B0<9&Q>S.4_')7A9" M:W:3C,L]Y>?/IL*Q,732E9HL"$'7,?2(.MR&;E0.4W5N=.#R&7,9,VM\KL_V MK6I=EV_?*A3`>)M*'$QQEC$8&1\S2'<;#2'%9QJUI MV!2HLGK^//4`S,KE:4BI!VX&11E1V:5P'3_%AAEVNLBUVPB'-$<8TPYNWQH; MF8W"'1T?.N=+719:G8%?(K:846UB+@<:8<`QQ^*P0B_3CE7^^<8=U&'N!H,V MLV6>DD.QU\3G5,T'('[ER50M"&UL:#?W-Q%#&BK$M[ZR9$0C&[$E1^0#DI`8)900G6^(+IK=&S(B`BI&301&"2*[.!.2("!F,U"X MR(RHHZP@?"E:[[I"$*3@!'D=(80&&>%]FF1"7>$+.YEZ@QF4I3`MP<$D[UO6 MT[@G!Z74R56Z&60)?\,\476N2AM:"?,Z5)K7\88HAEN,"!9F,(3YRTXJ>,%` M1@":K-0!7'11BP"3X@(T^&"6X-(37$`PA2(,80I)T$(1$E"#&,@@`0$!@0\@ M00"#21)]S91!"VC(DU&I*5!N*%@L@5D&85+E"D^0`A$2D#AHJ@`$E>%,[@!V M@L2=X&Q-*,,9,!(&/(!@G`H803!!0Y4G+"$!,`CH0(!)`%DD:DX02*&A#TV`#!0ZT6%>P:(87>8,!D*'/&`NF#BA@QR<-4,X MB`$$>_@).M69`#2M4`\[T&DZUYF5GP8U`3LE*E/2H`C""F30!1#T``0GX`(,3I`"=R[++VQH`83:`)H510H$ M'&P"$9XPA9A&JT;_E*4"`D*0=U+D6!05SE-2I#!(M6`M3ZL/2L+0@H5V;'1Y M:(&AD'(&,+ZS/O)AJ]TXDMG-=A8%=DB#PJ1PAS"(8:^]&V<9\`"AFY"A#89" M00J".MWJ0LL.9FV#=H,:GS;D]+J&TD$"FO`$*SC4!5=(P`A@@`<:W,`&+`@" M#(`23>8Z=P[:!<&T2)6`<28@@T%(`-X&C`(H#"$%^27+>MM;!!,7#&U`,C.`$T*$-<&"P@R',X9^PU[T63@"'6;!A$(-&LR^C3XP2P@0D(3,(0F0`&^&J7!AF\` M82GS]YUW[&UVHC6M'Q3XQT(H0A1<,(4$,.L.+J9PC!>S>+^.W9PD#^8? M'_]$"5;&L(T5\.8CR_G"=!Z#G5E`7_O:P+'[4A-56HT_01#'Q#TQN+U%&0CB4(>.15>6.]P0"MHPAS.T)@&[E5RUM]"%H.:4 MRM>Z`X"I;>VC#B'<`!:!8F%P`R[(@0MN@#<7Z("$CJ$H)*()"6O,G2W0C/`*2)P"*CY5O5Z;Y2IPZ\D_KD^5R\78:>C!T'_B=:KT-0TK6$$7 MPMY3J(#H)BA(PZ?##NRTCT@!FRM1?=Q.]Y`+T764_*?<45[WRV\L*K;BVU%3 M[GECI[HOCK@T%N>,39@$%^")2#)E^'V5P*1[OM:\Q:<8+$,>B?4I=Z> MOP;6^^`_*F7-VLVF_Y6PZ&?LL,<_];[.H`OQ)_SOB%(>U=S_Q>]DG%\*7@,9W>MKG&#(P`\WW M$P5!`.O'>G0A=,W'/ZO738Y1`SDP@@E0@A+X>BG(@<=7@RGR@CD@?43!$6)0 M?5%S>]:W?4F5`BB``AE(%\)'&0QR?-/6@E3!`\)7`T]8?HEB@S[@&!T6=A>H M+"A`)E!A?2A@?4Q7@==6@@`R*8;1'@4W$$%(!M87-^!&=NGF;O)&!TE@/?MD M:46(`G'82JJR*()"1R#P%KV5`GCH!OM&=VR(>!V&=FJW.6'%$Y17>);G+7"W M>95G=Y\W%U,5>YF8*PO'/W&"!BP05DF2!P$B!Z+HB;17B==W<_RW>WSC=KX' MAKD7`H?U?],'A`(BB[?'BC&D>^6W!=UG@.$'3PE8?^;7@/(7$9*A?J>X?>\' MC\2H@2K8@>TH3?#4P$AF)(![*(`K)XAD)W;87WB&[HA7$H MBW0X=FY0=NKV;O&FAWSH'U[B=X&H(7Q6,W)1B(ITB+Q5!HJ(DXW8DH?7'I&H M`(UG;.H!>U_F4>*S'[0"$0;!D"01A)9F!S&D7"U$%0`E3$M&!MHU=YCHB<:& M,"KQBIY'AA! M@8C5!"?@?4%P`G\937-S%+YR(L^3/_NQ&TT`,`9VF$QX6%-Y5'W7'E/I`P!I M`B;0'BA`ERE@`H>9`LH7=48'FEN8F)W<&D` MEYJ8>2I@+&;@>R-2>&4R*D8A@7+'3L\I!MXSG7`P!F:R)]I)!MII!MI9%)RQ MGR%6:R(A&*>PXWH#VQ(0G*3?;1 MG6Z@(0/XS1IDXHU`S-0!$.:DRS3$`\A%C$P;S0T M+&K!%FZ!%'%1I8UH$!^6.<"A+$FP!$)0*T6X&V#Y&4IA8)48-;IW!&,8->-5 ME6(&'&L@!I9D62"PFD5(IX+:=$?8'G5Z(EL(3]%W5$6(J!2IJ!AZ(JM)7V9` M381'H%31=&5HIXT*`E8XJ$*'!S-@!(2WA`;AJ478J$Y(JO05`ZCJC2%!39XJ MD9!@``QRJ7@@JYM:C=N'DH(:JJ/*JS`PJS\1CZO*FA(9JAK)JZ>J?V#(J3Q@ M`PFHF@;*`S)`?-BJBCPP`R,U@X.ZFJKH`]>ZFAW)`S$@@MC:D>8ZKFS3BC[` M99?Q>R5YDBDYF_!:DF1HAK-Y;0;1D-:W.7!Q>]%T!U317`LG'.B!8B3"%A<2 M%YKV$Q6'C(5U6#\$-J?"G&8P'4`)`C19*IHA*G3*$4;WI'>(DT1*+AS" M%G^(!FAP&GXU!X,',$M9AV[`)WHE4X1W56F`5W#0LW)`>%VG&U\7>7I:<8.5 M`B)9=)>ALB@@HSE9!"X[.()JD7EP&F1`!BF`LS\[L@!6<3][5WE%MEQ7)4CK M=Y1H643;M"(937V:6>13J#^VJ)W*FG*9`E0@9B>9`E18&0Q2?WA9(WPK9F3X MFIA*34Q`>%.0IY.'M]M5E30AD522!G]*!G5KIP8FM53;B$,6-01;!G'S$U-` M$]-59R9@EI4DK::YF"DH`RP9;7(PM4-*!TLJ27G2%TFQH_JG>[HY=2<0F;G8 M'FD``KS8F/*7LNAFNRRKASRB-%>Y$DLF+521LT)P+8*"`C+``FD0MLV[2C_0 M'GGP`NM3&C][O(!H,AGF7OU%P3QT8PBN\@FG@`R>@ M!26<`-04<)1#!P0'PP.@FX=UO"U,O)T3@MTRVIXX5L1T!(B(R9M;K9T%A4]MWHD*@EY@% M%2J*DNQ)>-AY'X>EHBW@`S[%5'_I6"`Z2-,A@6HBQW.PG;HGR#Y05(97)\)I$LRH0L5:)7E5-U M!J14E*ZL')?,)[#VR,H2RF(PR%A5R6=**ID,`F)"!:VL*L`\R)7H557)+%U1 ME)59B0JSR[T,!XP)B+`<7EFQC(\\!AJK*=Z$R:DL%^8QL8XE(&K`R5:IF2MA MQX7Y$RI:QW*%QWA*!WL\E9/;7],;5W<<0P$BQ[\GR86L!\@;RGMU&;3KO'E( M!++2)KE;2V,$0R4REKY;O-PRU!P]S`A]6+YLU<(L5J!\.Y5H ML.^$($$BJ.3!&76P2-,QQO71/VNB>_.#&$&"=#'0N!I=UQZ:@GH%!V:PG-Y# M?E"GJ3_1@8`8U]L'=RF0UUHQ;1VZ)DY+%VC(T%Y4NS5-!T[P-`54!P?T1':= M!SO]$]%D2K:S(HU$.R)!$H\4$L+QUF/\O\\[!!^1!SG*VBY@$(L(NA2:*(`, MUG]):H<8($I1FS-@W51IW--43P`^`\4]`-$DS89HS>5<*L)QHV3`WV"X+_+XR%X+Q"2^L6'PL2W5$5.Q M%31N8!^^X;#WA>7'X9+LS98F?/N"WC7JT#GYV5$1VJ/]R,=!%])(QA:'6-,G4E]W13[W%XBW:X<$=6]U4*.`ME]'RB`4N#AW>(Y M*M$I@4;!S^5]WIJ]Y$!*>!(H=5HMW-B-:7).YT5@Y^*=YXFRYXO)(,GKYT#1 MT(&NUAV1V\>]$P!#$4]3.*3")BE"!&,2!/.,;6@@GXA)VA[Z`G\\SE>"/@CC M!L)SX5=L;U6>'P8VZ-"M*A%1U71W'RE,,:1IX"@`XXY!F_4*AO$9&O*8Y/T[ M`,V^ZOMB=;\7YW,!Y]S-Z#JNZN*]GM8KZ8=%Z09AZ>N=OF"([7.NZ-P^[=]N ME*@A[N:]!``[`.9^!K)K=8,^[--N=3#>`H?5[S_1>$>7>`NG`J^9:^'%=/`> MY`EPNIB#!ZJ+7F@PN8Y%/3HC6\K5`D@0!%.@6ZPV&AX!+K!&!+.3.2@)&AK" M`E.Y`I'H6"5K:?;6(:^D]#C']!R7 MR")IV_)FI0FQ$%CJ)VZ0$E,!GI($`K0[!V1*>"$KK-:G=SO@)5'#`S5`U`3P )]W@;>(RG`!H` ` end