51单片机实用子程序(汇编)

1、片内RAM初始化子程序2、片外RAM初始化子程序3、片外RAM初始化子程序(双字节个单元)4、内部RAM数据复制程序5、外部RAM数据复制程序6、外部RAM数据复制程序7、外部RAM数据复制到内部RAM程序8、限幅滤波程序9、中位值滤波程序10、N点算术平均滤波11、N点加权平均滤波12、一阶加权滞后滤波程序13、双字节取补程序14、N节取补程序15、双字节无符号数加法程序16、N字节无符号数加法程序17、双字节无符号数减法程序18、N字节无符号数减法程序19、单字节无符号数乘法程序20、单字节无符号数乘法程序21、单字节无符号数乘法程序22、双字节无符号数乘法程序23、双字节无符号数乘法程序24、N字节无符号数乘法程序25、单字节无符号除法程序26、单字节无符号除法程序27、双字节无符号除法程序28、N字节无符号除法程序(组合)29、N字节无符号除法程序30、N字节数据左移程序31、原码有符号双字节减法程序32、原码有符号双字节加法程序33、原码有符号双字节乘法程序34、原码有符号双字节除法程序35、单字节顺序查找程序36、单字节顺序查找程序37、双字节字符串顺序查找程序38、双字节字符串顺序查找程序39、N字节字符串顺序查找程序40、单字节最值查找程序41、浮点数顺序查找程序42、浮点数最值查找程序43、单字节折半查找程序1.片内RAM初始化子程序IBCLR:MOV A,R0MOV R1,ACLR AIBC1:MOV@R1,AINC R1DJNZ R7,IBC1RET2.片外RAM初始化子程序EBCLR1:MOV A,ADDPLMOV DPL,AMOV A,ADDPHMOV DPH,ACLR CEBC11:MOVX@DPTR,AINC DPTRDJNZ R7,EBC11RET3.片外RAM初始化子程序(双字节个单元) EBCLR2:MOV A,ADDPLMOV DPL,AMOV A,ADDPHMOV DPH,AMOV A,R7JZ EBC21INC R6EBC21:CLR AMOVX@DPTR,AINC DPTRDJNZ R7,EBC21DJNZ R6,EBC21RET4.内部RAM数据复制程序;入口:R0,R7;占用资源:A;堆栈需求:2字节;出口:R1IBMOV:MOV A,R0ADD A,R7MOV R0,AMOV A,R1ADD A,R7MOV R1,AIBM1:DEC R0DEC R1MOV A,@R0MOV@R1,ADJNZ R7,IBM1RET5.外部RAM数据复制程序;入口:ADDPH,ADDPL,R7;占用资源:ACC;堆栈需求:2字节;出口:R0,R1EBMOV1:MOV A,ADDPLADD A,R7MOV DPL,ACLR AADDC A,ADDPHMOV DPH,AMOV A,R7ADD A,R1XCH A,R0ADDC A,#00HMOV P2,AEBM11:DEC R0CJNE R0,#0FFH,EBM12DEC P2EBM12:DEC DPLMOV A,DPLCJNE A,#0FFH,EBM13DEC DPHEBM13:MOVX A,@R0MOVX@DPTR,ADJNZ R7,EBM11RET6.外部RAM数据复制程序;入口:ADDPH,ADDPL,R6,R7 ;占用资源:ACC;堆栈需求:2字节;出口:R0,R1EBMOV2:MOV A,ADDPLADD A,R7MOV DPL,AMOV A,R6ADDC A,ADDPHMOV DPH,AMOV A,R7ADD A,R1XCH A,R0ADDC A,R6MOV P2,AMOV A,R7JZ EBM21INC R6EBM21:DEC R0CJNE R0,#0FFH,EBM22DEC P2EBM22:DEC DPLMOV A,DPLCJNE A,#0FFH,EBM23DEC DPHEBM23:MOVX A,@R0MOVX@DPTR,ADJNZ R7,EBM21DJNZ R6,EBM21RET7.外部RAM数据复制到内部RAM程序;入口:ADDPH,ADDPL,R7;占用资源:ACC;堆栈需求:2字节;出口:R0ITEMOV:MOV A,ADDPLADD A,R7MOV DPL,AMOV A,ADDPHADDC A,#00HMOV DPH,AMOV A,R0ADD A,R7MOV R0,AITEM1:DEC R0DEC DPLMOV A,DPLCJNE A,#0FFH,ITEM2DEC DPHITEM2:MOVX A,@DPTRMOV@R0,ADJNZ R7,ITEM1RET8.限幅滤波程序;入口:A,SDAT,DELTY;占用资源:B;堆栈需求:2字节;出口:AJUGFILT:MOV B,ACLR CSUBB A,SDATJNC JUGFT1CPL AINC AJUGFT1:SETB ASUBB A,#DELTYJNC JUGFT3MOV A,SDATRETJUGFT3:MOV A,BMOV SDAT,ARET9.中位值滤波程序;入口:ADDPH,ADDPL,N;占用资源:ESELSORT;堆栈需求:4字节;出口:AMEDFILT:LCALL ESELSORT MOV A,NCLR CRRC AADD A,ADDPLMOV DPL,AMOV A,ADDPHMOV DPH,AJNC MEDFT1INC DPHMEDFT1:MOVX A,@DPTR RET10.N点算术平均滤波;入口:ADDPH,ADDPL,N;占用资源:B,R3,R4;堆栈需求:2字节;出口:AAVFILT:MOV A,ADDPLMOV DPL,AMOV A,ADDPHMOV DPH,ACLR AMOV R3,AMOV R4,AMOV R7,NAVFT1:MOVX A,@DPTRINC DPTRADD A,R4MOV R4,AJNC AVFT2INC R3AVFT2:DJNZ R7,AVFT1MOV R7,NMOV R2,#00HLCALL NDIV31MOV A,R4RET11.N点加权平均滤波;入口:ADDPH,ADDPL,N;占用资源:B,R3,R4;堆栈需求:2字节;出口:AQAVFILT:CLR AMOV R3,AMOV R4,AMOV R7,NMOV P2,ADDPHMOV R1,ADDPLMOV DPTR,#QAVTAB QAVFT1:MOVC A,@A+DPTR MOV B,AMOVX A,@R1INC DPTRINC R1MUL ABADD A,R4MOV R4,AMOV A,BADDC A,R3MOV R3,ADJNZ R7,QAVFT1MOV A,R4JNB ACC.7,QAVFT2INC R3QAVFT2:MOV A,R3RETQAVTAB:DB12.一阶加权滞后滤波程序;入口:A,DELTY;占用资源:B,R3,R4;堆栈需求:2字节;出口:ABQFILT:MOV B,ACLR AMOV DPTR,#ABTABMOVC A,@A+DPTRMUL ABMOV R4,AMOV R3,BMOV A,#01HMOVC A,@A+DPTRMOV B,DELTYMUL ABADD A,R4MOV R4,AMOV A,BADDC A,R3MOV R3,AMOV A,R4JNB ACC.7,FT1INC R3FT1:MOV A,R3MOV DELTY,ARETBQTAB:DB80H,80H13.双字节取补程序/(R3R4)=(R3R4);入口:R3,R4;占用资源:ACC;堆栈需求:2字节;出口:R3,R4CMPT:MOV A,R4CPL AADD A,#01HMOV R4,AMOV A,R3CPL AADDC A,#00HMOV R3,ARET14.N节取补程序/([R0])=([R0]);入口:R0,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0NCMPTN:MOV B,R0SETB CNCPT1:MOV A,@R0CPL AADDC A,#00HMOV@R0,AINC R0DJNZ R7,NCPT1MOV R0,BRET15.双字节无符号数加法程序(R3R4+R6R7)=(R3R4) ;入口:R3,R4,R6,R7;占用资源:ACC;堆栈需求:2字节;出口:R3,R4,CFNADD:MOV A,R4ADD A,R7MOV R4,AMOV A,R3ADDC A,R6MOV R3,ARET16.N字节无符号数加法程序([R0]+[R1])=([R0]);入口:R0,R1,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0,CFNADDN:MOV B,R0CLR CNADN1:MOV A,@R0ADDC A,@R1MOV@R0,AINC R0INC R1DJNZ R7,NADN1MOV R0,BRET17.双字节无符号数减法程序(R3R4-R6R7)=(R3R4) ;入口:R3,R4,R6,R7;占用资源:ACC;堆栈需求:2字节;出口:R3,R4NSUB:MOV A,R4CLR CSUBB A,R7MOV R4,AMOV A,R3SUBB A,R6MOV R3,ARET18.N字节无符号数减法程序([R0]-[R1])=([R0]);入口:R0,R1,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0,CFNSUBN:MOV B,R0MOV R7,NCLR CNSUBN1:MOV A,@R0SUBB A,@R1MOV@R0,AINC R0INC R1DJNZ R7,NSUBN1MOV R0,BRET19.单字节无符号数乘法程序(R3R4*R7)=(R2R3R4);入口:R3,R4,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R2,R3,R4NMUL21:MOV A,R4MOV B,R7MUL ABMOV R4,AMOV A,BXCH A,R3MOV B,R7MUL ABADD A,R3MOV R3,ACLR AADDC A,BMOV R2,ACLR OVRET20.单字节无符号数乘法程序(R2R3R4*R7)=(R5R2R3R4) ;入口:R2,R3,R4,R6,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R5,R2,R3,R4NMUL31:MOV A,R4MOV B,R7MOV R4,AMOV A,BXCH A,R3MOV B,R7MUL ABADD A,R3MOV R3,ACLR AADDC A,BXCH A,R2MOV B,R7MUL ABADD A,R2MOV R2,ACLR AADDC A,BMOV R5,ACLR OVRET21.单字节无符号数乘法程序(R5R2R3R4*R7)=(R7R5R2R3R4) ;入口:R5,R2,R3,R4,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R7,R5,R2,R3,R4NMUL41:MOV A,R4MOV B,R7MUL ABMOV R4,AMOV A,BXCH A,R3MOV B,R7MUL ABADD A,R3MOV R3,ACLR AADDC A,BMOV B,R7MUL ABADD A,R2MOV R2,ACLR AADDC A,BXCH A,R5MOV B,R7MUL ABADD A,R5MOV R5,ACLR AADDC A,BMOV R7,ACLR OVRET22.双字节无符号数乘法程序(R3R4*R6R7)=(R5R2R3R4) ;入口:R3,R4,R6,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R5,R2,R3,R4NMUL22:MOV A,R4MOV B,R7MUL ABXCH A,R4MOV R5,BMOV B,R6MUL ABADD A,R5MOV R5,ACLR AADDC A,BMOV R2,AMOV A,R3MOV B,R7MUL ABMOV R5,AMOV A,BADDC A,R2MOV R2,ACLR AADDC A,#00HXCH A,R3MOV B,R6MUL ABADD A,R2MOV R2,AMOV A,BADDC A,R3XCH A,R5MOV R3,ACLR OVRET23.双字节无符号数乘法程序(R2R3R4*R6R7)=(R1R5R2R3R4) ;入口:R2,R3,R4,R6,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R1,R5,R2,R3,R4NMUL32:MOV A,R4MOV B,R7MUL ABXCH A,R4MOV R5,BMOV B,R6MUL ABADD A,R5MOV R5,ACLR AADDC A,BMOV R1,AMOV A,R3MOV B,R7ADD A,R5 MOV R5,A MOV A,B ADDC A,R1 MOV R1,A CLR A ADDC A,#00H XCH A,R3 MOV B,R6 MUL AB ADD A,R1 MOV R1,A MOV A,B ADDC A,R3 XCH A,R5 MOV R3,A MOV A,R2 MOV B,R7 MUL AB ADD A,R1 MOV R1,A MOV A,B ADDC A,R5 MOV R5,A CLR A ADDC A,#00H XCH A,R2 MOV B,R6 MUL AB ADD A,R5 MOV R5,A MOV A,B ADDC A,R2 XCH A,R1 MOV R2,A CLR OVRET24.N字节无符号数乘法程序([R0]*[R1])=([R0]) ;入口:R0,R1,M,N;占用资源:ACC,B,R2,R5,R6,R7,NCNT;堆栈需求:2字节;出口:R0NMULMN:MOV A,MADD A,R0MOV R5,AXCH A,R1XCH A,R5ADD A,NXCH A,R0MOV R6,AMOV B,MMOV NCNT,BNMLMN1:DEC R0DEC R1CLR AXCH A,@R1MOV@R0,ADJNZ NCNT,NMLMN1MOV NCNT,BNMLMN2:CLR AXCH A,@R0MOV R2,AMOV A,R6MOV R0,AMOV A,R5MOV R1,AMOV R7,NCLR CNMLMN3:MOV A,R2MOV B,@R1INC R1MUL ABADDC A,@R0MOV@R0,AINC R0MOV A,BADDC A,@R0MOV@R0,ADJNZ R7,NMLMN3INC R0INC R6DJNZ NCNT,NMLMN2MOV A,R0CLR CSUBB A,MSUBB A,NMOV R0,ARET25.单字节无符号除法程序(R2R3R4/R7)=(R2)R3R4余数R7 ;入口:R2,R3,R4,R7;占用资源:ACC,B,F0;堆栈需求:3字节;出口:(R2),R3,R4,R7,OVNDIV31:MOV A,R2MOV B,R7DIV ABPUSH AMOV R2,BMOV B,#10HNDV311:CLR CMOV A,R4RLC AMOV R4,AMOV A,R3RLC AMOV R3,AMOV A,R2RLC AMOV R2,AMOV F0,CCLR CSUBB A,R7JB F0,NDV312JC NDV313NDV312:MOV R2,AINC R4NDV313:DJNZ B,NDV311POP ACLR OVJZ NDV314SETB OVNDV314:XCH A,R2MOV R7,ARET26.单字节无符号除法程序(R5R2R3R4/R7)=(R5)R2R3R4余数R7 ;入口:R2,R3,R4,R7;占用资源:ACC,B,F0;堆栈需求:3字节;出口:(R5),R2,R3,R4,R7,OVNDIV41:MOV A,R5MOV B,R7DIV ABPUSH AMOV R5,BMOV B,#18HNDV411:CLR CMOV A,R4RLC AMOV R4,AMOV A,R3RLC AMOV R3,AMOV A,R2RLC AMOV R2,AMOV A,R5RLC AMOV R5,AMOV F0,CCLR CSUBB A,R7JB F0,NDV412JC NDV413NDV412:MOV R5,AINC R4NDV413:DJNZ B,NDV411POP ACLR OVJZ NDV414SETB OVNDV414:XCH A,R5MOV R7,ARET27.双字节无符号除法程序(R5R2R3R4/R6R7)=(R2)R3R4余数R6R7 ;入口:R5,R2,R3,R4,R6,R7;占用资源:ACC,B,F0;堆栈需求:4字节;出口:(R2),R3,R4,R6,R7,OVNDIV42:MOV A,R1PUSH AMOV B,#00HNDV421:MOV A,R2CLR CSUBB A,R7MOV R1,AMOV A,R5SUBB A,R6JC NDV422MOV R5,AMOV A,R1MOV R2,AINC BSJMP NDV421NDV422:PUSH BMOV B,#10HNDV423:CLR CMOV A,R4RLC AMOV R4,AMOV A,R3RLC AMOV R3,AMOV A,R2RLC AMOV R2,AXCH A,R5RLC AXCH A,R5MOV F0,CCLR CSUBB A,R7MOV R1,AMOV A,R5SUBB A,R6JB F0,NCV424JC NDV425NCV424:MOV R5,AMOV A,R1MOV R2,AINC R4NDV425:DJNZ B,NDV423 POP ACLR OVJNZ NDV426SETB OVNDV426:XCH A,R2MOV R7,AMOV A,R5MOV R6,APOP AMOV R1,ARET28.N字节无符号除法程序(组合)([R0]/[R1])=([R0]);入口:R0,R1,M,N;占用资源:ACC,R2,R3,R4,R5,R7,NCNT,F0,NADDN,NSUBBN,NRLCN ;堆栈需求:4字节;出口:R0;NDIVMN:MOV A,MCLR CSUBB A,NMOV NCNT,AADD A,R0MOV R4,AXCH A,R0MOV R3,AMOV A,R1MOV R5,AMOV R2,#00HNDVMN1:MOV R7,NLCALL NSUBNMOV A,R5MOV R1,AJC NDVMN2INC R2SJMP NDVMN1NDVMN2:MOV R7,NLCALL NADDNMOV A,NCNTSWAP ARR AMOV NCNT,ANDVMN3:MOV A,R3MOV R0,AMOV R7,MLCALL NRLCNMOV F0,CMOV A,R4MOV R0,AMOV A,R5MOV R1,AMOV R7,NLCALL NSUBNJB F0,NDVMN4JC NDVMN5NDVMN4:MOV A,R3MOV R0,AINC@R0SJMP NDVMN6NDVMN5:MOV A,R5MOV R1,AMOV R7,NLCALL NADDNNDVMN6:DJNZ NCNT,NDVMN3MOV A,R4MOV R1,AMOV A,R2MOV@R1,AMOV A,R3MOV R0,ARET29.N字节无符号除法程序(集成)([R0]/R[1])=([R0]) ;入口:R0,R1,M,N;占用资源:ACC,R2,R3,R4,R5,R7,F0;堆栈需求:2字节;出口:R0NDIVMN:MOV A,MCLR CSUBB A,NMOV B,AADD A,R0MOV R4,AXCH A,R0MOV R3,AMOV A,R1MOV R5,AMOV R2,#00H NDVMN1:MOV R7,NCLR CNDVMN2:MOV A,@R0 SUBB A,@R1MOV@R0,AINC R0INC R1DJNZ R7,NDVMN2MOV A,R4MOV R0,AMOV A,R5MOV R1,AJC NDVMN3INC R2SJMP NDVMN1 NDVMN3:MOV R7,NCLR CNDVMN4:MOV A,@R0 ADDC A,@R1MOV@R0,AINC R0INC R1DJNZ R7,NDVMN4MOV A,#08HMUL ABMOV B,A NDVMN5:MOV A,R3MOV R0,AMOV R7,MCLR CNDVMN6:MOV A,@R0 RLC AMOV@R0,AINC R0DJNZ R7,NDVMN6MOV F0,CMOV R0,AMOV A,R5MOV R1,AMOV R7,NCLR CNDVMN7:MOV A,@R0SUBB A,@R1MOV@R0,AINC R0INC R1DJNZ R7,NDVMN7JB F0,NDVMNBJC NDVMN8 NDVMNB:MOV A,R3MOV R0,AINC@R0SJMP NDVMNA NDVMN8:MOV R7,NMOV A,R4MOV R0,AMOV A,R5MOV R1,ACLR CNDVMN9:MOV A,@R0ADDC A,@R1MOV@R0,AINC R0INC R1DJNZ R7,NDVMN9 NDVMNA:DJNZ B,NDVMN5 MOV A,MCLR CSUBB A,NADD A,R3MOV R1,AMOV A,R2MOV A,R3MOV R0,ARET30.N字节数据左移程序RLC([R0])=(CF[R0]);入口:R0,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0,CFNRLCN:MOV B,R0CLR CNRLN1:MOV A,@R0RLC AMOV@R0,AINC R0DJNZ R7,NRLN1MOV R0,BRET31.原码有符号双字节减法程序(R3R4-R6R7)=R3R4 ;入口:R3,R4,R6,R7;占用资源:ACC,DADD;堆栈需求:6字节;出口:R3,R4,OVDSUB:MOV A,R6CPL ACC.7MOV R6,ALCALL DADDRET32.原码有符号双字节加法程序(R3R4+R6R7)=R3R4 ;入口:R3,R4,R6,R7;占用资源:ACC,SR0,NADD,NSUB,CMPT;堆栈需求:4字节;出口:R3,R4,OVDADD:MOV A,R3MOV C,ACC.7MOV SR0,CXRL A,R6MOV A,R3CLR ACC.7MOV R3,AMOV A,R6CLR ACC.7MOV R6,AJC DAB2LCALL NADDMOV A,R3JB ACC.7,DABEDAB1:MOV C,SR0MOV ACC.7,CMOV R3,ACLR OVRETDABE:SETB OVRETDAB2:LCALL NSUBMOV A,R3JNB ACC.7,DAB1LCALL CMPTCPL SR0SJMP DAB133.原码有符号双字节乘法程序(R3R4*R6R7)=(R5R2R3R4) ;入口:R3,R4,R6,R7;占用资源:ACC,SR0,NMUL22;堆栈需求:4字节;出口:R5,R2,R3,R4IMUL:MOV A,R3XRL A,R6MOV C,ACC.7MOV SR0,CMOV A,R3CLR ACC.7MOV R3,AMOV A,R6MOV R6,ALCALL NMUL22MOV A,R5MOV C,SR0MOV ACC.7,CMOV R5,ARET34.原码有符号双字节除法程序(R5R2R3R4/R6R7)=(R3R4)余数(R6R7) ;入口:R5,R2,R3,R4;占用资源:ACC,SR0,NDIV42;堆栈需求:6字节;出口:R3,R4,R6,R7,OVIDIV:MOV A,R5XRL A,R6MOV C,ACC.7MOV SR0,CMOV A,R5CLR ACC.7MOV R5,AMOV A,R6CLR ACC.7MOV R6,ALCALL NDIV42MOV A,R3JB ACC.7,IDIVEJB OV,IDIVEMOV C,SR0MOV ACC.7,CMOV R3,ARETIDIVE:SETB OVRET35.单字节顺序查找程序;入口:R0,R1,A,R7;占用资源:B;堆栈需求:2字节;出口:R0,R1,AFINDB1:MOV B,AMOV DPL,R1MOV DPH,R0FINDB11:MOVX A,@DPTR CJNE A,B,FINDB12MOV R1,DPLMOV R0,DPHCLR ARETFINDB12:INC DPTRDJNZ R7,FINDB11MOV A,#0FFHRET36.单字节顺序查找程序;入口:R0,R1,A,R6,R7;占用资源:B;堆栈需求:2字节;出口:R0,R1,AFINDB2:MOV B,AMOV DPL,R1MOV DPH,R0MOV A,R7JZ FINDB21INC R6FINDB21:MOVX A,@DPTR CJNE A,B,FINDB22MOV R1,DPLMOV R0,DPHCLR ARETFINDB22:INC DPTRDJNZ R7,FINDB21DJNZ R6,FINDB21MOV A,#0FFHRET37.双字节字符串顺序查找程序;入口:R0,R1,R3,R4,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0,R1,AFINDS1:MOV DPL,R1MOV DPH,R0FINDS11:MOVX A,@DPTRINC DPTRCLR CSUBB A,R4JNZ FINDS12MOVX A,@DPTRSUBB A,R3JNZ FINDS12MOV A,DPLCLR CSUBB A,#01HMOV R1,AMOV A,DPHSUBB A,#00HMOV R0,ACLR ARETFINDS12:DJNZ R7,FINDS11MOV A,#0FFHRET38.双字节字符串顺序查找程序;入口:R0,R1,R3,R4,R6,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0,R1,AFINDS2:MOV DPL,R1MOV DPH,R0MOV A,R7JZ FINDS21INC R6FINDS21:MOVX A,@DPTRINC DPTRCLR CSUBB A,R4JNZ FINDS22MOVX A,@DPTRSUBB A,R3JNZ FINDS22MOV A,DPLCLR CSUBB A,#01HMOV R1,AMOV A,DPHSUBB A,#00HMOV R0,ACLR ARETFINDS22:DJNZ R7,FINDS21DJNZ R6,FINDS21MOV A,#0FFHRET39.N字节字符串顺序查找程序;入口:ADDPH,ADDPL,R0,R6,R7,N ;占用资源:ACC,B,R2,NCNT;堆栈需求:2字节;出口:ADDPH,ADDPL,A FINDN:MOV A,R0MOV R2,AMOV A,ADDPLMOV DPL,AMOV A,ADDPHMOV DPH,AMOV A,R7JZ FINDN1INC R6FINDN1:MOV A,R2MOV R0,AMOV NCNT,AFINDN2:MOVX A,@DPTRCLR CSUBB A,@R0JNZ FINDN3INC DPTRINC R0DJNZ NCNT,FINDN2MOV A,DPLCLR CSUBB A,NMOV ADDPL,AMOV A,DPHSUBB A,#00HMOV ADDPH,ACLR ARETFINDN3:CLR CMOV A,R0SUBB A,R2JNZ FINDN4INC DPTRFINDN4:DJNZ R7,FINDN1DJNZ R6,FINDN1MOV A,#0FFHRET40.单字节最值查找程序;入口:R0,R1,R6,R7;占用资源:ACC,B;堆栈需求:2字节;出口:R0(最大值),R1(最小值),R2,R3,R4,R5 FMAMIB:MOV DPL,R1MOV DPH,R0MOVX A,@DPTRMOV R0,AMOV R1,AMOV R3,AMOV R5,AMOV A,DPHMOV R2,AMOV R4,AMOV A,R7JZ FMMB1INC R6FMMB1:MOVX A,@DPTR MOV B,ASETB CSUBB A,R0JC FMMB2MOV R0,BMOV R3,DPLMOV R2,DPHSJMP FMMB3FMMB2:MOV A,BCLR CSUBB A,R1JNC FMMB3MOV R1,BMOV R5,DPLMOV R4,DPHFMMB3:INC DPTRDJNZ R7,FMMB1DJNZ R6,FMMB1RET41.浮点数顺序查找程序;入口:R0,R1,R2,R3,R4,R6,R7 ;占用资源:B,NCNT,FCMP;堆栈需求:2字节;出口:R0,R1,AFINDF:MOV DPL,R1MOV DPH,R0MOV A,R7MOV NCNT,R6JZ FINDF1INC NCNTFINDF1:MOVX A,@DPTRINC DPTRMOV R5,AMOVX A,@DPTRINC DPTRMOV R6,AMOVX A,@DPTRINC DPTRMOV R7,ALCALL FCMPJNZ FINDF2MOV A,DPLCLR CSUBB A,#03HMOV R1,AMOV A,DPHSUBB A,#00HMOV R0,ACLR ARETFINDF2:DJNZ B,FINDF1DJNZ NCNT,FINDF1MOV A,#0FFHRET42.浮点数最值查找程序;入口:ADDPH,ADDPL,R6,R7;占用资源:ACC,B,NCNT,ITEMOV,EBMOV,MOVB,MOVR1,FCMP ;堆栈需求:5字节;出口:[R0](最大值),[R1](最小值),R2,R3,R4,R5FMAMIF:MOV A,ADDPLMOV R3,AMOV R5,AMOV DPL,AMOV A,ADDPHMOV R2,AMOV R4,AMOV DPH,AMOV B,R7MOV R7,#03HLCALL ITEMOVMOV R7,#03HLCALL IBMOVMOV A,BJZ FMMF1INC NCNT FMMF1:PUSH BMOVX A,@DPTRINC DPTRMOV R2,AMOVX A,@DPTRINC DPTRMOV R3,AMOVX A,@DPTRINC DPTRMOV R4,ALCALL MOVR1LCALL FCMPJNC FMMF2MOV A,R0XCH A,R1MOV R0,ALCALL MOVBMOV R5,DPLMOV R4,DPHMOV A,R0XCH A,R1MOV R0,ASJMP FMMF3 FMMF2:MOV A,R0XCH A,R1MOV R0,ALCALL MOVR1LCALL FCMPMOV A,R0XCH A,R1MOV R0,AJZ FMMF3JC FMMF3LCALL MOVBMOV R3,DPLMOV R2,DPH FMMF3:POP BDJNZ B,FMMF1DJNZ NCNT,FMMF1RET43.单字节折半查找程序;入口:A,R0,R1,R6,R7;占用资源:B,R2;堆栈需求:2字节;出口:R0,R1 SEARCHB:MOV B,AMOV A,R1ADD A,R7MOV R7,AMOV A,R0ADDC A,R6MOV R6,AMOV A,R7SUBB A,#01HMOV R7,AJNC SECH1DEC R6SECH1:MOV A,R7CLR CSUBB A,R1MOV A,R6SUBB A,R0JNC SECH2MOV A,#0FFHRETSECH2:MOV A,R7ADD A,R1MOV R2,AMOV A,R6ADDC A,R0RRC AMOV DPH,AMOV A,R2RRC AMOV DPL,AMOVX A,@DPTRCLR CSUBB A,BJNC SECH3INC DPTRMOV R0,DPHMOV R1,DPLSJMP SECH1 SECH3:JZ SECH5MOV A,DPLSUBB A,#01HMOV R7,AJNC SECH4MOV R6,DPHDEC R6SECH4:SJMP SECH1 SECH5:MOV R0,DPH MOV R1,DPLCLR ARET。

