汇编实验第二次文档格式.docx

1、 ASSUME CS:CODESTART:MOV AH,1 INT 21H CMP AL,0DH JZ DONE CMP AL,0 JB NEXT9 JA CHARUP MOV DL,AL MOV AH,2 INT 21H JMP STARTCHARUP:CMP AL,41H CMP AL,5AH JA CHRDNDISPC:MOV DL,cNEXT:JMP STARTCHRDN:CMP AL,61H CMP AL,7AH JA NEXT JMP DISPCDONE:MOV AH,4CHCODE ENDS END START实验清单：实验一：MOV AL,3EH PUSH AX MOV CL,

2、4 SHR DL,CL CMP DL,9 JBE NEXT1 ADD DL,7NEXT1:ADD DL,30H POP AX AND DL,0FH JBE NEXT2NEXT2: MOV AH,4CH程序运行结果：实验1：实验2：实验二 统计不同成绩段学生的人数实验说明：设有十个学生成绩分别是76，69，84，90，73，88，99，63，100和80分。试编制一个子程序，统计低于60分，6069分，7079分，8089分，9099分和100分的人数，并输出显示统计结果。编程提示：1、成绩分等部分采用分支结构，统计所有成绩则用循环结构完成，显示统计结果采用DOS功能调用。2、统计学生成绩和显示

3、统计结果两部分内容用子程序结构来完成。结构图：程序清单：DATA SEGMENTGRADE DB 76,69,84,90,73,88,99,63,100,80A DB 小于60分的人数: ,$B DB 0AH,0DH,在6070之间的人数:C DB 0AH,0DH,在7080之间的人数:D DB 0AH,0DH,在8090之间的人数:,E DB 0AH,0DH,在90100之间的人数:F DB 0AH,0DH,满分的人数:COUNT DB 10DATA ENDSSTACKS SEGMENTSTACKS ENDSASSUME CS:CODE,DS:DATA,SS:STACKSMAIN PROC

4、FAR MOV AX,DATA MOV DS,AX XOR AX,AX XOR BX,BX XOR CX,CX XOR DH,DH CALL COUNTGRADE CALL OUTPUTMAIN ENDPCOUNTGRADE PROC NEAR MOV DI,0L0: CMP GRADEDI,60 JB L1 CMP GRADEDI,70 JB L2 CMP GRADEDI,80 JB L3 CMP GRADEDI,90 JB L4 CMP GRADEDI,100 JB L5 INC AL JMP CONTINUEL1: INC BHL2: INC BLL3: INC CHL4: INC CL

5、L5: INC DHCONTINUE: INC DI DEC COUNT JNZ L0RETCOUNTGRADE ENDPOUTPUT PROC NEAR MOV AH,0 PUSH DX PUSH CX PUSH BX LEA DX,A MOV AH,9 POP BX MOV DL,BH ADD DL,30H LEA DX,B MOV DL,BL LEA DX,C LEA DX,D LEA DX,E INT 21H MOV AH,2 LEA DX,F INT 21H MOV AH,9 RET INT 21H OUTPUT ENDP POP BX CODE ENDS MOV DL,BL END

6、 START程序运行截图：实验三 循环补充实验从键盘输入一系列字符串（以回车符结束），按字母、数字和其它字符分类计数，最后显示出这三类的计数结果。data segment a db 0ah,0dh,字母个数: b db 0ah,0dh,数字个数: c db 0ah,0dh,其他字符个数:data ends code segment assume cs:code,ds:data main proc far start: push ds sub ax,ax push ax mov ax,data mov ds,ax sub cx,cx sub bl,bl lab0: mov ah,1 int 21h lab4: lea dx,a mov ah,9 mov dl,cl or dl,30h mov ah,2 lea dx,b mov dl,ch lea dx,c mov dl,bl ret main endp code ends end start cmp al,0dh jz lab4 cmp al, jb lab3 ja lab1 inc ch jmp lab0 lab1:AZ ja lab2 inc cl lab2:az ja lab3 lab3: inc bl