home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / C / OTL-MC6.DMS / in.adf / libsrc.lha / LIBSRC / clock.asm < prev    next >
Encoding:
Assembly Source File  |  1994-04-08  |  615 b   |  40 lines
  1.  
  2. * Maxon C++ Library:
  3. * Modul "clock"
  4. * Jens Gelhar 15.06.93
  5.  
  6. DateStamp    = -192
  7.  
  8.     xref    _DosBase
  9.  
  10.     xdef    _clock,clock_
  11.     xdef    _INIT_2_I_DiDnT_EXPECT_THE_sPANISH_INQU
  12.  
  13. _INIT_2_I_DiDnT_EXPECT_THE_sPANISH_INQU:
  14.     move.l _DosBase,a6
  15.     move.l #startstamp,d1
  16.     jmp DateStamp(a6)
  17.  
  18. _clock:
  19. clock_:
  20.     movem.l    d2/d3/a6,-(a7)
  21.     lea    -12(a7),a7
  22.     move.l    a7,d1
  23.     move.l    _DosBase,a6
  24.     jsr    DateStamp(a6)
  25.     move.l    (a7)+,d0    ; Days
  26.     sub.l    startstamp(pc),d0
  27.     muls    #24*60,d0
  28.     add.l    (a7)+,d0    ; Mins
  29.     sub.l    startstamp+4(pc),d0
  30.     muls    #60*50,d0
  31.     add.l    (a7)+,d0    ; Ticks
  32.     sub.l    startstamp+8(pc),d0
  33.     movem.l    (a7)+,d2/d3/a6
  34.     rts
  35.  
  36. startstamp:    blk.l 3
  37.  
  38.     end
  39.  
  40.