《MCS-51单片机实用子程序库》.pdf

广州市知远电子有限公司 专业开发软件硬(欢迎有好项目的朋友一合作) 我的成功是因为有您！ 《MCS －51 单片机实用子程序库》 （一） ＭＣＳ－５１定点运算子程序库及其使用说明 定点运算子程序库文件名为DQ51.ASM ，为便于使用，先将有关约定说明如下： １．多字节定点操作数：用[R0]或[R1]来表示存放在由R0 或R1 指示的连续单元中的数 据。地址小的单元存放数据的高字节。例如：[R0]=123456H，若(R0)=30H，则(30H)=12H， (31H)=34H，(32H)=56H 。 ２．运算精度：单次定点运算精度为结果最低位的当量值。 ３．工作区：数据工作区固定在PSW 、A 、B 、R2～R7 ，用户只要不在工作区中存放无 关的或非消耗性的信息，程序就具有较好的透明性。 （１） 标号： ＢＣＤＡ 功能：多字节ＢＣＤ码加法 入口条件：字节数在R7 中，被加数在[R0]中，加数在[R1]中。 出口信息：和在[R0]中，最高位进位在CY 中。 影响资源：PSW 、A 、R2 堆栈需求： ２字节 BCDA: MOV A,R7 ；取字节数至R2 中 MOV R2,A ADD A,R0 ；初始化数据指针 MOV R0,A MOV A,R2 ADD A,R1 MOV R1,A CLR C BCD1: DEC R0 ；调整数据指针 DEC R1 MOV A,@R0 ADDC A,@R1 ；按字节相加 DA A ；十进制调整 MOV @R0,A ；和存回[R0]中 DJNZ R2,BCD1 ；处理完所有字节 RET （２） 标号： ＢＣＤＢ 功能：多字节ＢＣＤ码减法 入口条件：字节数在R7 中，被减数在[R0]中，减数在[R1]中。 出口信息：差在[R0]中，最高位借位在CY 中。 影响资源：PSW 、A 、R2 、R3 堆栈需求： ６字节 BCDB: LCALL NEG1 ；减数[R1]十进制取补 LCALL BCDA ；按多字节ＢＣＤ码加法处理 CPL C ；将补码加法的进位标志转换成借位标志 MOV F0,C ；保护借位标志 LCALL NEG1 ；恢复减数[R1]的原始值 MOV C,F0 ；恢复借位标志 RET NEG1: MOV A,R0 ；[R1]十进制取补子程序入口 XCH A,R1 ；交换指针 XCH A,R0 技术交流 QQ ：380912867 1 lsxkl@126.com 广州市知远电子有限公司 专业开发软件硬(欢迎有好项目的朋友一合作) 我的成功是因为有您！ LCALL NEG ；通过[R0]实现[R1]取补 MOV A,R0 XCH A,R1 ；换回指针 XCH A,R0 RET （３） 标号： ＮＥＧ 功能：多字节ＢＣＤ码取补 入口条件：字节数在R7 中，操作数在[R0]中。 出口信息：结果仍在[R0]中。 影响资源：PSW 、A 、R2 、R3 堆栈需求： ２字节 NEG: MOV A,R7 ；取（字节数减一）至R2 中 DEC A MOV R2,A MOV A,R0 ；保护指针 MOV R3,A NEG0: CLR C MOV A,#99H SUBB A,@R0 ；按字节十进制取补 MOV @R0,A ；存回[R0]中 INC R0 ；调整数据指针 DJNZ R2,NEG0 ；处理完（R2 ）字节 MOV A,#9AH ；最低字节单独取补 SUBB A,@R0 MOV @R0,A MOV A,R3 ；恢复指针 MOV R0,A RET （４） 标号： ＢＲＬＮ 功能：多字节ＢＣＤ码左移十进制一位（乘十） 入口条件：字节数在R7 中，操作数在[R0]中。 出口信息：结果仍在[R