基于單片機(jī)溫度控制系統(tǒng)畢業(yè)設(shè)計(jì)說明書-資料下載頁
2025-06-27 19:22本頁面
【正文】 MOV R1,A 。溫度十位存R1MOV R2,B 。溫度個(gè)位存R2LCALL DISPLAY 。顯示溫度JNB ,INC0JNB ,DEC0JB ,BACKLJMP SELSUBINC0: 。溫度加1℃MOV A,R1CJNE A,63H,ADD0 。溫度是否為99℃，不是則跳到ADD0MOV R1,00HINC1:LCALL DELAY1 。延時(shí)顯示JNB ,INC1 。按鍵是否松開，松開則程序往下執(zhí)行LJMP SELSUBADD0:INC R0LCALL DELAY1LJMP SELSUBDEC0: 。溫度減1℃MOV A,R1JZ SETR1 。 溫度是0℃則跳到SETR1DEC R0DEC1:LCALL DELAY1JNB ,DEC1 。按鍵是否松開，松開則程序往下執(zhí)行LJMP SELSUB SETR1:MOV R1,63HLCALL DELAY1LJMP SELSUBBACK:LJMP STARTGET_TEMPER:SETB LCALL SET_1820 。DS18B20初始化JB FLAG,TSS2 。檢測到DS18B20跳到TSS2RETTSS2:MOV A,0CCH 。跳過ROM匹配LCALL WRITE_1820 。寫DS18B20子程序MOV A,44H 。發(fā)出溫度轉(zhuǎn)換命令LCALL WRITE_1820LCALL DISPLAY 。用顯示溫度來等待AD轉(zhuǎn)換結(jié)束LCALL SET_1820MOV A,0CCH 。跳過ROM匹配LCALL WRITE_1820MOV A,0BEH 。 發(fā)出讀溫度命令LCALL WRITE_1820LCALL READ_1820 。讀DS18B20的溫度數(shù)據(jù)MOV A,TEMPER_LMOV R3,4L1:SETB CRRC ADJNZ R3,L1MOV TEMPER_L,AMOV A,TEMPER_HMOV R3,4L2:SETB CRLC ADJNZ R3,L2ANL A,TEMPER_LMOV R7,A 。讀出的溫度轉(zhuǎn)化問攝氏溫度存R7中MOV B,10DIV ABMOV R1,A 。讀出的溫度十位存R1MOV R2,B 。讀出的溫度個(gè)位存R2RETSET_1820: 。DS18B20復(fù)位初始化子程序SETB NOPCLR MOV R3,3 。主機(jī)發(fā)出延時(shí)537微秒的復(fù)位低脈沖TSR1:MOV R4,107DJNZ R4,$DJNZ R3,TSR1SETB 。然后拉高數(shù)據(jù)線NOPNOPNOPMOV R4,25HTSR2:JNB ,TSR3 。等待DS18B20回應(yīng)DJNZ R4,TSR2LJMP TSR4 。延時(shí)TSR3:SETB FLAG 。置標(biāo)志位，表示DS18B20存在LJMP TSR5TSR4:CLR FLAG 。清標(biāo)志位，表示DS18B20不存在LJMP TSR7TSR5:MOV R4,117TSR6:DJNZ R4,TSR6 。時(shí)序要求延時(shí)一段時(shí)間TSR7:SETB RETWRITE_1820:MOV R3,8 。一共8位數(shù)據(jù)CLR CWR1:CLR MOV R4,6DJNZ R4,$RRC AMOV ,CMOV R4,23DJNZ R4,$SETB NOPDJNZ R3,WR1SETB RETREAD_1820: 。將溫度高位和地位從DS18B20中讀出MOV R4,8RE01:CLR CSETB NOPNOPCLR NOPNOPNOPSETB MOV R6,4DJNZ R6,$MOV C,RRC AMOV R6,30DJNZ R6,$DJNZ R4,RE01MOV TEMPER_L,A 。 地位存入31HMOV R4,8RE02:CLR CSETB NOPNOPCLR NOPNOPNOPSETB MOV R6,4DJNZ R6,$MOV C,RRC AMOV R6,30DJNZ R6,$DJNZ R4,RE02MOV TEMPER_H,A 。高位存入32HRETCOMPARE: 。比較溫度子程序MOV TEMPER_SET,R0MOV A,R7CJNE A,TEMPER_SET,COMP 。設(shè)定溫度與實(shí)時(shí)溫度不等則跳COMPSETB 。關(guān)加熱器SETB 。關(guān)制冷器RETCOMP:MOV A,R7 。 實(shí)時(shí)溫度存入AMOV B,R0 。設(shè)定溫度存入BDIV AB 。A除以B，商給ACJNE A,0H,COMP1 。若A不等于0，即實(shí)時(shí)溫度高，跳轉(zhuǎn)SETB 。關(guān)制冷器CLR 。開加熱器LJMP EXITCOMP1:SETB 。關(guān)加熱器CLR 。開制冷器EXIT:RETDISPLAY: 。顯示子程序MOV DPTR,DATMOV A,R1MOVC A,@A+DPTRCLR SETB MOV P0,A 。動態(tài)掃描，顯示十位LCALL DELAY 。 延時(shí)約12毫秒MOV A,R2MOVC A,@A+DPTRSETB CLR MOV P0,A 。動態(tài)掃描，顯示個(gè)位LCALL DELAY SETB SETB 。關(guān)顯示RETDAT:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00H?！?”，“1”，“2”，“3”，“4”，“5”，“6”，“7”，“8”，“9”，“滅”DELAY1: 。延時(shí)子程序，延時(shí)并顯示 MOV 36H,08HLOOP0:LCALL DISPLAYDJNZ 36H,LOOP0RETDELAY: 。延時(shí)子程序，延時(shí)約12ms MOV 34H,24HLOOP: MOV 35H,0AFHLOOP1:DJNZ 35H,LOOP1DJNZ 34H,LOOPRETKEY: 。顯示切換子程序JNB ,KEY1RETKEY1:LCALL DELAY 。延時(shí)去抖動JNB ,KEY2RETKEY2:LCALL INTRETINT:MOV A,R0 。顯示設(shè)定溫度MOV B,10DIV ABMOV R1,AMOV R2,BMOV R6,50LCALL DELAY1DJNZ R6,$RETEND附錄2原理圖附錄3序號名稱規(guī)格型號數(shù)量 1 七段數(shù)碼管共陽極23 電阻 1300Ω2200Ω11kΩ6 4 集成電路AT89c511 5 開關(guān)5 6 電容30pF 2 7晶振 12MHz1 8溫度傳感器DS18B2019LED燈2主要元器件清單
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1