用汇编语言试编写程序,从键盘输入字符以回车结束,统计输入的字符个数,并显示输入的字符和字符个数

【汇编编程求助】通过键盘输入一串字符，以回车结束，统计并输出其中0和1的个数，在线等 用汇编语言编~

终于搞定了，你看看应该没什么问题
DATAS SEGMENT
STR DB "please input a string:$"
STR1 DB "0 numbers:$"
STR2 DB "1 numbers:$"
BUF DB 20
DB ?
DB 20 DUP (?)
CRLF DB 0AH,0DH,"$"
X DB 30H ;存储0的个数
Y DB 30H ;存储1的个数
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 ;存储字符串的地址从第3个字节开始
DEC SI
INC CL
NEXT: DEC CL
INC SI
CMP CL,0
JE VIE
MOV DL,[SI]
CMP DL,30H
JE XX
CMP DL,31H
JE YY
JNZ NEXT
XX:INC X
JMP NEXT
YY:INC Y
JMP NEXT


VIE: LEA DX,STR1
MOV AH,9
INT 21H
;MOV BL,X
MOV DL,X
MOV AH,2
INT 21H

LEA DX,CRLF ;输出换行回车
MOV AH,9
INT 21H

LEA DX,STR2
MOV AH,9
INT 21H
;MOV BL,Y
MOV DL,Y
MOV AH,2
INT 21H

MOV AH,4CH
INT 21H
CODES ENDS
END START

本程序最多能输入255个字符包括回车，输出统计时，第一个数字是数字字符个数，第二个是字母，第三个是其它。
assume cs:code,ds:data
data segment
da1 db 255
da2 db ?
da3 db 255 dup (?)
data ends
stack segment stack
db 256 dup (?)
stack ends
code segment
start:
mov ax,data
mov ds,ax

lea dx,da1 ;输入字符串
mov ah,10
int 21h

lea bx,da3 ;统计字符串
xor cx,cx
xor ax,ax
xor dx,dx
mov cl,da2
again:
mov ah,[bx]
.if ah >= '0' && ah <= '9' ;数字，al加1
inc al
.elseif ah >= 'A' && ah <= 'Z' ;字母，dh加1
inc dh
.elseif ah >= 'a' && ah <= 'z'
inc dh
.else
inc dl ;其它，dl加1
.endif
inc bx
loop again

call putout ;输出数字个数
mov al,dh
call putout ;输出字母个数
mov al,dl
call putout ;输出其它字符个数
mov ax,4c00h
int 21h

putout: ;以16进制形式输出al中的数据
push bx
push dx
xor ah,ah
push ax

mov dl,13 ;换行
mov ah,2
int 21h
mov dl,10
mov ah,2
int 21h

pop ax
mov bl,16
div bl ;使高位与低位分离
.if al>9 ;转换成字符
add al,40h
.endif
add al,30h

.if ah>9
add ah,40h
.endif
add ah,30h

mov bl,ah ;保存低位

mov dl,al ;输出高位
mov ah,2
int 21h
mov dl,bl ;输出低位
mov ah,2
int 21h

pop dx
pop bx
ret

code ends
end start

;----------------------------------
DATAS SEGMENT
IN_1 DB 100
N1 DB ?
BUFF DB 100 DUP('$')
MSG1 DB 10, 13, 'Please Input STR : $'
MSG2 DB 10, 13, 'The STR Long is : $'
CRLF DB 10, 13, '$'

DATAS ENDS
;----------------------------------
CODES SEGMENT
ASSUME CS:CODES, DS:DATAS
START:
MOV AX, DATAS
MOV DS, AX

MOV DX, OFFSET MSG1 ;提示输入.
MOV AH, 09H
INT 21H

MOV DX, OFFSET IN_1 ;接收键盘输入.
MOV AH, 0AH
INT 21H

MOV DX, OFFSET CRLF ;回车换行.
MOV AH, 09H
INT 21H

MOV DX, OFFSET BUFF ;输出原字符串.
MOV AH, 09H
INT 21H

MOV DX, OFFSET MSG2 ;提示长度.
MOV AH, 09H
INT 21H
;----------------------------------
MOV AL, N1
MOV BL, 10
MOV CX, 0
L1:
MOV AH, 0
DIV BL
PUSH AX
INC CX
AND AL, AL
JNZ L1
L2:
POP DX
MOV DL, DH
ADD DL, 48
MOV AH, 2
INT 21H
LOOP L2
;----------------------------------
MOV AH, 4CH
INT 21H
CODES ENDS

END START
;----------------------------------

---

