數(shù)字溫度計論文(已改無錯字)
2023-02-16 16:04:03 本頁面
【正文】 V A, TEMPL CJNE A, 00 , ADD2 MOV TEMPL,100 ADD2: JB S4, TIAOTL ACALL T12MS JB S4, TIAOTL JNB S4, $ MOV TEMPUTER, 50H LJMP START 。 高位調(diào)整。 *****************************************TIAOTH:MOV 50H, TEMPUTER MOV 37H, TEMPH ACALL BIN_BCD ACALL DISP ACALL T12MS ACALL T12MS ACALL T12MS ACALL T12MS MOV 36H, 0AH MOV 37H, 0AH MOV 38H, 0AH ACALL DISP ACALL T12MS ACALL T12MS ACALL T12MS ACALL T12MS JB S2, ADD11 ACALL T12MS JB S2, ADD11 JNB S2, $ INC TEMPH MOV A, TEMPH CJNE A, 100, ADD11 MOV TEMPH, 0 ADD11: JB S3, ADD22 ACALL T12MS JB S3, ADD22 JNB S3, $ DEC TEMPH MOV A, TEMPH CJNE A, 00 , ADD22 MOV TEMPH,100 ADD22: JB S4, TIAOTH ACALL T12MS JB S4, TIAOTH JNB S4, $ MOV TEMPUTER, 50H LJMP START。 一秒定時中段。 *****************************************TOIT: PUSH PSW PUSH ACC MOV TH0, 3CH MOV TL0, 0B0H INC MS50 MOV A, MS50 CJNE A, 14H, RETURN MOV S1OK, 1 MOV MS50, 00H RETURN:POP ACC POP PSW RETI。 *****************************************。溫度總子程序。 *****************************************wendu: ACALL INIT_1820 ACALL RE_CONFIG ACALL GET_TEMPER ACALL TEMPER_COV RET。 *****************************************。DS18B20初始化程序。 ***************************************** INIT_1820: SETB NOP CLR MOV R0,06BH MOV R1,03HTSR1: DJNZ R0,TSR1 。 延時 MOV R0,6BH DJNZ R1,TSR1 SETB NOP NOP NOP MOV R0,25HTSR2: JNB ,TSR3 DJNZ R0,TSR2 LJMP TSR4 。 延時TSR3: SETB 。 置標(biāo)志位,表示DS1820存在 LJMP TSR5TSR4: CLR 。 清標(biāo)志位,表示DS1820不存在 LJMP TSR7TSR5: MOV R0,06BH MOV R1,03HTSR6:DJNZ R0,TSR6 。 延時 MOV R0,6BH DJNZ R1,TSR6TSR7:SETB RET。 *****************************************。 重新寫DS18B20暫存存儲器設(shè)定值。 *****************************************RE_CONFIG:JB ,RE_CONFIG1 。 若DS18B20存在,轉(zhuǎn)RE_CONFIG1 RETRE_CONFIG1: MOV A,0CCH 。 發(fā)SKIP ROM命令 LCALL WRITE_1820 MOV A,4EH 。 發(fā)寫暫存存儲器命令 LCALL WRITE_1820 MOV A,00H 。 TH(報警上限)中寫入00H LCALL WRITE_1820 MOV A,00H 。 TL(報警下限)中寫入00H LCALL WRITE_1820 MOV A,1FH 。 選擇9位溫度分辨率 LCALL WRITE_1820 RET。 ****************
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號-1