[comp.binaries.atari.st] v05i077: fmc -- Force media change on floppy writes

koreth%panarthea.ebay@sun.com (Steven Grimm) (07/19/89)

Submitted-by: marob.masa.com!lilink!joeg (Joe Gelman)
Posting-number: Volume 5, Issue 77
Archive-name: fmc

This file was posted on a local bbs. It comes at a time when I've been
having nightmares trying to get a fix for a non-Atari drive that won't
detect a change of disks unless they're write protected. Along comes this
gem (no pun) which apparently forces the ST to read the disk directory at
every access. 

I haven't extensively tested this program but it seems to work fine. If I'm
not mistaken, it will be a welcome addition to many an AUTO folder!

------------------------------cut here--------------------------------
begin 644 fmc.arc
M&@A&34,N1$]#        M@0  -L2>QFT)6<'   ,#12 @(2 "IHR($!,H7)B
M3L(W<,K("4,GC9LS(.;DF4.G3!L08\*,.>@0!)DT<]8DM&CFC9PV%-.\<>,B
M81(Z( *2*=-Q#!V'9MA A)/')$J5(\-<+.-03-$[%$=:Q$CG((@[<M)T! %'
MSIN>.-E8+%,SB9F<"K0F1!-FCIL3.'>"+4,&1!@008<6/9D2A)@R4T'(\?C&
M#ET6*W'>2<.&#8@Z<Q""J(I09YK!/ET6!<'2)<R*,SF[ 2$E2).:"M^T03A&
M-9PZ'>4X9&LXH9DP==C0V8Q5:YF 7;^6\0E"K!NFB.VZJ4OF#0@W7TWR'*[X
MX.B[?%6B%$S8,!G4!K=O#QBGCN^$9)2>D?@&<O*V(/*TEV,TI4.81?^V7@W2
MI9PZ<'145QIGR5='0H.%45= 9GCU$79')3<8'&R(A)!:BU5EEU%FF"%1&6[@
M-%,9[RUW559;T>'<9&SA9%E?9&1E6$U;/'$="".:)"-"&G'D47SM@:04".OA
M%(97=9A8U7;!B<'&CP$YU9\;'"E%!QM%S0$5'' $]A<==Y0!HI"-!19C&K4%
MH4-":B:D5%T@"+'F'6BD,1*#+HW!% A'%-$$$4],,9ES *:7HE79"3D2B7[!
MEE!5%''FT%W/F3>'4GJZT$5  0V$0!9!"CG:9&4TQEF!\RE$!0AL.;2D0TT^
M^9%?FT$$8F ;!D0$4VM0 5%"BRWWQAT2ED&A2+A25I]*&:*Q(8<>#A;B0\>5
MN* "73$U1V!%S!%21#49A%"PS=V1$1KML5'77X_!82A=5VGEK+*MA0CB3SB>
M%9"RQYF;'6I;)&'71]#A-$<=@UW5HI"0[?DJ5UXYZ1%B8C@J,&V5*7#0D7!"
MBI-:V\VA6AET1KI?&Z&%@?)%SY$,0A-EG-$6:@*?*-RC=3H$G%=G3#1K2_2U
M410*BX8!1P@IM(P''<VYU'(:9Z AADO)T?E&9"#(D% >91SYD+HH_)!T0#7(
M ,-"1C3!G9XA8BF=84)%5-?#L7JD*:<"$12$&WE E0=B=//L<[RFBF!$G@C=
M!?-)=PW!UE(B(+::4E,A%I!%"6D+HI[)>8RS9 L1[E@8;/CM4()U-:B:F^@=
ME=!?0&?<6T4LJ\@9'>!9%5S/*HL^61AK( 2@74B:&,,2^9)F&F)O@H ?6NP>
MJ^> UXT61!54/('7&^I*1#.J!T(UK>T-L\BDX+W#=U= *'34!APN'9F'V!EQ
M#YM,;B3'[L$)VQX$$U<(0A8$]9_1J 5V+D%(<W"EE**\2"5)>,$37( W3]4,
M71$Q'ZS0]Y&#L $.#A'9:J9&AJ*T!R>421@*_K*MG91$:&@YSM*:1I^G16UJ
M<D":M59RE@:2L"AK@,X=7&45D;'A?J$9U.?04K=9K9 I:7 A=Z07&&6=R3 I
M2 Z%NH:U)^'$>9()XK!0TP0'*D!!,=*6I/#&A"/)H2A-&,,09G*<Q@0D!S< 
M@1-<HB$IO$%! 1$"78!&!L0T(0@@@$$,;C #&."M>3 \PJT21X8TS@$2 Y 4
M")C@@CC.T0UU9 .-H/"DMO (1'4AG6.:XX:8S&0.[&.++.^"KEJ^ 5U)LQT,
M.3(8GMBEDH.9PQQJHH,6;$H! 0$:"$9-0RY04D<       #+ 0  VQ*;&1ND
M) (   Q@-   $  ? $@'-!UTH.(-  (@V@#  *(%  X5 3" U@H !8X7H?$:
MJ * @('^GM1#@.D% "15A)SYP0. $B=!O/'3"&:@ #!>,F48802&2P*P\AP<
M@,G,0 H@<BRE=&:@ EBX".AB0Q($#JTB!P: !& $L*E&'\+B0U#,0 <SSD)B
M"J-F "=U7DB=2Q;O005(] # 01. "2=.N#QZ49.@AL()<')YHD2I2;). 2"0
MB5,)/YF,?8(I'*,S/Q!X"/AA@$HHT7_\J@) ,0+94K(A=LX%HGK&S@ ^R88F
MR JRY"=XAP=P9CS(9+P-% QY R>/G#1GT- !$2,'CAP@F*2QD\;-&1!3WIBA
M<R>,G#+1<]P X<0%""EOPI!A 4)(&3)FO"''?B T$00(,,1PPPPP1$<%&FG,
M <(<ZK'G7AD1A9$'"&)@. 9U:?P'@AGOE<%&'OR)4<=V;KRQ'85LD.%"="@0
M\88;8="1QHT2AL%&>WE(>(>)'[911@@I1 = =$8(. :&3?R71A@@#(%&&.9A
M6-X<=/C(QG\S*K"D DW*\62!4E)I)99G8.CC>_IMN&67;'Q)1@A*0D* $0IP
M( $#'C@ @P$*&  ! !H                                         
E                                                    
end