home *** CD-ROM | disk | FTP | other *** search
/ BURKS 2 / BURKS_AUG97.ISO / BURKS / SOFTWARE / LIBS / PMC101.ZIP / LIBSRC.ZIP / SETIRQM.ASM (.txt) < prev    next >
Assembly Source File  |  1994-06-18  |  451b  |  32 lines
  1. .386p
  2. locals
  3.  
  4. public  SETIRQMASK
  5.  
  6. _TEXT           segment dword public use32 'CODE'
  7.  
  8. SETIRQMASK:
  9.         mov cl,[esp+4+0+04h]
  10.  
  11.         in al,0a1h
  12.         mov ah,al
  13.         in al,21h
  14.  
  15.         mov edx,0fffffffeh
  16.         rol edx,cl
  17.         and eax,edx
  18.  
  19.         mov edx,[esp+4+0+00h]
  20.         shl edx,cl
  21.         or eax,edx
  22.  
  23.         out 21h,al
  24.         mov al,ah
  25.         out 0a1h,al
  26.  
  27.         ret 08h
  28.  
  29. _TEXT           ends
  30. end
  31.  
  32.