广告

原创 1602温度测量proteus程序

2009-5-14 09:23 1759 0 分类: MCU/ 嵌入式

http://space.ednchina.com/Upload/2009/5/14/88cc98b2-3e06-4212-9d4c-2e6e03d73ee7.rar/*******************************************
程序功能:利用单线制DS18B20温度传感器
          LED数码管显示当前的温度值
********************************************/
#include <reg51.h>                 //DS18B20温度传感器程序
#include "LCD1602.h"
#include "stdio.h"



sbit DQ="P3"^6; //数据传输线接单片机的相应的引脚
unsigned char tempL="0"; //设全局变量
unsigned char tempH="0";


unsigned int sdata =0;
unsigned long value;
  float m ;
 float temper="0";
 bit  fg="1";        //温度正负标志


//******************延时子程序 *******************************


//这个延时程序的具体延时时间是time=i*8+10,适用于小于2ms的延时


//************************************************************
void delay(unsigned char i)
{
 for(i;i>0;i--);
}



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


//                     延时子程序


//************************************************************
void Delay1ms(unsigned int count)
{
 unsigned int i,j;
 for(i=0;i<count;i++)
 for(j=0;j<120;j++);
}


 



//*****************************初始化程序 *********************************//


Init_DS18B20(void)
{
 unsigned char x="0";
 DQ=1; //DQ先置高
 delay(8); //稍延时
 DQ=0; //发送复位脉冲
 delay(80); //延时(>480us)
 DQ=1; //拉高数据线
 delay(5); //等待(15~60us)
 x=DQ; //用X的值来判断初始化有没有成功,18B20存在的话X=0,否则X=1
 delay(20);
}



//**********读一个字节************//


ReadOneChar(void)  //主机数据线先从高拉至低电平1us以上,再使数据线升为高电平,从而产生读信号
{
unsigned char i="0"; //每个读周期最短的持续时间为60us,各个读周期之间必须有1us以上的高电平恢复期
unsigned char dat="0";
for (i=8;i>0;i--) //一个字节有8位
{
 DQ=1;
 delay(1);
 DQ=0;
 dat>>=1;
 DQ=1;
 if(DQ)
 dat|=0x80;
 delay(4);
}
return(dat);
}


 


//*********************** **写一个字节**************************//


WriteOneChar(unsigned char dat)
{
  unsigned char i="0"; //数据线从高电平拉至低电平,产生写起始信号。15us之内将所需写的位送到数据线上,
  for(i=8;i>0;i--) //在15~60us之间对数据线进行采样,如果是高电平就写1,低写0发生。
  {
   DQ="0"; //在开始另一个写周期前必须有1us以上的高电平恢复期。
   DQ="dat"&0x01;
   delay(5);
   DQ="1";
   dat>>=1;
  }
  delay(4);
}



//读温度值(低位放tempL;高位放tempH;)
ReadTemperature(void)
{
 Init_DS18B20(); //初始化
 WriteOneChar(0xcc); //跳过读序列号的操作
 WriteOneChar(0x44); //启动温度转换
 delay(125); //转换需要一点时间,延时
 Init_DS18B20(); //初始化
 WriteOneChar(0xcc); //跳过读序列号的操作
 WriteOneChar(0xbe); //读温度寄存器(头两个值分别为温度的低位和高位)
 tempL=ReadOneChar(); //读出温度的低位LSB
 tempH=ReadOneChar(); //读出温度的高位MSB


  if(tempH>0x7f)      //最高位为1时温度是负
    {
  tempL=~tempL;         //补码转换,取反加一
 tempH=~tempH+1;      
  fg="0";            //读取温度为负时fg=0
    }
  temper= ((tempH*256) +tempL)*0.0625;
 
}


 


 



//**************************** //主程序



main()
{
   unsigned int value = 0;
   unsigned char buffer[40];
 
   while (1)
    {
     
         LCD_Initial();
       GotoXY(0,0);
      Print("  temperature");
 
      while(1)
       { 
     ReadTemperature() ;
     GotoXY(3,1); 
      if (fg==1)
   {
        sprintf(buffer,"+%6.3f",temper);
        Print(buffer);
        Delay1ms(200);
    }


    if (fg==0)
   {
        sprintf(buffer,"-%6.3f",temper);
        Print(buffer);
        Delay1ms(200);
    }
       }      
        }
}

广告

文章评论 0条评论)

登录后参与讨论
相关推荐阅读
aas7502987 2012-04-07 11:48
51/STC最小系统板资料(更新中)
图片欣赏    淘宝网址:http://item.taobao.com/auction/item_detail.htm?item_num_id=9073446988  二   程...
aas7502987 2011-10-13 22:59
YL-3 资料
YL-3数码管模块资料:YL-3 串行数码管资料.zip...
aas7502987 2011-09-24 09:10
USB转TTL小板驱动
xp系统驱动:XP系统支持STC下载的PL-2303HX新版驱动.rar WIN7系统驱动:WIN7系统支持STC下载的PL2303HX驱动.rar...
aas7502987 2011-05-24 22:48
STM32F103RBT6最小系统原理图 PCB
STM32F103RBT6最小系统板原理图 PCB 附件:做好的成品板:淘宝链接网址:http://item.taobao.com/item.htm?id=8864376956...
aas7502987 2011-05-08 12:53
YL-16 STM32F103最小系统板资料(更新中)
二 数据手册:  USB协议中文版:attachment download  中文数据手册:attachment downloadSTM32选型手册:attachment downloadSTM32勘...
aas7502987 2011-03-20 13:27
DS18B20温度测量模块
DS18B20 数码管温度显示程序:...
我要评论
0
0
广告