MCS-51单片机实用子程序库目前已有若干版本的子程序库公开发表，它们各有特色。

本程序库中的开平方算法为快速逼近算法，它能达到牛顿迭代法同样的精度，而速度加快二十倍左右，超过双字节定点除法的速度。

本子程序库对《单片机应用程序设计技术》一书附录中的子程序库作了重大修订：（１）按当前流行的以IBM PC 为主机的开发系统对汇编语言的规定，读者不必再进行修改，便可直接使用。

（２）对浮点运算子程序库进行了进一步的测试和优化，对十进制浮点数和二进制浮点数的相互转换子程序进行了彻底改写，提高了运算精度和可靠性。

（３）新增添了若干个浮点子程序（传送、比较、清零、判零等），使编写数据处理程序的工作变得更简单直观。

在使用说明中开列了最主要的几项：标号、入口条件、出口信息、影响资源、堆栈需求，各项目的意义请参阅《单片机应用程序设计技术》第六章6.3.7 节的内容。

程序清单中开列了四个栏目：标号、指令、操作数、注释。

为方便读者理解，注释尽力详细。

子程序库的使用方法如下：１．将子程序库全部内容链接在应用程序之后，统一编译即可。

优点是简单方便，缺点是程序太长，大量无关子程序也包含在其中。

