home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MAGAZINE / MISC / PJ_9_6.ZIP / ALIB.ZIP / REWIND.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-06-26  |  287 b   |  25 lines
  1.     include    asm.inc
  2.  
  3.     public    rewind
  4.  
  5.     .code
  6.     extn    ms_dos_strerror
  7.  
  8. ;;    rewind
  9. ;
  10. ;    entry    BX    file handle
  11. ;    exit    Cf    if error
  12. ;    uses    AX
  13. ;
  14. rewind    proc
  15.     pushm    cx,dx
  16.     mov    ax,4200h        ; rewind file
  17.     xor    cx,cx
  18.     xor    dx,dx
  19.     call    ms_dos_strerror
  20.     popm    dx,cx
  21.     ret
  22. rewind    endp
  23.  
  24.     end
  25.