Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!rochester!cornell!batcomputer!braner
From: braner@batcomputer.tn.cornell.edu (braner)
Newsgroups: comp.sys.atari.st
Subject: AUTOCOPY
Message-ID: <1819@batcomputer.tn.cornell.edu>
Date: Sat, 13-Dec-86 23:49:15 EST
Article-I.D.: batcompu.1819
Posted: Sat Dec 13 23:49:15 1986
Date-Received: Tue, 16-Dec-86 01:09:43 EST
Reply-To: braner@batcomputer.UUCP (braner)
Organization: Theory Center, Cornell University, Ithaca NY
Lines: 135
Summary: An improved version
[]
It's nice to have a bunch of programs load into the RAMDISK upon boot.
I used to do it via the login file of microcsh, but looked for another way.
Recently tried out a program named "fld2rdsk", which copies all files in
the folder "cpy2rdsk" to drive D:\. Works, but somehow needs a LOT of disk-
drive head movements back and forth: SOUNDS unhealthy for the hardware.
A program was posted here a long time ago, named "AUTOCOPY". Here is an
improved version of it, both source and executable. Put it in the AUTO
folder, and also put in that folder a file named "AUTOCOPY.DAT", a text
file each line of which holds a source filename and a destination filename.
The improvements I made transformed it into a "style 2" program (only
GEMDOS calls, no C lib stuff --> it's compact), and increased the speed
of operation by reading the whole .DAT file at once, then processing the
copied files via a large buffer.
Recommended order of writing things into \AUTO:
RAMDISK (rd576 or eternal - they're equivalent)
KILLER.PRG
AUTOCOPY.PRG
AUTOCOPY.DAT
"Share and enjoy"
- Moshe Braner
PS: I noticed that in the following uuencoded garble there are no space
characters, but there are a lot of ````s (ASCII code 60 hex). Is that
due to it being an ARC file, or is there something special about the
uuencoding program I used? Is that a hindrance to uudecoding, or an
advantage for passing through machines made by you-know-who? (I added
'a' at the end of each line anyway.)
----- cut here, uudecode and feed to ARC to get autocopy.prg, autocopy.c -----
begin 644 AUTOCOPY.ARC
M&@A!551/0T]062Y#````W`<``(T--;@5^1,/```,+U0T4`!%RI,C4H(T&0@"a
MTH`@5:@\&?($2A80+4`$J4/G#0@X>;0*6-2S)LW=!@Z%-*2RALW(.R$0?K$3ADY8LJ460,"!`\J4(;@L"&Ca
M1)$I5(H,<2$D"14G1:CX&"AT0),W9-*\+$,&A)B6;^>@*0-""$DW3UF`V!I#a
M1HP9;!48J>)D")4D3YRTI8(FS4R0(DF:M'S28]2/;,*,H0LB#5(Z>T%P@2C1a
MY1LV9)Z".'HRM4^@(.+.6>.B;1*;8Y;:Y5MG#FF4*EF"R/.FCAR78>PTEY-Fa
MITN8,CO3!*%9-U44=RJ/03/;3%N5SHV#:%/<9AD\EFU&-?-E_4G#&/+%EZa
MIIPZ;J30FP(-#?`;"&S\M,9,]#V'&E\OQ:0::T^L%M%$%67A`A%!4`%">&F,a
MEYM,8U`7U4P/7A?3'&VA]%ER:=#E`@B405A?&S65MQT;IO%EFD874F31AAWVa
MIT-B#1G`PQS3C:9B&3Y4Q4-L.IE64QJT10@ED@X%@=1[)<$AX9$*"&5`IPa
MT4:((8VAEPL@G=%0`62DN6:);[B)!IQRG&$FFER(89J:9;A`!QUP-'1`G80:a
MBNB?:0KJAIIMC#&&HXE"0J>=E5YZ*!R0$GI&26'@P05.<_`H1H&,HJIJ8D,$a
M8441'4[1UA1-\K5475328:6O66(W$WLZ#7<3'&6,(5>,==U1'7EFU,$&&Q_5a
M1)X;)3KM*6=a
MEEIWEJTA8%M-E(I@Q6>@IF.\0X+;'P@SP."077GL-,>`*KR0V`BFC<%&';%9a
M]<8JM@L+UUG`%M?3`7C@,,+:A$+8^`S=1XF0J8a
M9I,98M1AQA9OQUW$"S)TL<-`KB,8^^R3VX[["C'HGECOR>6!`AQJ1SR`?6?$a
M)]MX83RG`AR[*[#'>6A4#X(*3#HWFF`J])I]@=!+_USO9H0OQ_@NF=]6^CK)a
MEJ`;!J<%C!"L[G$+F,[7H@X-K7N`"#M%5Ea
M;P5SGY.BEJQED>9'^)D)ZOBRNB39AP[.00H*8)""_CE/@WSIP4<8.(#_\04%a
M(1#@U`K(/!"8P`0/3%0(9&BV"A[03`K$7ENNI\`(3K""+BR0#<>F0P(:$($*a
MI*$#>1A!(E+0@MN+F`&&H!(WW&$.*(!A"\U$QJ.<$04BT`$(QC6B*F$+6!;#a
MSK$Z.!"8:%5XL2"T$0QB09P6=#H]HIa
M94('0B:IC69$HPBN0"\0V,LF^'K*OJK#ET$R<(QE?&.O?"DQ8+Y1!'\,I#/-a
M9$@YJ#"1;5DDZPI4RO;ERHFJ1)8;TIBK5Q[0*B"892VK&4TTJO&9UA2F'#-8a
M!Q%I*9N"I*8!NOE-:@Y`G&TI)RK=5J(RU(1JKHSG.WD@45J:Z98),HXI[\G&a
M>L(Q.&XXYFS4"8)MBC&?K>2E0%$J`M<\9YD[`:A)35@&%'IS;#$P*$*=Q](Aa
M+`Q@)34H2CG*4X^V%"4S=0A*ITE#ELK4H)*L6G/VAT[[A($,&VWGV.YWAA34a
M3FZ"J5KWK)<"V,GNG;*\VCP-L$4CP%27$=4?'<)*/;*:U0Q7TZ1a
M)>HOC?I413*RLRLDY$YQ9!H4-&^>SRM#].KWG+I^[W=P(-\((8D^Z:JO8\"Aa
M(?UVLCZJ*@Q`_)N?=ZD+WJJ8@4@^+1`2R#HGAO((*$2-M"\Y3FQ:2")<^#"&a
M6M8A$;CS:A2%[4F)*^(01YA('A(I?0#D1\8FU0!G`(IG\G#@<)YGJAIVFU6Qa
M^M[XA)6K*0@>6%L[UN^E@`V_,RAI=9EA@V[1M2GFZXK=*,S<@F[(0'7QA<0La
M$6_!N+AFRK&+>&Q(A!$.2[-QS)@2H5J\L;6)OAa
M[^G,>=AUHEB]%V<30%EV6X"!\9S7H+'M8`=:GE-4Q]"#`F+W@&7[(]C$QNFNa
M!7+4*0FU$86"``5BEX$%V*X37RV4`FRZTRKX=`J&:#8Y>.V'*>'UJ2\9[![@a
M6<^=A$2K5T#KB!7@REV,9YZ#<#6[6'4-L,ZU[!(ERA/`NI1SZ$'R4+#==VIRa
MEM9V*+9][+PMSD2"+.PHE^$8R`A?QPV6V4N-*9R]NY2!3`6J-`I\96!C[X#`a
M!N;!Z"!!@(,3O`P*5.Y``!H(05543T-/4%DN4%)'`+D(``"-#=2VFYVF#```a
M#&`T``"PP,?``$8&_A$``)(#)_D:#F``<:`"9"J>J&@#@`"(%@`80&L%@,)(a
M`!R@\1H8`H`(`-(:">/U#](`?RZ"O`#PHH&0,S]X`%#B),@W?A(9@."(0033a
M:>U0?BPY!=`;`Q-`1$'VC]]2`!"FS\,Z_L[@`:71T$'_B6`+'*0R`**#G92QXF5a
M?_B0G#L`P82;N6`&$I"R",($)(!@\0$`X@R`?_1=.U-YMU`G8&^Va
M`=#=A/*%)\0$/]4'6F0]"*@*%(\(Q0`0`[TQ$!`_&!"9#P)2,IA_+@6HBP&&a
M/.8A/C8:@$=__]G0HQH%)I=:`-!T:!\_(`HH!8D&G3C0?P#0MV2/.@`)@`X]a
MLE#D@0`$((F2'PK%@X`4D&@BB@!0R>(!+_Y5@#\S_L>$C07`HZ-]/`J5GRX%a
MB*.E%GA2\V4`1^I`(QIX^K+G?7[*"8N6.CT2G1A#La
M3&(/"`CL]$(!+48&A)QL>(,4`[`44B$3-/*!IQ68XHF$EHS@F25D+@H%(Z`Na
M#/8#G,;**<)@!B(Z$"*DFHJJJLG]MVQD/\@)@*PAJ1`2(`T1<-H_E18+P+$$a
MF*,LL^M.ILU@#!12+I4V[#B9.'4V!("-!.#R*).1`J:*EJ``S,F7R@TD`!/?a
M(`".$UYPYMD_^HAV``PTD@*P'8_]1*,P30)F!HDZA,0FE130:`W`3CP6'3JDa
M(L+#M3PEMP`N/[`J5+>`P0`N`S_['"]@(-";4)L#M?P?8@43H(#,`Y%2\\T(a
M@``$-,9`L)(&5Z-J`A`,G@=;E"@V\)L\#!P!@`*_J=/V0+^)0\(290N'-@!Ja
M#R3!W'!;-+<&X(DSN'$`&!`="!N^H,!?^[@S6`]`_../E`!4J/A`F__C"`.Ga
MW>8/XA#X%X`&-@Y`1LBN8!R=`5*TK@\#KH2)`R`8<_2//!`S,''%G75F!8`Na
MS/67`,I0\0CH@PR$@!L&&*B]"(@Sa
M6&&-LQ&`&<1'0SO`L2-G@`!FA'"*(X8$@6@@T;)ZF#@_)E$`V"#1B<@WQQF6a
M#P@"6,,__O`V&!P`"<"(1AH=``82,*"(-F'`&S@0F0#H`N3!8R@P-`P"=HU,Z:*%)`)^_)$`?HDY^X\>?;KODV,#@`!L5Sa
M0`&+61-DBH&?;X-%Z^CQ!@\@P0V[PZ@"(`&`C;*R?4)YE2X`0(RA_:29]3'Ba
M.Q'HBFIJLUQ=`(87`]"][^V0HL<$@T`1(`0V?$^D5%Q?3*\GE"0@4`Z/2:KEa
MA`!2?X#!!!"U7#D`0:I`*``:P(`!!&"A17UFU1];[>I7@2$$*$BAJO=D@N7:a
M(`VI*O,`/K!>#_A@2LNI501(D(8[+.<+*(0/"TB8!3+,8`\8H&"=/OB`"5.0a
MA$`8(`5*"(0`4O`%0/BC*")@@V5)(%H!%,:SZD,A2@$0A+_\PQJ/Z2GXQ$A#a
MQ451,KT\$`U`H$4(E"X]"M!G9!J`&==Z8C"\G4OLYN);V/S@7T+)#`@-`:WBa
M,6`*IV$`#,T`C*0>"`/)1*Z%`"`A+8S6R".Q!#@&"D)<48;P#P!B`\F:2Ra
MPV0ZY>$A?7A('LUTU8^I,#398E*CNRN@(Z.#"ABPX'O1J*J'[/$"H=B$G:M5a
MJ3\\4&;OZ4!*`G`B#>GP5LM)01%/3J<^P""`0U\9`(L@JX7*P<`$PXA@H@0`5*.*0.DN&38!"AV;XK=/&&72]G'?K:QG4UL?@1``,R.=K49a
M0NUD3QO9Q;YVMKM=;(9(@Q\%P$,.^,`001B",SH`@1/>``(RE&$.=$B#&\*0a
M[S>X`01F2`,;R@"".<"A#&-(0\#+0(8&*```5Q`X&WC[!CJ`X`UV*(,<[B"'a
M--"!X'Q[^)8H7O`ZC`$-`!=X&1P^D#&$P0UNJ/C%#_[O@0#\#7(``<<]OG*1a
M#^$-<,B#OL\``IO3@=X#83D`BB`'.>!0#V4`10``)"`2A"E1XPA">`(4L./SA7#A[VN..=K6S/0LN($(0J#`0NL]=a
M[G9O>][W3G&+F^$-=7!#PZW>]*=KG>M>]_L3)+]VP>N="DI7`.`KGX64NR$-a
>DC+55P,+IW4J%T[,<$@40@`$``!H`a
`
end