大連理工大學單片機實驗實驗八

1、大連理工大學實驗報告實驗時間： 2016 年 4 月 日 星期 時間 ： 實驗室（房間號）： 實驗臺號碼： 班級： 姓名： 指導教師簽字： 成績： 實驗 八 DS18B20的實驗與編程 一、 實驗目的和要求學習單片機DS18B20數據采集方法。利用DS18B20采集、顯示整數部分的8位溫度值并利用ZLG7290B的數碼管顯示溫度。二、 實驗算法利用DS18B20將環(huán)境的溫度采集，通過二進制碼轉BCD碼子程序將溫度的8位二進制碼轉換為BCD碼，再通過ZLG7290B的低三位顯示出來。三、 實驗電路圖四、 實驗流程圖主程序從DS18B20中讀出數據（GET_TEMPER）轉換讀出的溫度數據（TEM

2、PER_COV）將8位二進制碼轉換為BCD碼通過ZLG7290B顯示溫度五、 程序清單SDABIT P1.0SCLBIT P1.1WSLAEQU 70HRSLAEQU 71HDISDAEQU 20HDISCONEQU 08HDATA_1EQU 30HTEMPER_LEQU 36H；存放讀出溫度的低位數據TEMPER_HEQU 35H；存放讀出溫度的高位數據TEMPEREQU 34H；轉換后的8位數據TEMPER_NUMEQU 60HFLAG1BIT 00HDQBIT P3.3ORG0000HLJMP0100HORG0003HLJMPINT_7290ORG0100HSTART:MOVSP,#70

3、HCLRP1.7LCALLDELAY2SETBP1.7SETBEASETBEX0；開啟INT0中斷SETBIT0MOVDATA_1,#13HMOVDATA_1+1,#13HMOVDATA_1+2,#13HMOVDATA_1+3,#12HMOVDATA_1+4,#10HMOVDATA_1+5,#11HMOVDATA_1+6,#10HMOVDATA_1+7,#0DHMOVDPTR,#LEDSEGMOVR7,#DISCONMOVR0,#DISDAMOVR1,#DATA_1LOOP1:MOVA,R1MOVCA,A+DPTRMOVR0,AINCR1INCR0DJNZR7,LOOP1LOOP:；主循環(huán)LC

4、ALLGET_TEMPER；讀取DS18B20轉換的溫度值LCALLTEMPER_COVMOVA,TEMPERLCALLBCD_CONT；轉換為BCD碼MOVR7,#DISCON；顯示溫度MOVR2,#10HMOVR3,#WSLAMOVR0,#DISDALCALLWRNBYTLCALLDELAY2SJMPLOOPLEDSEG:DB0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E4HDB0FEH,0F6H,0EEH,3EH,9CH,7AH,9EH,8EHDB0FAH,1EH,12H,00HCF:PUSH02HPUSHDPHPUSHDPLMOVDPTR,#LEDSEGMOVR

5、2,AANLA,#0FHMOVCA,A+DPTRMOVR3,AMOVA,R2SWAPAANLA,#0FHMOVCA,A+DPTRMOVR4,APOPDPLPOPDPHPOP02HRETBCD_CONT:；BCD碼轉換子程序PUSH07HPUSH06HPUSH05HPUSH02HMOVB,#64HDIVABMOVR7,AMOVR2,BMOVA,R2MOVB,#0AHDIVABMOVR6,AMOVR5,BMOVA,R7LCALLCFMOVDISDA+2,R3MOVA,R6LCALLCFMOVDISDA+1,R3MOVA,R5LCALLCFMOVDISDA+0,R3POP02HPOP05HPOP06

6、HPOP07HRETINT_7290:PUSH00HPUSH02HPUSH03HPUSH04HPUSH07HPUSHACCPUSHPSWMOVR0,#28HMOVR7,#04HMOVR2,#00HMOVR3,#WSLAMOVR4,#RSLALCALLRDADDNOPMOVA,29HLCALLCFMOV20H,R3MOV21H,R4POPPSWPOPACCPOP07HPOP04HPOP03HPOP02HPOP00HRETIDELAY2:PUSH00HPUSH01HMOVR0,#00HDELAY3:MOVR1,#00HDJNZR1,$DJNZR0,DELAY3POP01HPOP00HRETGET_

7、TEMPER:SETBDQBCD:LCALLINIT_1820JBFLAG1,S22LJMPBCDS22:LCALLDELAY1MOVA,#0CCHLCALLWRITE_1820MOVA,#44HLCALLWRITE_1820LCALLDELAYCBA:LCALLINIT_1820JBFLAG1,ABCLJMPCBAABC:LCALLDELAY1MOVA,#0CCHLCALLWRITE_1820MOVA,#0BEHLCALLWRITE_1820LCALLREAD_18200RETWRITE_1820:MOVR2,#8CLRCWR1:CLRDQMOVR3,#6DJNZR3,$RRCAMOVDQ,

8、CMOVR3,#23DJNZR3,$SETBDQNOPDJNZR2,WR1SETBDQRETREAD_18200:MOVR4,#2MOVR1,#36HRE00:MOVR2,#8RE01:CLRCSETBDQNOPCLRDQNOPNOPSETBDQMOVR3,#2DJNZR3,$MOVC,DQMOVR3,#23DJNZR3,$RRCADJNZR2,RE01MOVR1,ADECR1DJNZR4,RE00RETTEMPER_COV:MOVA,#0F0HANLA,TEMPER_LSWAPAMOVTEMPER_NUM,AMOVA,TEMPER_LJNBACC.3,TEMPER_COV1INCTEMPER

9、_NUMTEMPER_COV1:MOVA,TEMPER_HANLA,#07HSWAPAADDA,TEMPER_NUMMOVTEMPER_NUM,AMOVTEMPER,TEMPER_NUMRETINIT_1820:SETBDQNOPCLRDQMOVR0,#80HTSR1:DJNZR0,TSR1SETBDQMOVR0,#25HTSR2:DJNZR0,TSR2JNBDQ,TSR3LJMPTSR4TSR3:SETBFLAG1LJMPTSR5TSR4:CLRFLAG1LJMPTSR7TSR5:MOVR0,#06BHTSR6:DJNZR0,TSR6TSR7:SETBDQRETDELAY1:MOVR7,#20HDJNZR7,$RETDELAY:PUSH00HPUSH01HMOVR0,#00LP:MOVR1,#00HDJNZR1,$DJNZR0,LPPOP01HPOP00HRET六、 實驗結果與