单片机数字温度计汇编程序

1、ORG 0000HLJMP MAINORG 0100H*DAT BIT P1.0TEMPER_L EQU 40HTEMPER_H EQU 41HA_BIT EQU 60HB_BIT EQU 61HC_BIT EQU 62HD_BIT EQU 63H ;* 主程序 *MAIN:MOV A,#7FHLCALL WRITE_1820LCALL INIT_1820LCALL GET_TEMPERLCALL CONVERLCALL DISPLAYLJMP MAIN ;* 初始化 db18b20*INIT_1820:CLR EAINI10:SETB DATMOV R2,#200INI11:CLR DATD

2、JNZ R2,INI11SETB DATMOV R2,#30INT12:DJNZ R2,INT12CLR CORL C,DATJC INI10MOV R6,#80INI13:ORL C,DATJC INI14DJNZ R6,INI13SJMP INI10INI14:MOV R2,#240INT15:DJNZ R2,INT15RET;* 读温度子程序 *GET_TEMPER:MOV A,#0CCHLCALL WRITE_1820MOV A,#44HLCALL WRITE_1820SETB DATLCALL DISPLAYLCALL INIT_1820MOV A,#0CCHLCALL WRITE_

3、1820MOV A,#0BEHLCALL WRITE_1820LCALL READ_1820MOV TEMPER_L,ALCALL READ_1820MOV TEMPER_H,ARET写 ds18b20 的程序 *WRITE_1820:CLR EAMOV R3,#8WR11:SETB DATRRC ACLR DATWR12:MOV R4,#8DJNZ R4,WR12MOV DAT,CMOV R4,#30WR13:DJNZ R4,WR13DJNZ R3,WR11SETB DATRETds18b20幵*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*卄*READ_182

4、0:CLR EAMOV R6,#8RD11:CLR DATMOV R4,#8NOPSETB DATRD12:DJNZ R4,RD12MOV C,DATRRC ARD13:DJNZ R5,RD13MOV R5,#30DJNZ R6,RD11SETB DATRET ;* 计算温度子程序 *CONVER:MOV A,#0F0HANL A,TEMPER_HMOV 64H,AJZ UNSIGNDEC TEMPER_LMOV A,TEMPER_HCPL AMOV TEMPER_H,AMOV A,TEMPER_LCPL AMOV TEMPER_L,AUNSIGN:MOV A,#0FHANL A,TEMPER

5、_LMOV B,#10MUL ABDIV ABMOV A,#0F0HMOV B,#16MOV A_BIT,AANL A,TEMPER_LSWAP AMOV B,AMOV A,#0FHANL A,TEMPER_HSWAP AADD A,BMOV 32H,ABCD:MOV B,#100DIV ABMOV 30H,AMOV D_BIT,AMOV A,#10XCH A,BDIV ABMOV C_BIT,AMOV B_BIT,BSWAP AADD A,BMOV 31H,ARET ;* 显示温度子程序 *DISPLAY:MOV 5EH,#03HMOV DPTR,#TABMOV R3,#100MOV R5,

6、64HS3:MOV R1,#20S2:MOV R2,#08HMOV R0,#63HMOV R4,#4SETB CS1:MOV P2,R2CJNE R4,#4,DLP3CJNE R0,#00H,DLP6MOV A,#0FFHLJMP DLP1DLP3:CJNE R4,#3,DLP6CJNE R0,#00H,DLP6MOV A,63HCJNE A,#00H,DLP3MOV A,#0FFHLJMP DLP1DLP6:MOV A,R0MOVC A,A+DPTRCJNE R4,#2,DLP1ANL A,#7FHDLP1:CJNE R5,#0F0H,DLP2CJNE R4,#4,DLP5MOV R6,62HCJNE R6,#0,DLP4MOV A,#0FFHLJMP DLP2DLP4:MOV A,#0BFHLJMP DLP2DLP5:CJNE R4,#3,DLP2CJNE R0,#0,DLP2MOV A,#0BFHDLP2:MOV P0,ALCALL DELAYMOV A,R2RR AMOV R2,ADEC R0DJ