home *** CD-ROM | disk | FTP | other *** search
- NAME FIND
- TITLE Find file and attributes
- PAGE 66, 132
-
- DGROUP GROUP DATA
- DATA SEGMENT WORD PUBLIC 'DATA'
- ASSUME DS:DGROUP
- ASSUME ES:DGROUP
- DATA ends
-
- PGROUP GROUP PROG
- PROG segment byte public 'PROG'
- assume cs:PGROUP
-
-
- PUBLIC FIND1ST, FINDNEXT
-
- FIND1ST PROC NEAR
- ;
- ; This procedure finds the first file that matches the name and set of
- ; attributes passed in. If the file is found, a pointer to the information
- ; block is returned, otherwise, zero is returned.
- ;
- WILDCARD EQU WORD PTR [BP + 4]
- ATTR_MASK EQU WORD PTR [BP + 6]
- DTA_P EQU WORD PTR [BP + 8]
-
- push bp
- mov bp, sp
- mov dx, DTA_P