汇编语言各种进制数输入及输出宏库.doc

;各种进制无符号数显示宏程序库 ;使用方法: 程序首行 INCLUDE STDIO.LIB ;调用方法 PRINTD R (Ｒ表示进制 =2/8/10/16) ;显示的数值(0～65535)事先存放在BX通用寄存器中 PRINTD MACRO R LOCAL AGAIN,DISP,LOP1 ;局部标号定义AGAIN,DISP ;=======开始========= .RADIX R ;设置系统为 R 进制 MOV CX,10 ;将默认 R 进制数 10-CX .RADIX 10 ;设置系统为 10 进制 ;-------------------- MOV SI,0 AGAIN: MOV DX,0 MOV AX,BX DIV CX PUSH DX INC SI MOV BX,AX CMP BX,0 JNZ AGAIN LOP1: POP DX ADD DL,30H ;判断数值是否Ａ～Ｆ(对非16进制数不起作用) CMP DL,39H JBE DISP ADD DL,7H DISP: ;显示数值 MOV AH,2 INT 21H DEC SI JNZ LOP1 ;=======结束========= ENDM ;----------------------------------------------------- ;十进制有符号数显示宏程序库 ;调用方法 PRINTF ;显示的数值(－32768～＋32767)事先存放在BX通用寄存器中 PRINTF MACRO LOCAL AGAIN,DISP,NEXT ;局部标号定义AGAIN,DISP,NEXT ;----------------------- CMP BX,0 ;判断+/- JGE NEXT ;+数跳转NEXT标号 MOV DL,- ;显示-号 MOV AH,2 INT 21H NEG BX ;将负数转正数再显示数值 NEXT: ;----------------------- MOV CX,10 ;如果显示其他进制数可以将CX改变为2/8/16 MOV SI,0 AGAIN: MOV DX,0 MOV AX,BX DIV CX PUSH DX INC SI MOV BX,AX CMP BX,0 JNZ AGAIN DISP: POP DX ADD DL,30H MOV AH,2 INT 21H DEC SI JNZ DISP ENDM ;---回车换行 调用：RETURN--- RETURN MACRO MOV AH,2 MOV DL,0AH INT 21H MOV DL,0DH INT 21H ENDM ;----------------------------------------------------- ;各种进制无符号数值输入宏程序库，名称：STDIO.LIB ;输入的数值(0～65535)存放在BX通用寄存器中 ;使用方法: 在程序首行加入 INCLUDE STDIO.LIB ;在主程序中调用方法 SCANF R (Ｒ表示进制 =2/8/10/16) ;输入的数字小于0(当然也包括回车13),或大于R,则输入结束 SCANF MACRO R ;宏名 LOCAL NEWCHAR,N16,QUIT;局部标号定义NEWCHAR,N16,QUIT .RADIX R ;系统默认R进制 MOV CX,10 ;将R进制的10-CX .RADIX 10 ;重新设置系统为10进制 MOV BX,0 ;BX清零,用于存放输入数值 NEWCHAR: MOV AH,1 ;1号功能(输入单字符) INT 21H ;中断调用 SUB AL,30H ;输入的字符码-30H转换为数值 JB QUIT ;如果输入的字符码值小于0(当然也包括回车),则输入结束 CMP AL,R ;输入与R比较 JAE QUIT ;如果输入大于R,则输入结束 CMP CX,16 ;判断程序是否为16进制数? JNZ N16 ;否,则转N16 CMP AL,10 ;是16进制数,则判断输入是否为(A-F)? JB N16 ;否,则转N16