home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1996 December / CD_shareware_12-96.iso / DOS / Programa / AGSPC1B2.ZIP / TIMER.PPS < prev    next >
Encoding:
Text File  |  1996-07-29  |  622 b   |  19 lines
  1. ;----------------------------------------------------------------------------
  2. ; Copyright(C) 1996, The AEGiS Corporation
  3. ;----------------------------------------------------------------------------
  4. ;
  5. ; FUNCTION Timer()
  6. ;
  7. ; Returns the number of clock ticks since midnight
  8. ; Very usefull for accurate timing routines (for games for example)
  9. ;
  10. ;----------------------------------------------------------------------------
  11. #lib
  12. Declare Function Timer() DWord
  13.  
  14. ;----------------------------------------------------------------------------
  15. Function Timer() DWord
  16. Timer = PeekDW(MKADDR(0040h,006Ch))
  17. Endfunc
  18.  
  19.