mcs-51单片机实用子程序库.txt

目前已有若干版本的子程序库公开发表

            入口条件：待转换的单字节ＢＣＤ码整数在累加器A中。
            出口信息：转换后的单字节十六进制整数仍在累加器A中。
            影响资源：PSW、A、B、R4 堆栈需求： ２字节
            BCDH: MOV B,#10H ；分离十位和个位
            DIV AB
            MOV R4,B ；暂存个位
            MOV B,#10 ；将十位转换成十六进制
            MUL AB
            ADD A,R4 ；按十六进制加上个位
            RET
            　
            （２１）标号： ＢＨ２ 功能：双字节ＢＣＤ码整数转换成双字节十六进制整数

            入口条件：待转换的双字节ＢＣＤ码整数在R2、R3中。
            出口信息：转换后的双字节十六进制整数仍在R2、R3中。
            影响资源：PSW、A、B、R2、R3、R4 堆栈需求： ４字节
            BH2: MOV A,R3 ；将低字节转换成十六进制
            LCALL BCDH
            MOV R3,A
            MOV A,R2 ；将高字节转换成十六进制
            LCALL BCDH
            MOV B,#100 ；扩大一百倍
            MUL AB
            ADD A,R3 ；和低字节按十六进制相加
            MOV R3,A
            CLR A
            ADDC A,B
            MOV R2,A
            RET
            　
            (２２）标号： ＢＨＤ 功能：单字节ＢＣＤ码小数转换成单字节十六进制小数

            入口条件：待转换的单字节ＢＣＤ码数在累加器A中。
            出口信息：转换后的单字节十六进制小数仍在累加器A中。
            影响资源：PSW、A、R2、R3 堆栈需求： ２字节
            BHD: MOV R2,#8 ；准备计算一个字节小数
            BHD0: ADD A,ACC ；按十进制倍增
            DA A
            XCH A,R3
            RLC A ；将进位标志移入结果中
            XCH A,R3
            DJNZ R2,BHD0 ；共计算８ｂｉｔ小数
            ADD A,#0B0H ；剩余部分达到０．５０否？
            JNC BHD1 ；四舍
            INC R3 ；五入
            BHD1: MOV A,R3 ；取结果
            RET
            　
            （２３）标号： ＢＨＤ２ 功能：双字节ＢＣＤ码小数转换成双字节十六进制小数

            入口条件：待转换的双字节ＢＣＤ码小数在R4、R5中。
            出口信息：转换后的双字节十六进制小数在R2、R3中。*
            影响资源：PSW、A、R2～R6 堆栈需求： ２字节
            BHD2: MOV R6,#10H ；准备计算两个字节小数
            BHD3: MOV A,R5 ；按十进制倍增
            ADD A,R5
            DA A
            MOV R5,A
            MOV A,R4
            ADDC A,R4
            DA A
            MOV R4,A
            MOV A,R3 ；将进位标志移入结果中
            RLC A
            MOV R3,A
            MOV A,R2
            RLC A
            MOV R2,A
            DJNZ R6,BHD3 ；共计算１６ｂｉｔ小数
            MOV A,R4
            ADD A,#0B0H ；剩余部分达到０．５０否？
            JNC BHD4 ；四舍
            INC R3 ；五入
            MOV A,R3
            JNZ BHD4
            INC R2
            BHD4: RET
            　
            （２４） 标号： ＭＭ 功能：求单字节十六进制无符号数据块的极值

            入口条件：数据块的首址在DPTR中，数据个数在R7中。
            出口信息：最大值在R6中，地址在R2R3中；最小值在R7中，地址在R4R5中。
            影响资源：PSW、A、B、R1～R7 堆栈需求： ４字节
            MM: MOV B,R7 ；保存数据个数
            MOVX A,@DPTR ；读取第一个数据
            MOV R6,A ；作为最大值的初始值
            MOV R7,A ；也作为最小值的初始值
            MOV A,DPL ；取第一个数据的地址
            MOV R3,A ；作为最大值存放地址的初始值
            MOV R5,A ；也作为最小值存放地址的初始值
            MOV A,DPH
            MOV R2,A
            MOV R4,A
            MOV A,B ；取数据个数
            DEC A ；减一，得到需要比较的次数
            JZ MME ；只有一个数据，不需要比较
            MOV R1,A ；保存比较次数
            PUSH DPL ；保护数据块的首址
            PUSH DPH
            MM1: INC DPTR ；指向一个新的数据
            MOVX A,@DPTR ；读取这个数据
            MOV B,A ；保存
            SETB C ；与最大值比较
            SUBB A,R6
            JC MM2 ；不超过当前最大值，保持当前最大值
            MOV R6,B ；超过当前最大值，更新最大值存放地址
            MOV R2,DPH ；同时更新最大值存放地址
            MOV R3,DPL
            SJMP MM3
            MM2: MOV A,B ；与最小值比较
            CLR C
            SUBB A,R7
            JNC MM3 ；大于或等于当前最小值，保持当前最小值
            MOV R7,B ；更新最小值
            MOV R4,DPH ；更新最小值存放地址
            MOV R5,DPL
            MM3: DJNZ R1,MM1 ；处理完全部数据
            POP DPH ；恢复数据首址
            POP DPL
            MME: RET
            　
            （２５） 标号： ＭＭＳ 功能：求单字节十六进制有符号数据块的极值

            入口条件：数据块的首址在DPTR中，数据个数在R7中。
            出口信息：最大值在R6中， 地址在R2R3中；最小值在R7中，地址在R4R5中。
            影响资源：PSW、A、B、R1～R7 堆栈需求： ４字节
            MMS: MOV B,R7 ；保存数据个数
            MOVX A,@DPTR ；读取第一个数据
            MOV R6,A ；作为最大值的初始值
            MOV R7,A ；也作为最小值的初始值
            MOV A,DPL ；取第一个数据的地址
            MOV R3,A ；作为最大值存放地址的初始值
            MOV R5,A ；也作为最小值存放地址的初始值
            MOV A,DPH
            MOV R2,A
            MOV R4,A
            MOV A,B ；取数据个数
            DEC A ；减一，得到需要比较的次数
            JZ MMSE ；只有一个数据，不需要比较
            MOV R1,A ；保存比较次数
            PUSH DPL ；保护数据块的首址
            PUSH DPH
            MMS1: INC DPTR ；调整数据指针
            MOVX A,@DPTR ；读取一个数据
            MOV B,A ；保存
            SETB C ；与最大值比较
            SUBB A,R6
            JZ MMS4 ；相同，不更新最大值
            JNB OV,MMS2 ；差未溢出，符号位有效
            CPL ACC.7 ；差溢出，符号位取反
            MMS2: JB ACC.7,MMS4；差为负，不更新最大值
            MOV R6,B ；更新最大值
            MOV R2,DPH ；更新最大值存放地址
            MOV R3,DPL
            SJMP MMS7
            MMS4: MOV A,B ；与最小值比较
            CLR C
            SUBB A,R7
            JNB OV,MMS6 ；差未溢出，符号位有效
            CPL ACC.7 ；差溢出，符号位取反
            MMS6: JNB ACC.7,MMS7；差为正，不更新最小值
            MOV R7,B ；更新最小值
            MOV R4,DPH ；更新最小值存放地址
            MOV R5,DPL
            MMS7: DJNZ R1,MMS1 ；处理完全部数据
            POP DPH ；恢复数据首址
            POP DPL
            MMSE: RET 
            　
            （２６） 标号： ＦＤＳ１ 功能：顺序查找（ＲＯＭ）单字节表格

            入口条件：待查找的内容在A中，表格首址在DPTR中，表格的字节数在R7中。
            出口信息：OV=0时，顺序号在累加器A中；OV=1时，未找到。
            影响资源：PSW、A、B、R2、R6 堆栈需求： ２字节
            FDS1: MOV B,A ；保存待查找的内容
            MOV R2,#0 ；顺序号初始化（指向表首）
            MOV A,R7 ；保存表格的长度
            MOV R6,A
            FD11: MOV A,R2 ；按顺序号读取表格内容
            MOVC A,@A+DPTR
            CJNE A,B,FD12；与待查找的内容比较
            CLR OV ；相同，查找成功
            MOV A,R2 ；取对应的顺序号
            RET 
            FD12: INC R2 ；指向表格中的下一个内容
            DJNZ R6,FD11 ；查完全部表格内容
            SETB OV ；未查找到，失败
            RET
            　
            （２７） 标号： ＦＤＳ２ 功能：顺序查找（ＲＯＭ）双字节表格

            入口条件：查找内容在R4、R5中，表格首址在DPTR中，数据总个数在R7中。
            出口信息：OV=0时顺序号在累加器A中，地址在DPTR中；OV=1时未找到。
            影响资源：PSW、A、R2、R6、DPTR 堆栈需求： ２字节
            FDS2: MOV A,R7 ；保存表格中数据的个数
            MOV R6,A
            MOV R2,#0 ；顺序号初始化（指向表首）
            FD21: CLR A ；读取表格内容的高字节
            MOVC A,@A+DPTR
            XRL A,R4 ；与待查找内容的高字节比较
            JNZ FD22
            MOV A,#1 ；读取表格内容的低字节
            MOVC A,@A+DPTR
            XRL A,R5 ；与待查找内容的低字节比较
            JNZ FD22
            CLR OV ；相同，查找成功
            MOV A,R2 ；取对应的顺序号
            RET 
            FD22: INC DPTR ；指向下一个数据
            INC DPTR
            INC R2 ；顺序号加一
            DJNZ R6,FD21 ；查完全部数据
            SETB OV ；未查找到，失败
            RET
            　
            （２８） 标号：ＦＤＤ１ 功能：对分查找（ＲＯＭ）单字节无符号增序数据表格


            入口条件：待查找的内容在累加器A中，表格首址在DPTR中，字节数在R7中。
            出口信息：OV=0 时，顺序号在累加器A中；OV=1 时，未找到。
            影响资源：PSW、A、B、R2、R3、R4 堆栈需求： ２字节
            FDD1: MOV B,A ；保存待查找的内容
            MOV R2,#0 ；区间低端指针初始化（指向第一个数据）
            MOV A,R7
            DEC A
            MOV R3,A ；区间高端指针初始化（指向最后一个数据）
            FD61: CLR C ；判断区间大小
            MOV A,R3
            SUBB A,R2
            JC FD69 ；区间消失，查找失败
            RRC A ；取区间大小的一半
            ADD A,R2 ；加上区间的低端
            MOV R4,A ；得到区间的中心
            MOVC A,@A+DPTR；读取该点的内容
            CJNE A,B,FD65；与待查找的内容比较
            CLR OV ；相同，查找成功
            MOV A,R4 ；取顺序号
            RET 
            FD65: JC FD68 ；该点的内容比待查找的内容大否？
            MOV A,R4 ；偏大，取该点位置
            DEC A ；减一
            MOV R3,A ；作为新的区间高端
            SJMP FD61 ；继续查找
            FD68: MOV A,R4 ；偏小，取该点位置
            INC A ；加一
            MOV R2,A ；作为新的区间低端
            SJMP FD61 ；继续查找
            FD69: SETB OV ；查找失败
            RET
            　
            （２９） 标号：ＦＤＤ２ 功能：对分查找（ＲＯＭ）双字节无符号增序数据表格

            入口条件：查找内容在R4、R5中，表格首址在DPTR中，数据个数在R7中。
            出口信息：OV=0 时顺序号在累加器A中，址在DPTR中；OV=1 时未找到。
            影响资源：PSW、A、B、R1～R7、DPTR 堆栈需求： ２字节
            FDD2: MOV R2,#0 ；区间低端指针初始化（指向第一个数据）
            MOV A,R7
            DEC A
            MOV R3,A ；区间高端指针初始化，指向最后一个数据
            MOV R6,DPH ；保存表格首址
            MOV R7,DPL
            FD81: CLR C ；判断区间大小
            MOV A,R3
            SUBB A,R2
            JC FD89 ；区间消失，查找失败
            RRC A ；取区间大小的一半
            ADD A,R2 ；加上区间的低端
            MOV R1,A ；得到区间的中心
            MOV DPH,R6
            CLR C ；计算区间中心的地址
            RLC A
            JNC FD82
            INC DPH
            FD82: ADD A,R7
            MOV DPL,A
            JNC FD83
            INC DPH
            FD83: CLR A ；读取该点的内容的高字节
            MOVC A,@A+DPTR
            MOV B,R4 ；与待查找内容的高字节比较
            CJNE A,B,FD84；不相同
            MOV A,#1 ；读取该点的内容的低字节
            MOVC A,@A+DPTR
            MOV B,R5
            CJNE A,B,FD84；与待查找内容的低字节比较
            MOV A,R1 ；取顺序号
            CLR OV ；查找成功
            RET
            FD84: JC FD86 ；该点的内容比待查找的内容大否？
            MOV A,R1 ；偏大，取该点位置
            DEC A ；减一
            MOV R3,A ；作为新的区间高端
            SJMP FD81 ；继续查找
            FD86: MOV A,R1 ；偏小，取该点位置
            INC A ；加一
            MOV R2,A ；作为新的区间低端
            SJMP FD81 ；继续查找
            FD89: MOV DPH,R6 ；相同，恢复首址
            MOV DPL,R7
            SETB OV ；查找失败
            RET
            　
            （３０） 标号： ＤＤＭ１ 功能：求单字节十六进制无符号数据块的平均值


            入口条件：数据块的首址在DPTR中，数据个数在R7中。
            出口信息：平均值在累加器A中。
            影响资源：PSW、A、R2～R6 堆栈需求： ４字节
            DDM1: MOV A,R7 ；保存数据个数
            MOV R2,A
            PUSH DPH
            PUSH DPL
            CLR A ；初始化累加和
            MOV R4,A
            MOV R5,A
            DM11: MOVX A,@DPTR ；读取一个数据
            ADD A,R5 ；累加到累加和中
            MOV R5,A