home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 15 / CDACTUAL15.iso / cdactual / program / asm / PJ96.ZIP / ALIB.ZIP / F_SIZE.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-06-26  |  333 b   |  25 lines
  1.     include    asm.inc
  2.  
  3.     public    current_file_size
  4.  
  5.     .code
  6.     extn    ms_dos_strerror
  7.  
  8. ;;    current file size
  9. ;
  10. ;    entry    BX    file handle
  11. ;    exit    DX AX    file size
  12. ;        Cf    if unexpected file error
  13. ;
  14. current_file_size proc
  15.     push    cx
  16.     mov    ax,4202h
  17.     xor    cx,cx
  18.     xor    dx,dx
  19.     call    ms_dos_strerror
  20.     pop    cx
  21.     ret
  22. current_file_size endp
  23.  
  24.     end
  25.