【正文】 02H。*4=→03H。*5=→03H。 以此類推 …HtoB: (十六進(jìn)制轉(zhuǎn)換BCD)MOV B, 064H。 100 DIV AB。 a/100 MOV R7, A。 MOV A, 0AH。 XCH A, B。 DIV AB。 SWAP A。 ORL A, B。 RET。INIT_TEMP: (初始化DS188B20，確定DS18B20是否存在) SETB P_DS18B20。 NOP。 CLR P_DSARB20。 主機(jī)發(fā)出延時537微妙的復(fù)位低脈沖 MOV R0, 6BH。 MOV R1, 04H。TSR1: DJNZ R0。 MOV R0, 6BH。 DJNZ R1, TSR1。 SETB P_DA18B20。 拉高數(shù)據(jù)線，釋放總線進(jìn)入接收狀態(tài) NOP。 NOP。 NOP。 MOV R0, 32H。TRS2: JNB P_DS18B20,TSR3。 等待DS18B20回應(yīng)P DJNZ R0, TSR2。 LJMP TRS4。 延時TSR3: SETB FLAG。 置標(biāo)志位，表示DS18B20存在 LJMP TSR5。TSR4: CLR FLAG。 清標(biāo)志位，表示DS18B20不存在 LTMP TSR7。TSR5: MOV R0, 06BH。TSR6: DJNZ R0,TSR6。 時序要求延時一段時間TSR7: SETB P_DS18B20 RET。READ_TEMP:（讀取DS18B20的數(shù)據(jù)） SETB P_DS18B20。 LCALL INIT_TEMP。 先復(fù)位DS18B20 JB FLAG,TSS2。 判斷DS18B20是否存在，否則返回 RET。 TSS2: MOV A,0CCH。 跳過ROM匹配 LCALL WRITE_18B20。 MOV A,44H。 發(fā)出溫度轉(zhuǎn)換命令 LCALL WRITE_18B20。 LCALL DISPLAY。 LCALL INIT_TEMP。 讀溫度前先復(fù)位 MOV A,0CCH。 跳過ROM匹配 LCALL WRITE_18B20。 MOV A,0BEH。 發(fā)出讀溫度命令 LCALL WRITE_18B20。 LCALL READ_18B20。 將讀出的溫度保存到35H/36H RET。WRITE_18B20：（將A保存的數(shù)值寫入DS18B20中，有具體的時隙要求）MOV R2,08H。 一共8位數(shù)據(jù)，串行通訊 CLR C。 WR1: CLR P_DS18B20。 MOV R3, 07H。 DJNZ R3, $。 RRC A。 循環(huán)右移 MOV P_DS18B20, C。 MOV R3, 3C。 DJNZ R3,$。 23*2=46微妙 SETB P_DS18B20。 NOP。 DJNZ R2,WR1。 A里面一共8位，送8次 SETB P_DS18B20。 釋放總線 RET。READ_18B20:（讀取DS118B20中的數(shù)據(jù)，串行通訊，每次讀取一個，循環(huán)8次）MOV R4,02H。 將溫度高位和低位從DS18B20中讀出 MOV R1, TEMPERATURE_L。RE00: MOV R2, 08H。RE01: CLR C。 SETB P_DS18B20。 NOP。NOPCLR P_DS18B20。NOP。NOP。NOP。SETB P_DS18B20。MOV R3, 09H。RE10: DJNZ R3, RE10。 MOV C, P_DS18B20。 MOV R3, 3C。RE20: DJNZ R3, RE20。 RRC A。 DJNZ R2, RE01。 MOV @R1, A。 DJNZ R4, RE00。 RET。SCAN_KEY:(鍵盤掃描) JB K_ENTER,QUIT。 若有Enter鍵入，則開始鍵盤輸入 LCALL K_DELAY。 JB K_ENTER, QUIT。 CLR ENTER_FLAG。 每次進(jìn)來都賦值輸入標(biāo)志，設(shè)置為0 MOV KEY_BUF_G,DIS_BUF_G。 將當(dāng)前的溫度賦值給 KEY_BUF MOV KEY_BUF_S,DIS_BUF_S。K_LOOP: JB ENTER_FLAG,QUIT。 若輸入完成，退出 JB K_ENTER, KUP。 CALL PRO_ENTERKUP: JB K_UP, KDWON。 CALL PRO_UP。KDOWN: JB K_DOWN, LOOPA。 CALL PRO_DOWN。LOOPA: LCALL DISPLAY。 SJMP K_LOOP。QUIT: RET。PRO_ENTER:（確認(rèn)鍵盤輸入和退出鍵盤輸入） CALL K_DELAY。 JB K_ENTER,K_LOOP。 按鍵抖動處理 SETB ENTER_FLAG。 CALL K_DELAY。 RET。PRO_UP:（數(shù)值上調(diào)處理） CALL K_DELAY。 JB K_UP,K_LO0P。 按鍵抖動處理 INC KEY_BUF_G。 個位増1 MOV A, KEY_BUF_G。 CJNE A,0AH,UPNEXT。 個位增加到10，回0 MOV KEY_BUF_G, 00H。 INC KEY_BUF_S。 十位加1 MOV A, KEY_BUF_S。 CJNE A,0AH,UPNEXT。 十位超過99，溢出了 MOV R0,