基于ds18b20的溫度控制系統(tǒng)設(shè)計(jì)1(文件)
【正文】 SETB DQ MOV R0, 25HTSR2: JNB DQ , TSR3 DJNZ R0, TSR2TSR3: SETB FLAG1 。表明不存在 RET。發(fā)出溫度轉(zhuǎn)換命令 LCALL WRITE_18B20 。跳過(guò)ROM LCALL WRITE_18B20 MOV A,0BEH 。***********讀18B20程序，讀出兩個(gè)字節(jié)的溫度********* READ2_18B20: MOV R4,2 。 MOV C, 。 RRC A 。 RRC A 。 LCALL DISPLAY 。 LJMP MAIN 。 mov b,10 。十位在a。指定查表啟始地址。dplop: mov a,a_bit 。 mov p0,a 。 acall d1ms 。取十位數(shù) 。送出十位的7段代碼 。顯示1ms 。 djnz r0,dpl1 。D1MS: MOV R7,80 。************************* 。 MOV ,C CLR CLK 。**********************************DELAY_1S: MOV TIMER1,10TEST_DYA: MOV TIMER2,200TEST_DYA1: MOV TIMER3,250TEST_DYA2: DJNZ TIMER3,TEST_DYA2 DJNZ TIMER2,TEST_DYA1 DJNZ TIMER1,TEST_DYA RET。************讀取鍵值*********************CH451_INT1: PUSH ACC 。時(shí)鐘芯片ds1302初始化 MOV 30H,10H 。日期初值=130 131 128 129 MOV 34H,05H 。FLAG=0 賦初值 LCALL RWRTC LCALL YANSH200 RET。允許備用電路充電,接入一個(gè)二極管電阻r1=2k MOV R0,30H LCALL WRRTC 。MOV R0,30H 。read ds1302 B寄存器的內(nèi)容為地址和命令 JB FLAG,RWRTC1 。R7為數(shù)據(jù)的個(gè)數(shù) SETB RST MOV R6,8 MOV A,BRWRTC2: CLR SCLK NOP RRC A MOV IODATA,C NOP SETB SCLK NOP DJNZ R6,RWRTC2 MOV R6,8 JNB FLAG,RWRTC4 。write data NOP SETB SCLK NOP DJNZ R6,RWRTC5RWRTC6: INC R0 。****************************************************YANSH200: push 01h push 02h mov r1,84h 。**************************************************** END。*************************************。address+1 MOV B,A CLR RST NOP CLR SCLK NOP DJNZ R7,RWRTC1 RET。FLAG=1讀DS1302 NOP MOV C,IODATA 。write ds1302RWRTC1: CLR SCLK 。MOV 31H,00H 。命令8EH寫(xiě)保護(hù)寄存器；內(nèi)容00H 最高位=0打開(kāi)寫(xiě)保護(hù)（可寫(xiě)可讀） MOV 31H,00H 。星期初值=17 MOV 36H,11H 。分初值=059 MOV 32H,10H 。保存鍵值EXIT: SETB 00HEXIT1: POP B POP ACC CLR IE1 SETB EX1 RETI。*************************************。8 RET。RECEIVE_LOOP: SETB CLK CALL SHORT_DELAY MOV A,DATA_IN 。 DJNZ R7,$ 。 ret 。 djnz r1,dplop 。開(kāi)十位顯示 。查十位數(shù)的7段代碼 。 setb 。 clr 。 MOVC A,A+DPTR 。dpl1: mov r1,250 。個(gè)位在b。 div ab。DISPLAY: mov a,29H。 。 。 RRC A 。 RRC A 。************讀出的溫度進(jìn)行數(shù)據(jù)轉(zhuǎn)換**************。讀兩個(gè)字節(jié)的溫度 RET 。延時(shí) 。若不存在則返回TSS2: MOV A,0CCH 。CLR 。*******************************************RECEIVE: MOV BIT_COUNT,8 LCALL INIT_18B20 LCALL GET_TEMPER。8 CLR DAT 。 RL A MOV DATA_OUT,A CALL SHORT_DELAY 。DIV AB JMP MAINUKEY2: CJNE A,2,UKEY3 CALL DS1302_Measurement AJMP MAINUKE
化學(xué)相關(guān)推薦
鄂ICP備17016276號(hào)-1