home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 364b.lha / PCQ_v1.1 / Runtime / System / TimerDevice.asm < prev   
Encoding:
Assembly Source File  |  1990-04-08  |  645 b   |  38 lines
  1.  
  2. *
  3. *    TimerDevice.asm
  4. *    of PCQ Pascal (c) 1989 Patrick Quaid
  5. *
  6. *    Makes the actual calls to the timer.device.  Note that TimerBase
  7. *    must have been set up previously, either by a call to CreateTimer
  8. *    or by pulling the device pointer from a valid TimerRequest.
  9. *
  10.  
  11.     XREF    _TimerBase
  12.     XREF    _LVOAddTime
  13.     XREF    _LVOCmpTime
  14.     XREF    _LVOSubTime
  15.  
  16.     XDEF    _AddTime
  17. _AddTime
  18.     move.l    8(sp),a0
  19.     move.l    4(sp),a1
  20.     move.l    _TimerBase,a6
  21.     jmp    _LVOAddTime(a6)
  22.  
  23.     XDEF    _CmpTime
  24. _CmpTime
  25.     move.l    8(sp),a0
  26.     move.l    4(sp),a1
  27.     move.l    _TimerBase,a6
  28.     jmp    _LVOAddTime(a6)
  29.  
  30.     XDEF    _SubTime
  31. _SubTime
  32.     move.l    8(sp),a0
  33.     move.l    4(sp),a1
  34.     move.l    _TimerBase,a6
  35.     jmp    _LVOSubTime(a6)
  36.  
  37.     END
  38.