基于c51單片機(jī)的大棚溫度自動(dòng)調(diào)控系統(tǒng)的設(shè)計(jì)(參考版)
2025-06-21 14:11本頁(yè)面
【正文】 *************************************************************YS: MOV R2,062HYS1: MOV R1,0AFH DJNZ R1,$ DJNZ R2,YS1 RET TABLE:db 0fch,60h,0dah,0f2h,66h,0b6h,0beh,0e0h,0feh,0f6h END。************************************************************* 。 當(dāng)R5不等于0時(shí)轉(zhuǎn)移 MOV R4,09H 。R5為0時(shí)變?yōu)? JIAN10:DEC R4 。 對(duì)繼存器R5減1 CJNE R5,00H,GO 。 當(dāng)R4不等于10時(shí)轉(zhuǎn)移 MOV R4,00H 。R5為10時(shí)變?yōu)? JIA10:INC R4 。 對(duì)繼存器R5加1 CJNE R5,0AH,GO 。 數(shù)碼管加減子程序模塊 。在鍵盤(pán)掃描程序中掃描30次 L4: LCALL LOOP 。C==0 說(shuō)明有信號(hào) 調(diào)用減1子程序， 。C=0有信號(hào)時(shí) 延時(shí)一段時(shí)間 MOV C, 。： JC L4 。C==0 說(shuō)明有信號(hào) 調(diào)用減10子程序， 。C=0有信號(hào)時(shí) 延時(shí)一段時(shí)間 MOV C, 。： JC L3 。C==0 說(shuō)明有信號(hào) 。C=0有信號(hào)時(shí) 延時(shí)一段時(shí)間 MOV C, 。 ： JC L2 。C==0 說(shuō)明有信號(hào) 。C=0有信號(hào)時(shí) 延時(shí)一段時(shí)間 MOV C, 。： JC L1 。 鍵盤(pán)掃描模塊 。加熱系統(tǒng)打開(kāi) CLR MOV P0,00HHH: LCALL SAOMIAO 。C=0 加熱系統(tǒng)打開(kāi) MOV P0,0FFH SETB 。溫度相等時(shí)都不開(kāi) CLR MOV P0,0FH LCALL HH 。測(cè)量的溫度低位預(yù)設(shè)的溫度低位 CJNE A,02H ,CHA1 。不相等轉(zhuǎn)移 R6R4時(shí)C=1加熱，r6r4時(shí)C=0散熱 MOV 02H,R5 。 溫度比較模塊。LCALL YS SETB DJNZ R1,SSHOW2 DEC R0 CJNE R0,03H,SSHOW1 RET。************************************************************************** SSHOW: MOV DPTR,TABLE 。*************************************************************************。存整數(shù)中位 MOV R7,B 。開(kāi)始處理整數(shù)部分： MOV B,100 DIV AB MOV R2,A 。輸出：R4R5R6 R7。作用：將R6R7中的二進(jìn)制數(shù)化作BCD碼的形式。小數(shù)部分 RET。整數(shù)部分 DJNZ R0,FENLI3 MOV R6,09H 。符號(hào)位 JC FENLI1 SJMP FENLI2FENLI1:MOV A,R6 CPL A MOV R6,A MOV A,R7 CPL A CLR C INC A MOV R7,A MOV A,R6 ADDC A,00H MOV R6,AFENLI2:MOV 08H,R7 ANL 08H,0FH 。輸出：R6R7 F0。作用：把小數(shù)部分同整數(shù)部分分開(kāi)，R6放整數(shù)R7放小數(shù)，F(xiàn)0放符號(hào)位。等待52us SETB RET。 MOV B,13 。釋放總線 NOP 。讀開(kāi)始圖2255的t0時(shí)刻 NOP 。把讀到位在C中并依次送給A DJNZ r1,RLOP 。設(shè)置讀位數(shù) RLOP:ACALL RDBIT 。釋放總線 RET。C內(nèi)容到總線,4usWDLT: DJNZ B,WDLT 。寫(xiě)開(kāi)始 NOP 。8位全寫(xiě)完? RETWRBIT: MOV B,15 。把寫(xiě)的位放到C ACALL WRBIT 。WRITE: MOV r1,08H 。有存在就拉高 setb LL5: DJNZ R2,LL5 。取存在信號(hào)： JC LL0 。60us CLR C 。釋放ds1820總線： MOV R2,15 。4us LL1:DJNZ R2,LL1 。初始化ds18b20子程序 LL0:CLR 。讀出溫度值高字節(jié)存入R6 SETB EA RET。送入讀溫度暫存器命令 LCALL READ MOV R7,A 。溫度轉(zhuǎn)換完全,再次初使化ds18b20 MOV A,0CCH LCALL WRITE 。 LCALL WRITE 。調(diào)用初使化子
語(yǔ)文相關(guān)推薦
鄂ICP備17016276號(hào)-1