发布时间 : 星期六 文章IBM-PC姹囩紪璇█绋嬪簭璁捐瀹為獙鎶ュ憡 - 鐧惧害鏂囧簱更新完毕开始阅读
SUB BYTE PTR [SI+8],10 MOV DL,1
A9:ADD BYTE PTR [SI+9],DL A0:RET
ADD65536 ENDP
;********************** QUIT:MOV AH,4CH INT 21H CODES ENDS END START
汇编语言实验四 分类统计字符个数
1.实验目的与要求
【实验目的】
掌握分支程序设计的原理与方法，重点掌握各种程序中形成和判断条件而产生的程序段的设计方法和技巧。
【实验要求】
掌握分支程序的调用及基本子程序的编写，判断程序运行的顺序。
2.实验内容与实现原理
程序接受用户输入一行字符，并按照字符串中字符所属的类型分类，将结果输出（例如：aaabb1234&中，字母5，数字4，其他字符1）。
第 17 页 共 21 页
3.实验具体设计实现及结果
4.源代码
DATAS SEGMENT maxlen db 80 actlen db ?
String db 80 dup(?)
str1 db 'please input a String(<80) :$' str2 db 0ah,0dh,'Number of chars :$' str3 db 0ah,0dh,'Number of digits:$' str4 db 0ah,0dh,'Number of others:$'
Quit db 0ah,0dh,0ah,0dh,'Press any keys quit!$' char dw ? digit dw ? other dw ? DATAS ENDS CODES SEGMENT
ASSUME CS:CODES,DS:DATAS START:
PUSH DS xor AX,AX push Ax
MOV AX,DATAS MOV DS,AX
第 18 页 共 21 页
lea DX ,str1 mov AH ,9 int 21h
lea DX ,maxlen mov AH, 0aH int 21H
lea SI ,String mov char,0 mov digit,0 mov other,0 COMPARE:
mov AL, [SI] cmp al,0dh jz exit
CMP AL ,30H JC OTHER1 CMP AL ,3aH JC NUMBER CMP AL, 41H JC OTHER1 CMP AL , 5BH JC LETTER CMP AL , 61H JC OTHER1 CMP AL, 7BH JC LETTER OTHER1:
INC other JMP INCADDR NUMBER:
INC digit JMP INCADDR LETTER:
INC char INCADDR: INC SI
JMP COMPARE exit:
lea DX ,str3 mov AH ,9 int 21h mov SI,10
第 19 页 共 21 页
mov AX,digit call PrintNumber lea DX ,str2 mov AH ,9 int 21h
mov AX,char
call PrintNumber lea DX ,str4 mov AH ,9 int 21h
mov AX,other XOR DX ,DX
call PrintNumber lea DX ,Quit mov AH ,9 int 21h mov ah,1 int 21H
mov ax,4C00H int 21H
PrintNumber proc near XOR DX ,DX XOR SI,SI mov SI,10 div SI mov BX,DX cmp AX,0 JL next3 mov DX,AX ADD DX,30H mov ah, 2 int 21H next3:
mov DX,BX ADD DL,30H mov ah, 2 int 21H ret
PrintNumber endp
CODES ENDS END START
第 20 页 共 21 页