[comp.lang.pascal] timing program

john@cs.utexas.edu (John Baima) (08/12/89)

Without doing anything fancy, the best that can be done is is reading
the clock which is updated 18.2 times/sec. The clock is stored at 46C
as a 4 byte integer. Thus is can be read in Turbo with

var
  TheTime : LongInt absolute $0000:$046C

If you want a smaller interval you must reprogram the timer chip.
Turbo Analyst does that with their execution timer so that could be
used as an example.

John Baima
uunet!texbell!utafll!john