CODE SEGMENT
ASSUME DS:CODE,CS:CODE,ES:CODE,SS:CODE
ORG 100h
START:
mov ah,4eh
mov dx,offset FILE
mov cx,10h
int 21h ;最初に一致するファイル名検索
MAIN:
jc BYEBYE ;存在しなければ終了
call DISP ;表示
mov ah,4fh
int 21h ;次に一致するファイル名検索
jmp short MAIN
BYEBYE:
mov ax,4c00h
int 21h ;終了
DISP: ;↓ファイル名表示
mov ah,6
mov si,offset 80h + 1Eh
cld
DISP_MAIN:
lodsb
cmp al,0
jz DISP_END
mov dl,al
int 21h
jmp short DISP_MAIN
DISP_END: ; ↓改行
mov dl,0Dh
int 21h
mov dl,0Ah
int 21h ; ↑ここまで
ret ;↑ここまで
FILE db '*.*',0
ENDS
END START
; 一部のコンパイラでは、
;CODE ENDS
; END START
;と記述しなければいけないようです
|