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

.MODEL SMALL
.STACK 100H


.DATA
PROMPT DB 'NHAP VAO TEN FILE:$'
TENFILE DB 30 DUP(0)
DEM DB 512 DUP(0)
THEFILE DW ?
LOI DB 0DH,0AH,'LOI MO FILE :'
MALOI DB 30H,' $'


.CODE

MAIN PROC
MOV AX,@DATA
MOV DS,AX ; Khoi tao DS
MOV ES,AX ; Khoi tao ES
CALL NHAP ; Doc vao ten file
LEA DX,TENFILE ; DX chua dia chi offset ten file
MOV AL,0 ; Ma truy nhap 0:chi doc
CALL OPENFILE ; Mo file
JC OPEN_ERROR ; Ket thuc neu co loi
MOV THEFILE,AX ; Luu the file


READ_LOOP:
LEA DX,DEM ; DX tro toi vung dem
MOV BX,THEFILE ; Lay the file
CALL READFILE ; Doc file,AX=so byte doc duoc
OR AX,AX ; Ket thuc file chua?
JE EXIT ; Dung,ket thuc
MOV CX,AX ; CX chua so byte doc duoc
CALL HIENTHI ; Goi hien thi noi dung file
JMP READ_LOOP ; Lap lai


OPEN_ERROR:
LEA DX,LOI ;Lay thong bao loi
ADD MALOI,AX ;Doi ma loi thanh ma ASCII
MOV AH,9

(xem tiếp ở tài liệu)