HUH?
>Please send me subscription info. Thanks.
>
> unsigned long BinToBCD(unsigned long i) {unsigned long t;
>Ludis Langens return i ? (t = BinToBCD(i >> 1), (t << 1) + (i & 1) +
>ludis at netcom.com (t + 858993459 >> 2 & 572662306) * 3) : 0;}
Deano
sdean at umd.umich.edu
http://www.engin.umd.umich.edu/~sdean/