汇编 杨辉三角.docVIP

汇编实现 杨辉三角 杨辉三角 汇编源程序如下： DATAS SEGMENT tmp1 DB 501 DUP(0) ;定义两个存储空间用于运行过程中临时存储数据 tmp2 DB 501 DUP(0) menu DB 0AH, 0DH, ----------------------------------------- DB 0AH, 0DH, YangHui triangel DB 0AH, 0DH, -----------------------------------------, 0AH, 0DH,$ STR DB 0AH, 0DH, Please input the output LineNumber, Enter to confirm DB 0AH, 0DH, LineNumber range in [1, 500], 0AH, 0DH,$ str2 DB 0AH, 0DH, the triangel now is:, 0AH, 0DH,$ DATAS ENDS CODES SEGMENT ASSUME CS: CODES, DS: DATAS ;宏定义 字符输入 charin MACRO ;宏定义无参数的字符输入功能 MOV AH, 01H ;系统调用 输入一个字符用于功能选择 INT 21H ;字符默认输入到AL中 ENDM ;宏定义 字符输出 charout MACRO outchar ;宏定义 将字符outchar输出 PUSH AX PUSH DX MOV DL, outchar MOV AH, 02H ;系统调用 输出字符outchar INT 21H ;调用系统中断 调用过程中会改变AL中的值，故将AX中的值入栈保存 POP DX POP AX ENDM ;宏定义 字符串输出 strout MACRO STRINGOUT ;将字符串STRINGOUT输出 LEA DX, STRINGOUT ;将STRIN的偏移地址送到DX寄存器 MOV AH, 9 ;09H字符串输出功能 INT 21H ;调用系统中断 ENDM ;宏定义 以baseNum进制输出AX中的数值 outAX MACRO baseNum ;宏定义换行 PUSH AX PUSH BX PUSH CX PUSH DX MOV BX, baseNum ;将要转换成的进制存入BX作为除数 CALL outAXp ;调用进制输出过程 POP DX POP CX POP BX POP AX ENDM ;过程定义 以baseNum进制形式输出存放在AX中的数值过程 outAXp PROC MOV DX, 0 ;初始化DX配合AX一起进行处罚操作 MOV CX, 0 ;用CX计数取得个余数个数 outAXp_Circle: CMP AX, 0 ;判断AX中的值是否为0 JE outAXp_NEXT ;是则跳转 DIV BX ;不是则进行除10运算 商保存在AX中 余数保存在DX中 PUSH DX ;将对10取到的余数入栈保存 MOV DX, 0 ;将DX中的余数清空 以便下一步对AX中的数进行除10运算 INC CX ;计数循环取得的余数个数 JMP outAXp_Circle outAXp_NEXT: ;循环输出取得的余数 POP AX CMP AL, 10 ;当余数小于10时，直接将数值输出 JB nout ADD AL, 55 ;否则将余数转化为对应的字符10对应字符A charout AL JMP cout nout: ADD AL, 30H charout AL cout: LOOP outAXp_NEXT RET outAXp ENDP ;宏定义 以baseNum进制输入数据串到AX中，可输入2-37进制 inAX MACRO baseNum ;宏定义换行 PUSH BX PUSH CX PUSH DX MOV CX, baseNum ;将要转换成的进制存入BX作为除数 CALL inAXp ;调用进制输入过程 POP DX POP CX POP BX ENDM ;过程定义 以baseNum进制形式输出存放在AX中的数值过程 inAXp PROC MOV A