Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!rutgers!gatech!uflorida!haven!adm!xadmx!texbell!utafll!john@cs.utexas.edu
From: texbell!utafll!john@cs.utexas.edu (John Baima)
Newsgroups: comp.lang.pascal
Subject: timing program
Message-ID: <20587@adm.BRL.MIL>
Date: 11 Aug 89 19:10:53 GMT
Sender: news@adm.BRL.MIL
Lines: 13

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