[stella] A7800

Subject: [stella] A7800
From: Keith W Gerdes <kwg@xxxxxxxxxxxxxxxxxx>
Date: Thu, 19 Nov 1998 14:21:11 -0600 (CST)
Here's the working version of Bruce Tomlin's CRYPT78
converted to C.

This program validates the 120-byte checksum in 7800 carts.

 ----

_=_ 
_=_ Part 001 of 001 of file c78c1119.zip
_=_ 

begin 666 c78c1119.zip
M4$L#!!0````(`%IQ<R6,YCT-N`D``!H?```)````8W)Y<'0W."YCS5GM3]M(
M'OZ<2OP/TUX7)26`[<2Q70AW3F+W3J7;%=W3KL3EJI`X8)HXR$YHN%7_]YOG
M\4OL!`9N/UV%AO',[_U]Z/&[O5=[KT1OE`03L8C$\B80OXR2\6@FDL4J'@?B
MZD'>"^&NEC>+^+W<]>*5//YU,9^%$:^\^2B<O1=72Q[];1S/CL:+.:\&HV7P
M7NB.TSG6Y(_#0W\1K^;)>Q$'XZ/KT3Q(CN[#2;`X&L]&21*."?/+Q></%^XG
MT8\?[I:6?4(I^ULR?0S"Y8WX$,23("'`E^5HN4IXI^O'NG7LV.)0),M1O)3J
MU3]^:!1W3GKW?1%_"Z/K[.[=,<CLO?I+&(UGJTD@3I/E)%P<W9SA=/EP%TR"
MJ5A%27@=28+CFU$L95D&)RG:\;%XZWL#$WL<"_?KQ>=/ET/1%7\(;:TY36W=
M=[%PUY%+KRT7W9"+9F/7:U+"1_YIZXXF(4R`V;I<VCWL0$3#YP`7/5^!/P!7
MPY2+"TH6\`=]N;3`W\*MW5;@MX!@`:&'Q?#EXAGYXD,Q>Z#`UP"A@34I]2&)
M!THN*!D#X+L*_#X@-"CLM.32`3D71'08L8T+RU+AMW.L'@0V0:0%+`_\;4C2
M]U3R4U:@=F!KBU8'$0N+AS-?Q;]3R-^#U(:6LS:`W[::9/$TO@F&)E#[Y.5A
M@4Z,"6K74OF?#%VPZ6!I,6`8"32"D1)1Q`\0-/#O0&`?GZU^SI\^-53^-\@!
M"#99TW30R881=/I?>RY^;(C>`ZQ+<S"F:7_L+!4^-:3#&'4,&'K2AA':N&V!
MB.>*'R=%/IN&5\KG^2JZ#I#13[!!GO=I8N89XQQB>W06+FP(($N!0DX&%F1R
M&&PDAUV/(<[8-17X-G@Y),*8AB2L&#U<6-#84-F)-NV!JP>&K2)LV]0)SI(!
MJ/`3PP$,&6(#['S6#JAN(TY=E?XZ6/LL3("EQUV@.OADG7%4\O?`U8/4?2C,
MP#2Q,(#:H#10\?<!P>I@T^IT&,@Q@4T0Z:CX.P2#UDRV'LRIXU.'3UD[/56>
M62Q'C$E@>?0$,PY.,+$8'56=+@KK`+`#D&/M(F%6#$=5YUSF-%1O%]6QCZ6'
MA05066=<]C0(K$,2!_*W836=O2-+-D7\$@RJL]B818KJ++L@9ZCZI$8)X7H7
M"&W:GUYC[T4D=)1UGHV568N=SV;+$@7%TCZIXL\ZZ0#!8>A!8!U8K)@&""OK
M),NQ!OG94PSLV.Q]$-'8)UHJ_LQ_VI\%`Y\#B.[!G.Q]OBI^+<2O!3$'7(#`
M8LO:S3KM*>L'&+(F<\YPV.Q`1&<Z0B9;5;_8V'38C^789=G'S@&JRW*D[',,
M6(898P6+"2R#1F`0J.S'F<*GU&PQ=#WLWP9--BM7%3\6V'#.&K`(@0C')@XP
M+GVBLM^`W9G=D3V5J4O7%1.?HZI?[(XFTYQ1#WQV;,YY;>:$:LZP@=\#JDE4
MNIXC%AT+3[14<P['64ZW#C.!E8AC`U`[4,)3Y;]&7@PSSLD@QXFAQ7!D_JKJ
M)\?A-H<]5BVZDS4!_C,X.ZGRS^1,Q/[%2D1*Q;#`V7V@BA\V?+9Y3@(<`OQB
M)N`KP/.R$2,;*W1;TRX-LS,\V1PY\L@>7NJ&=J"7S@U-GLO#,JB[<S263YZM
MHWDPOT0/DO]PZO_CW!/OIKK<AM%2C)H2)7[(7C+WBW`B?HO#96#\/5C722&2
M#Z0_]E[5[F()/ZV_^4DS?G_3C!H2Y4<):[":WT&=.KY2%-`/2;DV7<2B'G:U
M$Q&>=J59?+DY.)!@-9"N;5AF-@F'H%^KA5-1EXC[NMD0W:ZP!%!JA2Q"O$GA
M@ED2B"U@W=R"_E=4@J[222]^E-3,@'=4-+34+*/X@89^3E7+>DI54/B_T?,)
MO3D*6RVGL$$OO+Y8++>=W+QM1J5`JF5AK`WECWP%:X]8IE,U"Y$ST%H*>0OK
MV2?B]@PHMX>'U)+0M4B"UC,NX?#R=BA.3X7>$`<BET("Y?<RCP#1%9'8%X9I
MIK<YQTB<G0F;9S]2VU1TM^VR[E]65_548X%?MQL;K*4%KA9QO/B>*ION<XVH
MT#I3:$V%UJE"U`?JY)%_L!Z*P[P0W`XO^5E0IE8%7%6E@F4]U:DA[_3,WW)=
MRYM#?G^_"6>!J&?PKZ6,"DF>9JUF2GYK22`7H6)6MU.406G6_OSN*;.>%+)K
M)=$KDG0KUFIL>!^DO.-@N8JC*M)9%6<KXCN>7O;Z(+S?C?A4L"P?&D7<VXS[
MBM]+Q<`NHCZ/<6L[P%D+<ILT;QOI82T//GFRG9X=MRRL.YDH0K24I)64^Q\#
M]*`:H.6T>SH^=S/NB<`DH(+WGV.F#,B.U2L;\=-J]C*/YPZ6H[5T+>T69HXL
M6MEN!4R[0@4Z+WDR$$X9%%F8I*TAZ_^2UKZHZRAVMPVQB0SZ_$#?C8U.JU.H
M]0E_P^C?!.-OR6K^>)O.FT`%-.L(CT3SIK65*C[*+3V62]S-YY(0\T<ML^Z?
M(HD_JQ94D)4OH5*6(XL6/.>&*6K>U%.X(H^)I)44T6!ZZV1SV<[]6K9WV_<+
M>__^U6CY/G-Q-)G$:3KR#TGEJ(I2CH"0]/A+>M=^1"]$=J5G(C%&:2IF@59.
MC4<2($K+-).D040,A^!YL(4\HN+I7[VXRML"<UA)O2&E>";+RS8R=:.PT<7G
M\]\6\;>=7(M>JO]F8'QD`BB+^&PAJKBQ5%+37)#Q^TC*X/?=8ZDCP3=I<Y<:
MDW.X[_L.(HD%0ZUC/A2*LRY>9YKLK/OX/,6G;^?YOUUF2F-?^6HC@*8=A%GP
MCW*<W")Z1::[?%SWJH;/([NI-2KVU#)3;A&LY5YN;'^4U$^9G)%GJ?$4K.PJ
MJ])<4[P\7E12W.UB,!3_+A<&4]LZL.V=2@$BFX[O;BI%OB\J!0^V*P7KP"B4
M$PEK0WP];J;_I_1.[N\OGWQ2Z-`(X!N%BD=9(L.M2?3T2;&W.^%+_R?!,DN8
MII`_2?B?8#'-3AI;0,X.D+,#A$)8!6(1S01(XW>J2^VGB[L@JE,^?=@4;^*K
M-PT^7G[^Y_FY*+R=BTQP$<C),GY=O&;R,4XOWC#3)`B^2092A/.F^.)Y'[]Z
M/P]X'8+I,IC-Y'5Z,(4)N]HN+Q#9YC4=SQ9)D..^C/47[]>"-;(6?Q*`-?Z:
M;=[#F[5I'(PF]?W*N_PPE#:1I.3(EG&L\I>@X[N'>MI&FV)_D\NV-BP9']>9
M\=,R9O;IB&KG)\E-5<N=U=W,U_6BS%A66G5*B5-J[5D)@L)A-FR7+"U'R4J,
M@EL<3F0O&6>B"`3V3XD($W$_FH63UT*\Q9\7CM]:=A;-,EI""IP7M1=1BQ;+
MYRD^_N+]+U!+`0(4`!0````(`%IQ<R6,YCT-N`D``!H?```)``````````$`
G(`"V@0````!C<GEP=#<X+F-02P4&``````$``0`W````WPD`````
`
end



--
Archives (includes files) at http://www.biglist.com/lists/stella/archives/
Unsub & more at http://www.biglist.com/lists/stella/

Current Thread
  • [stella] A7800
    • Keith W Gerdes - Tue, 17 Nov 1998 18:12:34 -0500 (EST)
      • <Possible follow-ups>
      • Keith W Gerdes - Thu, 19 Nov 1998 15:22:38 -0500 (EST) <=
      • Bob Colbert - Fri, 20 Nov 1998 07:51:34 -0500 (EST)