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

原文地址http://blog.sina.com.cn/s/blog_4b7bd3380100a76z.html

　　

1 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

以上是从键盘输入字符串并输出该字符串的简单汇编程序

以下是整理的对上面程序的部分解释：

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

STACKS SEGMENT
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

STACKS SEGMENT
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