static char ascnum[] = "0123456789ABCDEF";

phex_byte (b)
     unsigned char b;
{
  unsigned char n;

    if ((n = b / 16) != 0)
      phex_byte(n);
    putchar(ascnum[b - (n * 16)]);
}

phex(lval)
unsigned long lval;
{
    unsigned long n;
    
    if ((n = lval / 16) != 0)
      phex(n);
    putchar(ascnum[lval - (n * 16)]);
}