汇编语言程序设计实验七 文件操作

上海应用技术学院 实验报告

实验报告

课程名称

汇编语言程序设计

实验项目

实验七 文件操作

一、目的及要求

1、掌握文件的建立、打开、关闭的方法。 2、 掌握文件的读写方法。

3、 建立一个文件，存放到指定的路径下，理解文件代号的作用。 4、 将内存某区域AREA1中的内容写入该文件。

二、 实验准备 认真复习第六章。

三、 实验内容

1、编写程序，在D盘根目录下建立一个名为TEST1.TXT和TEST2.TXT的文件，建立成功后，在TEST1.TXT文件中写入写入入你的学号，在TEST2.TXT中写入‘Hello！’。并且在屏幕上显示“SUCCESS”。

2、打开FILE1.TXT文本文件，将文件的内容通过显示器显示出来。

3、打开前题中的两个文件，将TEST1.TXT的内容append 到TEST2.TXT，并显示TEST2.TXT。

四、源程序

1. INCLUDE YLIB.H DATA SEGMENT

FILE1 DB 'D:\\TEST1.TXT',0 FILE2 DB 'D:\\TEST2.TXT',0 HANDLE1 DW ? HANDLE2 DW ? DTA1 DB ? DTA2 DB ?

MESS1 DB 0DH,0AH, 'input text please:$' MESS2 DB 0DH,0AH,'FAIL TO WRITE!$' SUCCESS DB 0DH,0AH,' SUCCESS! $' DATA ENDS CODE SEGMENT

ASSUME CS:CODE,DS:DATA START:

第 1 页

上海应用技术学院 实验报告

MOV AX, DATA MOV DS, AX LEA DX, FILE1 MOV CX, 0 MOV AH, 3CH INT 21H

MOV HANDLE1, AX

LEA DX, FILE2 MOV CX, 0 MOV AH, 3CH INT 21H

MOV HANDLE2, AX NEXT1:

LEA DX , MESS1 MOV AH, 09H INT 21H LEA DX, DTA1 MOV BX, HANDLE1 AGN1:

MOV AH, 01H INT 21H MOV DTA1 , AL MOV AH, 40H MOV CX,1 INT 21H JC ERROR1 CMP DTA1, 0DH JNE AGN1 LEA DX, SUCCESS MOV AH, 09H INT 21H JMP CLOSE1 AGN2:

第 2 页

上海应用技术学院 实验报告

LEA DX, MESS1 MOV AH, 09H INT 21H LEA DX, DTA2 MOV BX, HANDLE2 NEXT:

MOV AH,01H

INT 21H MOV DTA2, AL MOV AH, 40H MOV CX, 1 INT 21H JC ERROR1 CMP DTA2, 0DH JNE NEXT LEA DX, SUCCESS MOV AH, 09H INT 21H JMP CLOSE2

CLOSE1:

MOV AH, 3EH MOV BX, HANDLE1 INT 21H JMP AGN2 CLOSE2:

MOV AH, 3EH MOV BX, HANDLE2 INT 21H ERROR1:

LEA DX, MESS2 MOV AH, 09H INT 21H EXIT:

MOV AX, 4C00H INT 21H CODE ENDS

第 3 页

上海应用技术学院 实验报告

END START 2.

DATA SEGMENT

FILE DB 'D:\\FILE1.TXT',0

HANDLE DW ?

IN_AREA DB 10 DUP(?),'$' LEN

EQU

20

MESS1 DB 0DH,0AH,'OPEN FILE ERROR.$’ MESS2 DB 0DH,0AH,' READ FILE ERROR.$’ MESS3 DB 0DH,0AH,' READ FILE SUCCESS.$’ DATA ENDS CODE SEGMENT

ASSUME CS:CODE,DS:DATA MOV DS,AX MOV AH,3DH LEA

DX,FILE

MOV AL,00H INT 21H JNC LEA JMP

SUC DX,MESS1 EXIT

START: MOV AX,DATA

SUC:

MOV HANDLE,AX

NEXT: MOV AH,3FH

MOV CX,LEN LEA

DX,IN_AREA

MOV BX,HANDLE INT 21H JC READ_ERR CMP CMP LEA ADD

AX,0

IN_AREA,1AH SI,IN_AREA SI,AX

JZ READ_FIN JZ READ_FIN

MOV BYTE PTR [SI],'$' MOV AH,09H

第 4 页

上海应用技术学院 实验报告

3.

DATA SEGMENT FILENAME1 FILENAME2 DTA

DTA2

DB 'D:\\TEST1.TXT', 0 DB 'D:\\TEST2.TXT', 0

; 磁盘缓冲区

LEA JMP

DX,IN_AREA NEXT

INT 21H

READ_FIN:

MOV AH,3EH MOV BX,HANDLE INT 21H LEA JMP

DX,MESS3 EXIT

READ_ERR:

MOV AH,3EH MOV BX,HANDLE INT 21H LEA

DX,MESS2

EXIT: MOV AH,09H

INT 21H

MOV AX,4C00H INT 21H END

START

CODE ENDS

DB 256 DUP (?) DB ?

DW ? DW ?

HANDLE1 HANDLE2 DONE FAIL1 FAIL2 FAIL3 FAIL4 MESS3 DATA

DB 0

DB 0DH, 0AH, 'Open File Error. $' DB 0DH, 0AH, 'Move File Pointer Error. $' DB 0DH, 0AH, 'Read File Error. $' DB 0DH, 0AH, 'Write File Error. $ ' DB 0DH, 0AH, 'read file success.$' ENDS

CODE SEGMENT

第 5 页