home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / ENTERPRS / CPM / UTILS / S / SMC21LIB.LZH / ITOAB.C < prev    next >
Text File  |  2000-06-30  |  512b  |  24 lines
  1.  
  2. #define NOCCARGC
  3. /*
  4. ** itoab(n,s,b) - Convert "unsigned" n to characters in s
  5. ** using base b
  6. ** Note: this is a nonstandard function.
  7. */
  8. itoab(n, s, b) int n; char *s; int b; {
  9.   char *ptr;
  10.   int lowbit;
  11.   ptr = s;
  12.   b >>= 1;
  13.   do {
  14.     lowbit = n & 1;
  15.     n = (n >> 1) & 32767;
  16.     *ptr = ((n % b) << 1) + lowbit;
  17.     if(*ptr < 10) *ptr += '0'; else *ptr += 55;
  18.     ++ptr;
  19.     } while (n /= b);
  20.   *ptr = 0;
  21.   reverse(s);
  22.   }
  23.  
  24.