[comp.binaries.ibm.pc] CRC67.ARC - calculate CRC values for files

W8SDZ@SIMTEL20.ARPA (Keith Petersen) (03/08/88)

From the archives at SIMTEL20 comes CRC67.ARC.  The ARC contains
executable and doc files for a program which calcuates CRC values for
files and optionally creates a file of its output.  The file later can
be read by the same program and it will automatically check the files
in the current directory against the list to see if the CRC values are
the same.  This is the CRC program that is distributed with the
PC-Blue disks.  The CRC used is not the same as those in ARCs.

This information would also be useful to include with any uuencoded
COM or data file that is sent to comp.binaries.ibm.pc so recipients
could check to make sure they have an error-free copy.  This isn't
necessary for ARC files because they have built-in CRC checking.

Keith Petersen
Maintainer of the MSDOS archives at SIMTEL20
Arpa: W8SDZ@SIMTEL20.ARPA
Uucp: {decwrl,harvard,lll-crg,ucbvax,uunet,uw-beaver}!simtel20.arpa!w8sdz

begin 0600 crc67.arc
M&@A#4D,N1$]#`$#`!R;9L0@``#L-B%NM=6,.```,("!!&")E"`@S;^2`:#*%
MR),I($R`&/+&S9@Z<N24<4,'!)0A+1Q.::`@X`,Q>4`@>7,GC!PR(*RD.9,P
M#9TP+$"`<)(ER!"#0Z"\:`)B2I(C)!/4@</F31B88]ZT:;.1SIR<9>B,<0&"
MSAL=(%#<B($C!8@:,W*TF`%I``Z=*(0(F9*"),F`!:B@23,'!%\0818V?`CB
MS,8R<M*,`0%'SILS<L*T`4$&<1H[96":<3R9#IHR$X4V:8'#!@B2F.7,25,1
M!$H00M*P80/[#1NO;@Z^J>,&9FNC1X;&M%V'*H@1,F+`X,I0)`@9+F"`2$AR
M[YG/"O]JC%,GC4;-":?#01R&#FLW7/7^_1N8#-\U!V6#)FB0Y)C/8]:D<7,&
M<._"AT5F'G\@U&$>&S:E5-,9^X4Q6TIW)$8''1OIIE!00Y$&`PLD83A::3DU
M(1IIIH7Q'T468:011QX-(5).;K`$F!UAR!:&&&R`AI!"S3WD`DE6(+9::S:X
M<,-T9DQ4$`AHA-&7@W.\X5H9%5(X!X6^Y8;B11E5U6)(A-'@0@P_*I"4>GVQ
M!T)4;<!AXGD%'IA@5U+2)T0523!!!`AW['6?:]VQ0<8<)+4P1!!4!,'$$T?$
ME^,<Z>W5EX&RS5G''&7TY=D;F()@****,NIHIH`]Z09)^U$8V1CF809"4V_`
MMU17-^;H'TSNS<%4&'GTI4(3B`Z!A`K3Y9;';@K-,89&%9+D1AEX=.05"&6$
M\2>"S_*)!J>@E=&&&)E5!A-]@$%&95]WV(0&9>^M61&%'$%JEP()H!EGI71`
M*!MM;\!A7D4.LI'2LM52Z-]T!L)AX*C%GJ:`9Z!59D88==Q&66*8Y83@E?OU
M![&20YS0UQM)!CQJ7_>5D5]F?N46!DFK\6<KIG,,B1X(>I6',!T*=V2&?&N:
M"!@;48*`J1RN.MG59Z^^$6N!<)0Y[Q!/-`&L$T1,H<.\"21`[A9D8%R&#EWP
M\'..;DA6A@MG9Y7'>#Z`L(4177"=0!%X2,94IEN;22]]";1UQ;Z`3>BMOW3&
M=V)!2S"1Q!14N/!#6QS2"PD!.H5'WQ)&Y%F$Y&U-I]"GB2YZ!.@#))#4Y3J9
M"!,=<J0T;1OE_:E15"^Q3"Z-;-21Z>J8M[RTSFWSJ2X(O/N.LH,7L5%>9L!G
MGMO'9@ALX<D-?YSK&EQQ36X3673.Q.=!3-%$UT/@!U]%UH,O/OGF>[^D$#JH
MX$+YYWNM_M"TW6\^]D]P`FS`$K;+E$%^!K$?L8R`OOV9K&U7X9.$.K:SGB4N
M,&V;UUT@40`DI($,E<D-!$O%IS+,AH0C3)=GE@::$Y"@+2>@5K2J`B>7@`95
M9XC1=Z16$@Y"H3SK2AM5GM07-\FA(R1C(<-TI;(T_&P,Y:FA1D`0HX[`;"EP
M2`B6A.>9OZ3&9NF14LKRHT1R)7&$^P&,P^90!S&TP#VW\TKL<O(SU72D*?U)
MHV=TQD8WPE%E<LQ#3B"6&SGP!F0DV8Q4U.@>,Y@!,5XJH*M4N"[MB8TRF9I)
MVOZ5FR1^K(\M(,D?6960E"C-B$A,$O6`QL0Q.%$Q4:Q(&$%@2"TM29%M(,G'
M'/.&CHPRD$A28A`(>$G7@8Q_V&O-QTC"A4LAA@N-><P<N."DR8#REZ4,YL?H
M=S$#YH0,4J*>;9J2+O[T+2E!\,$88$*_9AX-FHXYPS2KB4X?D(M^"M2@`A1U
MA"=((0E40`)1G/`$*A1A)'ZK%].&D(4A.`XD4B@"$:J`M2`X@:&&0D(1AK`$
M*A8'7`IQ)DST*"G&Q#,RDT%57\3@))8IDVD(F0U+*/@3@%+!:#?IC4M@DD6!
MQ:@-#6+#.7LX`"QX(0:F60$(C!J#&H!`J4R=P5.7ZH4C0=4+-)BJ466@U:G&
M@&M3&(\K'50X>'&2BR5-0YMR1!6.Q#(W35HIE7+#(,SD1I=2V@\;I[C'CM@$
M0,\2$*GH(S)M*69=-J1B+XME/3:YZ28XNJ$"*%F4HPB'=*%JU`B-B84F/($(
M12`*82,HAH7UZ;"`F2*4I&0?J;2!-[`\ZWU,9,*68<H-JVG5VD!PA``];UP%
M*6RZ3J@1VJ61)+R9+7]8UJ<*;7:*;7@#9C3#&<$X)SP430(6EN:8.ES'86QZ
MK1MB>Y["*M>$Z/+3NMP$$Y083"-1ZMU9IW4EU^W483AZ`QG%L!N=)B937$F"
M7S6%ADL5"%-FJ-CUQJ@?`GW,6ERREH*2=,4_%0]V)IK#(U43X`$;39.OA")'
MK!==U8XAP@;;H\O6J-:]K4E];)P,9>W@'3K4(6`IB9'1QL.R\:3M-J9$EPEI
MH[2)70DQ#C/FH_I"E1*G)%4;68VK5.P?V=4*-+!:PZPH=)_Q<F=M^IP"%#::
M!$59ES`$-2C7[+4YY`D)3C_#`ZD"4]H\YB9*QND11+YXGO1"$B4D064:R(HI
M4JHFF"F$I&([`BX*1G,,F<(4&;@RA3K\B<\5(90"#!/8YX%`!#"03JA%<,SD
MD6I'V%OR\'(3`QF\Q;VD2B/:SN`9DAAS/[B+(_(<I+SKC;"*!X.6M3KRVMND
MP<5);/6K\V`EDC2%/URI0J>ZV!=,=S))Y**LG?"D)S>K!DYDBH'H"J.1Y\F!
M)*?]TVKC(V<"_Z7./.Q01(D`4(2>B6FO_JNUM<FT:$)&,GQ2VH*"VMB*0-J`
M,"'):Y90AN-!(2M"VDA.KH"#AFAAD%+JTR)-=H:FQ.Y63*H(LKA"!-\E3I=,
M4Y9+7)FO8$8)(Y!V5V70"AH],Z:-"%H,.(WKAD$RS>:H>7-K/%E2?Z.424H#
M5X4J(S;J+O)C'B*1MVV&WY3$YH1"L`UN<C(%DM&A)5.D@M.(!INYY"0(E\(P
M@L+`'!/)KDEN6(.F6*N`J],FZ[=IC3$_1CLW*`AB%QI1:4SZ&)12Y=`:=Q='
M]F-RDFSDRDJ$;RH/G+@<N42$U868=V2HMT?1?$I7@AD<:LQOT"@,1XJAC%1J
MA!Z2`!H(0U)#-C<N15A%``<FV9`)```[#8E;S74`#0``#$VT)`-P`$```"``
M0!KP[Y]"`GRB/?2@<,!!`0H=0A('"0"N.P`<`?/%!<"O8`-RE0`PCY0O0"9Q
M&,@%A&4I#Q=X&33P@58)6"-TT3+@P<&'9B%ZSH`50%8`I.B>%=#%```Z705`
M"1O``P2=`>G0#="5QZJJ`NA(`:"30=<FJY\*^`)@,IZ`7`M8DD+G:"W8.P+0
M(0CP-5T/`[H`"-@5)V5>=(("U.&`#IN`.A=T71`0ZP.Z.9(;H#-Q&<$N/@/0
M\0FPSADZ%*R3+?(@@$"@?0H,U+FQ2P&!1+0)+)I&2P-27?`$T**`5`$P.@1X
M#*C#(-`PF+=SUPFW[K>'"F-E%D<ZN_:.[P-@::@38)BB`T.`UQXF`Y@H?@)$
M01C0VX!\[^#YDMQ)*1E@DS$&'&$1.A,4((<%OJ#T2W*Y&#A/*;0\@)P`2/D#
M3!T*T)*`+M\`@%0Z@A#@BUV_-)8+`3;!X@(B!1R1RP!ZU4>C+NI8Q0D!NC2&
MCB4$H"-*D9\04)\H00P@BA!.#N$D$0,,P]@`2R8QP!3H@/#/%CRLQP$@/F@)
M0!TUD'D!CG6`]<18!J&3!0'J.3<,"7_PT``=$_"@`!T/(`(?*%IZ*(J6/$`A
MAS!DFDG'+#H>,$R0J:5`P)7^%.-/,W0X`$L".ASPE3$'@##$IG7(0ZH70Y`*
MP)7O.??5$.O<LXN4_AR`C@$$#+.(/(H0$"H=[0TA1*:*%*-#,.P-LXXZB\SS
MRU8OVF3$C28I,T!+.A(0ZW,&H&/-`+32PY0H"NK"0@#HR)):.0/,`8$N,+![
M"G]4YEJ?A\.<BT1JQ0A`[#"@).`M.J#PJD,Q=7P`"@('@W*`L`Q/H(L0['ZU
MY)J[-*DO,),VP6X8`SQ<Y`[I@8`.&R4;C`X,J7&!I7T<0_DQO^C,0%A[HD#\
MWA!=T;&`+E^PB\+,.&.P\S"B&*P(.O5-VHM5#PS@2PT#_&(77GJAXT\_A=62
M&A[^%-;*`+6\*F0H9PXA8ZAU]/#)$)YDBDXD?BVQ*3ING+D".C2<:0(Z9)R)
M`CJ7G#D".I*LM0\/2]2A`3I1G%D!.G3\4P<$LQ%09#+^K+,**&LZ5\=>;H3^
M"7">HU/6P+'H&L=:!03=GC_)I/ISICRX`'MJ5]!N^S"XI^K>`4'7GL#`IQ;S
M7M#W\+#\/#J`C`X%:[5W_9GM]3ZPWLU4/XQ8V1_?/`\PR(&\#G,,(#[ZYO,>
M@OH\_-'^^T&,ST'YT`#3___`4`0RT%&5@3U-$<%0@+)`MKMBH$\.%6`!#/PD
M!P:0X`,L0)X"Z`>!^X',3J"0AI.*P!4CT"$&ZSA"1T2QA+&T,!<'F8T_!D`+
M("!E#AKH00'68H##\'!2?F#-6'01`!&=J`KMT44&!C"#9-""!T@9Q0SG$*(1
M4>(I(4B'"P2`H']9910!D,,`UO&%CH!"0;)2@"[&4<0$G`@"`@`%"7E@A#H`
M`1U<"(!ZT-&(?]#"!S(<P`VKJ(L8<"B+^P``+2S&!$&&P!<BR%H^[H*CEOBB
MD;\`0$JJTI(-T>("Q[E'`-*AC@#L0EOH.(5D!+".19!I*RVH`RL%X8NM_&(!
M=X'1A7RAK5]0@))ZT84_V+4-JR#@3&#QPC_2D8@B:D`7,D$*+7I0'UV8P)&C
M```!YN``78`@,&E#1S``L"^0S6`;O;@$*'PA$^#P:C;:S`4`\+$(:]#B!\<!
M`"!FPZL=((,.'%C`<U:P"&0,(AA_`$0X`+&#8,R!`8N8(3ZBL`)DU&<>JLC"
M(O81C7&P0@#8*(0^PE$/.N!B!MT8!RW6T0Y9A4L%`%@'!LPX,73`%!8JVP(`
M$E:D#UAE`N2T7A&"RB]=H(06$$"*KRA"@#\J]1.&(`84H@H-;%3UJM@@'Q:B
M2H('4+`V$X/!.BRP"&V\!QT/`,`0OE4'>O1+-!B!A0+PI`AH2&%7`-`"+0Y)
ML#F:L#V*$$84N"0!?VPA"\,HCBYR@Y0S#D!6&9B!?104H:Q=\S6*=((U'2D'
M#ZS#`+1X`E(>1(L4P$(`OD"!`0B$E,K^XK(8P<<P6.%2`@!!%;#0@2IR<<R6
M!`$0??@'".I@@"<,(A\(D,,\9+3;2I*B/JH87P+*1SX#'@!//"#!W#S1UQ+6
MH0-[!$0__AC(&QY`1(4\)"V"H$1'Z@()RG%C"$#Q+UE984DD1`<'_J$++`3F
M`/\`19/0882=0DE6#]@5?_L0F'CX`Q10>ME.I81@=,##'[I`16"V\6`IH4,#
M.Z52A;6!X6<$1E.@H!(Z8$0+)B!%%@"H!1G0H8`8*P`=.R0`#-(!#'_$XA_^
M"(8*BC$'?0C`>?!`H`*$08<#,``&Z$B%/V0!`T488Q@5&8(4AK`$(R2!"47X
MP4(`T(0I$.$)4P"!"4SU!C>,H0YRD$,9W$`'$)PYS6A(PQG0`((YP*$,92"#
MJ;8,`CN400YS2$.;06`#%]P@!BP`P0Q>(`,8O``'-H@T$MYPAS#(0=!6T/,;
MY)`&.H2A`0H8`A68T((TPR$,=9A#&>80:56S>@@@"(,81DV'.:`:U0"80AD\
M/88\N^$,(###J$$@`BUSF0E)F`(51)#L-+"A#""`!(R<P.D^#UL.Q4[#L9.]
M[&9ON<M?+@*US6#M,@"`VW?P-K&-C6QERX'9+1A"$*@0!"8\X0CK;C<`$L#M
M.BN[#FX@`PD2,`0TE&$,:Q`WLN]0:CZS^]HZ2(@*N#UH7!NAW7,@-\+)`-,A
MA,$-('##&^K\:D1C>PYT(/6Q@0V"%B0$!!^_=LI7+O*$TUP%30@#'8JM`IKS
MH`4V3P.M0=#ID"/=!PDI>*[[_.HQ8%L,9:##'0"-<F<7.@QLJ,.L`8!J(BA]
M#<FN`QO8D'%G+P':TB8!JDWNAA/4N0UA6`.VZ5"&-L!AU)[.0[4QWO&W1YL*
M<E>`V>>`]IB??`YF.'2NY1P&K[SA#7W&^]K;?FZX(QX$*UA!SK&M<H._8>2A
M3_R9G5"$Q#\=Y^G..`BP``D$N(#V`T@`PPG=@YN'_@E_1KD9PM!N,H2>[*D^
MN=U!,`8VO$'6'1]\&1*/ZM`'00A/D`(5BD"$U$>A#B>G0ZD%_P8S2#_Z=$"#
MT$&`]Z$[7-`V!\#WPS]^$)3__%Y/__K)D`9!EY[]0E=L-9<0\T=G]7=_;"!N
MLY9LQ'=M@M9RT,=W,#>`\@=^!D@'Y&=^%U<&*#`'*;!SIC=R%*A6G7=X8H8C
M),AE7@9F)Z@0#``3!^%VGN<")#!F0:`#8F9[+9AO^]9O_]:"D'``!P$)!2"#
(A^=L"H$#&@`0
`
end