home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / MISC / ZEN1_10.ZIP / PAUSE.SRC < prev    next >
Encoding:
Text File  |  1989-12-30  |  706 b   |  40 lines
  1. MUX? \*IF
  2. \ Entry to cooperative round-robin multitasker
  3. CODE PAUSE ( ) \ EXT CORE
  4.         push  bx
  5.         push  si
  6.         push  bp
  7. END-CODE *\
  8. MUX? LOX? AND \*IF
  9. ASSEMBLER
  10.         mov   bx,[LXv]
  11.         push  bx
  12. END-CODE *\
  13. MUX? \*IF
  14. ASSEMBLER
  15.         mov   bx,[UXv]
  16.         mov   [bx+4],sp
  17.         sub   ax,ax
  18. PAUS1   mov   bx,[bx]
  19.         or    ax,[bx+2]   ; asleep?
  20.         jz    PAUS1
  21.         mov   [UXv],bx    ; wake up
  22.         sti
  23.         mov   sp,[bx+4]
  24.         cli
  25. END-CODE *\
  26. MUX? LOX? AND \*IF
  27. ASSEMBLER
  28.         pop   bx
  29.         mov   [LXv],bx
  30. END-CODE *\
  31. MUX? \*IF
  32. ASSEMBLER
  33.         pop   bp
  34.         pop   si
  35.         pop   bx
  36.         NEXT
  37. END-CODE
  38. *\
  39.  
  40.