;本程序将在D:盘根目录下建立一个文件 TEST.TXT
;该文件内容,完全由你自己键入
;-------------------------------------------
DSEG SEGMENT
PATHNM1 DB 'D:\TEST.TXT', 0 ;须以0结尾
FILE_N1 DW ?
BUFF_NN DB 200, ?
BUFFER DB 200 DUP (?)
MSG1 DB 'Please input File content : $'
DSEG ENDS
;-------------------------------------------
CSEG SEGMENT
ASSUME CS:CSEG, DS:DSEG
START:
MOV AX, DSEG
MOV DS, AX
LEA DX, MSG1
MOV AH, 9
INT 21H
LEA DX, BUFF_NN
MOV AH, 10 ;等待键入字符串
INT 21H ;回车键结束
CMP BYTE PTR BUFF_NN + 1, 0
JE EXIT
MOV AH, 3CH ;建新文件
MOV CX, 0 ;属性
LEA DX, PATHNM1
INT 21H
MOV FILE_N1, AX
MOV AH, 40H ;写文件
MOV BX, FILE_N1
MOV CL, BUFF_NN + 1
MOV CH, 0
LEA DX, BUFFER
INT 21H ;写入
MOV AH, 3EH ;关闭文件
MOV BX, FILE_N1
INT 21H
EXIT:
MOV AH, 4CH
INT 21H
CSEG ENDS
END START
;-------------------------------------------
本程序生成的是文本文件,可以用任意的文字处理软件打开,查看内容。