欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 寫了幾個小時程序,終于可以測溫度了 [打印本頁]

作者: liuda    時間: 2015-1-21 18:18
標題: 寫了幾個小時程序,終于可以測溫度了
寫了幾個小時程序,終于可以測溫度了                                                                                                                                            
程序如下:
#include<reg52.h>
#define uchar unsigned char
#define uint unsigned int
//sbit BLK=P1^0;
sbit DQ=P0^0;
sbit RS=P1^2;
sbit RW=P1^1;
sbit EN=P1^0;
unsigned char code str1[]={"temperature: "};
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<110;j++);
}
void wr_com(unsigned char com)//寫指令//
{
//delay1ms(1);
RS=0;
RW=0;
// EN=0;
P2=com;
delay1ms(1);
EN=1;
delay1ms(1);
EN=0;
}
void wr_dat(unsigned char dat)//寫數據//
{
//delay1ms(1);;
RS=1;
RW=0;
//   EN=0;
     P2=dat;
delay1ms(1);
     EN=1;
  //   delay1ms(1);
     EN=0;
}
void lcd_init()//初始化設置//
{
         //BLK=0;
//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);
}
void display(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程序***************************************/

void delay_18B20(unsigned int i)//延時1微秒
{
    while(i--);
}
  void ds1820rst()/*ds1820復位*/
{
unsigned char x=0;
DQ = 1;          //DQ復位
delay_18B20(4); //延時
DQ = 0;          //DQ拉低
delay_18B20(100); //精確延時大于480us
DQ = 1;          //拉高
delay_18B20(40);
}
uchar ds1820rd()/*讀數據*/
{
unsigned char i=0;
unsigned char dat = 0;
for (i=8;i>0;i--)
{   
  DQ = 0; //給脈沖信號
     dat>>=1;
      DQ = 1; //給脈沖信號
      if(DQ)
  dat|=0x80;
     delay_18B20(10);
}
return(dat);
}
void ds1820wr(uchar wdata)/*寫數據*/
{
unsigned char i=0;
for (i=8; i>0; i--)
    {
  DQ = 0;
       DQ = wdata&0x01;
       delay_18B20(10);
      DQ = 1;
       wdata>>=1;
     }
}
read_temp()/*讀取溫度值并轉換*/
{
uchar a,b;
ds1820rst();   
ds1820wr(0xcc);//*跳過讀序列號*/
ds1820wr(0x44);//*啟動溫度轉換*/
ds1820rst();   
ds1820wr(0xcc);//*跳過讀序列號*/
ds1820wr(0xbe);//*讀取溫度*/
a=ds1820rd();
b=ds1820rd();
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);
}

/*******************************************************************/

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();//顯示
}
}




作者: wxc19960311    時間: 2017-4-9 14:07
很不錯,程序對的,實用




歡迎光臨 (http://www.raoushi.com/bbs/) Powered by Discuz! X3.1