２．仅将子程序库中的有关部分内容链接在应用程序之后，统一编译即可。

有些子程序需要调用一些低级子程序，这些低级子程序也应该包含在内。

优点是程序紧凑，缺点是需要对子程序库进行仔细删节。

（一）ＭＣＳ－５１定点运算子程序库及其使用说明定点运算子程序库文件名为DQ51.ASM，为便于使用，先将有关约定说明如下：１．多字节定点操作数：用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数据。

地址小的单元存放数据的高字节。

例如：[R0]=123456H，若(R0)=30H，则(30H)=12H，(31H)=34H，(32H)=56H。

２．运算精度：单次定点运算精度为结果最低位的当量值。

３．工作区：数据工作区固定在PSW、A、B、R2～R7，用户只要不在工作区中存放无关的或非消耗性的信息，程序就具有较好的透明性。

MCS-51单片机实用子程序库（7）2007年06月22日星期五 19:12（２５）标号：ＦＴＯＤ功能：格式化浮点数转换成双字节定点数入口条件：格式化浮点操作数在[R0]中。

出口信息：OV=1时溢出，OV=0时转换成功：定点数的绝对值在[R0]中（双字节），数符在位1FH中，F0=1 时为整数，CY=1时为一字节整数一字节小数，否则为纯小数。

