【正文】 做減法判斷是否溢出 JNC DVE。 有溢出，則結(jié)束 MOV B, 16。 DIVL: CLR C。 MOV A, R5。 RLC A。 MOV R5, A。 MOV A, R4。 RLC A。 MOV R4, A。 MOV A, R3。 RLC A。 MOV R3, A。 XCH A, R2。 RLC A。 XCH A, R2。 被除數(shù)循環(huán)右移一位 MOV F0, C。 保存移出的最高位 CLR C。 SUBB A , R7。 被除數(shù)或余數(shù)減除數(shù) MOV R1, A。 MOV A, R2。 SUBB A, R6。 JB F0, DVME。 JC DMDE。 不夠減，則商上0，移位DVME: MOV R2, A。 MOV A, R1。 MOV R3, A。 INC R5。 商上1DMDE: DJNZ B, DIVL。 循環(huán)16次 CLR F0。 DVE: SETB F0。 有溢出。 CLR C MOV A, R4 RRC A MOV R2, A MOV A, R5 RRC A MOV R3, A CLR C。 。 雙字節(jié)二進(jìn)制數(shù)轉(zhuǎn)化為十進(jìn)制數(shù)。 入口：（R2R3）=二進(jìn)制被轉(zhuǎn)換數(shù)。 出口:(R4R5R6)=轉(zhuǎn)換結(jié)果BCD碼 BINBCD1: CLR A 。 MOV R6, A。 MOV R5, A。 MOV R4, A。 MOV R7, 16。 置計(jì)數(shù)器BINBCL1: CLR C。 MOV A, R3。 RLC A。 MOV R3, A。 MOV A, R2。 RLC A。 R2R3左移。移出位 cy MOV R2, A。 MOV A, R6。 ADDC A, R6。 DA A。 MOV R6, A。 MOV A, R5。 ADDC A, R5。 DA A 。 MOV R5, A。 MOV A, R4。 ADDC A, R4。 DA A。 (R4R5R6) *2+CY→ R4R5R6 MOV R4, A。 十進(jìn)制調(diào)整 DJNZ R7, BINBCL1 。 。將調(diào)整后的數(shù)據(jù)進(jìn)行適應(yīng)顯示調(diào)整 MOV A, 0FH ANL A, R4 MOV 35H, A MOV A, 0F0H ANL A,R5 RR A RR A RR A RR A MOV 36H, A MOV A, 0FH ANL A, R5 MOV 37H, A MOV A, 0F0H ANL A, R6 RR A RR A RR A RR A MOV 38H, A MOV A, 0FH ANL A , R6 MOV 39H, A 。 。 。將所需要的數(shù)據(jù)顯示出來(lái) mov a, 01H mov r4, 35H acall tran MOV A, 02H MOV R4, 36H ACALL tran mov a, 03h mov r4, 37h acall tran mov a, 04h mov r4, 38h acall tran SETB R1 RETI。 。顯示芯片操作子程序 tran: mov r2,08h loop11: rlc a mov din,C clr clk setb clk djnz r2,loop11 mov a,r4 mov r2, 08h loop22: rlc a mov din,c clr clk setb clk djnz r2,loop22 clr load setb load ret 。延時(shí)函數(shù) 。2ms ,在c8051f系列內(nèi)核適用。Delay: MOV R4,A 。D2: MOV R3, 0BEH。D1: MOV R5, 0BDH。 DJNZ R5, $。 DJNZ R3, D1。 DJNZ R4, D2。 RETDelay: MOV R4,A A1: MOV TH1, 0E8H MOV TL1, 16H SETB TR1 JNB TF1,$ CLR TR1 CLR TF1 DJNZ R4,A1 RET 。延時(shí)10us函數(shù) 。Delay_10us: 。10us MOV TH1, 0FFH MOV TL1, 0E5H SETB TR1 JNB TF1, $ CLR TR1 CLR TF1 MOV R0,1 MOV R0,1 DJNZ R0,$ RET 。濕度讀取子程序 。以下變量均為全局變量。溫度高8位== U8T_data_H。溫度低8位== U8T_data_L。濕度高8位== U8RH_data_H。濕度低8位== U8RH_data_L。校驗(yàn) 8位 == U8checkdata。調(diào)用相關(guān)子程序如下。 Read,Delay_10us , Delay 。RH: 。主機(jī)拉低總線,延時(shí)約200ms CLR MOV A,36H LCALL Delay SETB 。延時(shí)40us LCALL Delay_10us LCALL Delay_10us LCALL Delay_10us LCALL Delay_10us 。檢測(cè)從機(jī)是否響應(yīng)，無(wú)響應(yīng)則跳出 JB ,RH_END MOV FLAG,0LOOP1: INC FLAG MOV A,FLAG JB ,LOOP1_END 。為高電平則跳出 NOP NOP NOP CJNE A,0,LOOP1 LJMP RH_ENDLOOP1_END: MOV FLAG,0LOOP2: INC FLAG MOV A,FLAG NOP NOP NOP JNB ,LOOP2_END 。為低電平則跳出 CJNE A,0,LOOP2 LJMP RH_ENDLOOP2_END: 。進(jìn)入數(shù)據(jù)接收階段 LCALL Read MOV U8RH_data_H, U8data。 LCALL Read MOV U8RH_data_L, U8data。 LCALL Read MOV U8T_data_H, U8data。 LCALL Read MOV U8T_data_L, U8data。 LCALL Read MOV U8checkdata, U8data。 SETB 。 。注意：本程序沒(méi)有加校驗(yàn)程序 如果用戶需要校驗(yàn)請(qǐng)安以下說(shuō)明編寫校驗(yàn)程序 。RH_END: RET。讀數(shù)子程序。Read: MOV temp,8 MOV U8data,0LOOP_COM: 。判斷低電平是否結(jié)束 MOV FLAG,0LOOP3: INC FLAG MOV A,FLAG JB ,LOOP3_END 。為高電平則跳出 NOP NOP NOP CJNE A,0,LOOP3 LJMP COM_ENDLOOP3_END: 。 LCALL Delay_10us LCALL Delay_10us LCALL Delay_10us 。 MOV U8temp, 0 JNB , HIGH_END MOV U8temp, 1HIGH_END: MOV FLAG, 0LOOP4: INC FLAG MOV A, FLAG JNB ,LOOP4_END 。為低電平則跳出 NOP NOP NOP CJNE A,0,LOOP4 LJMP COM_ENDLOOP4_END: MOV A, FLAG CJNE A, 0,NO_FLAG LJMP COM_ENDNO_FLAG: MOV A, U8data RL A ORL A, U8temp MOV U8data,A 。判斷高電平是否結(jié)束 DJNZ temp,LOOP_COMCOM_END: RET 。