[comp.sys.atari.8bit] DISKCOMM, a utility to encode a disk image

chasm@killer.DALLAS.TX.US (Charles Marslett) (12/12/88)

This is a utility program to convert a raw disk into a file for transfer
via modem (or so it can be ARCed, or whatever).  I am posting it because
I intend to post the source and executable disk image of MYDOS 4.5
shortly, and those who do not have MAC65 will not otherwise have a way
to use MYDOS 4.5.  It will load/unload MYDOS disk images (and almost
certainly DOS 2.0 and 2.5 images), I am not sure about Spartados or the
Atari DOS 3.0 or DOS/XL file systems.

Good luck, and I hope this rash of postings is not a waste of net bandwidth
-- I like seeing interesting PD programs, and these are interesting (to me
at least).  I hope they are not duplicates of other recent postings.

chasm
========== Cut here and UUDECODE, the result is executable ===============
begin 644 diskcomm
M__\`,,DTJ2R%RZDPA<RI-$B@`*(%ALVQRSCES47-D<O&S<;-QLW(T.[FS,K0
MZ:E*2&!Z=(ZZKKSDXMS2S,K$NK2RK**<FI2*A()\<FQJ9)TR0$I$=7%E65E5
M96E9556IJ:65F:FEI9F9E65I6555:65B7%*LJK6O9F!:5"4APKRVQ!()GL7N
M^.WM&0@):`GN5E`1D>\X,BR"H-S2S(A^I79P:F0E(5),#,#6#?L3HL@$\?#S
M&!4$8F8IVH_.2$(\@K#LXMR8?F6&@'IT)2&8E*C0RL2^N+*LIJ#0E([.@GQV
M<"ZPE5A23(*"8?+8J'YEEI"*A"4AJ.R8*PX,D!!"9FUO6&]/9D]/AH`S]"]H
M8ER"&9@"Y69^9::@FI3EX8*QKIFLL9:2C9:+C&AF6%989I:0SUW^>')L@F#:
M$LY(?F6VL*JDY>'DVM32+"(<&A0J)"(<$NSJY-JFZQH458B"?(+1ML7,L7ZE
MQL"ZM.7A1`4<$#SO'!4$^.:P!?;HR-&JKYB7\9Z8DHQ<4JRBG)JCI=;0RL3E
M<^79V=7EZ=G5U2DI)149*24E&1D5Y>G9U=7IZ>75V2DEKJ7FX-K4)2%"/#8P
M*B0>&!(,!@#Z].[HXA6-I0W$_.:RK*;NT,Z.B%FE]O#JY"4A4DQ&0#HT+B@B
M'!80"@3^^/*PYN#:U*7(PKQR,"HD4YA9908`^O0E(6)<5E!*1#XX\.XF[AH4
M#DR",/;PZN2EV-(*1L"Z[2[66646$`H$)2%R;&9@$)'.R,*\MK"J<9Z8Z`P&
M`/KT+!;B&E;0%L0^YEEE)B`:%.7A@GQV,NKDWMC2S,;`NK2NJ.\<%A`*!/XA
M\BIFX/[43A:9938P*B3EX9*,AH"E,9CHXHZICLJ.:>TR+"8@&A0.3\_\KW!J
M9)78F:5&0#HTY>&BG):0BH2E+')L9F`F5$Y(0CPV,"HD'MKH#`;-+3'NZ)FE
M5E!*1.7ALJRFZ1I158B"2@\3$@D+!/7Z1D`Z-"XHV<[IY=79*2Z9I69@6E0E
M(8WI<3`J;9Z8DHR&KG`]<&AB7%902D0^^NC0CX%V;7!G6:5V<&ID)2%23$9`
M;[2NJ**<EL[0SC`N)2YF8%I43D@9\6EE55EIS4YEAH!Z="4A8EP2T!.9:65E
M65GMS='1S8*O*'!J9%Y8&4P9C6UQKJBB99:0BH0E(2WLYN#:U,[(PKRVL*JD
MGIB2C$O.>G1N:!F0C0N/Q+ZXLF6FH)J4Y>$D"@\%!PP*V`;OQOD/":X*^:*6
M94_/?CJI,6:LVM3.R,)EMK"JI.7A1._CZ!4#^@7TW+4$Z?(5N+*LIJ":3\_3
MSS6T2`D'_0JHI<;`NK3EX4/O\0#U^!D*\LD0]/()^_'A"PH#J:1/ST\,1)%L
M<697F*76T'ITCHB"?'9PBH1^>'*,M%`VI5)$4DQ&,(Z9C7N%'(1U;6^(E?++
MA7*&@G5D9YFVMJJR>7IO;WJ!>G1N:*5"V[)*SGHZR3"Q8ALT6.2EDBTP.L,Q
MV2.UQ/"U#FJJTJ<Q^(N1!'LB^Q#X6[%-&TDZL3';S=Z5;+4#C;SS5>QMDM-.
MD\-5<"UHHTG&$4F+#;5S4)@(M2S-/$2I2K$]*K#6%*D.D3GZ3:CD\,TMTDVR
MNDW$+;6<3#^X*90U:/[\@ESB`N,"`##__P`V]S>B+*``A,NID(7,A<VQRSCE
MS47-D<OFS>;-R-#PYLS*T.NB<*`'($TVD""B>:`'($TVD!>B@:`'($TVD`ZE
M"CCI`JJE"^D`J"!--DR`-H;+A,R@`+'+R5#P!LE7\`(X8*7+C7V6I<R-?I:M
M")"1RQA@X.3H[,#$R,R@I*BL@(2(C*#_K@!`K0'321",`$#(C0'321",`$"-
M`=.(S`!`C@!`\`BI`(UPD$Q[-Z(/H/^M`=,I`QUP-HT!TZT`0)7@C`!`RA#J
MK0'3"?"-`=.I`(T`0*``H@"M`=,I`QUP-HT!TZT`0,G_T`RI`(T`0+UP-IEQ
MD,CHX!#0W:(/K0'3*0,=<#:-`=.UX(T`0,H0[:T!TPGPC0'3F"G\J,B$R$I*
MC8&03'LW?9N;57-E('EO=7(@97AT<F$@,3,P6$4@4D%-/P";57-E($%,3"!E
M>'1R82!204T@*&$@)TXG('=I;&P@;VYL>9MU<V4@=&AE(#$S,%A%(&)A;FMS
M*3\`I5B-EI"E68V7D*F2C<8"J0R-Q0*I`H52J8*-,`*ID(TQ`B`FER#*EJG_
MA0BM<)#P2:(DH#<@NY,@JI,@R)7)6?`"J4Y(()^3J9L@GY-HR4[0"*D`C7"0
M3/4WI<C)!?`:HD&@-R"[DR"JDR#(E<E9\`FI!87(J0&-@9!,@9+__P"0';S0
M(M@J,34Y/9!$2$Q05%A<8&1H;'!T>'R`A(B,D)28G*"DJ*RPM+B\P,3(S-#4
MV-S@Y.CL\/3X_``$"`P0%!@<("0H+#`T.#Q`1$A,4%187&!D:&QP='A\@(2(
MC)"4F)R@I*BLL+2XO,#$R,S0U-C<X00$%`ST^/P`!`@,$!08'"`E>'QP<N:L
M((*NW&"2-NU@8FAJ<+)X?(*"BHJ2DIJ:HJ*JJK*R>KRDPLJ-4F187#/X"?@%
M`V)\@(2(C)"4F)R@I*BLL+2XO,#$R,S0U-C<X.3H[/#T^/PD[?OS$#/O\0WY
M#A43%00/\D1;35!4.@5@,@\*%0($?+#YYN:0E)B<H+8%^@,-#P[`T\[:T-3I
MZN_<U^SPQ`4:[.WK##3O[?T)#BDL,#0X/"/Y^OKU[@1<,PD+^`\"8FR0E)B,
MD)28G,7R^@\"`Z*LT-38S-#4V-RS#_7Z$QGXV#(V(AT0%!@<("0H+%09"PA.
M1"0Z1EII7&!D:&QP='A\K>4`C,/Y^P@/\J*<IZ*HO,"TZ?L#VNG<X+8%^@D6
M`>(O)B8,$!0.G:--6S&RLU%\3</+4=;3,?)MZ.M5\G'U^ZD$C143K121*"-(
M/;@D,OS+]!:U4:Y96X#1$FI)5"AR+>J*M1#DEC6AT%&JS$V[3L'#C/%A3MG;
M93=1KFWR^U5`D0L+J1"-%"/-P+$T,]$\S4E+M5#145M`-<`\EMG#-9+TA]6:
M!)L\H=!(K%5'\;T0V3',54%5/B#E^.A)XG5#J82%OTQVJKHDIKWU,N0OU5+)
MP[51V;ZU8.F_L);B.'WPB#&B%3LQ'"4_4:PU/E%O3<++-5!1V]M)Y&WR\W'S
M^R`UP*G'KAD;@,(I3)ZE6*_2)+W:C,/GV;?JL'7@\:/M)#<0)(J*,#J@/3H:
M'6$I].CDRUP$;#(Y-X0[3E=T5%JLA*6NJ)G'DF@MF+&.I=3'R-Q24JBR6,6R
MTMU\X2P0'(,4]'0J.4=\11K1GYB-*#%.56@5T03F%>+T\5724GA<`%`3FZDU
MNAS`)6PSH\U9VL"D2-%24\Y48_!Q:]+D[G:#(D@.DY,QG"VHJU7.,;6[C+5`
M23A6011D.G!58%+X92:5T/3P&*@'QKKRU58<E<+%J;'=:535ML6\0!4(^</9
M.>V+B3L$FBR324#$"0PU1"4]\<M5/?ZV4;"86U8]542@!.&@HZ0/!9R3<+W5
M')$]T:EP9.#P^/_P:$`R8`TP/(/4WVQTBIDT3:<$=$VV%'189*@Z8Q183/F$
M3<D4K$W8Y$QHAK68MKP@M<7\!52?JP#$^`7VN2CO!L88$WW;6&V2DIJ:HJ*J
MJI*2FIJBHJJJTM+:VN+BZNK2TMK:XN+JZ@6;*(`P-#@\0%%(:(F#DUR#;VUQ
M,)%Y=8Y$K8F.B5A1H*2HK'P;N)V2DIJ:HJ*JJM+2VMKBXNKJTM+:VN+BZNH2
M$AH:(B(J*B2;2(!0G>/]'5THF(6";CRDC7N34(V.B&^D9G5L>;"+R<3(S'P;
MV("@72,*'=VXJ'5RCLRVC8R9*',Q+&ENA&]`B)%[BU187'S;*(`PW2,;'5U(
MJXB5CI=EI%MOA8)[><"(>I6&F=C<H*2HK'Q;N(#`72,H'=W8NVAE;F=U-%1Y
M<WA.3)2"D89E)"@L,#0X/'S;2(!0W2,YW9VH2VAU;G>%Q%:)@HV6A:!O>'AI
M;VZ\P,3(S'Q;V(`@G>/&W1TX6&]32(:%CIN(:6]N>S`T.#Q`1$A,4%187'P;
MJ("P'>/7W9W(:Y&)BYF@@V]P=*.$?7)XR-2BF9J/;W@Q+'R;.(!`G>/TW1U8
M>VAE;F=U-&U]>(V->8U4BYEC>&]ZL+2XO'P;R(#0'>--+3T=Y;"8<8N+Q*25
M@IF;B&]R<6F#-#@\0$1(3'R;6")24EI:8F)J:E)26EIB8FIJDI*:FJ*BJJJ2
MDIJ:HJ*JJL-;R#704=`J2<EM[")42%K_CA+8RN0"E*PEVNS0Y`B<*7\1;.!2
M\3R`S6GQ`'+:*"`3J$,C+9@1\*+(4B/4\"DBW1W59@36$M#\K`IE3!CTD`*J
M%(H*LL%$EG#!4Z9PI&"%BHN4F9:7J#4Z.T1)1D>XI:JKM+FVMV"]T`8G:TG(
M5I16>V8W9C%6H%!-9@[T;*T(F-4*I!6U(;$DG,K1-:P@S]HLJ^F,^M4.9MS-
M=N@UBA2%-9$1EBQ*4:<<X+E1O4W'6*P]8K@S5;`*64WL:+4'D1"<C8"F-2?T
M*\HP4-H[H$2]X.;=X.T(+"AKX`A8TQ50ZADO+ADO1D;(\59P2R>@&#*00V>,
MAP1)V]7Q)/9:UJ28W!2R_KR0KJ:<K+>H<&+HL4>RYKC-0*`$C-7PL-D+3"B-
M%`L0&"S$QA?0="=50%$G7"FB56K`YV%H4$[Y^[TFP-4/Y`VU)+$R*\DTK3M#
M)#G$:-G3=.7PQ,PP=0AXP!38B38/3!X11B]5L911O$W(RU$W9#&X;>GK<4AD
M4?RHG0@HR.0"?,`DH*4P3K#L^F2EI%AMH-''U,6EB7+MU!!D?2-);HMY<GC(
MV^_IZOL%I&1U@VNLO'!RA7N#U"HYU-G:SA";46YSB7IX4/CUZQ0-#@TD#0\.
M0(B1>XM06(QR:7M[L.+5Z-72[JS02BOUV_30%5LD!;Q?4XA*_UINK`,D)I<P
M5*>U(*G$L5HS;.W5Q+KI\?CQ[@?DNP\%`AL9`"CQ^^L4&!P@)"@L,#0X6IHD
M5ZP[8[@X5T3I:%IX87B+C(21E(Z,%Y"HK*BHN+*DJJ0I+"OC./S2T63<]>_-
M?!`1BAPME2@1HQ3(E1U4N"19Q*1ET+EAW,8L&/C0*&9Q!92%G#"/JM4CE#+5
M(+$ZK*E(S4O@K5K9S<U/Z<[->/D>"1\))BT8&15&&`RRY+=<P$A5%%1F..,Y
M+5=E.&1P[/<DZ)HP-J>Q))2EK\TYJ+G0K4C)X;G3V=/)[.GDS:KY$BD3)@PT
MJ;S+$\BG&5&TNTTG6#'5TTTT4"3I_-DT:`P&),.E3,.G]JW4*@:NV:W6SJ0I
M+"OC8+%D8X79[7A[T86#918-F9LQHA3E,^"W3;M0"4S\Y_93+.(&;`9A668,
M`N:9J:'-*LPC<)6D;#BBV<S14TL@:;73[6IK-73$;-4`$9"+*90-E:/TR$DK
M,;*[)501R@#0,5QM[.M5\''Q^_`-J`R,#!O4K"TKU4&Q.#NES\U-4[GJT6)C
M,9H`<]'\K"U($9.3,9(MIJO,P3R86.GS\TQ"^?GX8$GZ^@\">'N0E)B,D)28
MG*"DJ,@)`Q.\M_+Q^/74M0KR#_KL\^3H[``$"`P0%!@Y\O(/^AHT6@KEY?-,
M,?+O"O1D:&QP='A\@(2(B-34F`PUQ"/%EYVAQ-#,6/>I#=6YR=3EQM!TVGPE
MR*B"(U`S*23HZ"P`I%BC.4-A93AD4.SW33*P+EU8X[F?H:6XI)`L]W#3F=6C
MM:>EV,7D,*W'M6#IT=54^=+5@`D9)B%!7"SPJ<@W&T2[<`5:J*9G.6?DB>5E
M<U5<D?R%D.:BL!2VK;U@F%6PY#+5A=6M%*E4Z;$HS:7=S5S@E8-I'@D>.1]U
MH"D?21K-V$S**6+$Z=6Q7ZQ\8DE:L(YBA:2M":`\\1TJ*C(R*CG8L4$OI>()
MT@A**6(84\EU[0R"(H8L&[1#*TFD+?RRU%(K"=OXT;`,916A]/$UL@3U+.Q0
MNY=,R[M0BY]LW-/9I_%"U!A;M=P-6]`4;,G:;?CY&J2F%TRZ(O87U*H&&)Q5
M5659134U*G5F94H&755F"/KFE:6=R2+(&VP;HG!\G'VCVR0H76)B:FI24EI:
M8F)J:I*2FIJBHJJJDI*:FJ*BJJK%6ZBL?+2XO,#$I(_0?8^)('=Q>V@TA&]`
M>7N)4%187""`XRPP@#CE&R4=95"CE8QA<FEX=;2+<8&0C,R6C8R9<Z1\8["T
M?+Q9&RHAV=2OCF4D;&V"=W4\AHV,B5%46%P@)"B`VS0X8E)26EIB8FIJDI*:
MFJ*BJJJ2DIJ:HJ*JJM+2VMK36]@Z?417S#MCF%:1P5R<*14(+,71()4QN=/9
MKFU(R:R0'>/%T6"5<_G3V2YMB`DL+9@9'"DCS+HA52`0TR4MU5L1W!#L16$U
M:2CZ&&1,VYRYH]7_U"#)G.12W$"UL=VK#!3I$/?*I]7I]>%,7QPLD#DC+4M&
M'/04&PC3H(I<72OLC+M<1.A)96535IS,*%*<I;/T!)G8^=)S\'!4X,2LRJS)
MM<3$B,G=Y=/:0\PE+2$KT*08])6)2SE362QMR$DL.5U97"E5_.BP&V/FL$QQ
MG+FS1`71I<35T!7.Q;W&X;;EN%J]H-BT274(>B"$<+40F1TM32RXM54<*5%(
M*5==+3DS64U)3&E.65[D9;R%GK6?=<6EG\@LP<VA/"X,!-D@!K7?*9^(S'#%
MT26`KMB:R-@E[/1"9N9,5+A954E=D)]@8,0%63$,8.=@7`"5L[+(-%*@D<L0
M"*7D!?2BB(SGW+CEU+'-(6Q.)'7TP/_8^-"D2*<81*@=2TKPW(I@63,*]/\L
M]2Q*K:P77+#]FZ2@P:W0V)7T'-W)Y`6TQ-L0JO_L$!C5]&0=R00&'((TD<@E
MY-TU_RDCC#55-"%@+<A)4%E:661I957Q>7%YAZU(B9&9F[&AE*6FD-$YZ\6U
M,4NTS6&,T/%I&Y#->?D),8G;%36X&1U"F%6K(7J[*<1=B--AD-M)I%VI\V&Q
M^Z6-Q8?@$;6:.*%P*]6S$7S=C4LLIOA(4L7M)><`>!;UT,@E+0V5ZR2`<+D?
M53BU.<5&&,JX=#56$`_`5?`917FOK6CIQIG(1,6H!<_5N17,L!>EN5AM6-G+
MR;:53_G,9"4Y90@5235&A2DE-DFT-30MQ1M)03E5#.Q-Z&E=U+!>QHE,,9ZY
ME`PEJ9U,:)Y`G*U%&\G!N-&Q81-1:UF$Z/DA)(@F,0Z9ZS$D1CTNM>LM*RE)
M%7]$T!0D81@'K&9>9!AIB-7_Y`BU/ZFI!JG6L=%!$S%+783HV<$L).$@.=7A
MT(GF#?8P>#D@G(4A-315/6G$14W8.3-Y76E324R-^'FL9*T-XYG)N*?1*=M)
M,R&,T,FIK%"VR<YA$[G1UM7N?=,5"BD3S7],J.SD(>`7;+1?7.!I4@W_+/!-
MOVES%G=6A[$)VRD3'8R0J<GT]*'H^:6US4TCN=TL90;K!LZ4U?J8:1T)$CD;
M=:`I*Z15494A13$E+FG452Z`O$5HN!E/>82IA>G`F96YI@THJ;;9Q21I1,6S
MM<9Q+^70Q;P`<-%\!2&H5![62%!2'T5/-2'8=%[<:#&`9`C815T8CU5J".RE
MG?@0,+F?/$3)2&K5<.39I<H82S`;NSS%WTCWU%2ZV3#YJ*@UM%HY,!%LV%5.
MMBPE2OC0-5T(U$WG6/SSU`UM[`B8W!8TKZ-`R)?,'+WTV-F\V-1@![A<N3C8
M-=L$<V1I9"',(,S8J!`.B$D:I,992/11*4HDZ;P;0\A)7]0'6"!"I;P%4!N\
M0,F?3*6A6'JEM.<L-+DXFL6T']5P^?!<:2%,V#4MF1DH22;<J[Q5..5>)4GU
M7VA#16@%7G5X57GEGX6)M9;Q'*6FT2RUT=%/Q:ZEWP!0L5SEX4C"WC;?L$HD
M)1X`F14AP#H>5;`Y'CE?+<I)+2VO64[$\$"LCF!5`8F1L1'CE;W))*6HM;FU
MML6S*,G=LFBU9^&J:\ETW;B#(5"+*50=6:,A<:O09A3,IMPE26F455E%9I'L
M=786=:6-Q=2@T-:5Q:VEI\E_M;NI_\7*C/ZXN>GIYP;#T:![!0(M99.<<5PE
M(Z!)-)%@NT5()4EMG=M994EFE?!Y=CR(U`LL.K:UO:TEVXS02N$BH?1-U&#\
MM+CP:#%0`')`G)AD24I36%569VQQ<FMP;6Z/E)F:HZBEII><H:+`Q<K+-#DV
M-S@]7T).2CT_/O81$.7NZ?'UM+Z^OJ@Y0G#->_D;*0^D:<0-:D$QLAQ)>"VU
M4"W"4<MD.IE`1<A#8]12:\F;V"VTF]@8\"FX'&S#I\Y,U.A"P%;2/"W&0(S9
M;>A<'Q-,W#'-?@R?Q/`9Z9L(X"1;"*9`%[C8030J2%M=\6P@GYOFFU"%O<2;
MZ"T`SZC1(-_;!MN0A;U8A'WCVYNDA7!IJ&B"AKB[P(6.B-#B]>@5$@ZL=F^*
MO(2->HF3B(^*>6&CHV!P=7USB4B)CHB5BB`(Y?L$[>[]]`T/#E"VD9!E;FEQ
M=;HC(Z!2A9&5D9J9<J1T;["(@8R%Q(G,647AW&]R**71'3FCFR1]HYN;=I5L
M:6YM;7E"/&#;F(^#C825;VZH:X6"BV]RQ(^.T).0G7)E:WAU@KB(C\2*B5N-
MCIMR:6UI;HAU>$"&CWI0F9F;:"1F=6QY+#R(C71,(CDD*=+.B)Z?E+B\68]U
M>M"8E8MT;6YMA&UO;L"(D7N+U)&+(&9U<&PU.3V;)$A,4"4J*E)26EIB8FIJ
M4E):6F)B:FJ2DIJ:HJ*JJI*I(\S0U'S<H*2HK+"TE'5SB\BI@H*/BB!196Z%
M-#@\0$1\HU!46#U24EI:8F)J:E)26EIB8FIJDI*:FJ*BJJJ2DIJH&]38W'RD
M82,B&20I$BX=Y="BE8AR?2A;<89U/$!$2$Q\FUA<((`HY1L6'65`J*^;4):%
MCF-X<6]N@[B\P,3(S-"`(]R@I'RL61M),3DAX<RTC8N3(&AQ>G5SA&]RC85[
M4%1\HR`D*(`PW2,9$R,=95"Y@)5TI*BLL+2XO,#$R,S0U-B`6Z2HK-KBZNK2
MTMK:XN+JZA(2&AHB(BHJ$A(:&B(B*BI#VTA$Z975Y<7=8)7Y\7A/3&L?,98D
M%0]"TDA-T#LKW&HF)64@USJ]0$+(0V/4I5V0`TS<LS1>MLTYF/4ZY#K5,3SQ
M/,U6Z+G9]&F,TK+8VJ`[&R@;&#K42:0AN"!2Q%Q0I$-;,J4X.L`[6TA;/<1L
MR47X$,E%"!2HY"J\`-BCM,3;X&1I4!$TT&,11CCYI=6#;8@)9#(C/$+$0QO0
M2R7<*E,1XR#3C$M7+;S\Q"W3###-'OPLS3X,+NU2_"KM'PQ&#>/\I"0@N-LL
M),H`)?3CP*#8B2FAN!\339_,'R-LER0H8PS2!$`66TEC-=LD]54<))^;J1XX
MGY-PA\C'`A$(Z>[GS-#4V-S@Y.CL\/3X_``$"`P0%!@<($DC*5--(]Q?4ZA?
M8[1?:\!?6\Q?8YA1!I2%CS#HII$GE$C!HE1"UJE#JES=DENU:.&R:]VM>]6T
M(42+*20=6:-P5@A2I%&S78++-=!AE-M)SUVI\UE>84@#I9^=31M05@BDS/"T
MR#U@)$*FM+0X_-G)R#7P!&(U(/26U34$JC8J])GU4N2R6EXD*JP[8[B81K`[
M5]#L/%6;))^;,)^KN<#MRMPJTI[<HB3#VS"8MK5A\?AJTC+8VJ`[&S60$0B:
MP$H;]9L$\O5;%,ELL`QE%:84V\PD2E&!()^;M9LTGZM`GYMPK]GQ?;`6$2S@
M(C@1QK"VR<ET]=\%'C&*%3$QKR5.!C+0K#Q96139)C/^Q&S`SD:P_%G8?+90
M;J2UFB@&0$[&S!N]*=;9O-C48`>,R]?DQ!4#"_@(]?+NZ?04\>[T#RA&"1`5
M-/--24U15+C"1M3FS!!=K$N79*H<J1"=6B-P5@A0.M;:4*TIX9)3L4C=J&O5
MX.&U>Z!6Y%"Z-CBW.:T8)<0D,*SW9"BG.<AH9>E4<-P'E'VX:7)E:X1OBH5`
MCX9,,)MTBFEV92PS,#AO<D0:*20I*BZ@>&^L<V]NB(F.=8G.SLZ\B&UTK"(9
M)"D2+LB&CX+8D6]R92QU;H2*B8E[3DY..$(J+C+C4`TY[%@M4/QE+5'LD\VY
M'(S-PBRK[6C<M$W0[,-D,;4R5!',,.A*[(GD;J,#D1*<J5B-%9#")<'WUITS
MT`I8][*&N+9`N]O*:=3H7#L3,88-6IN\ND9%+VA1LBRIST5/L"AFO*I7D&EO
M3?MQ4@.J'*D-C6@CS9BQ93-89N14DLBP-$*VQ,1(P]E4H]=,T28J%30VO#L3
MR%(C[2,,WJU_%;`$X!7;]-0UT603-2F4#-5!I/O5.I0D]7#DXYRBK*BF,)^W
ME$!LO)20S7CY$2*8-94A6IM)%!UILTW0(8C#,<Q=C=N\E@C8]="Z5MQ;ITS1
MMJT8F9O(H\4II%B?T^;C%=LD"O;1R=DU8.0Z7`@GT:,`F3'_;!='S+I6F(%;
M6ZBLL+2C*B48%1HNU(2/(&F`=80TA&]`<8F5CE2-F6YYG>/;F6Z(A7)(>(B9
M6)1I9W!I@XBXBX6#=(^"U-O<>6]U>K!XBG5VB6.5@]2;G7!E:G!U-&]V0'*%
MC92-CI<@;6XL='E[=8V%C..6CXJ187C"K)`R]SQ'Q$,;4K11N4V"RU&(TTZ5
MXV;Z5>EAM/N%\[&<E0B=62-$5@@@,VS+UR1(),#\."H9M/O))/%X[";9#HT@
M-%V\RQ-L.R>!(]R@I*C=XN+JZM+2VMKBXNKJ$A(:&B(B*BH2$AH:(CFC7"`D
M*(`P-#@\I*^;3+:)CIMT;6]N@[1->8YYR,S0@"/<H*2HS>+BZNK2TMK:XN+J
MZA(2&AHB(BHJ$A(:&B(XHUP@)"B`,-TC'1U=2)N%DI25<FEK>&^"@;QDC7K,
MT(`CW*"DJ("P72,:'=W(IH^"C9UT)&1U@VLX/$!$2$Q0@*-<("0H@##=(QL=
M74BKCX2!7&9M;&FPK(MUCH>,B<F`(]R@I*B`L%TC&!W=R*B5D)6(921F=6QY
M.#Q`1$A,4("C7"`D*(`PW2,9'5U(FI6.F9%EI&9U;'FXO,#$R,S0@"/<H*2H
M@+!=(Q8=W<BPCY.3W&9M;&DP-#@\0$1(3%"`HUP@)"B`,-TC%QU=2)F.D(^;
M:Z1F=6QYN+S`Q,C,T(`CW*"DJ("P72--33T=Y="XD8MK)$1U@GE[B(]RD8F#
M@*-<("0H@##=(RHE&!4:+B%A7'1OJ&EX;82\P,3(S-"`(]R@I*CBXN+JZM+2
MVMKBXNKJ$A(:&B(B*BH2$AH:(C.C/'W;X^.5;H1Y<D2&>8R06(MU8F1U@GE[
MB(]R@<R.E8V9NEMCS%M;JGF.A8V)T):1D&4ZHZ-5;H1Y<D1CCXR86(YA<66A
M+)MN>7=$CHV-F9U"&QN((QL;56YTB7K,EHV,F6YE;6FPB&^\@HG([+29C)ET
M:60C96YL;X.+A8ALCYN396A?7J5N;&^#BX6(R77M#((B)2PHM$,K0*4D+R@P
M"+J@*ENU?PWC+.&$R#1E+=AL[\U)O!8TS;9LV-+U<>1.VHBDLBR[XSBIP;3T
MR-O-4N6)%"&3("VN):H442,9L"A50%&CR[#,/+S:1ZP82BVT#!C-1?PAS58,
M*NUG_#-PE="I*"RU,S"Q/$S-2;10.M9<B$!P$6*3%43IQ-BN4I!84J`[6S71
M63201$M*8U!*V$.3L5H+..TY)"HJ,JF;U#>XH*;CP<2J.-_3!N,FT&0*U;JD
M'QLI&[@?$\0?&]!I62S,+<A)-#E`49+CK(Q+4NA5`(FDM0FA5!O)E)UI,U1F
M&%!-*,/9-$*VK!C2S%R]%M,9/!@4H`<Q_RT`JG#D2CA/\.GZ[03M[^Y@0P\1
M`!`5".7HCHZ.E)B<H*2H@9N;>X]P?2B&:7!U0MO;I8Z$F8I<4V]U>G-YN':)
MD(6.D9&5PEM;R(%;6YMO<'W(IHF0E<*;FT5NA'F*/&2)>WB)CIF(:6]N+'9M
M;'F.A8V).MOC?!L;2V^`?7%NA\[.SK#M>PS#D-DN,M,X,,`[6\RJ9]BIH;3Y
MK#>]$:R9)$2T(`?:4Z"P*,/C-*6]L/A(0M94I-$B7"@PL#LK-:,Q6JLMDKM5
MP%&4RRFX3:GC3?%QE/-1;(UI"[44D6(;R2RMDC/2*%R6Z#ATLC0XI@0T>=5P
M^>G5AQ%:BRF+#7JC3:@Q9+,MF,,MI%&ETTUYXTWH<9CS4?6-70NJ(#1F^.!_
MF"[PK.A0K9Q+49E3"&4&U<VD<_&0>RU=BQ%IDSJ\P%8$O)]9*0PNI,(FL*@M
MS-.P&U-T5-C"IB14L;2T.,.9<-32M-180J8DE+&TM#C\V;`4TM)4T7`=0HM0
M9OA](QM7D)63C-B8<FUV:;"(;[R&CWJ1D8B__)N;*"PP-#CCL>%(6XF.EY!E
M)"@L,!O*(4"HCWF2D)7C@!LCK+"TN+S;-=W,8XV.EVQIJ*RPM"-+'<2ECHB5
MCIME:*,,FU9OBHV%=$R)CEB':&UK=#!X=6YSC72%/W1]XQM&;WIM=82\A'*1
M=I74N-QI;JC,HVUN=XR)W]ZTCX6:;&D?'E5N<'V.@X6(4)B5CG-M=(4_5&Q0
M8"VJ_'.P)-(B7B@QL#LKO$H3R/0E[:,,[`VY7`(-PDP.<?)<T%]KU0^)C[54
MD1&LR3JM,Z#-H[%,U*V38`UQ+&K1NEPI=2A[*86L-9`9.-6@U+)*>%1-W#M3
MC'@N,F$\3<1#6U)`6%$@NYLLJJ,XU)7M(_R@[4BL\@TTO.ZXN`QF+3K\%B1T
M-;/TZ*P?(U`U&\0?&XC-KSE0)D^L[66XSDY&;\Q>975`HM:HL;6/$4RM!LU,
MNZ/5K`E#^$JUP$#9N@UI9&IJ<ODY+8<).#A!10Q1R!\C%D'V.-3Z*M0T+KP[
M4U'_;0#ZW*N9*+*C--"IZ5WX*VSHTES?T['C,-_KM6#QHFOMFWO5B1%4BRDD
M#6FC3?XQ8K-57/#+)4()U2C920%MFO-2Z-Q6Z#@+3..S4&31*"PP-#@\0$1(
M3%!46%Q@9&AL<'1X?("$B(R0E)B<H*2HK+"T?2-;FY2%@'FX>')VR,O0E8Z8
M(-+%V.7BSCR&CWI,E(V*F6-X;WIYH5CCV^#<X-S@J)!E97MIL'ENB(5RR-L/
M"0H;Y:2&=6QY;GV-B<)C6_1]8YM;Q=O3-(1O0(F`E8106..QL<`A,'9OBD"(
MD7J5DX2/<FUE>UT;([Q0D(6-@YG8E6YS97J$M'1U<XO(BX^.A)UI;G%N=S2$
M=(6;2$Q05)J9;&]W+'9M;'E,1(F.E%20E72DVLGDZ>K.SALC9HF0E<*@Q&.8
M:&V+O(ESR'B(F=BP05-4+(!UBXM!FRBC]@\*$>'X*(AU@X1UCH5TE8^.6)AI
M<W._D!MEBX7$59"$@IEK<&EE:+"#=7MTCWK,@XN5AS\$?:.;68J*CW)"3'2-
MBY,@=W%P;#1N;W1$AH^"D9F(H:6I(Y"!(R-4C(5ZE=29BF6D"NWT-!H%]`G[
MS(F.V(AH;7LL=FUL>4%%2:.;9(R987-E+'1OAVZ,CXF(4(B0E7.D9G5L>;A]
MAX61CM"/BB-T<H&LEHV,F::MH+K0CX[<:7@I+#!DBGES<TC:]>CEZ@Y$?>/;
MF8J*CW)(=XB-C)F@=WIUA&UN=\!XC\QTC8N3H5O(8Y-OBHJ%@W3,@(*/FFQI
M;3`P=6YX0(R1>%#B]>@5$@Y,,*OENH;$STR[X]KO("^H0R,MF1D93:@I13E&
M.4A)-$E:64N\B6%-Z&!Y;]Q5I9@3J1*5:<DKI5AL9LE<GJ:,V<&N5.P,9M@<
M:M*BW!>D0QNP.">\ND9-N2#MPNS"+;G$Z<1-V%!I;U+0*&9Q!90HCZ*Q%JRE
MK\@KK&([U331E$NIY,VI8_&A:RCPHGLBE*A6]*1.&$#$PD945-A#62DH%2HD
MU#E9].NP0V=:1J"O*,.CK1B9P,C(Q42D6)_3#>/\5/:X+/!$TMLI6P@CR1OX
M"[#,)=5A-`[UT"02W`TFC/9!M'=**?WXTRGZ"-?)__@'R10(%L`D3,P=4-A%
MHD3!_,+AP.PH#`AAX`A80B:D,QE,0R?$"?TE)6QW2UK0+<=ADM,QW%VLZV&I
M\ZRFY*0<Q9G"H<20K!CWT#3!2-`-X_Q+7'%\V238-#!HZ`Y@,N7M].WN]R`D
M*"PP-#@\0$1(3%!46%Q@9&AL<'1'"NGX\>[WE`3OH,@%^P0-#AWT[>_NT+CQ
M"PODZ,H1&/C:^?CE^Q#M[AST#`4L5@T,&4%%24Q05%A<8$X/^'`5>%BIL[.K
MK[&MG,8-#`FQM;F\P,3(S-"R\>X!\@'L#P+XR^CR\>[K%/;U#`DI+3$T.#Q`
M1"HM0RT[7`_R:#L3`@4.X^R(YNGP]9VAI:BLL+2XV=D41ZG:)%L\5,A(A<+-
M^/D5+8@))K1W2B4:T8QJ:G)RBMQQS55D3==0+>H<]U3X>)7,A):N%JBQ)Y1(
MP:)4&*K-SMFU5]&J6\ED8(G%\:1[*:]E-@UIFS6@O`4Y+5R[56#I-E&9TSKL
MP)8$Y%5)C:0#B9ZIQG%A&Z6?Z'^@-_BT\".,'\&M6=G9T7C<`&=8A3*D=RS0
M%$CR0*4D-#0M,#A`+8A)43EB[.I"TDQ`U$-K(*N5KA:DK1>01`V=##BH[$8D
MK^,PN.>YVDU?-7$DE]I#)#BL.R,Q_RT`JLQ+*=A24PWC_+*T$&DIG?CR*:X(
M]LD;V/*I3E`\GY/1HU"?JY0)G?@MC'[$D+/7Y,S2>MC,H#L;*#"T^"5"RT@]
MT#LKW"17J`-#.6B\"U(H;$`@5>AI1L48X`"Q'*7+T4^UT-$\Q:VQ*-6JL5SE
MU4CAQU16YZ`=-LR1Y)M0^3CH+.";6B$@-*A#8S3<11,R841@;.@'(*N5++2G
M3,N7R9DRRMFGH8*OI>3=DZ^\8+UH3N'-,#@5U/:D-2UU*25-15*5)C52YE4E
M5@#2]FU%53':0/.L9+2IF=P34'W)R22ES<DTK3A#K23155.M5-#IVLG1:M+!
M0B\%$SU3+QDL2D4S4*78TU,QQ,M--V@QY>-M5&#4]V7`!?@DE+0X_)G)R/6@
MY#+:2J2Y++OCC'RTL+O76-%T>V49#8B3,96;A18MJ;,665E6],KF,3DY&5$T
MZ[#C23'JT`-,AL2YHBQ+Q!S%K\FAQ-#,6/>,P^>V"1`%]`/M^`CU\N[I]!3Q
M[O0/*$@)`Q,]045(3+#,/,1%2Q'^=4]54.DNA;PXN9[YSZG(R9\9R#F@]$J\
M3[GA++#&R_Y$Y%A6%U`-/34>]2\E.24C51\53$4V16`IU%4U2<]E4E#U25/)
M2=@@B.6S[!<&T]PR%LS<03REN>E5U<G%MA%L]<;)TP4:H"DK;9H92TE,E;!4
MN#DL-3-=*?8S+.(&3`9))/H6JCREH^D5E:/%H!$LM:`UHQ`?*";GN=`L;\F[
M'&=4@<J@!#8I&E!Z2\`('1RW64OLPY"@-K#T:CE:U/)*RE1(W+N3*+.E4'[(
MSBB8T36D6!'1\$;<($JZHL#72,/C5-3G8"2(*42DD?87U*H&&'!*1C$K15<(
M13-96"PY4ZC->'FT;#%_LA30U674)Z107,?<0601AR`UX#R8M\ALP<OA?*[,
MQ!G@!C$<P%PW228$M55`I*`W,-1X%:(4XCU+78#.R,00G`:T@\4@3J$L3JPH
M`JE,C/7&#9LLD[73Z=LLX%Q8-RB,]!L(H3%+':S.[!`8513Y9`G4"-NL#395
M<-2@1ZF$3/7&Q;.9G>RYTYTT3A3DV?A4].$H""BP6;<HL%/'F&DS"2LY+'6@
M*4R,Z7;HN%B0\38)E2CK,4M2-$%+7?PNRNC_X`G0I&P-MO5TY"O-JZH0O:OA
M6"X("-4<!2S@L.DV*`QP-)Q%-C(A1"`LJ`=@+<A)82W864E-Q&E*66;D:06%
MK*D4E:.MCIC,,,71[$H,!-D@![%<K""WR=L$>]4!L#$,-B4=8!`I(Z15394I
M12TE,G5F53)%5>")4'EI-1*4T*P0MKC%7)3X&$DUM:.]H-A<4Y!@Q,EB0`G;
MW9SL"IQE+"H<H'E`3.B:(-V8O,#$R,S0U-C<X$WP<=\D3=_0+0;\,K`9&[E&
MP/Q5[5`,0Y`#Q#"=]!SJ%'#.<7/1?!VF0"1P&08NH:-1U!W60'"9Z"C5.=+;
M90#D<-P'3;]Q`@.Q3(T3&[4@L20KK3D[L4E#S5-3K5G1:&/M9G/-6/&*@RBT
M,I8Q/,#C09RZ37`QPL,QS$W3VSS(0N154-0[11`LL=N-$ANU8+$K*](XKC1#
MK?+15%.Q6NUI:]70U&]<PSV8E2FLK#F@T%&<S$VO4,'#8:8X--%%`.1AZO-L
MZ`=,-<"TR20((,TB*_51!'/U(O2'L%%3P3:X+6_\4]!Y>SFF0#0RM2V;HS&X
M1$E,V/LY!%(<R3'(1&WCZ["?/&"<K0(+U3.D*!6@L2HK;"G!T4)#4<S-4EN0
MF0@H;`#]VJ$@-*A#([0R*\#L%?59!+I5CHRH7V,M8[Q?4Y`UF03Q6@VD,+6H
M4-O%S"4KQ5:\\2_PP:U*4PTY#&?""LR[L-#%+8V+_)<RU#P[<%!%4E980T[(
MRU#5TS%V;>+K57!Q^_N-#`NU$)$1&VP9P:X9,[7_Q/["QOQ\L5KE]\UE<_D&
M7+X[,;@-D^N\N3K('3O0N[O0PZC%.A8%O&DZS.OSI-M5`(GYK!@TO<+`)$CN
MNJ4*)&7U<4S5!1`8]!0/3"ZZ-0W083$L#9?J.9`QKMK0.T)8\/3'!@<$U)`2
M/3"D;//[9&"B_]+@`3@[N\0HO0*Y";%-$A`(!`1/S?)$;,-8F0F5@`GY4$HZ
M-0W`L$-1KN+1M!#]*,JP04(U(''N&JQ:0E6*B?BF_)HT"3"<YO8`J&SGN;%&
M2VIJL#4_RN"223307#\ZJ*8[+;P1H]/([CKM>0S2#8O\S@V5#.5-<[!Y.E%L
MA?1HK!"R&+5WL48JR;JM5T*M29"<^+$\3&X:7%PD!]7?$8[:*?P-CM)1K]HM
MJNJLWJVH_.<QS2J`39]Q[B)1!(T.VK41F0?6]<VH4,FN3-7,D('"B+%.*DE4
M&`7)#^UNTBT`$8[B<!&MTHA5T]!1JTW/&E'*(C&T;>P:2?]Q]RJI_(T.XG2M
M'2,M.*GXT3([Q?JM4U/9`[%B8^4%8'.LA#LI_M6@Y*,QHJ/Q6@"N\6SPRA&7
M`-9P=)BPH0CIU'4%J2R-".*M&)$FTJ7\M0.U":G\Q?JI6-4(@-%D:_4"S7F#
M"?LQB),5"$7^+:CBE-"]P-+(S-!4_]S@Y.3T[.3Y^0D1&0H6"@XJ(R<S+T@U
M."I`2$E,_U187&%J<%UV;W1Q@HN1FI>DE8ZCL-"ML)JXN,!$_\S0U-34[-34
MY/'Y\?$1&2$*%@H.*A8:`P<+#Q,7J0&-\`*IFR"?DZE]()^3J0"-\`)@`.`"
$X0(`-O$1
`
end
===========================================================================
Charles Marslett
STB Systems, Inc.  <== Apply all standard disclaimers
Wordmark Systems   <== No disclaimers required -- that's just me
chasm@killer.dallas.tx.us