home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / ZSYS / SIMTEL20 / SYSLIB / SLIB2.LBR / SFDELETE.Z80 < prev    next >
Text File  |  2000-06-30  |  384b  |  26 lines
  1. ;
  2. ; SYSLIB Module Name:  SFDELETE
  3. ; Author:  Richard Conn
  4. ; SYSLIB Version Number:  3.6
  5. ; Module Version Number:  1.1
  6.  
  7.     public    f$delete
  8.  
  9. ;
  10. ;  F$DELETE -- DELETE FILE WHOSE FCB IS PTED TO BY DE
  11. ;
  12.     EXT    BDOS
  13.  
  14. F$DELETE:
  15.     PUSH    HL    ; SAVE HL
  16.     PUSH    BC    ; SAVE BC
  17.     LD    C,B$DEL
  18.     CALL    BDOS
  19.     POP    BC    ; RESTORE BC
  20.     POP    HL    ; RESTORE HL
  21.     RET
  22.  
  23. B$DEL    EQU    19    ; DELETE FILE
  24.  
  25.     END
  26.