从键盘输入字符串并输出该字符串(汇编程序)

从键盘输入字符串并输出该字符串（汇编程序)
DATAS SEGMENT
STR DB"please input a string:$"
BUF DB 20
DB ?
DB 20 DUP (?)
CRLF DB 0AH,0DH,"$";此处输入数据段代码
DATAS ENDS
STACKS SEGMENT STACK
DB 200 DUP(?) ;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START: MOV AX,DATAS
MOV DS,AX
LEA DX,STR
MOV AH,9
INT 21H
MOV AH,10
LEA DX,BUF
INT 21H
LEA DX,CRLF
MOV AH,9
INT 21H
MOV CL,BUF+1
LEA SI,BUF+2
NEXT: MOV DL,[SI]
MOV AH,2
INT 21H
INC SI
DEC CL
JNZ NEXT;此处输入代码段代码
MOV AH,4CH
INT 21H
CODES ENDS
END START
以上是从键盘输入字符串并输出该字符串的简单汇编程序，我们老师的要求是将程序中的2号调用改成9号调用，本人还在思考中，有能解决此问题的请回复，谢谢！
如果我了解了该题答案，一定和大家共享。

续一：
我们汇编老师的教学是先让我们看程序，写程序，再讲基本指令，基本结构……
学习汇编重要的是掌握CPU结构、程序结构以及熟练的掌握7种指令的运用。

以下是本人整理的对上面程序的部分解释：
BUF：键盘缓冲区BUF。

DB：定义变量的类型为字节类型。

DB 20：表示缓冲区能容纳20个字符。

DB 200 DUP(?)中的问号：不对分配的存储单元初始化。

DS：存放当前数据段的段地址。

CS：存放当前代码段的段地址。

SS：存放当前堆栈段的段地址。

MOV：传送指令。

AX：存放接收到的数据或发送数据。

DX：使用间接寻址时存放端口地址。

LEA：取偏移地址。

CL：在移位指令和循环移动指令中，存放移位次数或者循环移位次数。

SI：在存储器寻址时，作为变址寄存器。

在串操作中，作为源串指针。

DEC:decrement。

INC:increment。

INT：interruput。

DATAS SEGMENT
STR DB"please input a string:$"
BUF DB 20 ;这里的20为指定存放字符的个数(理论上的) DB ? ;这的?可变,实际存放字符的个数(系统自动计算)
DB 20 DUP (?) ;这里的20是你在数据段开辟的空
间
CRLF DB 0AH,0DH,"$";回车换行;此处输入数据段代码
DATAS ENDS
STACKS SEGMENT STACK
DB 200 DUP(?) ;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START: MOV AX,DATAS
MOV DS,AX
LEA DX,STR ;9号中断前提,给参数DX赋值,指定输出字符串所在的有效地址
MOV AH,9
INT 21H
MOV AH,10 ;10号中断，接收输入字符串，此时DX为存放字符串的有效地址
LEA DX,BUF
INT 21H
LEA DX,CRLF
MOV AH,9
INT 21H
MOV CL,BUF+1 ;获取字符串中字符的个数
LEA SI,BUF+2 ;间接寻址
NEXT: MOV DL,[SI]
MOV AH,2 ;2号中断输出单个字符
INT 21H
INC SI ;输出一个地址往后加1
DEC CL ;顺便减少输出的次数
JNZ NEXT ;此处输入代码段代码
MOV AH,4CH
INT 21H
CODES ENDS
END START
2号调用是逐个显示字符，9号调用是一次完成字符串的显示，但结尾得加上'$'。

最上面程序中用的2号调用，使用循环输出字符串。

要将2号调用改为9号调用，必须改程序中的循环结构为顺序结构。

很明显，程序中的
NEXT:
INC SI
DEC CL
JNZ NEXT
都要去掉。

所以问题简化为改
MOV DL,[SI]
MOV AH,2
部分为9号调用，以及在9号调用后加上'$'。

续last:
以下是在编程爱好者论坛上请教别人加上自己的整理得出的答案，并非最简。

DATAS SEGMENT
STR DB 'please input a string:$'
BUF DB 20
DB ?
DB 20 DUP (?)
CRLF DB 0AH,0DH,"$"
;此处输入数据段代码
DATAS ENDS
STACKS SEGMENT STACK
DB 200 DUP(?) ;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START: MOV AX,DATAS
MOV DS,AX
LEA DX,STR
MOV AH,9
INT 21H
MOV AH,10
LEA DX,BUF
INT 21H
LEA DX,CRLF
MOV AH,9
INT 21H
;开始改的部分
mov bl,BUF+1 ;输出这里开始
mov bh,0 ;
lea si,BUF+2 ;首地址
mov byte ptr[si+bx],'$';结尾得加上 '$'
mov DX,si ;
MOV AH,9 ;
INT 21H ;结束
MOV AH,4CH
INT 21H
CODES ENDS
END START
我和同学交流之后发现，程序中mov byte ptr[si+bx],'$'可以改为mov [si+bx],'$' ，mov bh,0也可以去掉，这样就得出最简答案了。

终结：
DATAS SEGMENT
STR DB 'Please input a string:$'
BUF DB 20
DB ?
DB 20 DUP(24H)
CRLF DB 0AH,0DH,'$'
DATAS ENDS
DB 200 DUP(?)
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
LEA DX,STR
MOV AH,9
INT 21H
MOV AH,10
LEA DX,BUF
INT 21H
LEA DX,CRLF
MOV AH,9
INT 21H
LEA DX,BUF+2
MOV AH,9
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START
现在已经真正理解DOS10号以及9号功能调用了，今天再次看这个题目又得到一个答案：
DATAS SEGMENT
STR DB 'Please input a string:$'
BUF DB 20
DB ?
DB 20 DUP(?)
CRLF DB 0AH,0DH,'$'
DATAS ENDS
DB 200 DUP(?)
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS
MOV DS,AX
LEA DX,STR
MOV AH,9
INT 21H
MOV AH,10
LEA DX,BUF
INT 21H
LEA DX,CRLF
MOV AH,9
INT 21H
MOV AL,BUF+1
ADD AL,2
MOV AH,0
MOV SI,AX
MOV BUF[SI],24H
LEA DX,BUF+2
MOV AH,9
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START。