單片機(jī)課程設(shè)計(jì)-數(shù)字溫度計(jì)的設(shè)計(jì)(編輯修改稿)
2025-02-12 10:51 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 LCALL PROC_TEMP 。調(diào)用函數(shù)對(duì)溫度進(jìn)行處理 LJMP MAIN。*********************************。*********************************READ_TEMP: LCALL INI_DQ JB FLAG,RE_0 RETRE_0: MOV A,0CCH LCALL WRITE_DQ 。讀出傳感器所示溫度 MOV A,44H LCALL WRITE_DQ LCALL DISP_LED 。調(diào)用LED顯示程序 LCALL INI_DQ MOV A,0CCH LCALL WRITE_DQ MOV A,0BEH LCALL WRITE_DQ LCALL READ_DQ RET。************DS18B20初始化程序***************INI_DQ: SETB DQ NOP 。 NOP ?？詹僮? PC值加2 CLR DQ MOV R1,3INI_0: MOV R0,80 DJNZ R0,$ DJNZ R1,INI_0 SETB DQ NOP 。 NOP 。 NOP ?？詹僮? PC值加3 MOV R7, 25INI_1: JNB DQ,INI_2 。DQ為0則轉(zhuǎn) DJNZ R7,INI_1 。延時(shí) LJMP INI_3INI_2: SETB FLAG 。標(biāo)志位 LJMP INI_4INI_3: CLR FLAG LJMP INI_5INI_4: MOV R0,80 DJNZ R0,$ 。時(shí)序要求延時(shí)一段時(shí)間INI_5: SETB DQ RET。**************DS18B20寫(xiě)命令******************WRITE_DQ: MOV R6, 8 CLR CTloop: CLR DQ MOV R2,6 DJNZ R2,$ RRC A 。最低位移到C中 MOV DQ,C MOV R2,23 DJNZ R2,$ SETB DQ NOP DJNZ R6,Tloop SETB DQ RET。**************讀DS18B20數(shù)據(jù)函數(shù)*************READ_DQ: MOV R5, 2 MOV R0, 30HREAD_0: MOV R6, 8READ_1: CLR C SETB DQ NOP NOP CLR DQ NOP NOP NOP NOP SETB DQ MOV R2,9 DJNZ R2,$ MOV C,DQ MOV R3,23 DJNZ R3,$ RRC A DJNZ R6, READ_1 MOV @R0,A INC R0 DJNZ R5,READ_0 SETB DQ RET。***************溫度數(shù)據(jù)處理程序*****************PROC_TEMP: CLR FLAG_NEG MOV A,TEMP_L SWAP A 。 A中高低四位互換 ORL A,0F0H MOV TEMP_INT,A MO
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號(hào)-1