數(shù)字溫度計(jì)(2)-在線瀏覽
2024-10-03 01:55本頁(yè)面
【正文】 PLAY 。************************************* 。 AJMP LPTEMP 。*************************************。*************************************INIT_1820: SETB TEMPDIN NOP CLR TEMPDIN 。然后拉高數(shù)據(jù)線 NOP NOP NOP MOV R0,25HTSR2: JNB TEMPDIN,TSR3 。延時(shí)TSR3: SETB FLAG1 。CLR 。清標(biāo)志位,表示DS1820不存在 。時(shí)序要求延時(shí)一段時(shí)間TSR7: SETB TEMPDIN 。****************************************。****************************************GET_TEMPER: SETB TEMPDIN 。先復(fù)位DS18B20 JB FLAG1,TSS2 RET 。CLR 。跳過(guò)ROM匹配 LCALL WRITE_1820 MOV A,44H 。*****************************************。***************************************** LCALL DISPLAY。準(zhǔn)備讀溫度前先復(fù)位 MOV A,0CCH 。發(fā)出讀溫度命令 LCALL WRITE_1820 LCALL READ_18200 。*******************************************。*******************************************WRITE_1820: MOV R2,8 。WR1: CLR TEMPDIN 。 MOV R3,23 DJNZ R3,$ SETB TEMPDIN 。 SETB TEMPDIN 。*************************************。*************************************CONVTEMP: MOV A,TEMPH 。 JZ TEMPC1 。 溫度值補(bǔ)碼 變成原碼 MOV A,TEMPL 。 MOV TEMPL,A 。 CPL A 。 MOV TEMPH,A 。 置標(biāo)志 SJMP TEMPC11 。 置+標(biāo)志。 計(jì)算小數(shù)位溫度BCD值 SWAP A MOV TEMPHC,A 。 ANL A,0FH 。 MOVC A,A+DPTR 。 TEMPLC LOW= 小數(shù)部分 BCD。 計(jì)算整數(shù)位溫度BCD值 ANL A,0F0H 。 MOV TEMPL,A 。 ANL A,0FH 。 ORL A,TEMPL 。 LCALL HEX2BCD1 。************************************ MOV TEMPL,A 。 SWAP A 。 TEMPHC LOW = 十位數(shù) BCD MOV TEMPHC,A 。 ANL A,0FH 。 TEMPLC HI = 個(gè)位數(shù) BCD ORL A,TEMPLC 。 MOV A,R7 。 ANL A,0FH 。 MOV R7,A 。 TEMPHC HI = 百位數(shù) BCD ANL A,0FH 。 MOV TEMPHC,A 。小數(shù)部分分碼表。顯示區(qū) BCD 碼溫度值刷新子程序。 溫度數(shù)據(jù)移入顯示寄存器 ANL A,0FH 。 顯示小數(shù) MOV A,TEMPLC 。
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1