资源描述:
《51单片机数字温度计汇编程序》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、ORG0000HLJMPMAINORG0100H;*********************************************DATBITP1.0TEMPER_LEQU40HTEMPER_HEQU41HA_BITEQU60HB_BITEQU61HC_BITEQU62HD_BITEQU63H;***主程序****************************************MAIN:MOVA,#7FHLCALLWRITE_1820LCALLINIT_1820LCALLGET_TEMPERLCALLCONVERLCALLDISPLAYLJMPMAIN;***初始化db18
2、b20****************************************************INIT_1820:CLREAINI10:SETBDATMOVR2,#200INI11:CLRDATDJNZR2,INI11SETBDATMOVR2,#30INT12:DJNZR2,INT12CLRCORLC,DATJCINI10MOVR6,#80INI13:ORLC,DATJCINI14DJNZR6,INI13SJMPINI10INI14:MOVR2,#240INT15:DJNZR2,INT15RET;**读温度子程序********************************
3、*************************GET_TEMPER:MOVA,#0CCHLCALLWRITE_1820MOVA,#44HLCALLWRITE_1820SETBDATLCALLDISPLAYLCALLINIT_1820MOVA,#0CCHLCALLWRITE_1820MOVA,#0BEHLCALLWRITE_1820LCALLREAD_1820MOVTEMPER_L,ALCALLREAD_1820MOVTEMPER_H,ARET;***写ds18b20的程序***********************************************************
4、WRITE_1820:CLREAMOVR3,#8WR11:SETBDATMOVR4,#8RRCACLRDATWR12:DJNZR4,WR12MOVDAT,CMOVR4,#30WR13:DJNZR4,WR13DJNZR3,WR11SETBDATRET;***读ds18b20的程序*********************************************************************READ_1820:CLREAMOVR6,#8RD11:CLRDATMOVR4,#8NOPSETBDATRD12:DJNZR4,RD12MOVC,DATRRCAMOVR5,#30RD
5、13:DJNZR5,RD13DJNZR6,RD11SETBDATRET;***计算温度子程序************************************************CONVER:MOVA,#0F0HANLA,TEMPER_HMOV64H,AJZUNSIGNDECTEMPER_LMOVA,TEMPER_HCPLAMOVTEMPER_H,AMOVA,TEMPER_LCPLAMOVTEMPER_L,AUNSIGN:MOVA,#0FHANLA,TEMPER_LMOVB,#10MULABMOVB,#16DIVABMOVA_BIT,AMOVA,#0F0HANLA,TEMPER_L
6、SWAPAMOVB,AMOVA,#0FHANLA,TEMPER_HSWAPAADDA,BMOV32H,ABCD:MOVB,#100DIVABMOV30H,AMOVD_BIT,AMOVA,#10XCHA,BDIVABMOVC_BIT,AMOVB_BIT,BSWAPAADDA,BMOV31H,ARET;****显示温度子程序***********************************************************DISPLAY:MOV5FH,#00HMOV5EH,#03HMOVDPTR,#TABMOVR3,#100S3:MOVR1,#20S2:MOVR2,#08HMO
7、VR0,#63HMOVR4,#4SETBCS1:MOVP2,R2CJNER4,#4,DLP3CJNE@R0,#00H,DLP6MOVA,#0FFHLJMPDLP1DLP3:CJNER4,#3,DLP6CJNE@R0,#00H,DLP6MOVA,63HCJNEA,#00H,DLP3MOVA,#0FFHLJMPDLP1DLP6:MOVA,@R0MOVCA,@A+DPTRCJNER4,#2,DLP1ANLA,#7F