影响资源：PSW、A、B、R2、R3、R4、位1FH 堆栈需求：６字节FTOD: LCALL MVR0 ；将[R0]传送到第一工作区MOV A,R2JZ FTD4 ；阶码为零，纯小数JB ACC.7,FTD4；阶码为负，纯小数SETB CSUBB A,#10HJC FTD1SETB OV ；阶码大于１６，溢出RETFTD1: SETB CMOV A,R2SUBB A,#8 ；阶码大于８否？JC FTD3FTD2: MOV B,#10H ；阶码大于８，按双字节整数转换LCALL FTD8SETB F0 ；设立双字节整数标志CLR CCLR OVRETFTD3: MOV B,#8 ；按一字节整数一字节小数转换LCALL FTD8SETB C ；设立一字节整数一字节小数标志CLR F0CLR OVRETFTD4: MOV B,#0 ；按纯小数转换LCALL FTD8CLR OV ；设立纯小数标志CLR F0CLR CRETFTD8: MOV A,R2 ；按规定的整数位数进行右规CJNE A,B,FTD9MOV A,R3 ；将双字节结果传送到[R0]中MOV @R0,AINC R0MOV A,R4MOV @R0,ADEC R0RETFTD9: CLR CLCALL RR1 ；右规一次SJMP FTD8（２６）标号：ＢＴＯＦ功能：浮点ＢＣＤ码转换成格式化浮点数入口条件：浮点ＢＣＤ码操作数在[R0]中。

