【正文】 輸出字符到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 RC引腳定義EN EQU 。初始采樣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 ；若在上限下限以?xún)?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，無(wú)則繼續(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，無(wú)則繼續(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 。保存現(xiàn)場(chǎng) PUSH 1 MOV 0,0HDELAY1: MOV 1,0H DJNZ 1,$ DJNZ 0,DELAY1 POP 1 。查表 MOV DPTR,D8279 MOVX DPTR,A 。置顯示起始地址 ADD A,R4 。置鍵盤(pán)掃描速率 MOVX DPTR,A MOV A,LEDCLS 。8279初始化子程序 PUSH DPH 。顯示輸入的字符 MOV B,A POP ACC ADD A,B MOV B,A 。讀鍵盤(pán) CJNE A,0FFH,WKEY2 。判斷輸入是否大于9 MOV A,B SUBB A,30H JC ERROR1 。置標(biāo)志(有鍵輸入)NKBHIT: POP PSW POP DPL POP DPH RETGETWORD: 。屏蔽 SHIFT 和 CTRL 鍵 MOV DPTR,KEYCODE 。判斷是否有鍵輸入 MOV A,0H 。清除 LED 顯示 MOVX DPTR,A LCALL L1TT: CJNE A,3BH,KS ；判斷是否鍵入B INC R0 ；作為標(biāo)志位，判斷是否數(shù)據(jù)輸入確定MOV R4,0 LCALL GETWORD MOV A,B MOV SET_WL,AMOV R4,2 LCALL GETWORD MOV A,B MOV SET_WH,A MOV A,SET_WL ADD A,SET_WH MOV B,02H DIV AB MOV SET_W,AMOV R4,4LCALL GETWORD MOV A,B MOV SET_SL,AMOV R4,6 LCALL GETWORD MOV A,B MOV SET_SH,A MOV A,SET_SL ADD A,SET_SH MOV B,02H DIV AB MOV SET_S,AKS: SJMP SET_T SET_T1: MOV R1,0AH SET_T2: LCALL GETKEY CJNE A,0FFH,RING ； 判斷輸入是否正確 MOV A,B CJNE A,3BH,RING ；若正確則無(wú)需再讀 LJMP SET_T ；若錯(cuò)誤則調(diào)用SET_T再鍵入數(shù)據(jù) RING:DJNZ R1,SET_T2 RET GETKEY: PUSH DPH 。RS=0寫(xiě)入命令LCALL EN1 ；產(chǎn)生高電平起用脈沖RETWDATA:MOV P0, A ；先寫(xiě)入高四位命令SETB RS ；；RS=1寫(xiě)入數(shù)據(jù)LCALL EN1 ；產(chǎn)生高電平起用脈沖RLC A ；向左移四位RLC ARLC ARLC AMOV P0,A ；寫(xiě)入低四位命令SETB RS ；RS=1寫(xiě)入數(shù)據(jù)LCALL EN1 ；產(chǎn)生高電平起用脈沖RETLED_BL: MOV R4,4 ；LCD閃動(dòng)控制程序LE1: CPL WLED MOV R5,10LCALL DELAY DJNZ R4, LE1RETLEMSS: DB “ WELCOME TO LCD SYSTEM”；需要顯示的字符消息 DB “ START WORK”LCDP1: PUSH ACC ；在LCD第一行特定位置顯示字符 MOV A, B ；A=ACC,DATA所要顯示的字符ADD A, 80H ；設(shè)置第一行地址LACLL WCOMPOP ACC ；由堆棧取出A寄存器值LCALL WDATA ；寫(xiě)入所要顯示的字符RETLCDP2: PUSH ACC ；在LCD第一行特定位置顯示字符MOV A,B ；A=ACC,DATA所要顯示的字符ADD A, 0C0H ；設(shè)置第一行地址LAC