單片機作業 專業：通信工程 學號：1303609057
第一題： 測溫 C語言程序：
#include<reg51.h> #include <intrins.h> #define uchar unsigned char #define uint unsigned int sbit DQ=P3^7;//ds18b20與單片機連接口 sbit RS=P0^7; sbit RW=P0^6; sbit EN=P0^5; unsigned char codestr1[]={"1303609057: "}; unsigned char code str2[]={" "}; uchar data disdata[5]; uint tvalue;//溫度值 uchar tflag;//溫度正負標志 /*************************lcd1602程序**************************/ void delay1ms(unsigned int ms)//延時1毫秒（不夠精確的） {unsigned int i,j; for(i=0;i<ms;i++) for(j=0;j<100;j++); } void wr_com(unsigned char com)//寫指令// { delay1ms(1); RS=0; RW=0; EN=0; P0=com; delay1ms(1); EN=1; delay1ms(1); EN=0; } void wr_dat(unsigned char dat)//寫數據// { delay1ms(1);; RS=1; RW=0; EN=0; P0=dat; delay1ms(1); EN=1; delay1ms(1); EN=0; } void lcd_init()//初始化設置// {delay1ms(15); wr_com(0x38);delay1ms(5); wr_com(0x08);delay1ms(5); wr_com(0x01);delay1ms(5); wr_com(0x06);delay1ms(5); wr_com(0x0c);delay1ms(5); } voiddisplay(unsigned char *p)//顯示// { while(*p!='\0') { wr_dat(*p); p++; delay1ms(1); } } init_play()//初始化顯示 {lcd_init(); wr_com(0x80); display(str1); wr_com(0xc0); display(str2); } /********************ds1820程序開始************************/ /*******************11μs延時器******************/ // void delay(uint t) //DS18B20程序讀寫部分取自zhangLL程 { //序（數碼管顯示），無論是仿真 for(;t>0;t--); //或上板，12MHz、11.0592MHz均可顯示 } //QQ154401855整理合并，LCD1602程序未動 /**************DS18B20復位函數****************/ ow_reset(void) { char presence=1; while(presence) { DQ=1;_nop_();_nop_(); DQ=0; delay(50); //550μs DQ=1; delay(6); //66μs presence=DQ; //presence=0,繼續下一步 } delay(45); //延時500μs DQ=1; } // // /***********DS18B20寫命令函數*************/ //向1 - WIRE 總線上寫1字節 void write_byte(uchar val) { uchar i; uchar value = 0; for(i=8;i>0;i--) { DQ= 1;_nop_();_nop_(); DQ= 0 ;_nop_();_nop_();_nop_();_nop_(); //5μs DQ= val&0x01; //移出最低位 delay(6); //66μs val = val/2; //右移1位 } DQ=1; delay(1); } // // /***********DS18B20讀1字節函數*************/ //從總線上讀取1個字節 uchar read_byte(void) { uchar i; uchar value = 0; for(i=8;i>0;i--) { DQ=1;_nop_();_nop_(); value>>=1; DQ=0; _nop_();_nop_();_nop_();_nop_(); //4μs DQ= 1; _nop_();_nop_();_nop_();_nop_(); //4μs if(DQ)value|=0x80; delay(6); //66μs } DQ=1; return(value); } // // /*************讀出溫度函數*************/ // read_temp() {uchar a,b; ow_reset(); //總線復位 write_byte(0xCC); //發skip ROM 命令 write_byte(0xBE); //發讀命令 a=read_byte(); //溫度低8位 b=read_byte(); //溫度高8位 ow_reset(); write_byte(0xCC); //發skip ROM命令 write_byte(0x44); //發轉換命令 tvalue=b; tvalue<<=8; tvalue=tvalue|a; if(tvalue<0x0fff) tflag=0; else {tvalue=~tvalue+1; tflag=1; } tvalue=tvalue*(0.625);//溫度值擴大10倍，精確到1位小數 return(tvalue); } // /******************DS18B20程序結束****************************/ void ds1820disp()//溫度值顯示 { uchar flagdat; disdata[0]=tvalue/1000+0x30;//百位數 disdata[1]=tvalue%1000/100+0x30;//十位數 disdata[2]=tvalue%100/10+0x30;//個位數 disdata[3]=tvalue%10+0x30;//小數位 if(tflag==0) flagdat=0x20;//正溫度不顯示符號 else flagdat=0x2d;//負溫度顯示負號:- if(disdata[0]==0x30) {disdata[0]=0x20;//如果百位為0，不顯示 if(disdata[1]==0x30) {disdata[1]=0x20;//如果百位為0，十位為0也不顯示 } } wr_com(0xc0); wr_dat(flagdat);//顯示符號位 wr_com(0xc1); wr_dat(disdata[0]);//顯示百位 wr_com(0xc2); wr_dat(disdata[1]);//顯示十位 wr_com(0xc3); wr_dat(disdata[2]);//顯示個位 wr_com(0xc4); wr_dat(0x2e);//顯示小數點 wr_com(0xc5); wr_dat(disdata[3]);//顯示小數位 } /********************主程序***********************************/ void main() { init_play();//初始化顯示 while(1) {read_temp();//讀取溫度 ds1820disp();//顯示
}
}
| 
