標題: 單片機作業 測溫，串口 [打印本頁]
作者: hongniu 時間: 2015-6-24 00:48
標題: 單片機作業 測溫，串口
單片機作業 專業：通信工程 學號：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();//顯示
}
}
| 歡迎光臨 (http://m.raoushi.com/bbs/) |
Powered by Discuz! X3.1 |
