MCS51单片机实用子程序库.docx
- 文档编号:24461615
- 上传时间:2023-05-27
- 格式:DOCX
- 页数:319
- 大小:98.62KB
MCS51单片机实用子程序库.docx
《MCS51单片机实用子程序库.docx》由会员分享,可在线阅读,更多相关《MCS51单片机实用子程序库.docx(319页珍藏版)》请在冰豆网上搜索。
MCS51单片机实用子程序库
MCS-51单片机实用子程序库
(一)MCS-51定点运算子程序库及其使用说明
(1)标号:
BCDA功能:
多字节BCD码加法
(2)标号:
BCDB功能:
多字节BCD码减法
(3)标号:
NEG功能:
多字节BCD码取补
(4)标号:
BRLN功能:
多字节BCD码左移十进制一位(乘十)
(5)标号:
MULD功能:
双字节二进制无符号数乘法
(6)标号:
MUL2功能:
双字节二进制无符号数平方
(7)标号:
DIVD功能:
双字节二进制无符号数除法
(8)标号:
D457功能:
双字节二进制无符号数除以单字节二进制数
(9)标号:
DV31功能:
三字节二进制无符号数除以单字节二进制数
(10)标号:
MULS功能:
双字节二进制有符号数乘法(补码)
(11)标号:
DIVS功能:
双字节二进制有符号数除法(补码)
(12)标号:
SH2功能:
双字节二进制无符号数开平方(快速)
(13)标号:
SH4功能:
四字节二进制无符号数开平方(快速)
(14)标号:
HASC功能:
单字节十六进制数转换成双字节ASCII码
(15)标号:
ASCH功能:
ASCII码转换成十六进制数
(16)标号:
HBCD功能:
单字节十六进制整数转换成单字节BCD码整数
(17)标号:
HB2功能:
双字节十六进制整数转换成三字节BCD码整数
(18)标号:
HBD功能:
单字节十六进制小数转换成单字节BCD码小数
(19)标号:
HBD2功能:
双字节十六进制小数转换成双字节BCD码小数
(20)标号:
BCDH功能:
单字节BCD码整数转换成单字节十六进制整数
(21)标号:
BH2功能:
双字节BCD码整数转换成双字节十六进制整数
(22)标号:
BHD功能:
单字节BCD码小数转换成单字节十六进制小数
(23)标号:
BHD2功能:
双字节BCD码小数转换成双字节十六进制小数
(24)标号:
MM功能:
求单字节十六进制无符号数据块的极值
(25)标号:
MMS功能:
求单字节十六进制有符号数据块的极值
(26)标号:
FDS1功能:
顺序查找(ROM)单字节表格
(27)标号:
FDS2功能:
顺序查找(ROM)双字节表格
(28)标号:
FDD1功能:
对分查找(ROM)单字节无符号增序数据表格
(29)标号:
FDD2功能:
对分查找(ROM)双字节无符号增序数据表格
(30)标号:
DDM1功能:
求单字节十六进制无符号数据块的平均值
(31)标号:
DDM2功能:
求双字节十六进制无符号数据块的平均值
(32)标号:
XR1功能:
求单字节数据块的(异或)校验和
(33)标号:
XR2功能:
求双字节数据块的(异或)校验和
(34)标号:
SORT功能:
单字节无符号数据块排序(增序)
(二)MCS-51浮点运算子程序库及其使用说明
(1)标号:
FSDT功能:
浮点数格式化
(2)标号:
FADD功能:
浮点数加法
(3)标号:
FSUB功能:
浮点数减法
(4)标号:
FMUL功能:
浮点数乘法
(5)标号:
FDIV功能:
浮点数除法
(6)标号:
FCLR功能:
浮点数清零
(7)标号:
FZER功能:
浮点数判零
(8)标号:
FMOV功能:
浮点数传送
(9)标号:
FPUS功能:
浮点数压栈
(10)标号:
FPOP功能:
浮点数出栈
(11)标号:
FCMP功能:
浮点数代数值比较(不影响待比较操作数)
(12)标号:
FABS功能:
浮点绝对值函数
(13)标号:
FSGN功能:
浮点符号函数
(14)标号:
FINT功能:
浮点取整函数
(15)标号:
FRCP功能:
浮点倒数函数
(16)标号:
FSQU功能:
浮点数平方
(17)标号:
FSQR功能:
浮点数开平方(快速逼近算法)
(18)标号:
FPLN功能:
浮点数多项式计算
(19)标号:
FLOG功能:
以10为底的浮点对数函数
(20)标号:
FLN功能:
以e为底的浮点对数函数
(21)标号:
FE10功能:
以10为底的浮点指数函数
(22)标号:
FEXP功能:
以e为底的浮点指数函数
(23)标号:
FE2功能:
以2为底的浮点指数函数
(24)标号:
DTOF功能:
双字节十六进制定点数转换成格式化浮点数
(25)标号:
FTOD功能:
格式化浮点数转换成双字节定点数
(26)标号:
BTOF功能:
浮点BCD码转换成格式化浮点数
(27)标号:
FTOB功能:
格式化浮点数转换成浮点BCD码
(28)标号:
FCOS功能:
浮点余弦函数
(29)标号:
FSIN功能:
浮点正弦函数
(30)标号:
FATN功能:
浮点反正切函数
(31)标号:
RTOD功能:
浮点弧度数转换成浮点度数
(32)标号:
DTOR功能:
浮点度数转换成浮点弧度数
*********************************************************************************************************************************************************************************************************************************************
(三)实用程序清单:
清单1:
双精度加法子程序
清单2:
被减数x1与减数x2比较大小子程序
清单3;浮点减法子程序,减数数符求反后为加数
清单4:
;浮点乘法子程序
清单5;浮点除法子程序
清单6;浮点数开平方子程序
清单7;浮点数牛顿迭代开平方子程序
清单8;基本运算子程序的演示程序
清单9;装入浮点数
清单10;计算奇次多项式值(lnx、sinx、arcsinx等)子程序
清单11计算对数函数子程序
清单12先取ln10,计算x?
lna
清单13弧度化为角度
清单14反正弦函数子程序
清单15函数子程序的演示程序
清单16;阶乘子程序,定点二进制整数n在R4中
清单17;定点整数二翻十
清单18;定点十进制数变二进制浮点数,数符已装入7BH位,0表正,1表负
清单19;最小二乘法拟合直线程序
清单20;定点16位整数×16位整数→32位整数
清单21INTSQR:
取17位根,末位舍入
清单22SLPAV:
滑动平均子程序
清单23BCDSB:
减法子程序
清单24TBLENGTHEQU10;CHETA:
;字排序
清单25FUNC2:
功能2标志
清单26ACUM;地址4060H123456789abcdef7071H;ASCII码串TI,AS,+/-xxxxxxxkgCRLF
清单27RDATE:
;读日期
清单28GETAD1:
传输
清单29DSPA:
;显示程序
清单30LFDD8:
键入BCD码(最多8位)左移子程序
清单31KEYIN2:
只用二键输入数字程序P1.7选数P1.6回车
清单32定时时钟
清单33PPRNT:
打印
清单34SPDRV1:
基本运作定时步进电机
清单35清单36清单37串行通信
清单38START4:
;转8250中断服务子程序
清单39P8255AEQU7800H;显示口,只写P8255BEQU7000H;打印口
清单40CRCST:
;循环余检测子程序
清单41GTOB88位格莱码(在ACC中)翻为二进制数
*************************************************************************************************************************************************************
清单42FPCPR:
;被减数x1与减数x2比较大小子程序
清单43FPSUB:
;浮点减法子程序
清单44FPMUL:
;浮点乘法子程序,尾数相乘(a+b)?
(c+d)→ac+ad+bc+bd
清单45FPDIV
清单46FPDI2
清单47FPSQ:
;模拟手算快速开平方子程序,先建实数标志
清单48FSQR:
清单49DMST:
演示程序
清单50
清单51LNX:
对数函数子程序,lnx=mln2+lnt或lnx=(m-1)ln2+ln(2t)
清单52DXP:
以10为底的指数函数子程序
清单53CTNX1:
余切函数子程序,x为角度,先化为弧度
CTNX:
余切函数子程序,x为弧度,先计算正切值
清单54ASINX反正弦函数及其衍生函数子程序清单
清单55NP;阶乘子程序
清单56SINTBTD:
超长整数(最大限为270FFFFFFFFFH,在28H,26H,24H
三字中)翻为十进制整数在33H~2CH中
清单57DTOB:
;浮点数十翻二子程序
清单58FBTD:
;浮点数分解为定点整数及定点小数
清单59
清单60BEGN:
;键盘管理程序
清单61TIM96:
精确定时程序
清单62SSEND:
;软件定时器定时发送字符子程序(用P2.5)
清单63SSEND1:
;用HSO定时发送字符子程序
清单64SRECV;用高速输入器件HSI0和软件定时器1定时接收字符子程
清单65CRC0B:
CRC校验程序
清单66GB16:
16位格莱码变二进制数
(一)MCS-51定点运算子程序库及其使用说明
定点运算子程序库文件名为DQ51.ASM,为便于使用,先将有关约定说明如下:
1.多字节定点操作数:
用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数
据。
地址小的单元存放数据的高字节。
例如:
[R0]=123456H,若(R0)=30H,则(30H)=12H,
(31H)=34H,(32H)=56H。
2.运算精度:
单次定点运算精度为结果最低位的当量值。
3.工作区:
数据工作区固定在PSW、A、B、R2~R7,用户只要不在工作区中存放无关的或非消耗性的信息,程序就具有较好的透明性。
(1)标号:
BCDA功能:
多字节BCD码加法
入口条件:
字节数在R7中,被加数在[R0]中,加数在[R1]中。
出口信息:
和在[R0]中,最高位进位在CY中。
影响资源:
PSW、A、R2堆栈需求:
2字节
BCDA:
MOVA,R7;取字节数至R2中
MOVR2,A
ADDA,R0;初始化数据指针
MOVR0,A
MOVA,R2
ADDA,R1
MOVR1,A
CLRC
BCD1:
DECR0;调整数据指针
DECR1
MOVA,@R0
ADDCA,@R1;按字节相加
DAA;十进制调整
MOV@R0,A;和存回[R0]中
DJNZR2,BCD1;处理完所有字节
RET
(2)标号:
BCDB功能:
多字节BCD码减法
入口条件:
字节数在R7中,被减数在[R0]中,减数在[R1]中。
出口信息:
差在[R0]中,最高位借位在CY中。
影响资源:
PSW、A、R2、R3堆栈需求:
6字节
BCDB:
LCALLNEG1;减数[R1]十进制取补
LCALLBCDA;按多字节BCD码加法处理
CPLC;将补码加法的进位标志转换成借位标志
MOVF0,C;保护借位标志
LCALLNEG1;恢复减数[R1]的原始值
MOVC,F0;恢复借位标志
RET
NEG1:
MOVA,R0;[R1]十进制取补子程序入口
XCHA,R1;交换指针
XCHA,R0
LCALLNEG;通过[R0]实现[R1]取补
MOVA,R0
XCHA,R1;换回指针
XCHA,R0
RET
(3)标号:
NEG功能:
多字节BCD码取补
入口条件:
字节数在R7中,操作数在[R0]中。
出口信息:
结果仍在[R0]中。
影响资源:
PSW、A、R2、R3堆栈需求:
2字节
NEG:
MOVA,R7;取(字节数减一)至R2中
DECA
MOVR2,A
MOVA,R0;保护指针
MOVR3,A
NEG0:
CLRC
MOVA,#99H
SUBBA,@R0;按字节十进制取补
MOV@R0,A;存回[R0]中
INCR0;调整数据指针
DJNZR2,NEG0;处理完(R2)字节
MOVA,#9AH;最低字节单独取补
SUBBA,@R0
MOV@R0,A
MOVA,R3;恢复指针
MOVR0,A
RET
(4)标号:
BRLN功能:
多字节BCD码左移十进制一位(乘十)
入口条件:
字节数在R7中,操作数在[R0]中。
出口信息:
结果仍在[R0]中,移出的十进制最高位在R3中。
影响资源:
PSW、A、R2、R3堆栈需求:
2字节
BRLN:
MOVA,R7;取字节数至R2中
MOVR2,A
ADDA,R0;初始化数据指针
MOVR0,A
MOVR3,#0;工作单元初始化
BRL1:
DECR0;调整数据指针
MOVA,@R0;取一字节
SWAPA;交换十进制高低位
MOV@R0,A;存回
MOVA,R3;取低字节移出的十进制高位
XCHDA,@R0;换出本字节的十进制高位
MOVR3,A;保存本字节的十进制高位
DJNZR2,BRL1;处理完所有字节
RET
(5)标号:
MULD功能:
双字节二进制无符号数乘法
入口条件:
被乘数在R2、R3中,乘数在R6、R7中。
出口信息:
乘积在R2、R3、R4、R5中。
影响资源:
PSW、A、B、R2~R7堆栈需求:
2字节
MULD:
MOVA,R3;计算R3乘R7
MOVB,R7
MULAB
MOVR4,B;暂存部分积
MOVR5,A
MOVA,R3;计算R3乘R6
MOVB,R6
MULAB
ADDA,R4;累加部分积
MOVR4,A
CLRA
ADDCA,B
MOVR3,A
MOVA,R2;计算R2乘R7
MOVB,R7
MULAB
ADDA,R4;累加部分积
MOVR4,A
MOVA,R3
ADDCA,B
MOVR3,A
CLRA
RLCA
XCHA,R2;计算R2乘R6
MOVB,R6
MULAB
ADDA,R3;累加部分积
MOVR3,A
MOVA,R2
ADDCA,B
MOVR2,A
RET
(6)标号:
MUL2功能:
双字节二进制无符号数平方
入口条件:
待平方数在R2、R3中。
出口信息:
结果在R2、R3、R4、R5中。
影响资源:
PSW、A、B、R2~R5堆栈需求:
2字节
MUL2:
MOVA,R3;计算R3平方
MOVB,A
MULAB
MOVR4,B;暂存部分积
MOVR5,A
MOVA,R2;计算R2平方
MOVB,A
MULAB
XCHA,R3;暂存部分积,并换出R2和R3
XCHA,B
XCHA,R2
MULAB;计算2×R2×R3
CLRC
RLCA
XCHA,B
RLCA
JNCMU20
INCR2;累加溢出量
MU20:
XCHA,B;累加部分积
ADDA,R4
MOVR4,A
MOVA,R3
ADDCA,B
MOVR3,A
CLRA
ADDCA,R2
MOVR2,A
RET
(7)标号:
DIVD功能:
双字节二进制无符号数除法
入口条件:
被除数在R2、R3、R4、R5中,除数在R6、R7中。
出口信息:
OV=0时,双字节商在R2、R3中,OV=1时溢出。
影响资源:
PSW、A、B、R1~R7堆栈需求:
2字节
DIVD:
CLRC;比较被除数和除数
MOVA,R3
SUBBA,R7
MOVA,R2
SUBBA,R6
JCDVD1
SETBOV;溢出
RET
DVD1:
MOVB,#10H;计算双字节商
DVD2:
CLRC;部分商和余数同时左移一位
MOVA,R5
RLCA
MOVR5,A
MOVA,R4
RLCA
MOVR4,A
MOVA,R3
RLCA
MOVR3,A
XCHA,R2
RLCA
XCHA,R2
MOVF0,C;保存溢出位
CLRC
SUBBA,R7;计算(R2R3-R6R7)
MOVR1,A
MOVA,R2
SUBBA,R6
ANLC,/F0;结果判断
JCDVD3
MOVR2,A;够减,存放新的余数
MOVA,R1
MOVR3,A
INCR5;商的低位置一
DVD3:
DJNZB,DVD2;计算完十六位商(R4R5)
MOVA,R4;将商移到R2R3中
MOVR2,A
MOVA,R5
MOVR3,A
CLROV;设立成功标志
RET
(8)标号:
D457功能:
双字节二进制无符号数除以单字节二进制数
入口条件:
被除数在R4、R5中,除数在R7中。
出口信息:
OV=0时,单字节商在R3中,OV=1时溢出。
影响资源:
PSW、A、R3~R7堆栈需求:
2字节
D457:
CLRC
MOVA,R4
SUBBA,R7
JCDV50
SETBOV;商溢出
RET
DV50:
MOVR6,#8;求平均值(R4R5/R7-→R3)
DV51:
MOVA,R5
RLCA
MOVR5,A
MOVA,R4
RLCA
MOVR4,A
MOVF0,C
CLRC
SUBBA,R7
ANLC,/F0
JCDV52
MOVR4,A
DV52:
CPLC
MOVA,R3
RLCA
MOVR3,A
DJNZR6,DV51
MOVA,R4;四舍五入
ADDA,R4
JCDV53
SUBBA,R7
JCDV54
DV53:
INCR3
DV54:
CLROV
RET
(9)标号:
DV31功能:
三字节二进制无符号数除以单字节二进制数
入口条件:
被除数在R3、R4、R5中,除数在R7中。
出口信息:
OV=0时,双字节商在R4、R5中,OV=1时溢出。
影响资源:
PSW、A、B、R2~R7堆栈需求:
2字节
DV31:
CLRC
MOVA,R3
SUBBA,R7
JCDV30
SETBOV;商溢出
RET
DV30:
MOVR2,#10H;求R3R4R5/R7-→R4R5
DM23:
CLRC
MOVA,R5
RLCA
MOVR5,A
MOVA,R4
RLCA
MOVR4,A
MOVA,R3
RLCA
MOVR3,A
MOVF0,C
CLRC
SUBBA,R7
ANLC,/F0
JCDM24
MOVR3,A
INCR5
DM24:
DJNZR2,DM23
MOVA,R3;四舍五入
ADDA,R3
JCDM25
SUBBA,R7
JCDM26
DM25:
INCR5
MOVA,R5
JNZDM26
INCR4
DM26:
CLROV
RET;商在R4R5中
(10)标号:
MULS功能:
双字节二进制有符号数乘法(补码)
入口条件:
被乘数在R2、R3中,乘数在R6、R7中。
出口信息:
乘积在R2、R3、R4、R5中。
影响资源:
PSW、A、B、R2~R7堆栈需求:
4字节
MULS:
MOVR4,#0;清零R4R5
MOVR5,#0
LCALLMDS;计算结果的符号和两个操作数的绝对值
LCALLMULD;计算两个绝对值的乘积
SJMPMDSE;用补码表示结果
(11)标号:
DIVS功能:
双字节二进制有符号数除法(补码)
入口条件:
被除数在R2、R3、R4、R5中,除数在R6、R7中。
出口信息:
OV=0时商在R2、R3中,OV=1时溢出。
影响资源:
PSW、A、B、R1~R7堆栈需求:
5字节
DIVS:
LCALLMDS;计算结果的符号和两个操作数的绝对值
PUSHPSW;保存结果的符号
LCALLDIVD;计算两个绝对值的商
JNBOV,DVS1;溢出否?
POPACC;溢出,放去结果的符号,保留溢出标志
RET
DVS1:
POPPSW;未溢出,取出结果的符号
MOVR4,#0
MOVR5,#0
MDSE:
JBF0,MDS2;用补码表示结果
CLROV;结果为正,原码即补码,计算成功
RET
MDS:
CLRF0;结果符号初始化
MOVA,R6;判断第二操作数的符号
JNBACC.7,MDS1;为正,不必处理
CPLF0;为负,结果符号取反
XCHA,R7;第二操作数取补,得到其绝对值
CPLA
ADDA,#1
XCHA,R7
CPLA
ADDCA,#0
MOVR6,A
MDS1:
MOVA,R2;判断第一操作数或运算结果的符号
JNBACC.7,MDS3;为正,不必处理
CPLF0;为负,结果符号取反
MDS2:
MOVA,R5;求第一操作数的绝对值或运算结果的补码
CPLA
ADDA,#1
MOVR5,A
MOVA,R4
CPLA
ADDCA,#0
MOVR4,A
MOVA,R3
CPLA
ADDCA,#0
MOVR3,A
MOVA,R2
CPLA
ADDCA,#0
MOVR2,A
MDS3:
CLROV;运算成功
RET
(12)标号:
SH2功能:
双字节二进制无符号数开平方(快速)
入口条件:
被开方数在R2、R3中。
出口信息:
平方根仍在R2、R3中,整数部分的位数为原数的一半,其余为小数。
影响资源:
PSW、A、B、R2~R7堆栈需求:
2字节
SH2:
MOVA,R2
ORLA,R3
JNZSH20
RET;被开方数为零,不必运算
SH20:
MOVR7,#0;左规次数初始化
MOVA,R2
SH22:
ANLA,#0C0H;被开方数高字节小于40H否?
JNZSQRH;不小于40H,左规格化完成,转开方过程
CLRC;每左规一次,被开方数左移两位
MOVA,R3
RLCA
MOVF0,C
CLRC
RLCA
MOVR3,A
MOVA,R2
MOVACC.7,C
MOVC,F0
RLCA
RL
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- MCS51 单片机 实用 程序库