Đồ Án ĐALTHT-Mô tả lệnh dir bằng asm

.model small
.stack 100h
.data
msg db ñaây la chöông trình moâ phong leänh dir’,0ah,0dh ‘$’
prompt db ‘file name$’
fine_name db 30 dup(0)
file_attribute db?
File_time dw ?
File_size dd?
Buffer db 512 dup(0)
doserror db 0dh,0ah,’doserrorcode’
errcoder db 30h,’$’

.code
main proc
mov ax, @data
mov ds ,ax
mov es,ax
led dx,msg
mov ah,9
int 21h
call find_file
jg doserror
find_file:
Mov ah,1a
lea dx,buffer
call find_first
jc doserror
call display
mov dl,0dh
int 21h
cal find_next
je exit
jmp find_file
doserror:
.