[comp.binaries.ibm.pc] v01i074: dc, pgm to move/copy/rename/delete files v1.05

grandi@ncar.UCAR.EDU (Steve Grandi) (01/31/89)

Posting-number: Volume 01 Issue 074
Originally-from: noao!grandi@ncar.UCAR.EDU (Steve Grandi)
Submitted-by: noao!grandi@ncar.UCAR.EDU (Steve Grandi)
Archive-name: dc105b/dc.uue

Here is a later version of the small, fast and excellent "Directory
Control" program dc.  Fans of truly public domain programs that take up
only 7K on the disk and do a useful task well will appreciate this program.
-- 
Steve Grandi, National Optical Astronomy Observatories, Tucson AZ, 602-325-9228
UUCP: {arizona,decvax,ncar}!noao!grandi  or  uunet!noao.edu!grandi 
Internet: grandi@noao.edu             SPAN/HEPNET: NOAO::GRANDI (NOAO=5355)

[
This is version 1.05 of a directory/file manipulation program by Peter
Esherick, based on the CO and DR programs by Michael J. Mefford that
were published in PC magazine in 1987.  Some features were added by
Steve Grandi.  The archive is named "dc105b" so perhaps this is
really version 1.05b rather than 1.05.

When invoked, it will allow you to show a directory listing of one of
two directories (possibly on different drives) and let you move/copy/rename/
delete selected files.  For a 6K program it has a surprisingly large
number of options including several ways of sorting a directory listing
before displaying it.

checksum     size (bytes)  file (between BEGIN--cut and END--cut lines)
   54283        19545      this uuencoded posting
checksum     size (bytes)  file
   46467        14165      dc105b.arc

-- R.D.
]

