home *** CD-ROM | disk | FTP | other *** search
/ BURKS 2 / BURKS_AUG97.ISO / BURKS / SOFTWARE / LIBS / PMC101.ZIP / LIBSRC.ZIP / DSCDSC.ASM (.txt) < prev    next >
Assembly Source File  |  1994-06-05  |  579b  |  41 lines

  1. .386p
  2. locals
  3.  
  4. public  DSC_GETDSC, DSC_SETDSC
  5.  
  6. _TEXT           segment byte public use32 'CODE'
  7. assume  cs:_TEXT
  8.  
  9. DSC_GETDSC:
  10.         mov al,0bh
  11.         jmp short dsc
  12.  
  13. DSC_SETDSC:
  14.         mov al,0ch
  15.  
  16. dsc:
  17.         push ebx edi
  18.  
  19.         mov edi,[esp+4+8]
  20.         mov bx,[esp+4+8+4]
  21.         xor ah,ah
  22.         int 31h
  23.         jc short @@00
  24.  
  25.         xor eax,eax
  26.         jmp short @@01
  27.  
  28. @@00:
  29.         movsx eax,ax
  30.         cmp ah,80h
  31.         je short @@01
  32.         mov eax,-32768
  33.  
  34. @@01:
  35.         pop edi ebx
  36.         ret 8
  37.  
  38. _TEXT           ends
  39. end
  40.  
  41.