home *** CD-ROM | disk | FTP | other *** search
/ Audio 4.94 - Over 11,000 Files / audio-11000.iso / msdos / sndbords / proaudio / pcmtlsrc / pcmtlsrc.arj / PCM.ARJ / _I94F85.INC < prev    next >
Text File  |  1992-07-29  |  1KB  |  74 lines
  1. ;$Author:   BCRANE  $
  2. ;$Date:   29 Jul 1992 16:57:24  $
  3. ;$Header:   W:/sccs/sdkapp/_i94f85.inv   1.0   29 Jul 1992 16:57:24   BCRANE  $
  4. ;$Log:   W:/sccs/sdkapp/_i94f85.inv  $
  5. ;
  6. ;   Rev 1.0   29 Jul 1992 16:57:24   BCRANE
  7. ;Initial revision.
  8. ;$Logfile:   W:/sccs/sdkapp/_i94f85.inv  $
  9. ;$Modtimes$
  10. ;$Revision:   1.0  $
  11. ;$Workfile:   _i94f85.inc  $ 
  12.  
  13. ;; shark functions
  14. ;; dx:ax can be used to return values
  15. ;; si can be trashed
  16. ;; no other precautions taken
  17.  
  18.     if VERBOSE
  19.     align 256
  20.     db '_i94f85.inc: copyright Media Vision, Inc., 1992', 00h
  21.     endif
  22.  
  23. ;; i94f85() - single step the queue
  24.  
  25. _i94f85 proc near
  26.  
  27.     pushem bx ds
  28.  
  29.     mov ax, cs
  30.     mov ds, ax
  31.  
  32.     inc int08count[0]
  33.     jnz @F
  34.     inc int08count[2]
  35. @@:    and int08count[2], 7FFFh
  36.  
  37.     cmp nextevent, 0
  38.     jz doitf85
  39.  
  40.     dec nextevent
  41.     
  42.     jmp short nomoref85
  43.  
  44. doitf85:
  45.     mov ax, int08count[0]
  46.     mov dx, int08count[2]
  47.  
  48.     inc inhereflag
  49.  
  50.     sti
  51.  
  52.     call processqueue
  53.  
  54.     cli
  55.  
  56.     dec inhereflag
  57.  
  58.     mov bx, firstptr
  59.     or bx, bx
  60.     jz nomoref85
  61.     
  62.     mov ax, [bx].qp_tick
  63.     sub ax, int08count
  64.     jz doitf85
  65.     js doitf85
  66.  
  67.     mov nextevent, ax
  68.  
  69. nomoref85:
  70.     popem bx ds 
  71.  
  72.     ret
  73. _i94f85 endp
  74.