革吉县19762024192： [汇编语言]由键盘输入任意字符串 然后显示出来 - ？
晁蚀益左： data segment keyboard db 256,?,256 dup (?) data ends code segment assume cs:code,ds:data main proc far mov ax,data mov ds,ax lea dx,keyboard mov ah,0ah;输入字符串 int 21h lea di,keyboard mov cl,[di+1];取出实际输入字符的个数 mov ...

革吉县19762024192： 编写一个汇编程序,从键盘输入一个字符,并显示在屏幕上.需要源代码... - ？
晁蚀益左： 直接调中断即可. dseg segment msglf db 0ah, 0dh, '$' dseg endscseg segment assume cs:cseg, ds:dseg begin: mov ax, dseg mov ds, axmov ah, 1 int 21h mov bl, allea dx, msglf mov ah, 9 int 21hmov dl, bl mov ah, 2 int 21hmov ah, 4ch int 21h cseg ends end begin

革吉县19762024192： 用汇编语言编程实现从键盘输入一个字符带回显,并将键盘输入的那个字符在屏幕上换行显示出来 - ？
晁蚀益左： .MODEL SMALL .DATA .CODE START:MOV AX, @DATAMOV DS, AX MOV AH, 1INT 21H MOV BL, AL MOV DL, 13 ;回车MOV AH, 2INT 21HMOV DL, 10 ;换行INT 21H MOV DL, BL ;显示INT 21HMOV AH, 4CHINT 21HEND START

革吉县19762024192： 用汇编语言编程,从键盘输入字符串,并将大小写互换,然后显示 - ？
晁蚀益左： 问题非常多:1. 首先题目就有问题,不可能“接收从键盘输入的字符,以CTR+C 结束”.对于命令提示符来说,按下CTRL+C,就会强行退出这个程序,所以不可能以CTRL+C结束的.应该是按回车结束输入.2. DATA里有中文标点符号.3. ...

革吉县19762024192： 从键盘输入一个字符串在下一行逆序输出用汇编语言如何实现 - ？
晁蚀益左： 从键盘输入一个字符串在下一行逆序输出用汇编语言可用如下方法实现: ;汇编语言输入一串字符串,可以调用DOS功能中断INT 21H的06H功能. ;程序功能:输入一串字符,以回车符结束,输入字符串最大长度200字符; ; 输入结束在下一...

革吉县19762024192： 汇编怎样编写从键盘接收字符串的程序 - ？
晁蚀益左： DATAS SEGMENT STR DB＂please input a string:$＂ BUF DB 20 ;这里的20为指定存放字符的个数(理论上的) DB ? ;这的?可变,实际存放字符的个数(系统自动计算) DB 20 DUP (?) ;这里的20是你在数据段开辟的空间 CRLF ...

革吉县19762024192： 编写汇编语言程序段:从键盘输入一个字符串“please input a number”存入BUFF - ？
晁蚀益左： code segmentassume cs:codeorg 100h start: jmp bbb data db 255 n db ? buff db 255 dup(?) bbb: push cspop dspush cspop eslea dx, datamov ah,10int 21h ; 从键盘输入字符串,字符串的字符个数在n中,串的开始地址为buff首地址...........mov ah,4chint 21h code endsend start

革吉县19762024192： 试编写一个汇编语言程序,从键盘输入一个字符,若该字符是大写字母,在屏幕上输出＂upper＂(不含双引号) - ？
晁蚀益左： ;------------------------------------ PRINT MACRO PARA ; 定义一个显示字符串的宏 LEA DX, PARA MOV AH, 9 INT 21H ENDM ;------------------------------------ DSEG SEGMENT MSG_LOWER DB ' lower', 0DH, 0AH, 24H MSG_UPPER DB ' upper', 0DH, ...

革吉县19762024192： 用汇编语言实现,从键盘输入任意字符(字母、数字、特殊符号等),并将其ASC2码值输出 - ？
晁蚀益左： code segment assume cs:code start:mov ah,01h int 21h mov cx,02h n:call der cmp dl,09h ja next add dl,30h mov ah,02h int 21h loop n nc:int 3h next:add dl,37h mov ah,02h int 21h loop n jmp nc der:push cx mov dl,00 mov cx,4 b:shl al,1 rcl dl,1 loop b pop cx ret code ends end start

革吉县19762024192： 用汇编语言编译一个程序\从键盘输入一个字符串将其每个字符的ASCII码显示在屏幕上 - ？
晁蚀益左： data segment parastr1 db 'one', '$'str2 db 'Two', '$'str3 db 'Three', '$'str4 db 'four', '$'str5 db 'five', '$'tab dw str1,str2,str3,str4,str5 data ends ssg segment stack dw 256 dup(?) ssg ends code segment para ...