《《单片机原理及系统设计实用教程》课件定点运算子程序库》由会员分享,可在线阅读,更多相关《《单片机原理及系统设计实用教程》课件定点运算子程序库(46页珍藏版)》请在金锄头文库上搜索。
1、单片机实用子程序库(年版)(一)定点运算子程序库及其使用说明定点运算子程序库文件名为DQ51.ASM,为便于使用,先将有关约定说明如下:多字节定点操作数:用R0或R1来表示存放在由R0或R1指示的连续单元中的数据。地址小的单元存放数据的高字节。例如:R0=123456H,若(R0)=30H,则(30H)=12H,(31H)=34H,(32H)=56H。运算精度:单次定点运算精度为结果最低位的当量值。工作区:数据工作区固定在PSW、A、B、R2R7,用户只要不在工作区中存放无关的或非消耗性的信息,程序就具有较好的透明性。()标号:功能:多字节码加法入口条件:字节数在R7中,被加数在R0中,加数在
2、R1中。出口信息:和在R0中,最高位进位在CY中。影响资源:PSW、A、R2堆栈需求:字节BCDA:MOV A,R7;取字节数至R2中MOV R2,AADD A,R0;初始化数据指针MOV R0,AMOV A,R2ADD A,R1MOV R1,ACLR CBCD1:DEC R0;调整数据指针DEC R1MOV A,R0ADDC A,R1;按字节相加DA A;十进制调整MOVR0,A;和存回R0中DJNZ R2,BCD1;处理完所有字节RET()标号:功能:多字节码减法入口条件:字节数在R7中,被减数在R0中,减数在R1中。出口信息:差在R0中,最高位借位在CY中。影响资源:PSW、A、R2、R
3、3堆栈需求:字节BCDB:LCALL NEG1;减数R1十进制取补LCALL BCDA;按多字节码加法处理CPL C;将补码加法的进位标志转换成借位标志MOV F0,C;保护借位标志LCALL NEG1;恢复减数R1的原始值MOV C,F0;恢复借位标志RETNEG1:MOV A,R0;R1十进制取补子程序入口XCH A,R1;交换指针XCH A,R0LCALL NEG;通过R0实现R1取补MOV A,R0XCH A,R1;换回指针XCH A,R0RET()标号:功能:多字节码取补入口条件:字节数在R7中,操作数在R0中。出口信息:结果仍在R0中。影响资源:PSW、A、R2、R3堆栈需求:字节
4、NEG:MOV A,R7;取(字节数减一)至R2中DEC AMOV R2,AMOV A,R0;保护指针MOV R3,ANEG0:CLR CMOV A,#99HSUBB A,R0;按字节十进制取补MOVR0,A;存回R0中INC R0;调整数据指针DJNZ R2,NEG0;处理完(R2)字节MOV A,#9AH;最低字节单独取补SUBB A,R0MOVR0,AMOV A,R3;恢复指针MOV R0,ARET()标号:功能:多字节码左移十进制一位(乘十)入口条件:字节数在R7中,操作数在R0中。出口信息:结果仍在R0中,移出的十进制最高位在R3中。影响资源:PSW、A、R2、R3堆栈需求:字节BR
5、LN:MOV A,R7;取字节数至R2中MOV R2,AADD A,R0;初始化数据指针MOV R0,AMOV R3,#0;工作单元初始化BRL1:DEC R0;调整数据指针MOV A,R0;取一字节SWAP A;交换十进制高低位MOVR0,A;存回MOV A,R3;取低字节移出的十进制高位XCHD A,R0;换出本字节的十进制高位MOV R3,A;保存本字节的十进制高位DJNZ R2,BRL1;处理完所有字节RET()标号:功能:双字节二进制无符号数乘法入口条件:被乘数在R2、R3中,乘数在R6、R7中。出口信息:乘积在R2、R3、R4、R5中。影响资源:PSW、A、B、R2R7堆栈需求:字
6、节MULD:MOV A,R3;计算R3乘R7MOV B,R7MUL ABMOV R4,B;暂存部分积MOV R5,AMOV A,R3;计算R3乘R6MOV B,R6MUL ABADD A,R4;累加部分积MOV R4,ACLR AADDC A,BMOV R3,AMOV A,R2;计算R2乘R7MOV B,R7MUL ABADD A,R4;累加部分积MOV R4,AMOV A,R3ADDC A,BMOV R3,ACLR ARLC AXCH A,R2;计算R2乘R6MOV B,R6MUL ABADD A,R3;累加部分积MOV R3,AMOV A,R2ADDC A,BMOV R2,ARET()标号
7、:功能:双字节二进制无符号数平方入口条件:待平方数在R2、R3中。出口信息:结果在R2、R3、R4、R5中。影响资源:PSW、A、B、R2R5堆栈需求:字节MUL2:MOV A,R3;计算R3平方MOV B,AMUL ABMOV R4,B;暂存部分积MOV R5,AMOV A,R2;计算R2平方MOV B,AMUL ABXCH A,R3;暂存部分积,并换出R2和R3XCH A,BXCH A,R2MUL AB;计算2R2R3CLR CRLC AXCH A,BRLC AJNC MU20INC R2;累加溢出量MU20:XCH A,B;累加部分积ADD A,R4MOV R4,AMOV A,R3ADD
8、C A,BMOV R3,ACLR AADDC A,R2MOV R2,ARET()标号:功能:双字节二进制无符号数除法入口条件:被除数在R2、R3、R4、R5中,除数在R6、R7中。出口信息:OV=0时,双字节商在R2、R3中,OV=1时溢出。影响资源:PSW、A、B、R1R7堆栈需求:字节DIVD:CLR C;比较被除数和除数MOV A,R3SUBB A,R7MOV A,R2SUBB A,R6JC DVD1SETB OV;溢出RETDVD1:MOV B,#10H;计算双字节商DVD2:CLR C;部分商和余数同时左移一位MOV A,R5RLC AMOV R5,AMOV A,R4RLC AMOV
9、 R4,AMOV A,R3RLC AMOV R3,AXCH A,R2RLC AXCH A,R2MOV F0,C;保存溢出位CLR CSUBB A,R7;计算(R2R3R6R7)MOV R1,AMOV A,R2SUBB A,R6ANL C,/F0;结果判断JC DVD3MOV R2,A;够减,存放新的余数MOV A,R1MOV R3,AINC R5;商的低位置一DVD3:DJNZ B,DVD2;计算完十六位商(R4R5)MOV A,R4;将商移到R2R3中MOV R2,AMOV A,R5MOV R3,ACLR OV;设立成功标志RET()标号:功能:双字节二进制无符号数除以单字节二进制数入口条件
10、:被除数在R4、R5中,除数在R7中。出口信息:OV=0时,单字节商在R3中,OV=1时溢出。影响资源:PSW、A、R3R7堆栈需求:字节D457:CLR CMOV A,R4SUBB A,R7JC DV50SETB OV;商溢出RETDV50:MOV R6,#8;求平均值(R4R5R7R3)DV51:MOV A,R5RLC AMOV R5,AMOV A,R4RLC AMOV R4,AMOV F0,CCLR CSUBB A,R7ANL C,/F0JC DV52MOV R4,ADV52:CPL CMOV A,R3RLC AMOV R3,ADJNZ R6,DV51MOV A,R4;四舍五入ADD A
11、,R4JC DV53SUBB A,R7JC DV54DV53:INC R3DV54:CLR OVRET()标号:功能:三字节二进制无符号数除以单字节二进制数入口条件:被除数在R3、R4、R5中,除数在R7中。出口信息:OV=0时,双字节商在R4、R5中,OV=1时溢出。影响资源:PSW、A、B、R2R7堆栈需求:字节DV31:CLR CMOV A,R3SUBB A,R7JC DV30SETB OV;商溢出RETDV30:MOV R2,#10H;求R3R4R5R7R4R5DM23:CLR CMOV A,R5RLC AMOV R5,AMOV A,R4RLC AMOV R4,AMOV A,R3RLC
12、 AMOV R3,AMOV F0,CCLR CSUBB A,R7ANL C,/F0JC DM24MOV R3,AINC R5DM24:DJNZ R2,DM23MOV A,R3;四舍五入ADD A,R3JC DM25SUBB A,R7JC DM26DM25:INC R5MOV A,R5JNZ DM26INC R4DM26:CLR OVRET;商在R4R5中()标号:功能:双字节二进制有符号数乘法(补码)入口条件:被乘数在R2、R3中,乘数在R6、R7中。出口信息:乘积在R2、R3、R4、R5中。影响资源:PSW、A、B、R2R7堆栈需求:字节MULS:MOV R4,#0;清零R4R5MOV R5
13、,#0LCALL MDS;计算结果的符号和两个操作数的绝对值LCALL MULD;计算两个绝对值的乘积SJMP MDSE;用补码表示结果()标号:功能:双字节二进制有符号数除法(补码)入口条件:被除数在R2、R3、R4、R5中,除数在R6、R7中。出口信息:OV=0时商在R2、R3中,OV=1时溢出。影响资源:PSW、A、B、R1R7堆栈需求:字节DIVS:LCALL MDS;计算结果的符号和两个操作数的绝对值PUSH PSW;保存结果的符号LCALL DIVD;计算两个绝对值的商JNB OV,DVS1;溢出否?POP ACC;溢出,放去结果的符号,保留溢出标志RETDVS1:POP PSW;未溢出,取出结果的符号MOV R4,#0MOV R5,#0MDSE:JB F0,MDS2;用补码表示结果CLR OV;结果为正,原码即补码,计算成功RETMDS:CLR F0;结果符号初始化MOV A,R6;判断第二操作数的符号JNB ACC.7,MDS1;为正,不必处理CPL F0;为负,结果符号取反XCH A,R7;第二操作数取补,得到其绝对值CPL AADD A,#1XCH A,R7CPL AADDC A,#0