powTen = PowTenTbl[i];
   while (bin >= powTen)
   {
       bin -= powTen;
       digit++;
    }