VB Forum / General 2 / October 2004

I assume proC is C of some sort ?

Try this. Warning, not tested and done on the fly without thinking.

int SomeFuncToGetaCheckSum(void)
{
    int iCounter;
    int iSum;
    int iMultiplier = 7;
    char sTemp[20];
    char *p = sReference;
   
    while (p && *p)
    {
         if (isdigit(*p)
        {
        iSum += ((*p) - 48) * iMultiplier;
            switch(iMultiplier)
            {
            case 7 : iMultiplier = 3; break;
            case 3 : iMultiplier = 1; break;       
            case 1 : iMultiplier = 7;
            }
        } /* end isdigit */
    p++;
    } /* end while */

    iSum %= 10;
    iSum -= 10;
    _itoa(iSum,sTemp,10);
    fReferenceCheckSum = &sTemp[strlen(sTemp) -1];
    return fReferenceCheckSum;
}

I think that may do something close. Or not. :)