基于51單片機的蔬菜大棚溫度控制系統(tǒng)設(shè)計-資料下載頁
2025-06-19 13:12本頁面
【正文】 彥敏老師的悉心培養(yǎng)謹致以最衷心的感謝。感謝默默的支持著我的親人，是他們給我學(xué)習(xí)創(chuàng)造了很好的條件。給了我前進的永遠動力。感謝母校三來的栽培，是您給了我美好的大學(xué)時光，讓我學(xué)有所成。最后，向所有關(guān)心、幫助過我的老師、同學(xué)、朋友表示衷心的感謝！ 參考文獻[1] 方彥軍、[M].北京:化學(xué)工業(yè)出版社, 2003[2] 潘永雄、沙河、[M].西安:西安電子科技大學(xué)出版社，2001[3] 余錫存、[M].西安：西安電子科技大學(xué)出版社，2007 [4] 張偉、[M].北京: 機械工業(yè)出版社，2005[5] 曹薇、[M].北京：中國水利水電出版社，2004 [6] 陳偉人. MCS51系列單片機實用子程序集錦[M].北京：清華大學(xué)出版社， 1998 [7] [M].北京：北京電子工業(yè)出版社，1991 [8] ——數(shù)字部分[M].北京:高等教育出版社,2000[9] 李桂安、丁則信、[M].南京:東南大學(xué)出版社，1999[10] 余載泉、[M].北京：人民郵電出版社，2000[11] 何克忠、[M].北京:清華大學(xué)出版社，1998[12] (MCS51兼容)Flash單片機原理及應(yīng)用[M].北京:電子工業(yè)出版社，1997[13] 張衛(wèi)平、[M].北京:原子能出社，1997[14] [M].哈爾濱:哈爾濱工業(yè)大學(xué)出版社，1997[15] [M].北京:清華大學(xué)出版社，1998 附錄一 主板電路圖 附錄二 系統(tǒng)源程序程序代碼ORG 0000HTEMPER_L EQU 29HTEMPER_H EQU 28HFLAG1 EQU 38H。是否檢測到DS18B20標(biāo)志位A_BIT EQU 20H 。數(shù)碼管個位數(shù)存放內(nèi)存位置B_BIT EQU 21H 。數(shù)碼管十位數(shù)存放內(nèi)存位置XS EQU 30HMOV A,00HMOV P2,AMAIN:LCALL GET_TEMPER。調(diào)用讀溫度子程序MOV A,29HMOV B,ACLR CRLC ACLR CRLC ACLR CRLC ACLR CRLC ASWAP AMOV 31H,AMOV A,BMOV C,40H。將28H中的最低位移入CRRC AMOV C,41HRRC AMOV C,42HRRC AMOV C,43HRRC AMOV 29H,ALCALL DISPLAY。調(diào)用數(shù)碼管顯示子程序AJMP MAIN。 這是DS18B20復(fù)位初始化子程序INIT_1820:SETB NOPCLR 。主機發(fā)出延時537微秒的復(fù)位低脈沖MOV R1,3TSR1:MOV R0,107DJNZ R0,$DJNZ R1,TSR1SETB 。然后拉高數(shù)據(jù)線NOPNOPNOPMOV R0,25HTSR2:JNB ,TSR3。等待DS18B20回應(yīng)DJNZ R0,TSR2LJMP TSR4 。 延時TSR3:SETB FLAG1 。 置標(biāo)志位,表示DS1820存在LJMP TSR5TSR4:CLR FLAG1 。 清標(biāo)志位,表示DS1820不存在LJMP TSR7TSR5:MOV R0,117TSR6:DJNZ R0,TSR6 。 時序要求延時一段時間TSR7:SETB RET。 讀出轉(zhuǎn)換后的溫度值GET_TEMPER:SETB LCALL INIT_1820。先復(fù)位DS18B20JB FLAG1,TSS2RET 。 判斷DS1820是否存在?若DS18B20不存在則返回TSS2:MOV A,0CCH 。 跳過ROM匹配LCALL WRITE_1820MOV A,44H 。 發(fā)出溫度轉(zhuǎn)換命令LCALL WRITE_1820。這里通過調(diào)用顯示子程序?qū)崿F(xiàn)延時一段時間,等待AD轉(zhuǎn)換結(jié)束,12位的話750微秒LCALL DISPLAYLCALL INIT_1820。準(zhǔn)備讀溫度前先復(fù)位MOV A,0CCH 。 跳過ROM匹配LCALL WRITE_1820MOV A,0BEH 。 發(fā)出讀溫度命令LCALL WRITE_1820LCALL READ_18200。 將讀出的溫度數(shù)據(jù)保存到35H/36H RET。寫DS18B20的子程序(有具體的時序要求)WRITE_1820:MOV R2,8。一共8位數(shù)據(jù)CLR CWR1:CLR MOV R3,6DJNZ R3,$RRC AMOV ,CMOV R3,23DJNZ R3,$SETB NOPDJNZ R2,WR1RET。 讀DS18B20的程序,從DS18B20中讀出兩個字節(jié)的溫度數(shù)據(jù) READ_18200:MOV R4,2 。 將溫度高位和低位從DS18B20中讀出MOV R1,29H 。 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H)RE00:MOV R2,8。數(shù)據(jù)一共有8位RE01:CLR CSETB NOPNOPCLR NOPNOPNOPSETB MOV R3,9RE10: DJNZ R3,RE10MOV C,MOV R3,23RE20: DJNZ R3,RE20RRC ADJNZ R2,RE01MOV @R1,ADEC R1DJNZ R4,RE00RETDISPLAY:CLR CSUBB A, 30JNB CY, T1MOV A, BCLR CSUBB A,25JNB CY, XIANSHICLR LJMP XIANSHIT1:CLR XIANSHI:MOV A,BMOV B,10 。10進制/10=10進制DIV ABMOV B_BIT,A 。十位在AMOV A_BIT,B 。個位在BMOV R0,4 CLR C。多加的DPL1: MOV R1,250 。顯示1000次DPLOP:MOV DPTR,NUMTAB1MOV A,A_BIT 。取個位數(shù)MOVC A,@A+DPTR 。查個位數(shù)的7段代碼MOV P0,A 。送出個位的7段代碼CLR 。開個位顯示ACALL D1MS 。顯示1MSSETB MOV DPTR,NUMTABMOV A,B_BIT 。取十位數(shù)MOVC A,@A+DPTR 。查十位數(shù)的7段代碼MOV P0,A 。送出十位的7段代碼CLR 。開十位顯示 ACALL D1MS 。顯示1MSSETB JC XSW。多加的MOV A,31HMOV B,160DIV ABMOV XS,BXSW:MOV A,XS MOVC A,@A+DPTRMOV P0,A CLR ACALL D1MS SETB SETB C。多加的DJNZ R1,DPLOP 。250次沒完循環(huán)DJNZ R0,DPL1 。4個250次沒完循環(huán)RET。1MS延時(按12MHZ算)D1MS: MOV R7,80 DJNZ R7,$RETNUMTAB:DB 3FH，06H，5BH，4FH，66H，6DH，7DH，07H，7FH，6FH，7FH，7FH,7FH,7FH,7FH,7FHNUMTAB1: DB 0BFH,86H,0DBH,0CFH,0E6H,0EDH,0FDH,87H,0FFH,0EFHEND
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1