atari-sources-request@daisy.UUCP (11/29/87)
Submitted by: imagen!decwrl!hplabs!ames!rochester!cornell!batcomputer!braner (braner)
comp.binaries.atari.st: Volume 1, Issue 31
Archive-name: ibmfmt
~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-
[Editor's Note]
The following note from Moshe is pretty self explainatory, I can
only test this on my DSDD 3.5" disk as I don't have a IBM system that
uses 3.5" disks nor do I have a 5 1/4" B: disk. The sources for this
are posted in comp.sources.atari.st
the checksum is:
bytes = 5659( 5754) cksm = 1138 ibmfmt.uue
~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-
Hi, James!
Here is a submission for comp.*.atari.st (some for each):
This is a corrected version of the 200% MS-DOS-compatible formatter.
It will format 3.5" (720K, MS-DOS 3.3) disks in drive A and 5.25" (360K,
MS-DOS 2.0) disks in drive B (assuming you have a 5.25" drive attached
as drive B!). (Sorry, no frills!) The disks are NOT bootable (on MS-DOS)
but both the Atari ST and MS-DOS machines can read and write files on
them, even in subdirectories. The correction (of the early version that
I posted to comp.sys.atari.st) is that now a random disk ID is created.
In the early version, the same ID was always used (stupid me!).
Thanks for doing the moderation job (must be a pain)!
- Moshe Braner
Here is the source code (Megamax C), followed by the uuencoded binary.
------------------ cut here ------------------
table
!"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 ibmfmt.tos
M8!H X !7@ +E@ $[Y #$[Y -BBI/*FT z
M!" M S0K0 4T*T '-"\ A "( THW"O/____XN02\ +PU"9S\\ $I.0=_\y
M #"!M !@B;0 8T^T '" M !13@&\&$R!1R/_\(&T $" M !Q3@$(84<C_x
M_"AM !#9[0 <*4W__"IM A.K0 &(&S__$AH (!.N@=86(\O+/_V/RS_^DZZw
M!!I<CS\\ !.N@>6/SP 03\\ ).05B/3G7K/)!)0DT@(#(N, " @$ G v
MT +] @ ) ( @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @( X?u
M,\#ZCM"\ 'PVQP9X /1\-J-Z /O-$W)DN% CL SV[@! KD& #/2S1-R4;$+t
M)HH'.H?>?'5.)HI'(#J'Z7QU1$/BZKAP ([ ,]NX!@*Q!+8!S1-R)[<,N D"s
MN0$!M@#-$W(9S1'0P-# )0, =0% 0(O(,\"[# #J !P +[_?.@. .O^OA5]r
MZ 8 M #-%LT9K(3 = BT#K,'S1#K\\-)0DU"24\@($-/34E"341/4R @0T]-q
MWP(E @DJ_U #P(-"D1I<VL@0F]O="!F86EL=7)E#0H #0I.;VXM4WES=&5Mp
M(&1I<VL@;W(@9&ES:R!E<G)O<@T*#0I297!L86-E(&%N9"!S=')I:V4@86YYo
M(&ME>2!W:&5N(')E861Y#0H n
M m
M l
M !5JNLTk
MD$E"32 @,RXS (" 0 "< "@!?D# D @ j
M$@ ! /HSP([0O !\%@>[> VQ3<>5A93ORM\N0L _*PF@#T = ,FB@6Ji
MBL3B\08?B4<"QP<K?/O-$W)GH!!\F/<F%GP#!AQ\ P8.?*,_?*,W?+@@ /<Fh
M$7R+'@M\ \-(]_,!!C=\NP %H3]\Z)\ N $"Z+, <AF+^[D+ +[6??.F=0V-g
M?R"^X7VY"P#SIG08OG=]Z&H ,N3-%EX?CP2/1 +-&;[ ?>OKH1P%,]+W-@M\f
M_L"B/'RA-WRC/7R[ >A-WSH20"A&'PJ!CM\0#@&/'QS Z \?%#H3@!8<L8He
M!CQ\= P!!C=\]R8+? /8Z]"*+A5\BA;]?8L>/7SJ !P *P*P'0BM Z[!P#-d
M$.OR,]+W-AA\_L*(%CM\,]+W-AI\B!8J?*,Y?,.T HL6.7RQ!M+F"C8[?(O*c
MANF*%OU]BC8J?,T3PPT*3F]N+5-Y<W1E;2!D:7-K(&]R(&1I<VL@97)R;W(-b
M"E)E<&QA8V4@86YD('-T<FEK92!A;GD@:V5Y('=H96X@<F5A9'D-"@ -"D1Ia
M<VL@0F]O="!F86EL=7)E#0H 24)-0DE/("!#3TU)0DU$3U,@($-/30 z
M %6J3E;_Z"\+2&P #\\ E.N@9\7(](; N/SP "4ZZy
M!FY<CS\\ A.N@9D5(\]0/_^#&X -?_^9@ &#U\ '_^#U\ "C_]CU\ '_x
M]& !!";O_X/7P 4/_V0F[_]# N__AG 42&P 3C\\ E.N@8<7(]@ 0w
M2&P @C\\ E.N@8*7(](; "T/SP "4ZZ!?Q<CS\\ A.N@7R5(\]0/_^#&X v
M>?_^9P % QN %G__F< I"9TZZ LQ4CTAL ,H_/ )3KH%Q%R/+7R'94,Au
M_^@]?.7E__I";O_^8 ZC N__AF .,"[__L!\ %G 0/SP +C\\ ).t
MN@6,6(]";O_\8 LC\N__HO+O_H/SP 3\N__P_+O_^/SP "3\N__1"ITALs
MV.8_/ *3KH%/-[\ !I*@&< 'I(; #:/SP "4ZZ!4)<CS N__Y(P('\ K0r
M? P/P _/ "3KH%*%B/,"[__DC @?P "DA T'P ,#\ /SP DZZ!0Q8CTALq
M /8_/ )3KH$_ER/,"[__-!\ # _ #\\ ).N@3J6(](; $*/SP "4ZZ!-Q<p
MCV 6I2;O_\#&X O_\;0#_2%)N__XP+O_^L&[_]FT _PY";O_^8 %# No
M__[C@$'LV.;0P$)04F[__@QN"0#__FT _^8P+O_X9P ##U\ +__& @]n
M? )__P_+O_\/SP 4)G/SP 3\N__1"ITALV.8_/ )3KH$0-[\ !0M0/_Pm
M,"[_^&< "8Y?/W_VN8Y?/\ VN@Y?/W_WN8Y?/\ WNA!^OFD( @F0& "(Yl
M?/G_VN8Y?/\ VN@Y?/G_Y.8Y?/\ Y.A!^ON ( @F0$)N__Y@ 4,"[__N. k
M0>S8YM# ,)M2;O_^#&X! /_^;0#_YC\\ !%.N@/ 5(_A@"U _^A![O_H( @Fj
M0#E;V.XY4]CP/SP "4)G0F<_/ !/R[_]$*G2&S8YC\\ E.N@.*WOP %"U i
M_^P@+O_P9@ "B N_^QG 42&P!#C\\ E.N@."7(]@ 02&P!,#\\ E.h
MN@-P7(\_/ (3KH#9E2/)E].7DYU3G5.5@ /RX "$ZZ LI4CPQN@P "&X&g
M,#P & >/RX "#\\ #Y.N@,T6(\Y0-+D9P8P//__8 0P/ 3EY.=4Y6 _f
M+@ (/SP 3$ZZ PY8CTY>3G5.5O_^+PM![-,R)DA@%C K K ? #9P@O"TZZe
M "I8C];\ !0@"T'LTS(B"-*\ %M+"!;=@_+@ (3KK_KE2/)E].7DYU3E8 d
M "\+)FX ""\+3KH 1%B/2D!G!C \__]@,# K K ? 09PHO*P &3KH!^%B/c
M0FL "C\K Q.NO\L5(]*0&<&,#S__V $,#P "9?3EY.=4Y6 !(YP$0)FX b
M"# K K ? #9@@P//__8 F"X3GJL !C K K ? " 9U8P*P *P'P F8&a
M,#S__V!V,"L "L!\ 1G$#\\ )"IS\K Q.N@!H4(\_!R\K 8_*P ,3KH"z
MS%"/#$#__V8&,#S__V! FO_?P *, =(P-&K Y@) QK #&\</SP 3 Ky
M 1$0$C +P _*P ,3KH '%"/)T #B:K 9":P $,#P $S?"(!.7DYU3E;_x
M\@QN "&P*(#S_____8 _C\N X_+@ (+RX "C\\ $).N@&*WOP "BU w
M__P,@ !M"" N__Q@ #2/SP 3\N A"IS\\ $).N@%@WOP "BU __@_v
M/ "/RX "$*G/SP 0DZZ 4;>_ *+4#_] QN $ #F8.("[_^-"N HM0 *u
M8"0,;@ " YF#B N__30K@ *+4 "F .,"X #F<((#S_____8&(@+@ *L*[_t
M]&\>2&[_\B N J0KO_T+P _+@ (/SP 0$ZZ .#>_ ,0F<_+@ (+RX "C\\s
M $).N@#*WOP "@R %W P'P 3E TN1G"B \_____V *8 A";-+D("X r
M"DY>3G5.5@ +RX "#\\ $E.N@".7(].7DYU3E;__D)N__Y@)C N__[E@$'Lq
MT;30P# 0L&X "&8.,"[__N6 0>S1M-# 0E!2;O_^#&X 3/_^;=).7DYU3E;_p
M_C\'/BX "#U\ 3#__D'LT;0B2-+N__Z^4&<&6$BSR&;V,"@ CX?3EY.=2E)o
MT; I2M&L*5_1J$Y.(FS1L"1LT:PO+-&H3G4I2=&P*4K1K"E?T:A.02)LT; Dn
M;-&L+RS1J$YU3E8 & T(&X "! 02("P? *9@X_/ -/SP DZZ_\98CR!Nm
M A2K@ ($!!(@#\ /SP DZZ_ZY8CS N Q3;@ ,2D!FP$Y>3G5.5@ 8!@@l
M;@ (4JX "! 02( _ #\\ 1.NO^ 6(\P+@ ,4VX #$I 9MQ.7DYU3E8 & 8k
M(&X "%*N @0$$B /P _/ %3KK_4EB/,"X #%-N Q*0&;<3EY.=4Y6__)(j
MYP P)FX "B1+0>P!6BU(__8,;H, AF%C\N XO"TZZ_S1<CSUN [__F i
M 4P,;H+_ AF%C\N XO"TZZ_V!<CSUN [__F 2X,;H+^ AF%C\N XOh
M"TZZ_W!<CSUN [__F 1 M2__Z0F[__C\N A.NOYV5(]*0&8 *9@ "4g
M$!)(@+!\ IF "&( J0KO_ZL'P &] ( J0KO_Z2, M0/_R+R[_^B\N__(_f
M+@ (/SP 0$ZZ_GS>_ ,.4#2Y$C L*[_\F<(,#S__V *@P+-+DT6[__B\Ne
M__8O/ (_+@ (/SP 0$ZZ_D;>_ ,.4#2Y Q )G!C \__]@=%)N__Y2d
MBB *+4#_^F "4HH@"I"+L&X #F4 _V1@$" +-BX #L:\ #__]"#)$ @"I"Nc
M__I(P"U __(O+O_Z+R[_\C\N @_/ ! 3KK]Y-[\ PY0-+D2,"PKO_R9P8Pb
M//__8! P+-+DT6[__D)LTN0P+O_^3-\, $Y>3G5#[-,R(OP ,OP "+\a
M #+\ DR_(, (OP ,OP "+\ #+\ B_ R_ $",OR#z
M "+\ #+\ @ B_ R_ (OP ,OP! C+\@P B_ R_ ( y
MTOP%>#E\ @#3,$YU&T4-"@H)35,M1$]3(&-O;7!A=&EB;&4@9&ES:R!F;W)Mx
M871T97(L('8Q+C$ T*"@E%;G1E<B!S:7IE(&]F(&1I<VL@*#,O-2DZ( w
M#0H*"4%B;W5T('1O(" ^/B!&3U)-050@/#P@(#4N,C4B(&1I<VL@:6X@9')Iv
M=F4@0BX T*"@E!8F]U="!T;R @/CX@1D]234%4(#P\(" S+C4B(&1I<VL@u
M:6X@9')I=F4@02X #0H*"0E0<F]C965D("AY+VXI/R T*"@E&;W)M871Tt
M:6YG -"@I%<G)O<B!F;W)M871T:6YG('1R86-K( ("AD96-I;6%L*2!Os
M;B!S:61E( A#0H #0H*"45R<F]R('=R:71I;F<@<F]O="!S96-T;W)S(2 r
M T*"@E$;VYE+B @2&ET(&%N>2!K97DN $-/3CH $%56#H %!25#H T*q
( "!@!Ep
o
end