home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / sp103.zip / prioint.asm next >
Assembly Source File  |  1995-03-30  |  572b  |  53 lines
  1. .MODEL TPASCAL
  2.  
  3. .286
  4.  
  5. .CODE
  6.  
  7. PUBLIC SetPriority
  8. SetPriority PROC FAR
  9.     PUSH BP
  10.     MOV BP, SP
  11.  
  12. .386
  13.     MOV EAX, DWORD PTR SS:[BP+0ah]
  14.     MOV EDX, DWORD PTR SS:[BP+06h]
  15.     INT 45h
  16.  
  17. .286
  18.     LEAVE
  19.     RET 8
  20. SetPriority ENDP
  21.  
  22. PUBLIC GetPriority
  23.  
  24. GetPriority PROC FAR
  25.     PUSH BP
  26.     MOV BP,SP
  27.  
  28. .386
  29.     MOV EAX, 00000042h
  30.     INT 45h
  31.  
  32. .286
  33.     PUSH ES
  34.     PUSH DI
  35.  
  36.     LES DI, DWORD PTR SS:[BP+0ah]
  37. .386
  38.     MOV DWORD PTR ES:[DI], EAX
  39.  
  40. .286
  41.     LES DI, DWORD PTR SS:[BP+06h]
  42. .386
  43.     MOV DWORD PTR ES:[DI], EDX
  44.  
  45.     POP DI
  46.     POP ES
  47.  
  48. .286
  49.     LEAVE
  50.     RET 8
  51. GetPriority ENDP
  52.  
  53. END