[comp.sys.atari.st] EDISK -- My Eternal-like, Mega 4-proof RAM disk

VBRANDT@DBNUAMA1.BITNET (09/19/89)

Here it is, finally:  My reset-resident, Mega4-proof PD RAM disk !

It works just like Eternal2, except that it is a lot nicer, uses less
memory (for the same specified size), and works MUCH FASTER.  It should
work with all systems and all TOS versions (haven't tested it on a TT yet :-)
Some messages might come out a little weird on low resolution, however.

Please read the instructions contained in the file EDISK.DOC *before* you
attempt to use the RAM disk.

Included are EDISK21.PRG (the program), ECONF21.TOS (the setup utility)
and EKILL21.PRG (an automagic RAM disk killer).

This is all pd.  Have fun with it.

Send all praises, flowers, money orders, letter bombs etc to
VBRANDT@DBNUAMA1.BITNET.

--------- Cut here for EDISK21.UUE ---------------------------

table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 edisk21.arc
M&@A%0T].1C(Q+E1/4P#_G ,  # 3,+ P,4@$   ,8#0  "# T<  E@8:  ")z
M08"!*IX\T:< A(HV  B : &  ;16 "A\!,#! *"# %ZD;"#DS \> )0X"?+Dy
M74<D>@2 >0D@P4PNCW@*P"F %L\>,Z$\4@)$#0ZA1#4=3;JT*8DF^@34(HJ)x
MI\\@0%\X\/HS*(]__W@RF>D"P!)] S@UP3< PXL&+V!F!/#C ,\?,VMV[ 7Lw
MC &L B*!P06"CQ49+F+$:A> D!EWDP,H,H,NLR8SXF"T$,!*SC\I@0#Q Z  v
M"9"% &!\ .!:P$D :#D'R9H+PK<HR?[QBP(-,2DX0:"U"0"))""BALB"?43Tu
MDW2@B#.)O6X60("95!XQ  (@S!H"!,B#2 \@R'@  ]IH>__ #368B*]PX,7Zt
M2-9#+RS W78P*5 6 P,)L(8Y2;A#T!2 :%(()8(HLYH"%'! @!"QK0$- QPFs
MX(8RV@@1!3+_J,- $:RMX<N*#_#@!BY$0< =+\LU9P8"NK1!VAD#T9A3$MSMr
M8 1S !@9 "A*RK)#$:0A40P?%170#B@KD&<$'P> 4$ 5@%@  #B *#' &0)(q
M 8@- "# T)EI&K(#$ *(L@$0 7@A!1!S"D *-$- 8T2?IL P@)$"@++!D5F,p
M P@TAJ@Y3B$H%*#-(!L4$< 6X!22:0!<8#(()H9,08@XA.Q A "H\,37 7DQo
M1 !/0@1FDP),F6'"7'7=M9U?, %AZV# F#$6L #X,!,659V! %9C@@% /^C@n
M%( DW+4T4Q%#/.&$$3J ,,0;;IB1QAEUR!$&'6F0"T(=[+*1!AUY@&#&&W* m
M4 0124RQ! B/10;"1BT,#,,,+4Q1!APMX)!# PJ@,$8*(,20 PXXL&"QPP"_l
MP<8:9>0;A L@"*&N&V30 ;$" ' 11!54/,'%OOTN(4,,+D AQ1$ %"&''/B&k
M:RX;9>C+K[\WY[PS" #@"X++,,M,,](XZWP$"&Z\08>];]2!L@L0 Y#&'""Dj
MX88=8<A+!@@H9+VU'2'/T:X;($ 60PIARU$&'>FZ0788=(<,=+[WYGO"'7+,i
M6\8)(#A]PAALO#''XF$3D3C<99-1AAOLFAMRN%@DD, 4:>A11K@,5;2$$&%#h
M7 3G(6-=QAT@D'%YT6EHSGD:GN?+-A$;@0!%"JB[#GN^;LQ>^]AK@""WZ2"@g
MS48=1:,0@V@SY  ##,0S?47B[+IQ!@ACH 'X&660[0(D S#-K;=&D/]&&W 0f
M34<98+,,20(:"$5$25-++D1/0P!3 /_F#   ,1/I#3<!LA8   P)("&(8:/%e
ME#)P6N#(T4!!PR)$DDQ9XH+(DR$Z0"1Q8^8-"#-IV)3Y^$8.B#9Y/H:90X<%d
MB#EMPK!AXU).F3EEZ+2P.2<-F3)NZ("0$J0)"#)IYJP!@<)*&3D]W[@!(<-%c
MC!0-&X* -* 7B!@Y<.!@ 78A""MOV*QY"B*("Q!"Y(1Q0T9H4R%$G1"A H2(b
M$"=5B@:)X4)($BI.BE#!JF!K 2=26\"1\P:DT#%OX.1)X^8,B+EDCB:E(R>-a
MF#IT.'N&\[1-&CITRI!QH152 2@B5XZL@Q,$'31)04Q^<T9N&Q!2V:3L:!)-z
MG9AN1H(67B;,F#)FZK 17D<.G#<XY]!V2'[K (@2EX ('@8$SS1ZJHL16?-Fy
MSITW?0(52M0H4J5O@4 %&B.5E,89G,FTWD_M5792&&NHUE![_8FFE'OY_104x
M"'>LY!N$0'U$V7&_C51$;'*X(9,,PE%67!AM!!B$&'.DA5H9RH%0AAU/Y?&;w
MA K@V!L:'HY!9&>R!3C@4]B55(9+25A(FFDW^@;<'"T29QP(==#%%DH@J-C&v
MDY_1Q6%(;#3DQAM"_3?E:;&]]$9WU[F0P(#!!=<&>'3D2(='F 5%V79[(@72u
M&&&D)I5X(( PQ9QR7+?>'!/:$49(8<RWVW=3V11''3>UM)X9(.0Q)X8RY1B=t
M;.O1,5Y#+4 "158*H#?11]71T=U-.M *0@L@7%'2&EC>\1H:(-  0A-"#%74s
M6P$58%Y3A-G V*\@%#'$$TX8 0)F;< Q5QI29?GB<8&"=,:N6%;XWU)(V31&r
MGWG8.:T5U5X+K*WJ_0<'&V'D@65[8\XQ1QAG%-AIJ&'(X2H( 0UP;[Y: 6O$q
M2FTFVAYI<\UA!EM_OF#&B#KRZ$8+89!!!D]8GF;&QW*XQ)MJ((BP)X]MB! @p
MM2[@H"\()TA1'1LG@"#&&VR^5,:\);GT&V\ZJC@?S>_JB-2?4.E(QQAO_>E>o
ME_9RU515,/Q,1&D\FF09EIQY[6Y22QV=-$Y,QVPEU ?;07,-,; HAH\WO26Vn
M%63_/(14ZG:7J4@OP3<2"C' X)M',^0 @^1+")&"2P2U(,9K(!@1!!4DF30'm
M:TDF<&_A%0-M11H.UZ&@#&:*3L4)+J51QEMWC)2WPB/9;C1J+>8$5&A>$\FCl
M;W>\\=;8+I3=^ML7VF'CF"  + :.+Z'QQAU8IAW55-/)+51J8]JI^N!5745Kk
M0TA\WRJ'P\[1:WE<39%&N#EBIEFV$9F(# @#!2D<83U!\4B)0,"%(%2!"D\@j
M"1M^8A('F:H[1D-:F^#&%#.P(3/_*TE#B"2'T+PK0(?[WP+3=:#NT&PXYW*)i
MMKAEA &Z ()3<)I'YI*2>"T-:RGAEH"04(2&3*$H10!! "G2J,-QI(4VL=)(h
MJ+<4YI0*4F$J@VRPA *<C&1['[Q#"NRT)#>XQ'Q2;,@<!!:;XWCH@I]A0X<$g
M=A3G-2H+<SK!3)0VD@7.80PV"='VP#62.P G-DXCT%3F8YVE(.Q2;A@/GM@Vf
M, XU[#@\R8E+IO.:$V!I37*("1OLE 0Z>%**EDP)OQ#(DE2QC0XX80.I.-,0e
M/[*Q##%JU"21XX8<$0D.K''#P,R HL]\*RVA,=^K&L.55?+F)CK"@W7HA4H8d
MS6E##AK3GN20$CB>;FEI,$.]='FE27$))]G9CA7#H*;G;*^"I/I19Q@% B2$c
M87GM:4(9SA &%DVG0QOR6D_:H)U$2><K,*"!Y+P6&Y9<$8/1N0,(H$"$AL#0b
M.#]H5!%6,DX0*($W0N%,*_?8GLC)@ :9 V!Z-FFF"YI$G_ST6QF4!TTVI&$Ma
MQHS!LH30D)@8B3.[\Q57B "JR:'R!'J+G8*$-Z4QK %WJ*3B9^8ENYFD9#AZz
M^PF6MND[<5VGED<JDXX^E09+B61#)[")3(IVPO<I #(-O5_K5DE0A\IDCBWKy
M(X$^ CN'OD=#0D%-2%Z3$J]M[R5T:%AL9M.H))!J+DE[2FT&\-?]F&M+DUF:x
M;*"YRC 0DRWMR:10.'D^17[K2 G#T@))2(863+9J/*K;'&2XQ-/.);6H9*V%w
MEA);K+6LD49=H($0I*+MM#(VD]T><T8B6B7ME4T$,DEE-W11&$EQD4M[0\$0v
M:)WK&,PT(AD/MI;TK>[89$/B(]=4'-19@ST'FK])%"JU69+">N2PSPQ-<.)#u
M&=E,UI A6F5P0 *5D HSL3.AV0*IZ-P\84FM5N6EJC1KL(;E8;)67*#PIN/#t
MNJ6$;KX5+["6%$7V3$4*5)@"4TA @R+<H 8I..9/0N,A CM4I*2IP[S4BT!4s
MHA'$)0G0HR9;HA)7$B:ILJT;KN,2%813!3[6H-+J9L[NZB<HJ4I)&?"PM!N1r
M(9&)(O)>U\@27'YK+AC"3-IDQ(8:)7(D1EH:L9Z#G)?A)*18NK-126 $2!# q
M3D$0E\,P3++XBFI-+V'-&-*@(*PF1;T#BV),?B+D-[B$#%(YP?FX:50TCDR[p
M5DK*9!D, AVTX&=!V../?U@2$)@55)&&<TGD):HM7P<.I1W)?CAM14^R.FNLo
M,0G'G'J"R:+ D&DPDCGU[+4<@* 'B 5-PT)C10^"L(=PF\/FC.H:-^S/<2 Xn
M0A&:8)$I3#9=,Y.*<T<R)J2TYV]Q"@Z?Q\(AX"B;/6WV2'Y+)R?LZ;9JYILLm
MD*$B8@'M57@]B8\Y,X.^+'^&#&H *:O^ALH9=NNR,%IWZ$9793D&C%+,'("#l
M.O>Y\^6!-3L(]8-OHAU8]IA@#5M+:,1-[B>H.-C,@8ZD. /(ZN!DF0_95K?>k
M?,PGKDLNBIJ*8&U*A^6T6@3\$@&MXB=1T#5/#L22:\BET*5L";V&A,%A@$IYj
MICWBI&'*MB*_;%C  ]K8P*@<@WGWTY . _'-4^$,*AOXP AV9()L*=<"AU %i
M*4BA"$X@7=50H+NN[;5J%@=[0UX3RUD^N.N?;L,8&SO+R\Q%TWPUT]H):,#<h
M"<58>P37OR 9H"<L>22O&:&'/HBHQ:I4@*0_@NG+OAU_ :RP>Y6[',XKE#NGg
M9I[\7EE9I6.F_M0=;GC/4KB$LLXL2E3YR_,)2ZF=H A7/Z*-BX^,/FN2"\I^f
M>?MA$O((U :B@__5T$3]=@[[._U.98&C-UJ".,U0$#4$.Q\S+_46(@M6%+MEe
M3CB6*DGB5G#%*[XR8GOU3"915T*1?L*V5^!7-0DW$O!W3C3#+4R0!:*!(+#Td
M%D'@!CX"')VA(VWV))/%<VQ0!TBQ@KDQ@YXQ'1PS6"O(2&Y +"XA?T8#>T'Qc
M%)EE>QZ"9FBR3S(Q6;LV3KN4%&X >FF3$B<@@2TP,KI#%\H!57"B(RL1$E?Eb
M(L;1;DRA=RN!$VV@*3$S6?*5&RPQ1JU#7O"');W6;1M8---Q C&!!W?X&5'4a
M,"4G%]ST%E$B3TL1.2"04MVV/\\A<. 6'&I5(U(37G&X5]5U'#&1$H>5*25Az
M>Q37='! ,UXP!)^1:U,F%:$Q'--W)K\Q)T)!0FV03DSX,C\D'FY5!$N0!$S y
M! .4$>1U F& &MJ5*,D& A$R$VRQ=(15-%8$=4LD=>1!=?-S=5DG5 . &]9Ax
M(KFXBVQG0#VV0'P'01)$0756)MAV(7 $4.=S7U*6>0UQ!8>!!$_P0.;H+/X!w
M-V/W6/9X@ -V35^6+=O(BSH%A#9Q,[!'?203$[2D /3%:13''(NV@NV!&1.4v
M06Q"2J2":%+5CUWRC[BHBP+)>Q:R>A>F  OT)PCV&7O2)4*13;A47^4U?/N1u
M(_=T*=H37HWR!*2"&=V!$S*#$UGC(#CT%2Z@+(CB!A/R4SNB5[X#([I&BP)(t
M<0/U+V%X$SVQ@DY$&FG1 JFF$U)P(&A !U, ',34 D3 /2[ %0S()@Y8'L Bs
M!+ZS*V&2-%XS365E4+>W!-UX0-/QD=R8>Z6(2@>#/>BS.XUREL'D6HTA&BM8r
M+HL6*<_12J\W6RIW$F#I><\D5L<C$@:3/4@#!]^X5V@T'-YEB^01*[."/P,0q
M)325:)8%'2GA/3W)2Y5YB=P&(O/C(6> -#2&)=_Q79HR=G0P>;Y)&6*P.!^6p
M&GNT)D*!<S^$D0\5>C2&@L-S!I1)5EB'):W&0\A19 W1D?DA%YH2A,I#+MWAo
M$O_B<R/!G.&4$NG36"#0FON667HS)^'S%..CG?%$(#AA46(((WG&<R,!,'%2n
M%C>P3.9A!-VG'+E#*G"$*)G)G;!H5#PD%05B$CPD3Y[!>$L6@S;X4%"!(X]%m
M%PWA4BIA/2X4)V2@,3$V,RM8(KUQB93925BR'["#(]V$1<.A*3'2$%'R'V, l
M,/M3,CVBH;G3H3)(,V"R9:,!%'62 #MP:K02$ B %FK!%FX!%W)!%\.I %3:k
M!)10&FO!$G+A"2-A ^SDI9!P $K4 C5@ S4P R# !&60;&A@4T@R%3'0$%1Zj
M!:$2;JW!0[0"&@A%1$E32S(Q+E!21P#_AP(  ",3AWY?61@#   ,8#0  "! i
M$@!( \0<'$#@X((  X6<^L$#  @G0;@\2J)/ #H4@);@(^!"1)59_ #\^/=/h
MC0(&D9S4 5'DS$!!("I"&"@"@#1<!&08"$1P8)*1-F118C/07"1*D2H%T1? g
M PB@<D+@(6 '@ &M!/P L# 5@#.3</R(P!8%V3]^(H#)T"$  Y)@<!*$"S4Mf
MV%0!;M8*QM8D'0 %% &PP$CE$0=@X) \3JR"L6/(D@&!P . @!-H00Q;"8&,e
M@)S0 -"0YHK:R&H_,E 0A(&# +$!P&( LVT 8I"I ;Q!" 0C10 R2(#)^2<Ed
M$*"4"I  ,3 0Q@< T@4 &LC2##K@P2!\BY+L;11H+W0$<)?X8L9'2/0$ )0Xc
M 4:-\0.,JG__D9 S&,E$$Q%IS+&&#"[ 0)  $ EP0&<(C 1  @! !,D'3N1Cb
M!8(Q9+BA"S$P\(97G=D$@#@><B@BB028P0T(M;E@ ! !2"'3BM0Y8 8TFY$Da
MPH@&D)" #"\ P( L>@# S1H$2)(D-7?EM5<TP<!0I ((%(E0 68($$P2" @Pz
MD!D#08+=.1_X\ , 3&3#QS](0/-F$.@ 0$.;;\8Y9YUWN@FGG/_0:2>>?^XYy
MJ)]Z!LHGH8D*VF>>@#K*:*2+(DKIH7S@HR<^@J( 0C937&&&((TQ\4VF<  @x
MTQ1 R/$#!-G *FNLM,Y*WC_NM/4/.F!X(R9!#0'P8$,%  #! /I4V% 11"0Qw
MQ1(@?!@#""VT ((4030! AD%K@'"&VYL*T<:=I0! A8Z@%#''&FX<08(!QD v
MPA)"-*  "F.D $(,.>"  PO\XI!#M&^PL489<H 0A L@""%'&&Z008>] S';u
M[1<;3@L" @<A !H(14M)3$PR,2Y04D< _S !   Q$S8&M8I0 0  #& T ( Tt
M0-?  7(  !A 8N""  I5/'FBCP 3%6T $ #1 @ #:*T 4  )@(,!0 HAO@#Ps
MHH&0,S]X %#B),B3=QZ%G(H) $1-+H^2Z - #P6@(/@(N  !)18_ #_^_5.#r
M@ $D $[J@"ARA@H(!'(4B ,EYY^40(">*D "Q(!"&!\ L!6 $H!4,^B"##T%q
MX5N49/_X18'V0@< 5CQ]!@&*1 \ %SP3_'S4&$"CR)-?UH3S+P2PC9X)Z/!<p
M0 ,(/!J=0"NR) D3)B"LR' 1 P0(%&-2@(B1 P<.%KM[YXC]ALV:,G) !%DJo
M1$X8-V3H-%"@P,D;$'+*S$E#IHP;.EN)))FR!(29-W6@@TCC!L2</'/HE&GCn
M8GH0.V'2L DCADT9$%($T80.( RD  A+"#&=@1H(7U]214%$7U\N345? *D m
M   Q$V .2%ZN    #%30I)D#(HR<,0+ME $QYHT;.F'2N"'8)@\(*$1 2 G2l
M! 29@6M8@"A"),F4)2"LR' 1PT4#!5#8E DS9Z&<F61 T$&SD,R;,77:E'D8k
MADX:AR))FESB@LB3(2+%E#'SYB:(.G,DGM')$P0<.6_.R G3QJ6"EPD@$;#Rj
MALV:,G) !'$!0LA8-V3H@$!A1<A&)T2H "$BQ$D5CD%:"DE"Q4D1*BE>@@#Qi
#$AH h
 g
end

----------------------------------------------------------------------------
Bitnet:  VBRANDT@DBNUAMA1 (will go away late '89)      Volker A. Brandt
          UNM409@DBNRHRZ1 (soon)                       Angewandte Mathematik
UUCP:    ...!unido!DBNUAMA1.bitnet!vbrandt             (Bonn, West Germany)
ARPAnet: VBRANDT%DBNUAMA1.BITNET@CUNYVM.CUNY.EDU