几个汇编经典代码.rar_ASM、汇编_经典代码

目录 1. 顺序程序设计 2. 分支程序设计实验 3. 循环程序设计实验 4. 子程序设计实验 5. 码制转换程序实验 6. 两个数相乘的实验 详情代码如下： ----------------------------------------------------------------------------------1 ;将两个多位十进制数相加，要求被加数、加数均以ASCⅡ码形式各自顺序存放在以DATA1和DATA2为首的五个内存单元中（低位在前），结果送回DATA1处。 DATA SEGMENT DATA1 DB 34H,35H,39H,38H,36H,' ' ;被加数 DATA2 DB 37H,34H,33H,36H,32H,' ' ;加数 DATA ENDS CODE SEGMENT MAIN PROC FAR ASSUME CS:CODE,DS:DATA START: MOV AX,DATA MOV DS,AX LEA SI,DATA1 ;有效地址送SI,为调用显示子程序做准备 CALL DISPLAY ;调用显示子程序 CALL CRLF ;调用回车换行子程序 LEA SI,DATA2 ;有效地址送SI，为调用显示子程序做准备，同时为加法运算做准备 CALL DISPLAY ;调用显示子程序 CALL CRLF ;调用回车换行子程序 LEA DI,DATA1 ;有效抵制送DI，为加法运算做准备 MOV AX,0 MOV BX,0 MOV CL,05H ;记录循环次数 ADDS: MOV AL,[SI] ;将加数送往AL SUB AL,30H ADD AL,BL ;加上进位 MOV BL,[DI] ;将被加数送往BL SUB BL,30H ADD AL,BL ;加法运算 ADD AL,30H CMP AL,3AH JA SUBA ;结果>=10，跳到SUBA JB NSUBA SUBA: SUB AL,0AH ;减去10的值，并置BL为1 MOV BL,01H JMP CONTINUE NSUBA: MOV BL,00H ;置BL为0 CONTINUE:MOV [DI],AL ;将相加的结果从AL送往DI的地址，即DATA1的地址 INC DI ;地址加1 INC SI ;地址加1 LOOP ADDS ;循环 JC SHUCHU JNC SHUCHU2 SHUCHU2: MOV AL,31H ;CF为1设置结果最高位为1 JMP CONTINUE2 SHUCHU:MOV AL,30H ;CF为0设置结果最高位为0 CONTINUE2:MOV [DI],AL LEA SI,DATA1 ;将DATA1的有效地址送往SI，为调用DISPLAY子程序做准备 CALL DISPLAY ;调用DISPLAY子程序 MOV AX,4C00H ;返回DOS INT 21H MAIN ENDP CRLF PROC NEAR ;回车、换行 于功能 MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21H RET CRLF ENDPDISPLAY PROC NEAR ;显示于功能 MOV BX,0006H ;记录循环次数 DSL: MOV DL,[SI+BX-1] ;将有效地址内的内容送往DL MOV AH,02 ;2号功能输出 INT 21H DEC BX ;BX自动减1 JNZ DSL RET DISPLAY ENDPCODE ENDS END START ----------------------------------------------------------------------------------2 ;接收键盘输入字符，将其中的小写字母转换为大写字母并显示。 CODE SEGMENT MAIN PROC FAR ASSUME CS:CODE START: MOV AH,00H INT 16H CMP AL,0DH JZ OVER CALL JUDGE MOV DL,AL MOV AH,02H INT 21H JMP START OVER: MOV AH,4CH INT 21H MAIN ENDP JUDGE PROC NEAR CMP AL,'a' JB STOP CMP AL,'z' JA STOP SUB AL,20H STOP: RET JUDGE ENDP CODE ENDS END START ----------------------------------------------------------------------------------3 ;统计一个有10人的班中，男、女生的人数各为多少。将男生人数存入变量MAN、女生人数存入变量WOMAN中。 DATA SEGMENT MAN DB 0,0 WOMAN DB 0,0 STRING DB ' iuput people number! (man is 0, woman is 1 ) $' SM DB 'man is :$' SW DB 'woman is :$'DATA ENDSCODE SEGMENTMAIN PROC FAR ASSUME CS:CODE,DS:DATASTART: MOV AX,DATA MOV DS,AX MOV AH,09H ;将STRING的内容输出 MOV DX,OFFSET STRING INT 21H CALL CRLF MOV CX,10 ;男女生总人数AA: MOV AH,01H ;从键盘输入，0为男，1为女 INT 21H CMP AL,30H ;与'0'比较 JNZ ADDW ;不为'0',女生人数加1 INC MAN ;否则男生人数加1BB: LOOP AA JMP DISPLY ;打印ADDW: INC WOMAN JMP BBDISPLY: CALL CRLF MOV AH,09H ;字符串输出 MOV DX,OFFSET SM INT 21H MOV AH,02H ;男生人数统计结果输出 MOV DL,MAN ADD DL,30H CALL JUDGE CALL CRLF MOV AH,09H ;字符串输出 MOV DX,OFFSET SW INT 21H MOV AH,02H ;女生人数统计结果输出 MOV DL,WOMAN ADD DL,30H CALL JUDGE MOV AH,4CH ;返回DOS INT 21HMAIN ENDPJUDGE PROC NEAR ;判断结果是否为39H CMP DL,3AH JZ SHICC: INT 21H RETSHI: MOV DL,31H INT 21H MOV DL,30H JMP CCJUDGE ENDP CRLF PROC NEAR ;回车换行子程序 MOV AH,02H ;回车 MOV DL,0DH INT 21H MOV DL,0AH ;换行 INT 21H RETCRLF ENDPCODE ENDS END START ----------------------------------------------------------------------------------4 ;1． 键盘输入字符，依次显示在行的最左端（即每接受一个字符，显示在屏幕上并回车换行）。 ;2． 对频繁使用的回车换行编写为子程序，在主程序中调用完成分行显示。 CODE SEGMENTMAIN PROC FAR ASSUME CS:CODESTART: MOV CX,10 ;设置循环次数NEXT: MOV AH,01H ;从键盘输入一个字符 INT 21H CALL CRLF ;调用回车换行子程序 LOOP NEXT MOV AH,4CH ;返回DOS INT 21HMAIN ENDPCRLF PROC NEAR ;回车换行子程序 MOV AH,02H ;回车 MOV DL,0DH INT 21H MOV DL,0AH ;换行 INT 21H RETCRLF ENDPCODE ENDS END START ----------------------------------------------------------------------------------5 ;将ASCⅡ码数据转换成二进制数据。要求从键盘上输入十进制整数（假定范围0~32767），然后转换成二进制格式存储。 DATA SEGMENT STRING1 DB 'PLEASE INPUT A NUMBER(0~32767):$' STRING2 DB 'THE ASCII IS:$' STRING3 DB 'THE BINARY IS:$'DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATAMAIN PROC FARSTART: MOV AX,DATA MOV DS,AX MOV DX,OFFSET STRING1 MOV AH,09H INT 21H CALL CRLFINPUT: MOV AH,01H ;输入数据 INT 21H CMP AL,0DH JZ NEXT SUB AL,30H JL INPUT CMP AL,39H JG INPUT CBW XCHG AX,BX ;AX为输入值，BX保存结果，两个对调为MUL做准备 MOV DX,10D ;将上一次结果乘10 MUL DX XCHG AX,BX ;AX为本次输入的值，BX为之前的结果 ADD BX,AX JMP INPUTNEXT: CALL CRLF MOV CL,4D MOV CH,4D MOV DX,OFFSET STRING2 MOV AH,09H INT 21H CALL CRLFLOOP0: ROL BX,CL ;循环左移，将最高为存到BL的低四位 MOV AL,BL AND AL,0FH ; ADD AL,30H CMP AL,3AH JL OUTPUT ADD AL,07HOUTPUT:MOV AH,02H MOV DL,AL INT 21H DEC CH JNZ LOOP0 CALL CRLF MOV DX,OFFSET STRING3 MOV AH,09H INT 21H CALL CRLF MOV CH,16D MOV CL,1DLOOP1: ROL BX,CL MOV AL,BL AND AL,01H ADD AL,30H MOV AH,02H MOV DL,AL INT 21H DEC CH JNZ LOOP1 MOV AH,4CH INT 21HMAIN ENDPOUTS PROC NEAR ;字符串输出子程序 MOV AH,09H INT