基于單片機(jī)的溫濕度控制系統(tǒng)設(shè)計(jì)(有代碼)-資料下載頁

　　

【正文】 五入AND A,0F6HCLR CRRC ACLR CRRC AMOV CURTM_S,A 。初始采樣0809一次MOVX @DPTR,APOP DPLPOP DPHPOP ACCPOP PSWRET濕度控制：CON_S: MOV A,SET_SL 將鍵入下限于實(shí)時(shí)值比較 CJNE A,CURTM_S,CON0_S LJMP END_CON_SCON0_S: JNC RISE_S ；若實(shí)時(shí)值在下限以下，則調(diào)用升溫 JC CON1_S ； 若在下限以上則再判斷CON1_S: MOV A,SET_SH ； 實(shí)時(shí)值與上限比較 CJNE A,CURTM_S,CON2_S LJMP END_CON_SCON2_S: JNC END_CON_S ；若在上限下限以內(nèi)則返回 JC DOWN_S ；否則調(diào)用降溫END_CON_S: LCALL DISPLAY_END去濕處理：DOWN_S: SETB LCALL DIS_WS ；中間 實(shí)時(shí)溫濕度顯示 LCALL RED LCALL TEST1_S CLR MOV DPTR,8100H MOV A,0FFH MOVX @DPTR,A LJMP END_CON_S噴霧處理：RISE_S: CLR LCALL DIS_WS ；中間 實(shí)時(shí)溫濕度顯示 LCALL GREEN LCALL TEST SETB MOV DPTR,8100H MOV A,0FFH MOVX @DPTR,ATEST1_S: LCALL A_D_S ； 測(cè)試降濕 CLR C MOV A, CURTM_S MOV A,SET_S ADDC A,01H CJNE A,CURTM_S,TEST1_S ；判斷是否降溫到中間值＋1，無則繼續(xù)降濕 RET TEST2_S: LCALL A_D_S ； 測(cè)試升濕 CLR C MOV A, CURTM_S MOV A,SET_S SUBB A,01H CJNE A,CURTM_S,TEST_S ；判斷是否降溫到中間值－1，無則繼續(xù)升濕四路濕度輸入平均：A_D_S: MOV A,R1 RL A RL A MOV R0,AMOV R1,AMOV A ,@R0INC R0MOV R5,00HMOV R6,04HSTART:CJNE R1,00H,AD01 MOV DPTR,IN4 SJMP TRANAD01: CJNE R3,01H, AD02 MOV DPTR,IN5 SJMP TRANAD02: CJNE R3,02H, AD03MOV DPTR,IN6 SJMP TRANAD03: MOV DPTR,IN7TRAN: MOVX @DPTR,A 。啟動(dòng) A_DNOPNOP JB ,$ MOVX A,@DPTRLCALL DELAYMOVX A,@DPTRADD A,R5MOV R5,ADJNZ R6,TRANMOV A,R5ADDC A, 0F2H 。四舍五入AND A,0F6HCLR CRRC ACLR CRRC AMOV CURTM_W,A 。初始采樣0809一次MOVX @DPTR,APOP DPLPOP DPHPOP ACCPOP PSWRET中間數(shù)值的顯示和適時(shí)數(shù)值顯示：DIS_WS:LCALL LEDCLRMOV A，CURTM_WMOV B，0AHDIV ABMOV R5，AMOV R4,0LCALL DIS_LEDMOV R5，BMOV R4,1LCALL DIS_LEDMOV A，CURTM_SMOV B，0AHDIV ABMOV R5，AMOV R4,2LCALL DIS_LEDMOV R5，BMOV R4,3LCALL DIS_LEDMOV A，SET_SMOV B，0AHDIV ABMOV R5，AMOV R4,4LCALL DIS_LEDMOV R5，BMOV R4,5LCALL DIS_LEDMOV A，SET_WMOV B，0AHDIV ABMOV R5，AMOV R4,6LCALL DIS_LEDMOV R5，BMOV R4,7LCALL DIS_LEDLED_CLR: MOV A,0D1HMOV @DPTR,A RET液晶顯示程序如下：DISPLAY_NOR:RS EQU 。LCD RC引腳定義EN EQU 。LCD EN 引腳定義WLED EQU 。工作指示燈引腳定義CLR EN ；LCD被禁用LCALL LED_BL ；LCD閃爍LCALL SET_LCD 。 LCD做顯示測(cè)試MOV A, ’1’ ；設(shè)置所要顯示的字符MOV B, 15 ；設(shè)置所要顯示的位置LCALL LCDP1 ；在LCD第一行顯示字符MOV A, ’2’ ；設(shè)置所要顯示的字符MOV B, 15 ；設(shè)置所要顯示的位置LCALL LCDP2 ；在LCD第二行顯示字符JMP $ ；循環(huán)SET_LCD: ；LCD初試化并做測(cè)試CLR EN ；LCD被禁用LCALL INIT_LCD ；LCD初試化LCALL DELAY ；延時(shí)MOV DPTR,LMESS1 ；指針指到消息第一行MOV A,1 ；顯示在第一行LCALL LCD_PRINT ；顯示執(zhí)行消息于LCD第一行MOV DPTR,LMESS2 ；指針指到消息第二行MOV A,2 ；顯示在第二行LCALL LCD_PRINT ；顯示執(zhí)行消息于LCD第二行RETINIT_LCD1: ；4位I/O初試化MOV A,28H LCALL WCOM ；雙列顯示字符使用57點(diǎn)陣MOV A,0EHLCALL WCOM ；光標(biāo)出現(xiàn)不閃爍MOV A,06HLCALL WCOM ；每次向右移動(dòng)一位，顯示屏不動(dòng)MOV A,01HLCALL WCOM ；清除LCD顯示屏RETCLR_LINE1:MOV A,80H ；清除LCD的第一行，設(shè)置第一行字符LCALL WCOMMOV R0,24 ；設(shè)置記數(shù)值CL:MOV A,’’ ；載入空格到LCDLCALL WDATA 。 輸出字符到LCDDJNZ R0,CL ；記數(shù)結(jié)束RETLCD_PRINT:CJNE A,1,LINE2 ；在LCD第一行或第二行顯示字符LINE1: ；設(shè)置第一行地址MOV A,80HLCALL WCOMLCALL CLR_LINEMOV A,80HLCALL WCOMJMP FILLLINE2: ；設(shè)置第一行地址MOV A, 0C0HLCALL WCOMLCALL CLR_LINEMOV A,0C0HLCALL WCOMFILL: CLR AMOVC A, @A+DPTRCJNE A, 0,L1RETL1:LCALL WDATAINC DOTR JMP FILLRETCLR_LINE:MOV R0,24 ；清除LCD該行字符C1:MOV A,’’ ；載入空格符到LCDLCALL WDATA ；輸出字符到LCDDJNZ R0,C1 ；記數(shù)結(jié)束RETDE: ；短暫延時(shí)MOV R7,5DJNZ R7,$RETEN1:SET ENLCALL DECLR ENLCALL DERETINIT_LCD: MOV P0,30H 。LCD四位接口指令重置LCALL EN1 ；RS=0,R/W=0,D4~D7=0011MOV P0,30HLCALL EN1MOV P0,30HLCALL EN1