BEGIN--cut here--cut here
begin 644 dc105b.arc
M&@A$0RY#3TT`````````WA@``%@1USTT8$D9```,Z8X0$+!@PP<Z+P``./"`
M(1PX`/X%`'$EB!``D`;`PSB`@9,B4X@\@:100H(!#1!TB/@/8P%8%S`*::!P
MR),F4Z`4&=*#(YX`"EL*C0@@@!(G'';PZ.'C!Q"+0XB@22-E2@P)'T!@</%"
MQ@0(1Y`D>0(EBAU"-SS`B+"D"4E8!D0HV*"`$`,$"3(D,).`48)="9PED)=@
M2H1P$!Y$\(=`!P.Z<DTID$QYL@*\=OE^4I#-0)P%71;X66!H@9@%:19@6G!G
M@0@&%!XSF,%@6P,B#?8T:.``3(-5NQW8?JW#P08&/QQ0<,#"@90R<>JDD5-F
M#H@<-I:`,$.]#`@I09J0H/+F#8@V8=SDV9Z&37423LS;Q*ES"`@[8>2D"2/&
M/8@T;H!0AAMV3/>&&VT,2`<)((!`Q'1EC$''&W*L-\2!=,CQ!AL@0%*`%67(
M,4<:!X(0@PLPU"!&AP08$4.'`UP(QWJ0+&"$##`2489[='@'20)&S`!C$V_8
MX:.--,#XG!MA)-@AD#7`.(1[^9V7WQK60=*B#4->"0)UZ`%(1H@@&'$#C%/<
M$08<(#0AQQHO5('@FV7B@*::;#XHQPLZSD&'"V7F("4:Z9WAG9X=%N`B#`T.
M0:@;ACI8W9\-!L$&'2`XP4(1+!#!PA0L/`%""R!,02$=1;C1HQP@6)%&&7>`
M\`((CB*:T0HOD-KFE7$BZ&5&1<PQ!@@4@F`I'2U$`<*$(!2!1QJHRJ&A'#J`
MD`2!8;"1!AD@D*&?D<2R2@:$$E*8!P!,O!'&N)""D!ZWILI!!X!G=$ONA!6Z
M@*ZZ[-8[+G7EY@N`GA'BN]X;9H```(M&M%<&"G.D`,(=T*+1H0)BY-&C==R5
M4<;`99@11AV7=CLI@&',6R+(?J*L<H#CSK$&"(1FB;'&U6W7W<*0("`$SM8!
MF&@35Y;!K1D.S[$PQ6QP*(9W8_)HM+Y$F)?'&W5,G,8<%C,;=1D]_M!@%B\X
M`4`1TA9+W;KT=ONM=PJC($4*8%?(`@@H1)&"=)@6&^P8:Y;Q`P!0M"#C>@`0
M"2X`2S;I'0".%@KUO>9"_FBD8XI,,J9CMLSDRPM/Z$)&`*C@@@H`\$!$$E+X
M@`L`,S03`B(6>!``+@',(`L`LM-"A>RB=!"`+O)D@`L))<C.#SK9+.`+"1O\
M@HD&N1`!P#RDX`($`(Y@$\H8`#CP00^T#$!'"%`<8P`-0.'BRP`!_+)``+D4
M<#TIH#P0@"I8%&```(#P00*`0@<!S``8HQB@#/Y!"P0T`P*(,$$$`E"^!R;"
M`3((0"@$``!&+&,%P^@)`N9@`%VH0`#IN`8`2O"/!XAP#@-X'006@8U8$&`:
MX%@$.`X(!0?00@FRDT,W&.&`1`0`'0@8WA,$(`=J_`(0L$N&(AH0A"-<(0J@
M2*(\7%$'%"BB`,<HPC\:=$42?($'5JA#`7#G`MGQP`AU,(#Z!JB07X#@B/:`
M0!:^((YH[!$=J```'3JP"&^@(Q2"C,`OH`<(/@1`!P4\PA%8H0H%`*,.^EC$
M/-#A``6@0QP`0,<Q(A!`#A#0`:%`0P!&X88C4@`"QC"`*4,9"@G0$!#\"(`=
M+H!+&\Q!`KCD`!T:0`L!-,,"J&"`&@$Y@'4<XQ>3H!\*`*"(8^R"`0)`1QX@
M4(=G_.,"ZY@%+1(@.U@$8!T-`,4$T7$!"<Q`&NA(@@1D``Q?3`\*Z!!%`D`A
M/%JT,02XFX$B:A<`V6&!%DR0'3H*(`%?>$,#Z_C&#.P!"Q",8P*ND`,!Q+&/
M=3#@"8NXAROF(`"./L$8]EN`/881"A8`8!1Z"(`C@#&#?^S"D28`1$_J,(!\
MK.,$BCB`)>DP`1/HH`!U(,`0CK".>-`S%__X!S^VN(YM^`()&C#!%Q'1HB-8
ML@[U<,`!A@&*^:%#$1'P!34&\`M9'""`'PC`/^+HBWFPU1<'0$<)%,D$#BR"
M&8%(1U%6\(R*SD,5!QR%$%:)A`"H#P@!&()C#8"#`/15%T$HP"(<8(,CED*1
M3>"`'/S*CD"T`P#9[`(`:/&$(#8`'50`P`[Z88=YZ`((*)3K$Q+A`QX$8!$>
M6"PNQN"`0>RC`G-``"Y``0![C*,`DAV%#P(`5[G280#H:(<`?O'0*Z"#&@CP
MPB_4L`%2`(('`,`D++B``S'287^\Y4(`GK<!=`PA`</PA2<`D`L&`)`'+JC#
M!!H9@``SX!\&6"PE53&(8RA@'2$8!H(5C%ZB`K@.#!A$.@9@6`8'HYGK4(4X
MT-'A*]C#`)4```3HX+PB%.`(];O?.B*`X,8V&`&+L``G`!`*3802'P[X0H,7
MD&-,`&`1PHA%`::!C!(\``"Q^$<M6H`.`CP`R27X`)0!,&5T`!G)L4@`DTOP
M!P`4``H`Z`$9`""'`;1@S;'@,@C0T0T''"''ECARDA<P9BU#H0?^M8.;_=N3
M],;0OU&NA0[0<0L'@'G)31Y<G+50"S@,0A\,(&DMPH".3SA`$29(,2R08`]B
M"*`.`JBH*F`QA5(3`-6JAH442AT`6(-@U4$H-0ALK8HCY!<?!`"$`TP9@74@
MP!?Z"/:P`W!$*""@S>@8!@*&@8X3-*`."T"'+19@AQ\LP@;R7<<`?,$(`OS"
M`PY`!Q,>X(M,$``=1GC`+WR1;B`\`!WO8``ZIO$`7,:`#AS`90#HP$M^5(`.
M!4"'+AZPCG0(VY39W`,"Q(V.53P@OV9&QST.((<.U#+@_(#D`$`!/3/JP`#D
MA04%"LB``8C"E.AP]C`>'@`4^,(`"6<&QT/@4`V(T@#HR`$"%KF!*_B"O*S@
M(@&^B@\O\-07$N"`-L?JB[X:@P`@&(0Q6+`#&_A6#O1`AQT8D-^^-M(!/*"#
M`QJ)`B30`0'GW?4`KJX!K7/=ZP&0PSC0(06R5SW@/-``'4C)![2KG>UN1P#=
MQ7WUK&^]ZU\W9`K(C@Z:H",(`1B&+.;\/W145O,^/X4"['``1%#`"NA8``.\
M,/-]Y`?N^]##'08`B'%\`1V-4,`[%^&/(_@BM#CH0!U\9O<=W,,.^,"!,(N[
M=2'$O0Z;%(4#\C&,S2YV!<JXH!$"H`@'S`\1#H#`$9E-\6E$Q`';K\,]NJ\_
M\(M_!NU`AQ4"@(_\/A0=8S#`,'Y1BB/J@0&X]`]TX`Z_8`(.X`O@@%W$T`"#
MX`.+I4M8D&.^-0CJP`(S($4>$%>`L`\">"/_T`NAM0CUH`BXH0-$D`-R4`%W
M<`(#8`,P\%O^T&`LH`#;\">*L`SS8`IV0`$BZ`2\)X.Q8`&+4`"ED`A$X`_B
M@`_^<`R#4`Q<IPYR8`P4.(-SI0NQ9$J`,`RQ(``Y>`?24`?D,`CN@`"#\`X(
MH&1=2`QU8`U:IP`--AEWD`MUL`QB:`!E:`!*%@@\$`,R\':!T`-\6`>?L`ZA
M<`IU(`NQT$R6T`M@\`_BU@O,A0Z+``##T`MP@%U/``#K($>495D<X`N256V4
MV`LDL3PZH(FVY`&^%0CKP`D#$`C[T%=V0`")X`&5]6W3%0CN$(E`059F=0``
MD`@V`%F@('Z+X`.0E0LG$$J!P``<57TV4%D#4`^!X`]]E5SJ4UE]M0X@`%RK
MN`_H\`%W@`#9Z(GKX`"LZ(H[,`]V(`":)(R?]VV0-8V]0`W_4(V2)0<.T`LN
MU773-0<)9PF.B%VK\`_#X`*`8`,3$``"<)`)N9`$X)`V(`'455%XD&JF(PH4
MD'D(J9#,1FVDP``]APXC0``!-5"V(SN,8`'OE0@F8`?#@U6[4`BW`P!+(#OB
M(U;ZX`@L^5LO&0#[`$/HX`D,$%"[(SNZ`$6TH`$*Q0'^0&W.=G0;`$/I8`C8
M10(-,`>9MPC6\#H](#NCP`0!4%9'A`(,D#^YDPSHH`&S\0_?I@,!8`2YX`"A
MI`T+T&`0``LO@`YZL`"YD`&AQ`P+X`@>H`%'M`@"H#[Z\`]HU@L*$4O\T!+?
MA@__(`/D(`/MT'V1.0X)D%,FL)!_@'\!@$_;(`"T4%`6@`6Y@`$`\`O,%4<Y
MY0`+"0CQ1$&\8P$"!W#!1'"_\`K<1PQS"0"[@`+9%`\)4`?BX`+?)$0A)C[H
M,`H,`%QB20L^H%!"H``SYP.1F5X/$`C]H!#Y,$SH8`(``)G_@`'^X`"167_H
M0`X`H)79&9D7(`<(@`X[4)X&$)G_X`_Y^0_UYYT*40?`I)TM$9XA8)Z:F`'H
M4`Z_90.4Z0,K8`=L-@_5"`X/(`?MT`1-((R4^9_]X`T/,`<H,)G_X)F@&0L8
M@`Z7$$J$P&8\:`&4R:%N:0PK(`Q%4`0^D`A&``#U1WT-2`]150<*$`KR\`_W
M@`VC0)DS]DX7:`+269-"H%!=$``(ZI@`H)B,R:/4M@G_,`?[4'\F<&(+66L/
M$`J+V0-H%IX&T`(0\%*+.0QA:@!CJD:#8`"+"0'4=@W]0''QT`_H()#UUW7V
M\`_T&0@^,*C@0*CT-PP&X*06,$!:Y0$+J54^0)$FX`CK$P!1,`CGD$,.L)B"
M2J@)]PILU@:L(`+'P`,-<`<AH$:`P`P"L`[GP`,*4`<60&NTD%[<L%("@'"#
MD`],,`?+$'.:6`2X9)J&Y@2R.@[!P`/'Z0`5Q:MU('52``#C(`+K\`J_"@5W
MD`$K90`LQ@,@T`<'(*W%$*TS1P?O9@@)<`3B\`@K-7"*<)I9D`37E0YY\`]C
MM:V"E@MHA@L*,PX0X`(Y-D`K!0AT`'19T*[BH`_#,`Y"&`Q(4`+`"`3;.HY1
M``61@`[6\`]8D`4K@`S#8*B(VJ4)YPO_0'T&<`52$`4Y(5:!X`*4"0!X<(&Z
M0+/H\`:A1)?X@`5;D`5:\`5CI3Z4"0Z'@("'\`L6B@XPP%]1=0_:@`Y-```M
M8+1\1XF!8``SBP=0]0\W"P'H<`-4:Z%(&W1'Y@\(>&^]R)6YD#J-BJF&.0^E
M0+`>()9MBP>T\`.R<P"+(`^+``T%8+2C,*AP^J2X$Z41II5*,`I%F@@6`*16
MX`%$ZI:/^P_B,W=:*01/!`!7D`L($$I7<`!>X+FMR0&AU`G'MI&_0`G\10#4
M)*D!``W#P`K0L`UR(``,,&<L@`#B0`\?P'I6\`LVX%?W4%&D>UC'*%]#V`,N
M$&`8\`1/<`6+\`R!E08;L%[]L$5'P`\@^PR'<`]&@#U>@`Z_$$J+T"*D*[P<
M<`4Y^`5TP`"*T`$;N"P)=PWY,`?D,',5=@*#X$B0A&/60`L[$$0:L`@4``C^
MH`-U0$KB\`'^H`RTX`"]DP&RHP/"@&KUYPNR,`"@Q@#4Q0R`<&[I9@YYE0T%
M0'VT0,$A0`!!``6J@`LZP`6K$%(R(`VT<`0&A0Z.,&TBS&AY50PN2D^J`'5^
M100!T`.GB`]J=`Q$(`#ZDE\.D'#:0*@EH`@>\%#GBTL*S``F-PQUX``G!SW#
M9P4C^07_,+Y;\`_H\`(KY0L?D'"L0*@$&VPA5P<5`&K0HP/@,$PZ8`(/50<'
MH`L/)<`*!0-J3!.IM$JMA`X!D'!`H']$APY<\`\DMP&B``$<8'\:0'3\D`L[
MBCWHL`WU,`RHQPVOAEUK,`!>,`?OY@ECU<,%<`#>I04#\`7?)E\-:,2"-&[E
MAF\&X`M'A0[I`'28\&Y\<``+Q`,;0`<SH*IT0`,\@`!UH`&!\`]11P?I<%+V
M@PL(X`!0\$``*\$0@`4/M`[5(*YV$`W5+`/"M`RJ$,'E3`P51P#4QYX34*ZR
MQ&QT`+94<`!4:0K^@`[&X,\#D`XK<$1+\&KU*;.-MPX3@`YLD`_HT`%`!ZOG
M)7@)]P0^!0_D>VH'@&!&G`Z\$$K!0`"C0`4!X+CSAPY70``G9DH80`=@@`[Q
MX([5\-(!(,T#H`N]L`%2D`O`B`[@8`!?T&;IP`C-E<^U=@2Z0%Y70`M6(#M:
M`$/K@`<D@=.OM@:Y$!/H@`L&<(QPJ5,:P%,HI0)7<`3HT`;U8,8.L%B`T`>&
M9P66VUCK``4X/7#WI@C95&9RD`-O2:4$H`(XW:LST-0;0`M!$$0B$`HHG6/S
MMUEB<$2<0``#8`!>$``38`%@P'U7['.@`'0M9VQ,"W1_@`_K8`&,_5L6\-@.
ML,@:E0(&``<!D`$6(`=RY0!&O)8&(*2Y#!2CD0[W$-`&`'0(L-OX<-?7A0Z[
MH'\!A`',1I4DD3M>V]-`'4KU4`!R$`2^D&**0`"H4&LR8)E7H+ZY8`'W8\O(
M,`CQ,#P]C0[84`!SP`&X\Y4A(`?NM`V*@`VO0P0*53^!(`Y0%$?I4`3Q$U6&
M7=WHD`K8;0;;#0"L8)FC``4!,`A!&@'?75$%)&O`!9<Z<`0J4`='T`JC@`4!
M(.):4.(GC>+S=T#O1.%SA4H[X%<6T`-^U=I'M`D#4-EJ@-D6P`8!(`50D-J.
M_5LVC@Z#,``_NP+8L`'*0$+H4`T`D`[+``"&34_HD`+8#0^+H.7>$$L9`!2A
M8)C=\TY=F[<JJ0WB0Y6(<&3V&0RV"@I?[@_`<'+.30<2(`I?'@C"H&*.H`WK
M`$_M0``311T+\`]_`+9^0.4]?8&TP`-!-`6+@`\Y9IA=&T!?GE[NV`SCD`)1
MT.>[]PVT``0&Q0AH_@%RT`([X.8ID)Y?C@<&H.<JM@[0H%+W"@=N^0V;1>(Y
M=N*X<P6RLPC?@`Z&0`#KH`&TKEF&M`<$4.A_<`!TX$ETN0Z:%>QK0,^<@`Y\
M0`"=,`PN7@</P-,;T'W#BYGHT`7FIA#06%FA`%F&$P"Q``KV$`^QP`+V$`X:
M(8QP:05&D+ST\[GH@%M&$'=TD`"PX`*JD`L#$$HQ(``H!0!>0&#+,@$XO6L&
M<'9I5_%\T'8]6HD]O0C]0,3G96CI0`H.K@KHA4G]`%+WP%M*$`#5R`O+[`"L
MP`-<\'8\\`+JR@,*W`Y&L._NP`^_P`4`\#HIX$:U)@6^H%H>#USR1;HSORP7
MP`,_(*1!!6##5&$)H`J`\`,N\%Y#(`[D4/"J@`/.#G>#HZY#L`[T,`2^\#$(
M[^#B^NQ2CVI!I0I?[U3`H`KKD`(>OP,NT/)T@`&Z$'6YT*;E/@!R8`$XX``I
M5@<SY`,MOUZJ<,OT0Y?84WT^`)<A97>YX%+8LP.]E7?U4(8LP%N^!7^,5@^6
MNUAS/7`>T("+A5P7$+/3Q5RXZ/*[*%O#&`"SAPY@-0RZ\`(7@`[.L%U1=P4'
ME`L2<#VK\`4SMVR`<($7)-L79-M_=]%V'`11(.Q'5N0M$0"Q'0`14-L!D`7%
MAW="=$%&O`#)0&V5D$TZL%T40``A%0J-1>8)CPZD^@ML\&DFX,'HH`[Q8V6^
MX`0$T,%'U`T3[@.Z3`<H$`JRG6.V7=V_<`?T?P_H4&:A8,1D[KJ_<`CO%@>M
MZ07WUG_KL$_SDPLMD*+CD'E6P.+2H'5KQP-I=P*DNPL*H(D+(`G.M0B2*`SW
M,`X#4`V+@`Z6R0HL``-R<``#4`P`*03K8$#`(`[AP'I;Q`E)%0WAL`+9L.TQ
MM@LN<$3L,%<)L`@'(`HO&$%Q-;MQOS]).`Q04%%)(`_\(PF[H```T`^+H`SO
M=`_S$`GW,`^20``P,/G!L`#*4`?MP`_#<`_QL`#2\%Y`<`_A,`RSH`#V,`\%
M``,PH`#)D+`\``.VM@J*4`RJX(M'M%B_(`H!``O)L`N[T`SH8#:^<+NSD$U@
M``"P8$VV(,\^``"^H`D",`OIAF:P@`R[P`O-@`[ZTL'QTZ8W]V[&```C"0RM
M*0H`X`LY\&ZW``#TA0YQAI;[-@]72%W#`&H.<$1K5DVY0`&A)/0<I0C45@4`
MT&!T,`R@Y@`!``NZ@`Y(0$TFT`#T0P$.C@X]T;"@Y@`!``NZ@`XR```-1@?^
ML`QUH`WI'C^0=0L5T/FA!`8`T&!(X`_/`'V,*@4N@*GL0["/>D0K<01:,%8&
M`.0N@*GL0["/>D0)0$WR[+I8H`5CM0#2L,]0P`ZH(,T)\-WJQP[?30?[@`6J
M,+M#E7"VX(@KQ0I#=;*.^*U2X`*8RCX$^Z@!L`#20`<4P`ZH(,T/\-WJQP[?
M30?[0`KNZ@[K0`"DX*[\H`5C19:=7P'&I@CU(`M/8&PV^P0I:KI5,`6*@`^O
M8P`/M`5=0%83U+85L*!>"P`4@`X40(E1T+8@(.U1L%D9!`6G^4`?2\H+5$P/
M),QGK'D'4$RR,PRY>DS#<)K'-`RT0-_#0)VR,PRTX`2R,PRX,P2R,PRO,P2R
MDU]1=[YFI,775<F7S`%00`(?H`C00`LV(#M`P%/Y@`7#@`3O=`_AL`C(<`_C
ML`4ZX`&8C&VCL...Z^,7U$HZX`%BS`&C0`8I;0%FD-(.H$HMFQ._,`8$0+KH
MX`K]X+-`JP.=70<4,`J7[;B;?4&1_0LE0`"DBPXDT0_UMPL```I60`M((#NK
MO`#13`?T$$O.#0#4-PJ&:4/2\`YT``^(X`/.77_-34`/8`!P2T%)L+>QY-R4
MN`^<8``>4`578`4MFQ,>Y`C;X`C#P,*BL`WO1@MH>PSFAF[HH`;^,&_I1@8!
MK0_^8$ZX-`&#)^=RGIMPQP_<),R(P`[XE`3\L`58H`C#\+-:X`5?T`4?<`"=
M\`PD`0`:"$1#+D1/0P`````````['@``(0#&J+TZZ#@```P@($4@,@1$"Q!$
MTL@I,X;.&SEY0`QYXX:.G#=L&B@(:,%*&3ESTE`$$<,%C!H:`TX0$Q%*&3H?
M0129@^9CFC%K-*:$M&!BQ3`-0=A)$T8'B"!LQ-2)4^<CTS(@H!2L,N?CG!,@
MCERL`P?$PYT+D"I]*N<I""E"A$P!`4)&#ALM;MBX(8,%""5OT+@!T22,2+MS
M\LQY`P=LDS1DW*0Y@X:.3#QP%LZ9PQ;'#+@Y:LBU2^4C1!!38*9Q`U@P8;!3
MZD`,$["!6QHMWL*(81=*&#EAVJ@I\Q+T:,:E!Q?>R#.(%"A!G!2A$G`!CR)3
MD!21DF0(D"G)B20)TD*&"^/(?>A4H'%BFS9AW)!!.$1C"TCDXT-1#>=-5:,@
MJ+P!$88-FS=W@%`5&PS1D88=4(U!6!Z_V=7&&T.Y<89=9)1!H($2\J<>"&)<
M=$=($NZDP!MF@&!&&@121D8:<\#!1AAYE+'>:/R!L.)"#3T4$1LL8GB&"^,9
M\1!Z=!@%R0`$@;`%&3ITL<5@JHU11@MPA$$'&ETHR:23%<Y!!Y568JGD"T^P
MX`0+1;!`!`L/@>;D"T:\:447XTE1!GIRK#$'?CL-0`4:+((0V1MGX-8&"(&.
M\=^`$8D11E7KC70E5$,\H>%Z1$@AZ$6%YC:'76*\<24(=\B1!ATP[:412WS=
MA$88%M[E`E]EF&'&0^NEMQX<=8C!(TTR(KJ75'R%<488>HQ6AEUV8.2"#7:-
M$,,-EX(P@@RT@:!1##G@<,.L("0!PJL(@J!@&V(HNYX995BI6AF4F7'1H9-6
M!0(==^PW:*=M4*8K?VP,QA\9%>:JK0)NU(%N3"2"X$89`;+KKF1>E=A&1`"Z
M`>Z?@>YK***4+43@H\&.YM"]-1W,JZ\WV?@&>J/9]2C(=MUQ*AH.[W?';;A5
ME`:\%6L8T1JCD3&KN#;[QR%4K\(!1T0G:S0'5RY&!*4<4IK[1H7W[I=>1"9_
M!"],N]Y&1QXUWXPR5`L]Y27*5B):8AYOU'$P>FM`];6`BREVXACI.3;&JQ+"
MZ^#6:?QMI4AN?.J5'(BV,2B";911$657QDVWW1JYV*Z]--T&5;T)$GZ&X9O6
M^E$8OH*]U]59*\CUK7*TD?:HE5>KT:0@2.98P[P36T=5D)_;1AV*G3WK>%09
M"Y4;HL*K0Y]_0@6[WAMVB>'B(]U8H(Z"ANE&;D"+SJ&H.!-F($7]+:_`$W"L
MWSA@<#"4^,_KL<J:""^(8")&_[E#L/0'@@O!1`X.@A%_G-8NR)7A9C$10ZT>
M`A6-M"D,9CC@VL)WI?%5;@X;2YGZ&.>OA?`G7@`$T)X.II$7."$@!IC"0QSC
MO1Q]AE4G(I`'R]#"(L!0AG*@H4*^=\.(E`$/J0H)15I(A!_.T$9#M&&C(D(&
M*V%O/0:J7`O7`HD8/K&&#BFBB5!DO33H@8<*(!,,J0*5ARQF-/UY7(40B"@7
ME&%69-@/]!PSF"!"$4=AC$C<^L,&][W`"C"D@FKV,A(B/&$M'C&5&:QF,SH,
M[G^06]$<UC!&`I'*5#"90PN-`$,C/$J(+7H1QO:2!"$T02(8:9,F7:3`,%0Q
M?E8!`0J@)R#H!6AP#%E#"L83$"05Y%Q`XPH44PFCWVQ0!-?S7YM$D*\\_<9_
M8-01N(+`(5/5ZFZ6LUO#1L@^-FCM/+JB3*!FJ<I@G8QWIF+,[TK$NVQ^1B.S
M[$\>P)6%NH$`/1%Y4+F4^:\\WF$O]8QB(`O8(U*IC7<$S5[&#L8S`($@;X+Q
M"D)3-@;5]/&B9<A#E8S&%B.0D3(`79JP5C04,M2!D!%1$!SP9Q=\6N@E,CH<
M@B(%N87L,'\1B0R\0'2&#9H!>0UA'$@S:H08H&PKC`&!$6A04P5(IGY)11`;
M]LD6I!QP?`;2*MIJE+"%0:YA.01:2B4HH)LV)*>/.Y@(\)0W,OAO>,[D7:%"
M"H(55.L@&*6,I%(6S\;PC6O`2QE&1PHNC00A@S&A:X-2-YF\IBP,3KM(9(A"
M-A,A57Y+=:C2,%NU#6ID</:QG%?JAQO0OC-EEC.0"0M5MZZ@]:3NZU-";"6V
MBOR1B#^C#.#VPE9VPJAD",T7J6`$0K8\X6$@ZQIE*;.[E!DA!YYU0U)'@M%J
MQ38FK'E8@,A@JG+]JTJCVN$VV?#5Q8FUJHD#P>:6Z]N3"71T^UD1;WW*QUZU
MP)[!U>@&YT`^&Y5W6?+UYVG3PS?);76ZSRQ"13[BO^YB4(-XS1!$;9O)B58T
M0(&5KD8`Q9@6\$B>&^S2$-<S-3'8DZL@<$+TX.:8F?5G9QFM)*#VXL@IV$4$
M+G"!_VRZ1Z#QKDK\#1IKSG`@U;;XQ79)@QUGQ3L":94_H2H7[TZK&OX^V+@Q
M6L^+W<>`/BEA>#6FC%`KFR$):_!"E)GO4"!&5CI#>;K.='-,-'*'FNR%-6G=
M871)C(83-R98<$ZPW>8<(-XI:,*7"QKOT@JN)*A*`?6L51CJP-Y_;FUT*0-S
M=$M%VF#%C7<R.IVD4S:',2Q$M?%EC49X!-U`/<B$F=L+#F!@KE?AYJT@<6B%
M0A@H<NYEN"IUR!G.0""@JDPR1`7!%<"5$&9BK$30<T,+'C6&-*2AU[<!R@&%
MRV"V*IO9P=+Q!H/0:F]3=$-">)$;.&ELRK!JS='F9IN$4.F]L+O;WWX08MWP
M8"^92D*"+5$-XJJ16S]O2''DMKL'%VY@4P8%HU%4'5:D8=;%M45`*4,*^&-"
M,,N(V-150*"&5RM.8U(H/[.9AE/V00*?3KCLHX-?'C:C/^_%!47`@@_;Y()*
MO9+2;-'(%1Z:LGBGA][Q8YQ=LKWM=G^;XK\>-\G95@9:2FD]ZF:-KY[.<`6`
M7$K;'./XS&GL'ZM`!`G<).921N@6X"J"IPH:U27^[=/Z6MRYM&\8\D8J7'GI
M-IT$VD)LR3H"`2D^&ED"7UG5W:FA\S,-,UXZIQ>?8LYD#`$I0!'PD'>/Y:9:
M"Z'#(J7K1B:O_;=2?'Q*CL+>%D0A(`08?>DY];&11:BHCNYR;+_,(EJ&^8\G
M-"UQ%M!1.22Y0F;8=*?)V^1JO?CE/7[\P=BB%;[Z]4A]R9.YA._;M((@MA")
M,K9%5:,G*Q1\;0(4P50[^S99FC)'2JO,-F1+.Z0G=A[5)B?S,$C$4`\C>QN1
M%0L1$0=Q)'9R7_]T&_1V;.3G&/I7+?WW?PD2@)`S@$?D&+1V1_4'.41@(>-1
M/?_C'P#B3$>E7?(C6*QE10+&.W05+&GE.+'F!F.%/A]A,U5177Q%&*L#$S/(
M417X8(1F:)UU@9.#&"7C&(&R1S4B-?YU?>@'8TE`3R(4@Z`5*%,S!E(R&4=E
M3C0H@=&E$0OA=>FF-@QV2C:!![JD`BF@?B"`/%\8AG,PAD9%1M%5)9,1+!#R
M$57E>Y8%%72U?UB4,J9W*(,B)3(B6`BU'[Q#@(Y1@^M"1@B(>TT%0Q/Q-(F'
M`G,P<D/!&JRQ>&3P`J5R*M93!D^A7?C5.ZS8%%[B3K=Q.G1`3)!``$8@`S!4
M@A<"%6D%BB-W8>"U22S8)H]V(K7#/1J#B[HX`S#4!('XB:$8992R(-+5-K+8
M63HG![9((3=%A->C?9#``%=0$R94'Y7E*Z`6*"VX77O1,1]!.Y6S'AE65&WH
M:O:1<@'!`-?G4P4V&K-H2TJ6>+!H2Z@(2JO8BFCGC%,%0W8B:,$8BG'%`S?B
M`PYU)302?,XW?%14?.TD9N\'$9F8BT:P<%TT!",#.804@7DB2IUGDC80C6;8
MD@L!,XJ1(3=HC2B36CE3B1*XAJ/"8"+P=B6IB]3215.P,UUAB=6"/$YY@R7I
M)RES*RHH<\"'!J^67?`H7*8#:GJ35=93-UAS138R-MMW)``F/0Z)`S_$E!MT
M!0]!-!F2$(`$/J!(EE(RC!O".R48?9SF&#O!`"7H)7`$6G9)1!'AD-C515`P
M+_'S<N%%9W)I31F2EU$B<@@QDGG@D#'`:Y!0`(_Y,I%).W46('\I?8Y1F-N#
MF)RI$66F`"AX?<C&5@O1`GW46:QR-C,E(9R7$E[5`B\$"0<`1(Z!0V2T0\!9
M>SY$G,;)(1%A?A]H.4JT%RA0!D55=$_P2G9`&2[@2$,P3!L1G$WDG$_$*E5$
MA/^216A$>U_"1<5YGM')AR%Q1LOY)99"G';2`J9H?2"I0#<B+(_S1FMG%W8X
M0X`H!W-$3$%`,*?".'&D>>I!&5)8:K?A3!M)<^%D%`S::9OHF!<!$V^U'C+%
M@-#IA_&2G.0S&30&,*9H1*3W-I)2BR_1H8ZQB[WX2*!1$_YA%+KG&#`A.0]Q
MH0]V,MG'%OUD-\@V*7LA!\A#*J\"$P@B!SO1`(L89_[T,.ZT'TY*&M7"I+"H
M>G(0B1N4)(L(G57*F\XD`D=T*OYS:BG38YM"FG20B5YU%@%Q`/O9G]5$ET4U
M9FQA)TRQ8OP!6<5C.LZD27F#*D!3I30":/_A-'GP7RS"2=2'(+DUGIU6$,39
MB1&!`D3`%3P".*$D53$@GN[)%WDJC>4"JJ)Z$U9$&48P`ZAZIXA$G%80<[H4
MJBX"JZ5J)V+J!N*9$KE*9]+(-1)*!GMBH]*6I_JQ;)Y436"'&W#P`FC@1GI`
M$3IG3JUV$?YQGT?AK(2";D=A=0)B$8GZGYVIJ8XA!.(*K5`Q=O/F3`U#=?\V
M<7]G<7VB`@&1`,]*KM)Z>)"3+D"Y2;I$$XGC&'MGKG5W=Y!3I5@'>,&&`O+R
M,B0A`VYY,C)0`S4P<@85CQ4AB:&FKHU70<31`'S7.^FA:@WC5"<3`S+P+2P4
M'T.`9B]C1LY$$-K9!.,12=5)$B:Q<`V3)+6Y@5YRLV>$1?FEKAM4.0GCGQWX
M@1J1H0D22\'6,)MSJ&]P$W<4J&$2$[G&(76`(AQ75":S'SIK=!I"477@$$32
M,@KR'Y!3%:C"@I\E=>$R+F%0+M'G'ZKE*#A1A$P#%'DC!R>0<JC%M4%C0,XT
M7^AU26F[G1F),Q6B%#_"%EF(,EX(.!2S.8/80'MQK8VV'RQWEI8K,P8+:-ZD
M'G;1)BM)IO^A982%&#?!:76#N->JN)EGM7,7-X&B%"@"A62JD90QI=59:75H
M+ZSQ(-`S./-BLMW*&UXJ,'FG!FBFMW/@!B=PG-);(^F2E7FU'[DC0;0C@O$A
M!/#BA)2!/'-T>.J1LT5P!%5P!(KF,+RAM!?E2_>B7#S8@3MV!BLDNLI'+"U5
M!DMK;>9R&\IZ+STS!R]2JC4!AV4E0<%VMEHCMX[S+WT6-[/V!J1*0M+UN#B#
M`A17."-'(Y';!"$T.B6[-`'$4%XR=R:K(!W9(A111:ZX-/C2O1'L,`I#P?ZR
M(>5+6^Q;+8"[!D2\(7'[$"DW6%`A%1NS'[:X030,2#YL5I)Y3NG"<YB$G5NA
MQ%:K,FPP/!Q"N$F\'A,LB/5K2XG(-$<$14Q&!RCDOZ.3+^`B)`^K`$>4&YX#
M*A["2'_&(6,<KV;\Q3-"&4R&(,05$3%@`VA0,^BH-_;VQP(F:PJP5W];R'6S
M(8&2R'\;$3+@R.`B8T28.<);(Q'LA-V&'N:$AETG&;'%C)#L*J,6I:9;!T7%
M<HXS:0KQ-BL2Q]&U90IPQ&=\P0\QRY[$.U7Q:.N!`B/S-B%Q!GX#JQ7AL6_D
M&)XLPP<SQ(9LS'+P>+&)QUZ\R<T,/<O(!B,G5114S!@':54Q<I"0`$*@R>SK
M'I`@'AO!:X),N`'A`&ZIEF;8*1$!"0\`F@,P=H&[?4XER$T1$`_0F`.@A`P-
M%9#0`)^),Q-=3"G!BR"`R7M1T3`0!!@MT1[=CS(``QA=TML'C>:2!PP&"0X`
M`T(PTHMA6&/@TA_=`#.`TFQQTR\]`"E!`VRQ$.M!T#`P!#2-8D3=SS3`T[!8
MU`20$@L7@:?S$\T!`T20U(:%'I=;T37@U%P=RRDQD]TT42!=!!@=(U<9$!%@
M`T[=(1.U?=32T;@QT#%M!!@=-HT#%7VFB@&A`#?@U`*MT?'Q!$LP=18U7_HK
MP"<#?<I2(TO\S9@[-_YD/JR!(`?$8*^"$VI<70PVB1]X+RT,$_Z!I7;3DHI]
MO]*U!KY4:92M&C]95=?*!I'BI0)T`DHSQ?,U*0O16/'!!![,C&SA!`5&G*D9
MF#!TCF*3O#)BSS:P+3`P`SC314[P!%+0!$'`!'D*`[P8SXDI1<MD?-!-`]-M
M`$G@!%10!$XP!<UI`#(]W0A@&QU48&`&W350WDV@WE70KXV,!`&!`$T03N&M
M2M#MR#`D!-9-!-.1IS%0!/X-"0`NX*&BH!\!W3=0WN=M!=/!WC!T`S3PX`B`
M!#6MA,$2H%<X'C)V!W9Q,J6KX$(PO])5PJJ6:8#9:9'M.,KX-AJ!`J<J546#
M$$7PXD>PLR8R+XI&@CJJJ')3O^1B.=OKHNU"!A%Q!NQW*CLN`R/'1A+Q!%"0
M!=*%-WJC-9XXM$-`Y"/!&GV:K@8K,/.51]HKF`I0<W78%5FK469)$0]6HH^'
M`K1:KI8'OT(>751[EC4N1'>)>2P)AD.5!NP(<ZPQ*9T3)N>$'JS[I;:<PGT(
MR[XUZ-"GFK"W4(DUPT>X(^-:XI6ZXB(%EBD80,Z$`G`*%7(Z*))#!RGPFPK@
MXC".Z;M:!I8K6N9T53<\N:@L4GYF$.))!I\Y`VR`D@@`JKR.R[X^X`K$D4GF
M?X.<<%3,N^)9!LG^U\[>ZTEC3J+&RR`A.%9K%U890`,D2"!P`BYP`BRP$PY@
MFGOL8%#!W=L$I("B9EM;7ZDNH+Q#$6W4@<HE[[^<=VGLOYKC3SM37Z1K+Z;)
M.]5]W=GMS;[=SYG;YA3QY`T/I/LAXU!Q*G:!;P-6)5GC*)*=E@[P6!KT70>7
ME<_SPPS#D@)B\@A6N=`>[AV]'Y*R'_(.V@48V8A8OVG8+OH.%2\"S3#1%<AC
M(.8T7_+>Y.<W84L]&)6CD3IY04IS(N5RXZY=OQVO\B<SJ#6V(51>QC@Q\M"V
M07H&.2B0>HLT<A@U]+<I[RZ_0=P>W9/^+Z_>[BV`%;(>/^"BW'M1YVYNLOT<
MR?6+YU"C7`YWKEV'.5+\!IS7STK7&BC`,3B'3AN2BJ5*@XAS(C;(AT<\@R(+
M%8I*C@[P[=`.[!,J[")P!:#D3-,RJ]`92G#W<2_S$O]K+HLB<N-Q>Q6-`D'0
MERES>\D*`F1/&;A.O_\"]V-JVM*5?;"I$4_`VU%A)9<$W!],$<L:'TMY*I<4
ML<"F2Y^)`VA0ZT$B@"E3!4Z0!%B@MYP-$BL>R8=KYYYF0BQ1RK8\7\@&\OSA
M&'7>.<_\+D-ORM$E\'DK]2\B0<T&&E>0!%0P!/X=-__1_7MQ_C@SZ!J!Z4B7
M'QR5KP?T`ONO-R`8W*!U_CBS<I`B74[H,Y.TMA84=2/A\H"X4;"NH\D?@E"J
M6O.5XX+3DLJDLP<C8^=<I/L>72?P`O`N("(;-_56>)R6/]:#5?>S[B#P`CP%
M`B_P!K,B!(NI`#)>B+>O-R`8W*!U_M)U`G_?NE'G_0E,7%#A\J9&&?]U,&UB
M=RA70"\A_:5[`B^`%312Y^B%,SOD.`)CRL(RD)%2(AKA\LZ4_"%(&3R2-QP:
M'TDB$3K`!4;7!%S@2%?P0D2@`UQ0!520!-K]`DTTLTF:P'NAORYOZTDB$3KP
M`D;7!"_@2%?P0@BA`R]0!520!-K=`N5)`%]QZP4A$3K`!4;7!%S@2%?P0O_%
M%D2@`UP`$%6H)&$"`A*!-W(:*"`R!`2(%F0<#M'Q8LB3)DVX$'ERQ8E#(A0#
M#GQ(!(1"(77H@'#SAHZ.CPTG<K&(42-'CR!`OA!)\$5)@RBHH$DS!\2=-&S8
M@!C#IDP8.6SR+'WCQDR=.65R#DFA4"$*)RVSTD$31N6<-&[&B$63%8Z<-V*:
MM@%!U&B:L2#&9GT#ATX:JB#F'*4S!@T+$&'<1#R;=FT9.5D5/LW*$@1?OU2+
MEG%#YW&9B(/1@(!3%HV;,&W*%*6J-B_;T6_/R$'=!NT9ND7EU''CQO9AA7G>
MU%F:&,35K&7NLI4#XH5EYEP0%PTSNC0(,F78I*G=F?D=MFY`;.YN&[%)!=CG
M^#V-.3S"I63=G"FOMSK>T"",Y'B>/P8,$&N4D<<<+G"E0%<*3,'2'2`,P=88
M:Y2'@G\Y()'"2^<I=`5X6@5&QU-T%%4'''2I5%@9$!8E1!)/3'%=6=1-1AT*
M4Y1Q1FJ<@4`##"GD]49@9625AAFN1:;`&'7(`5F.9!`%!QMA2!4&&6'T]1AN
MYK5!U1N%O94:?V.\P<9[8SQ%A@L.)4'D7;BY<8)*6K+$@D)ZA<>074F!$$<=
MCTE57Y-S/!DE8E1:*<=A8I1A!D)9W2''7>515]A388S1G8]%*@2HH%*EIJ4<
M>1Q&QX]8";FF2G6]L0:F9)#Z!IH@"%676UQ^EJ201;F!HFIS/)4'G3^&8<<;
M:2P&1Y)_775=2ZLQ)\(<"XI@F7ML1)2$$$TT*.9[1\P&QU!C%!5$H=T5A<(0
M1P1QPAPIH*E0%54A1,=N9647JFMUA<'&'*2.>4=18]E65*MWA+?G75E1)\9=
ML*H)0G##N:7HE8$&289";]AQI:1-%;<IE%*-2&5GA[TWY,/"@4"6QHB%5T2Z
M_+6TW%1C,O=QE)*1>^5892VKFILJZ?H9JS\&7-2)$/I69'C'J@2#$4:(AE:1
M((B11V>2J40A&K`&`8(>CP6KDM$@C%EF>W@JM5D8<64%[1L,(AVA?-,BEJ<8
M*='Y6IQ<HN%E5C=+J3-S*'R71F$KE:$Q<T*3412;B>5Q1Y3MIDDDQ`I-GN.H
M>971!AP(/864GZ!:EI)19(T]5%&D$29:JZH==AS5+QAA65]_A:>08'<A_MUF
M*`^G'HC&D<B0"P@&`>&"39%QXWASZ*!000,TX6=\:P#\XQ2=L=QM8DU:1F05
M:`;QJ!Y44;<H<U,V27=]&[DX!UM)*6156FAS?KQ#W"N>%5G3V=>/MO,DSXUG
M:-2I@A.2@`4/Y:$I#^&=ZT"PN+-012''*8H(7B`MM*C'*1%Y`Y%$P`5IA0%@
MKVG=Z[*S'83)`7D*8(!"I*`XHN1.9409%:BD=Z"%-*2"-XR!"V!0`Q2(H4<M
M`,$3+`67*\F`!H>)00YP@(/I00(!06"#2HP@`Q"L+R<M`L$4Z,<&!-T)B(`1
M(@QH@`(S(!$$2MA-5G`0Q2E640$%P2(9K.6&.?@D.]*YSHBT<S;58*I;`@+!
M"EZ0Q``-R(H(,$(:\``"(50J>Z1I#=YNPS.5<`E)2AH:8!"2AOF<1BE0&,*Z
M('D%A*P*,($+#!PLYAQ0\HLY&7N,;ICVEK:U`9)-0`M"4/"#'DU*/D(*CZ<0
MTJG$A.$,!N0,))EP0I4TR75)U)+&(C(RZG!N,R$DDAF0(A92"<MMF2R#&7_X
M&`N&1XTS<$@2@^`6I(#`!G6D(B3'%1$DJ><-M=$#VR`8III-1S&!&4QA6C"I
MA.#QBOP$`0U/\Z4O-@DR3'R4:O:9$H"6Y7#ZB@H((-,"R$SI.FGPCG)`D$4Z
MM.`)SRDE6O3U'.PPYY9T`":CC.+*NNGR/1C-9>F2Z"B$P28LEAK:A^0`S9SV
M\(SM#.(0NYC$)CP%<3&`(@BDJ,^'ZA$[$6EI"XP0`Q"(``IOZ4Q2(S($ON1!
M6O>S5.Y@F$<JW,$I`8K(."%HAS24@4%QS9\Y64:#JEU--72](E@8-)0SH$$[
MC@U1V:H9F#J(`2(II:!?[PH:#D%F7G+HS?M^1)HE63.EZZ1@5-,XQ+)6]:JB
MN4$^[YC')KRA2>,<6FK&<EOQJ0Q\VJ';15&D0ZD<$YIS@*1^0(""XS:JIQ?M
MT8)&FIV/LHQS@1O:':"+6J]FT5^R1-&0\E`>,<@L,,*10VO`=QW5J$2%JPG/
M>$"%H"(\13M70F,?&_0$(I1U+&^I@V/Y2X0<O(0(*`+!"7!P`TQ9]84*[FH>
MV]J&A>DJ(D200LO8^H3?>'>/"%R8=NC@IQ\Y%Z48U:%?D_MAL(+@4VX;`V2`
MAY9%U<UJG2F*&6:\3Q!'Y%FS;-5N'R.M6(KPQ4_)JQ?).0=$'9;%>>3GT$1@
MA<U*ZS*YT]YY"@*!49WA#!#<KAQ`XRT/<QD)I$0?9V@Z!QF+J8P/A4!<$C.W
MV[S'*GF:PX@D-@=W^I8E;FA!$*8PA"0D`4$*,8)30&O(3DZE#M6J6L)\S,/I
MB=&RF$TQ,[VX&[EFIFQI")!$FT"$)&B8O4U80JDU#,N4$I>4&\4C")+PN;=L
M4SQ*>D]J^OQ,0[9Z#JMBB4I,2H9[E8$P"'(($W)XN_9$CWILH209ZO`Y\T"I
MDGQBZKI`P(0D3($*+J")%26`%=B^H,W%^6)G\.#4@D@@EJ`TK<K23)4/*:7-
C;\D3Z,[2GG$3T-9ML;4-/_U%DLXA#VF1FC)O6\XO-X7%&@`T
`
end
END--cut here--cut here