home *** CD-ROM | disk | FTP | other *** search
/ BURKS 2 / BURKS_AUG97.ISO / BURKS / SOFTWARE / LIBS / PMC101.ZIP / LIBSRC.ZIP / DSCFREE.ASM (.txt) < prev    next >
Assembly Source File  |  1994-06-05  |  439b  |  33 lines
  1. .386p
  2. locals
  3.  
  4. public  DSC_FREE
  5.  
  6. _TEXT           segment byte public use32 'CODE'
  7. assume  cs:_TEXT
  8.  
  9. DSC_FREE:
  10.         push ebx
  11.  
  12.         mov bx,[esp+4+4]
  13.         mov ax,1
  14.         int 31h
  15.         jc short @@00
  16.  
  17.         xor eax,eax
  18.         jmp short @@01
  19.  
  20. @@00:
  21.         movsx eax,ax
  22.         cmp ah,80h
  23.         je short @@01
  24.         mov eax,-32768
  25.  
  26. @@01:
  27.         pop ebx
  28.         ret 4
  29.  
  30. _TEXT           ends
  31. end
  32.  
  33.