"Hans Andersson" wrote to "All" (27 Jun 03  16:50:40)
 --- on the topic of ""timer object""

 HA> 'timer.inc
 HA> 'NOTE! DEF FN must be last include
 HA>
 HA> TYPE TimerT
 HA> started AS SINGLE
 HA> waitsecs AS SINGLE
 HA> stoptime AS SINGLE
 HA> END TYPE
 HA>
 HA> DECLARE SUB TimerStart (Self AS TimerT, Secs!)
 HA> DECLARE FUNCTION TimeUsed! (Self AS TimerT)
 HA> DECLARE FUNCTION TimeRemain! (Self AS TimerT)


I don't understand how to use your example. There seems to be duplicate
functions. I kept getting invalid types or mismatch errors when calling
TimerStart until I did DIM SHARED Self as TimerT. BTW the SECSINDAYS
shouldn't it be 86400 instead of 864000?

 Mike
 ****

... A child of 5 could understand this!  Fetch me a child of 5!
--- Blue Wave/DOS v2.30