#include <reg51.h>

/* TIME.C: time Function for DHRYSTONE and WHEATSTONE Benchmarks  */

long timeval;

timerint () interrupt 1 {
  TH0 = -250;             /* 125 Hz at 12 MHz 8051 */
  timeval++;
}

long time (long *t)  {
  long tval;
  EA   = 0;
  tval = timeval;
  IE   = 0x82;
  TR0  = 1;
  return (tval);
}


/*
initserial ()  {
  SCON = 0x52;
  TMOD = 0x20;
  TCON = 0x69;
  TH1 =  0xf3;
}
*/