出口信息：转换成的格式化浮点数仍在[R0]中。

影响资源：PSW、A、B、R2～R7、位1DH～1FH 堆栈需求：６字节BTOF: INC R0 ；判断是否为零。

51单片机实用汇编程序库５1 单片机实用程序库4.1 流水灯程序介绍:利用Ｐ1 口通过一定延时轮流产生低电平输出,以达到发光二极管轮流亮的效果。

实际应用中例如:广告灯箱彩灯、霓虹灯闪烁。

程序实例(ＬＡMP.ＡSＭ）ORG ０000ＨＡJMP ＭAIＮＯRG 0030ＨMＡＩN:9MOV A,＃00HMOＶＰ１,A ;灭所有的灯MOV A,＃１1１1111０BMAＩＮ１:ＭOV P1,A ;开最左边的灯ACALＬ DＥLAY ;延时ＲＬ A ；将开的灯向右边移AＪＭP MAIN ；循环DＥLAY：MＯV 3０H，#0FFHＤ1: MＯV 3１H，#0FＦＨＤ２: ＤJＮZ 31H,D2DＪNZ 30H，D１ＲEＴEND4．2 方波输出程序介绍：P1．0 口输出高电平，延时后再输出低电平，循环输出产生方波。

实际应用中例如：波形发生器。

程序实例(FＡN.ASＭ）：ＯRG 0000ＨMAIN：；直接利用P1.0 口产生高低电平地形成方波/／／/／////////／ACALＬＤＥLＡＹSＥTＢP1.0AＣＡLL DELAY１0ＣLＲＰ1.0AJMＰMＡIN；/／/////／／//／//////／///／/／/／/／///／///／///／／／///////DELＡＹ：MOV Ｒ1,#０ＦＦHDJNＺR1,＄RETＥND五、定时器功能实例5．1 定时1 秒报警程序介绍:定时器1 每隔１秒钟将p1.ｏ的输出状态改变1次,以达到定时报警的目的。

实际应用例如:定时报警器。

程序实例（DIN１.ASM）：OＲＧ 0０0０HAJＭP MＡＩNＯRG 000BHAＪMP DＩＮ0 ;定时器０入口ＭAＩＮ:TFLA G ＥQU ３４Ｈ;时间秒标志,判是否到5０个0．２秒，即50＊０．2＝1 秒MOV TＭOD,＃0000０001B;定时器0 工作于方式1MＯＶ TL0,#0AFHMOV ＴH0,＃３ＣＨ ;设定时时间为0.0５秒，定时20 次则一秒11SＥTB EA ;开总中断SETB EＴ0 ;开定时器０中断允许SETＢ TR0 ;开定时０运行SEＴＢ P１．0ＬOOP： AJＭP LOOPDIN０:;是否到一秒////／//////////／/／//／/////／////／//／/／／/／INCC: INＣＴＦLAGMOＶ A,TFLAGCJNE A，#20，REMＯV TＦLＡG，＃０0HCPL Ｐ１．0;///／////////／///／/／／／／／／/／/／//////／///／／////／/／//／RE:MOV TＬ０,#０AFHMOV TＨ0,＃3CＨ;设定时时间为0.０5 秒,定时２０次则一秒RETIＥND5.2 频率输出公式介绍:f=１／tｓ5１使用12M 晶振，一个周期是１微秒使用定时器1工作于方式０，最大值为６5535，以产生2０0ＨZ 的频率为例:２00＝1/t:推出ｔ=0.005 秒，即50０0 微秒,即一个高电12平或低电平的时间为２500 微秒。

MCS-51单片机实用子程序库（4）作者: 来源:51mcu上篇:MCS-51单片机实用子程序库（3）下篇:MCS-51单片机实用子程序库（5）（二）ＭＣＳ－５１浮点运算子程序库及其使用说明本浮点子程序库有三个不同层次的版本，以便适应不同的应用场合：１．小型库（FQ51A.ASM）：只包含浮点加、减、乘、除子程序。

２．中型库（FQ51B.ASM）：在小型库的基础上再增加绝对值、倒数、比较、平方、开平方、数制转换等子程序。

３．大型库（FQ51.ASM）：包含本说明书中的全部子程序。

为便于读者使用本程序库，先将有关约定说明如下：１．双字节定点操作数：用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数据，地址小的单元存放高字节。

如果[R0]=1234H，若(R0)=30H，则(30H)=12H，(31H)=34H。

２．二进制浮点操作数：用三个字节表示，第一个字节的最高位为数符，其余七位为阶码（补码形式），第二字节为尾数的高字节，第三字节为尾数的低字节，尾数用双字节纯小数（原码）来表示。

当尾数的最高位为１时，便称为规格化浮点数，简称操作数。

在程序说明中，也用[R0]或[R1]来表示R0或R1指示的浮点操作数，例如：当[R0]=-6.000时，则二进制浮点数表示为83C000H。

若(R0)=30H，则(30H)=83H,(31H)=0C0H,(32H)=00H。

３．十进制浮点操作数：用三个字节表示，第一个字节的最高位为数符，其余七位为阶码（二进制补码形式），第二字节为尾数的高字节，第三字节为尾数的低字节，尾数用双字节ＢＣＤ码纯小数（原码）来表示。

当十进制数的绝对值大于１时，阶码就等于整数部分的位数，如 876.5 的阶码是03H，-876.5 的阶码是 83H；当十进制数的绝对值小于1时，阶码就等于 80H 减去小数点后面零的个数，例如 0.00382 的阶码是 7EH，-0.00382的阶码是 0FEH。

MCS-51单片机实用子程序库(doc 62页)《ＭＣＳ－５１单片机实用子程序库（９６年版）》周航慈目前已有若干版本的子程序库公开发表，它们各有特色。

笔者在1988年也编制了两个子程序库（定点子程序库和浮点子程序库），并在相容性、透明性、容错性和算法优化方面作了一些工作。

本程序库中的开平方算法为笔者研究的快速逼近算法，它能达到牛顿迭代法同样的精度，而速度加快二十倍左右，超过双字节定点除法的速度。

经过八年来全国广大用户的实际使用，反馈了不少信息，陆续扩充了一些新的子程序，纠正了一些隐含错误，成为现在这个最新版本。

本子程序库对《单片机应用程序设计技术》一书附录中的子程序库作了重大修订：（１）按当前流行的以IBM PC 为主机的开发系统对汇编语言的规定，将原子程序库的标号和位地址进行了调整，读者不必再进行修改，便可直接使用。

（２）对浮点运算子程序库进行了进一步的测试和优化，对十进制浮点数和二进制浮（一）ＭＣＳ－５１定点运算子程序库及其使用说明定点运算子程序库文件名为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,AADD A,R0 ；初始化数据指针MOV R0,AMOV A,R2ADD A,R1MOV R1,ACLR CBCD1: DEC R0 ；调整数据指针DEC R1MOV A,@R0ADDC A,@R1 ；按字节相加DA A ；十进制调整MOV @R0,A ；和存回[R0]中DJNZ R2,BCD1 ；处理完所有字节RET（２）标号：ＢＣＤＢ功能：多字节ＢＣＤ码减法入口条件：字节数在R7中，被减数在[R0]中，减数在[R1]中。

MCS-51单片机实用子程序库日期2000-6-5作者电子设计工作室/home1/azhu内容目前已有若干版本的子程序库公开发表，它们各有特色。

本程序库中的开平方算法为快速逼近算法，它能达到牛顿迭代法同样的精度，而速度加快二十倍左右，超过双字节定点除法的速度。

本子程序库对《单片机应用程序设计技术》一书附录中的子程序库作了重大修订：（１）按当前流行的以IBM PC 为主机的开发系统对汇编语言的规定，读者不必再进行修改，便可直接使用。

（２）对浮点运算子程序库进行了进一步的测试和优化，对十进制浮点数和二进制浮点数的相互转换子程序进行了彻底改写，提高了运算精度和可靠性。

（３）新增添了若干个浮点子程序（传送、比较、清零、判零等），使编写数据处理程序的工作变得更简单直观。

在使用说明中开列了最主要的几项：标号、入口条件、出口信息、影响资源、堆栈需求，各项目的意义请参阅《单片机应用程序设计技术》第六章 6.3.7 节的内容。

程序清单中开列了四个栏目：标号、指令、操作数、注释。

为方便读者理解，注释尽力详细。

子程序库的使用方法如下：１．将子程序库全部内容链接在应用程序之后，统一编译即可。

优点是简单方便，缺点是程序太长，大量无关子程序也包含在其中。

２．仅将子程序库中的有关部分内容链接在应用程序之后，统一编译即可。

有些子程序需要调用一些低级子程序，这些低级子程序也应该包含在内。

优点是程序紧凑，缺点是需要对子程序库进行仔细删节。

（一）ＭＣＳ－５１定点运算子程序库及其使用说明定点运算子程序库文件名为DQ51.ASM，为便于使用，先将有关约定说明如下：１．多字节定点操作数：用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数据。

地址小的单元存放数据的高字节。

例如：[R0]=123456H，若(R0)=30H，则(30H)=12H，(31H)=34H，(32H)=56H。

２．运算精度：单次定点运算精度为结果最低位的当量值。

51单片机汇编程序1. 简介51单片机是一种常用的8位单片机芯片，具有广泛的应用领域。

51单片机的编程语言主要有汇编语言、C语言和底层汇编语言。

本文主要介绍51单片机的汇编程序。

2. 汇编程序基础2.1 寄存器51单片机的CPU有4个8位寄存器（A、B、DPTR、PSW）和一个16位寄存器（PC）。

在汇编程序中，我们可以使用这些寄存器来进行各种操作。

•A寄存器（累加器）：用于存储数据和进行算术运算。

•B寄存器：辅助寄存器，可用于存储数据和进行算术运算。

•DPTR寄存器：数据指针寄存器，用于存储数据存取的地址。

•PSW寄存器：程序状态字寄存器，用于存储程序运行状态信息。

•PC寄存器：程序计数器，用于存储当前执行指令的地址。

2.2 指令集51单片机的指令集包含了多种汇编指令，可以用来进行数据操作、算术运算、逻辑运算、控制流程等。

常用的汇编指令有：•MOV：数据传送指令。

•ADD、SUB：加法和减法运算指令。

•ANL、ORL、XRL：逻辑运算指令。

•MOVX：外部RAM的读写指令。

•CJNE、DJNZ：条件分支指令。

•LCALL、RET：函数调用和返回指令。

2.3 编写一个简单的汇编程序下面是一个简单的汇编程序示例，用于将A寄存器中的数据加1，并将结果存储到B寄存器中。

ORG 0x0000 ; 程序的起始地址MOV A, #0x01 ; 将A寄存器赋值为1ADD A, #0x01 ; 将A寄存器加1MOV B, A ; 将A寄存器的值传送到B寄存器END ; 程序结束在上面的示例中，ORG指令用于指定程序的起始地址，MOV 指令用于将A寄存器赋值为1，ADD指令用于将A寄存器加1，MOV指令用于将A寄存器的值传送到B寄存器，END指令用于标记程序结束。

3. 汇编语言的应用51单片机的汇编语言广泛应用于各种嵌入式系统中，包括智能家居、工业自动化、仪器仪表等领域。

汇编程序具有以下特点：•程序执行效率高：由于汇编语言直接操作硬件，可以精确控制程序的执行流程，提高程序的执行效率。

以下是一些常见的51单片机（如8051系列）的汇编指令：
1. 数据传送指令：
- MOV：将一个数据或寄存器的值移动到另一个寄存器或存储器位置。

- MOVC：将数据从外部代码存储器复制到累加器或寄存器。

2. 算术运算指令：
- ADD：将累加器与另一个寄存器或存储器中的值相加。

- SUB：从累加器中减去另一个寄存器或存储器中的值。

- INC：将累加器或寄存器的值加1。

- DEC：将累加器或寄存器的值减1。

3. 逻辑运算指令：
- ANL：对累加器和另一个寄存器或存储器中的值进行逻辑与操作。

- ORL：对累加器和另一个寄存器或存储器中的值进行逻辑或操作。

- XRL：对累加器和另一个寄存器或存储器中的值进行逻辑异或操作。

- CPL：对累加器或寄存器中的值进行按位取反操作。

4. 条件分支指令：
- CJNE：比较两个值，并在不相等时跳转到指定的地址。

- DJNZ：递减累加器或寄存器，并在结果不为零时跳转到指定的地址。

5. 跳转指令：
- JMP：无条件跳转到指定的地址。

- SJMP：短跳转，跳转到相对于当前地址的指定偏移量。

- AJMP：绝对跳转，跳转到指定的地址。

- LCALL：长调用，将当前地址入栈并跳转到指定的子程序地址。

6. 位操作指令：
- SETB：将某个位设置为1。

- CLR：将某个位清零。

- JB：如果某个位为1，则跳转到指定地址。

- JNB：如果某个位为0，则跳转到指定地址。

51单片机汇编中断程序调用子程序（原创实用版）目录1.51 单片机汇编中断程序概述2.中断程序的调用方式3.子程序的定义与调用4.中断程序调用子程序的实例分析5.总结正文一、51 单片机汇编中断程序概述在 51 单片机汇编语言编程中，中断是一种常见的编程方式，可以实现在特定条件下程序的跳转和执行。

通过中断程序，可以实现对硬件设备的实时控制，提高程序的执行效率。

二、中断程序的调用方式中断程序的调用方式主要有两种：1.通过外部中断引脚（如 P1.0、P2.0 等）触发中断。

这种方式下，当外部中断引脚的状态发生改变时，单片机会立即跳转到中断程序的入口地址执行。

2.通过软件中断实现中断程序的调用。

这种方式下，程序员可以通过设置特定的寄存器值来触发中断，使程序跳转到中断程序的入口地址执行。

三、子程序的定义与调用子程序，也称为子例程，是程序中一段可独立执行的代码段。

子程序可以通过以下方式定义和调用：1.使用“SUB”伪指令定义子程序。

在需要调用子程序的地方，编写“CALL 子程序名”，即可实现子程序的调用。

2.使用“PROG”伪指令定义子程序。

在需要调用子程序的地方，直接编写子程序名，即可实现子程序的调用。

四、中断程序调用子程序的实例分析假设我们有一个 51 单片机汇编语言程序，当外部中断引脚 P1.0 触发时，需要执行一个子程序以完成特定功能。

程序如下：```ORG 00HMOV P1, #00HMOV R4, #0FFHSTART: NOPINT0: MOV R3, #0FFHCALL INT_SUBROUTINESJMP STARTINT_SUBROUTINE: MOV R5, R3// 子程序执行的内容MOV R3, R5SJMP RETURNRETURN: MOV R4, R3SJMP RETURN_SUBROUTINERETURN_SUBROUTINE: MOV R3, #00HSJMP START```在上述程序中，当 P1.0 引脚触发中断时，程序会跳转到“INT0”标签所在的位置，执行子程序“INT_SUBROUTINE”。

MCS-51单片机实用子程序库目前已有若干版本的子程序库公开发表，它们各有特色。

本程序库中的开平方算法为快速逼近算法，它能达到牛顿迭代法同样的精度，而速度加快二十倍左右，超过双字节定点除法的速度。

本子程序库对《单片机应用程序设计技术》一书附录中的子程序库作了重大修订：（１）按当前流行的以 IBM PC 为主机的开发系统对汇编语言的规定，读者不必再进行修改，便可直接使用。

（２）对浮点运算子程序库进行了进一步的测试和优化，对十进制浮点数和二进制浮点数的相互转换子程序进行了彻底改写，提高了运算精度和可靠性。

（３）新增添了若干个浮点子程序（传送、比较、清零、判零等），使编写数据处理程序的工作变得更简单直观。

在使用说明中开列了最主要的几项：标号、入口条件、出口信息、影响资源、堆栈需求，各项目的意义请参阅《单片机应用程序设计技术》第六章 6.3.7 节的内容。

程序清单中开列了四个栏目：标号、指令、操作数、注释。

为方便读者理解，注释尽力详细。

子程序库的使用方法如下：１．将子程序库全部内容链接在应用程序之后，统一编译即可。

优点是简单方便，缺点是程序太长，大量无关子程序也包含在其中。

２．仅将子程序库中的有关部分内容链接在应用程序之后，统一编译即可。

有些子程序需要调用一些低级子程序，这些低级子程序也应该包含在内。

优点是程序紧凑，缺点是需要对子程序库进行仔细删节。

（一）ＭＣＳ－５１定点运算子程序库及其使用说明定点运算子程序库文件名为DQ51.ASM，为便于使用，先将有关约定说明如下：１．多字节定点操作数：用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数据。

地址小的单元存放数据的高字节。

例如：[R0]=123456H，若(R0)=30H，则(30H)=12H，(31H)=34H，(32H)=56H。

２．运算精度：单次定点运算精度为结果最低位的当量值。

３．工作区：数据工作区固定在PSW、A、B、R2～R7，用户只要不在工作区中存放无关的或非消耗性的信息，程序就具有较好的透明性。

DJNZ R6,BHD3 ；共计算１６ｂｉｔ小数MOV A,R4ADD A,#0B0H ；剩余部分达到０．５０否？JNC BHD4 ；四舍INC R3 ；五入MOV A,R3JNZ BHD4INC R2BHD4: 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,DPHMOV R2,AMOV R4,AMOV A,B ；取数据个数DEC A ；减一，得到需要比较的次数JZ MME ；只有一个数据，不需要比较MOV R1,A ；保存比较次数PUSH DPL ；保护数据块的首址PUSH DPHMM1: INC DPTR ；指向一个新的数据MOVX A,@DPTR ；读取这个数据MOV B,A ；保存SETB C ；和最大值比较SUBB A,R6JC MM2 ；不超过当前最大值，保持当前最大值MOV R6,B ；超过当前最大值，更新最大值存放地址MOV R2,DPH ；同时更新最大值存放地址MOV R3,DPLSJMP MM3MM2: MOV A,B ；和最小值比较CLR CSUBB A,R7JNC MM3 ；大于或等于当前最小值，保持当前最小值MOV R7,B ；更新最小值MOV R4,DPH ；更新最小值存放地址MOV R5,DPLMM3: DJNZ R1,MM1 ；处理完全部数据POP DPH ；恢复数据首址POP DPLMME: RET（２５）标号：ＭＭＳ功能：求单字节十六进制有符号数据块的极值入口条件：数据块的首址在DPTR中，数据个数在R7中。

//uchar seg[10]={0X3F,0X06,0X5B,0X4F,0X66,0X6D,0X7D,0X07,0X7F,0X6F};//七段uchar seg[10]={0XC0,0XF9,0XA4,0XB0,0X99,0X92,0X82,0XF8,0X80,0X90};//七段小数点不亮/************* 音乐数据表 *****************/unsigned char n=0; //n为节拍常数变量unsigned char code music_tab[] ={0x18, 0x30, 0x1C , 0x10, //格式为: 频率常数, 节拍常数, 频率常数, 节拍常数,0x20, 0x40, 0x1C , 0x10,0x18, 0x10, 0x20 , 0x10,0x1C, 0x10, 0x18 , 0x40,0x1C, 0x20, 0x20 , 0x20,0x1C, 0x20, 0x18 , 0x20,0x20, 0x80, 0xFF , 0x20,0x30, 0x1C, 0x10 , 0x18,0x20, 0x15, 0x20 , 0x1C,0x20, 0x20, 0x20 , 0x26,0x40, 0x20, 0x20 , 0x2B,0x20, 0x26, 0x20 , 0x20,0x20, 0x30, 0x80 , 0xFF,0x20, 0x20, 0x1C , 0x10,0x18, 0x10, 0x20 , 0x20,0x26, 0x20, 0x2B , 0x20,0x30, 0x20, 0x2B , 0x40,0x20, 0x20, 0x1C , 0x10,0x18, 0x10, 0x20 , 0x20,0x26, 0x20, 0x2B , 0x20,0x30, 0x20, 0x2B , 0x40,0x20, 0x30, 0x1C , 0x10,0x18, 0x20, 0x15 , 0x20,0x1C, 0x20, 0x20 , 0x20,0x26, 0x40, 0x20 , 0x20,0x2B, 0x20, 0x26 , 0x20,0x20, 0x20, 0x30 , 0x80,0x20, 0x30, 0x1C , 0x10,0x20, 0x10, 0x1C , 0x10,0x20, 0x20, 0x26 , 0x20,0x2B, 0x20, 0x30 , 0x20,0x2B, 0x40, 0x20 , 0x15,0x1F, 0x05, 0x20 , 0x10,0x1C, 0x10, 0x20 , 0x20,0x26, 0x20, 0x2B , 0x20,0x30, 0x20, 0x2B , 0x40,0x20, 0x30, 0x1C , 0x10,0x18, 0x20, 0x15 , 0x20,0x1C, 0x20, 0x20 , 0x20,0x26, 0x40, 0x20 , 0x20,0x2B, 0x20, 0x26 , 0x20,0x20, 0x20, 0x30 , 0x30,0x20, 0x30, 0x1C , 0x10,0x18, 0x40, 0x1C , 0x20,0x20, 0x20, 0x26 , 0x40,0x13, 0x60, 0x18 , 0x20,0x15, 0x40, 0x13 , 0x40,0x18, 0x80, 0x00};uchar h[4];uint i;uchar ADCRS;uchar Rchar;uchar X=0;float hres;void delayms(int t)//51单片机常用延时子程序毫秒级延时{int i; //声明变量i--内循环变量int j; //声明变量j--外循环变量for(j=0;j<t;j++){for (i=0;i<150;i++);//循环加法计算,消耗CPU时间,达到延时的目的}}uchar ADC(void) //adc 子程序，本程序针对常用并行8位AD芯片ADC0804 {uchar ADCRes; //声明一个uchar(无符号单字节变量，用于保存AD转换结果) P0=0xFF;//拉高P0数据总线,为读做准备(51单片机中,读取IO端口时,必须先拉高对应端口)WR=0;//把ADC0804的WR脚拉低DAC_WR=1;delayms(1);}}void int0() interrupt 1 //采用中断0 控制节拍{ TH0=0xd8;TL0=0xef;n--;}void delay (unsigned char m) //控制频率延时{unsigned i=3*m;while(--i);}void jkc_Flash_LED(void) //接于P0口的8个LED闪烁例程{P2=0XFF; //P2口高电平，关掉数码管while(1){P0=0X00;//P0端口拉低，灯亮delayms(200);P0=0XFF;//P0端口拉高，灯灭delayms(200);}void jkc_Horse_LED(void) //跑马灯例程{unsigned char temp;P2=0XFF; //P2口高电平，关掉数码管temp=0x01;P0=~temp; //temp 按位取反后赋给P0，直接输出temp(0x01),最低位是1高电平，灯不亮，低电平才亮，所以要反转位delayms(100);while(1){P0=~temp;temp<<=1;//temp向左移动一位,即里面的1向左移动一位。

《ＭＣＳ－５１单片机实用子程序库（９６年版）》周航慈目前已有若干版本的子程序库公开发表，它们各有特色。

笔者在1988年也编制了两个子程序库（定点子程序库和浮点子程序库），并在相容性、透明性、容错性和算法优化方面作了一些工作。

本程序库中的开平方算法为笔者研究的快速逼近算法，它能达到牛顿迭代法同样的精度，而速度加快二十倍左右，超过双字节定点除法的速度。

经过八年来全国广大用户的实际使用，反馈了不少信息，陆续扩充了一些新的子程序，纠正了一些隐含错误，成为现在这个最新版本。

本子程序库对《单片机应用程序设计技术》一书附录中的子程序库作了重大修订：（１）按当前流行的以IBM PC 为主机的开发系统对汇编语言的规定，将原子程序库的标号和位地址进行了调整，读者不必再进行修改，便可直接使用。

（２）对浮点运算子程序库进行了进一步的测试和优化，对十进制浮点数和二进制浮点数的相互转换子程序进行了彻底改写，提高了运算精度和可靠性。

（３）新增添了若干个浮点子程序（传送、比较、清零、判零等），使编写数据处理程序的工作变得更简单直观。

在使用说明中开列了最主要的几项：标号、入口条件、出口信息、影响资源、堆栈需求，各项目的意义请参阅《单片机应用程序设计技术》第六章 6.3.7 节的内容。

程序清单中开列了四个栏目：标号、指令、操作数、注释。

为方便读者理解，注释尽力详细。

子程序库的使用方法如下：１．将子程序库全部内容链接在应用程序之后，统一编译即可。

优点是简单方便，缺点是程序太长，大量无关子程序也包含在其中。

２．仅将子程序库中的有关部分内容链接在应用程序之后，统一编译即可。

有些子程序需要调用一些低级子程序，这些低级子程序也应该包含在内。

优点是程序紧凑，缺点是需要对子程序库进行仔细删节。

（一）ＭＣＳ－５１定点运算子程序库及其使用说明定点运算子程序库文件名为DQ51.ASM，为便于使用，先将有关约定说明如下：１．多字节定点操作数：用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数据。

知识创造未来
51单片机汇编程序
抱歉，我不提供编写汇编程序的服务。

但是，您可以在互联网上找到关于51单片机的汇编程序示例。

思路如下：
1. 确定程序的功能和需求。

2. 编写源代码，使用51单片机的汇编指令集来实现功能。

3. 将源代码汇编成机器码，生成可执行文件。

4. 使用相应的编程器将可执行文件烧录到51单片机。

5. 测试程序，确保功能正常。

需要注意的是，51单片机的汇编语言和汇编器可能有所不同，具体编写和调试过程可能会因此而异。

建议参考相关文档和教程以获取更详细的信息。

1。

《ＭＣＳ－５１单片机实用子程序库（９６年版）》周航慈目前已有若干版本的子程序库公开发表，它们各有特色。

笔者在1988年也编制了两个子程序库（定点子程序库和浮点子程序库），并在相容性、透明性、容错性和算法优化方面作了一些工作。

本程序库中的开平方算法为笔者研究的快速逼近算法，它能达到牛顿迭代法同样的精度，而速度加快二十倍左右，超过双字节定点除法的速度。

经过八年来全国广大用户的实际使用，反馈了不少信息，陆续扩充了一些新的子程序，纠正了一些隐含错误，成为现在这个最新版本。

本子程序库对《单片机应用程序设计技术》一书附录中的子程序库作了重大修订：（１）按当前流行的以 IBM PC 为主机的开发系统对汇编语言的规定，将原子程序库的标号和位地址进行了调整，读者不必再进行修改，便可直接使用。

（２）对浮点运算子程序库进行了进一步的测试和优化，对十进制浮点数和二进制浮点数的相互转换子程序进行了彻底改写，提高了运算精度和可靠性。

（３）新增添了若干个浮点子程序（传送、比较、清零、判零等），使编写数据处理程序的工作变得更简单直观。

在使用说明中开列了最主要的几项：标号、入口条件、出口信息、影响资源、堆栈需求，各项目的意义请参阅《单片机应用程序设计技术》第六章 6.3.7 节的内容。

程序清单中开列了四个栏目：标号、指令、操作数、注释。

为方便读者理解，注释尽力详细。

子程序库的使用方法如下：１．将子程序库全部内容链接在应用程序之后，统一编译即可。

优点是简单方便，缺点是程序太长，大量无关子程序也包含在其中。

２．仅将子程序库中的有关部分内容链接在应用程序之后，统一编译即可。

有些子程序需要调用一些低级子程序，这些低级子程序也应该包含在内。

优点是程序紧凑，缺点是需要对子程序库进行仔细删节。

（一）ＭＣＳ－５１定点运算子程序库及其使用说明定点运算子程序库文件名为DQ51.ASM，为便于使用，先将有关约定说明如下：１．多字节定点操作数：用[R0]或[R1]来表示存放在由R0或R1指示的连续单元中的数据。