你那有基于AT89C51单片机和DS18B20温度传感器程序么

如题所述

/******************************************************************
/* *
/* OK300C单片机开发系统演示程序 *
/* *
/******************************************************************/

#include <reg52.h>
#include <intrins.h>

#define uchar unsigned char
#define uint unsigned int

sbit DQ = P2^2; //定义DS18B20端口DQ
sbit BEEP=P2^3 ; //蜂鸣器驱动线

bit presence ;

sbit LCD_RS = P3^5;
sbit LCD_RW = P3^6;
sbit LCD_EN = P3^4;

uchar code cdis1[ ] = {" TEMP1: . C "};
uchar code cdis2[ ] = {" TEMP2: . C "};
uchar code cdis3[ ] = {" DS18B20 ERR0R "};
uchar code cdis4[ ] = {" PLEASE CHECK "};

unsigned char data temp_data[2] = {0x00,0x00};
unsigned char data display[5] = {0x00,0x00,0x00,0x00,0x00};

unsigned char code ditab[16] = {0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,
0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};

unsigned char code mytab[8] = {0x0C,0x12,0x12,0x0C,0x00,0x00,0x00,0x00};

unsigned char code RomCode[2][8] = {0x28,0x6f,0x39,0x87,0x01,0x00,0x00,0x7a,
0x28,0x79,0x43,0x87,0x01,0x00,0x00,0x43};
void beep();

#define delayNOP(); {_nop_();_nop_();_nop_();_nop_();};

/*******************************************************************/
void delay1(int ms)
{
unsigned char y;
while(ms--)
{
for(y = 0; y<250; y++)
{
_nop_();
_nop_();
_nop_();
_nop_();
}
}
}

/******************************************************************/
/* */
/*检查LCD忙状态 */
/*lcd_busy为1时,忙,等待。lcd-busy为0时,闲,可写指令与数据。 */
/* */
/******************************************************************/

bit lcd_busy()
{
bit result;
LCD_RS = 0;
LCD_RW = 1;
LCD_EN = 1;
delayNOP();
result = (bit)(P0&0x80);
LCD_EN = 0;
return(result);
}

/*******************************************************************/
/* */
/*写指令数据到LCD */
/*RS=L,RW=L,E=高脉冲,D0-D7=指令码。 */
/* */
/*******************************************************************/

void lcd_wcmd(uchar cmd)

{
delay1(10);
LCD_RS = 0;
LCD_RW = 0;
LCD_EN = 0;
_nop_();
_nop_();
P0 = cmd;
delayNOP();
LCD_EN = 1;
delayNOP();
LCD_EN = 0;
}

/*******************************************************************/
/* */
/*写显示数据到LCD */
/*RS=H,RW=L,E=高脉冲,D0-D7=数据。 */
/* */
/*******************************************************************/

void lcd_wdat(uchar dat)
{
delay1(10);
LCD_RS = 1;
LCD_RW = 0;
LCD_EN = 0;
P0 = dat;
delayNOP();
LCD_EN = 1;
delayNOP();
LCD_EN = 0;
}

/*******************************************************************/
/* */
/* LCD初始化设定 */
/* */
/*******************************************************************/

void lcd_init()
{
delay1(15);
lcd_wcmd(0x01); //清除LCD的显示内容
lcd_wcmd(0x38); //16*2显示,5*7点阵,8位数据
delay1(5);
lcd_wcmd(0x38);
delay1(5);
lcd_wcmd(0x38);
delay1(5);

lcd_wcmd(0x0c); //显示开,关光标
delay1(5);
lcd_wcmd(0x06); //移动光标
delay1(5);
lcd_wcmd(0x01); //清除LCD的显示内容
delay1(5);
}

/*******************************************************************/
/* */
/* 设定显示位置 */
/* */
/*******************************************************************/

void lcd_pos(uchar pos)
{
lcd_wcmd(pos | 0x80); //数据指针=80+地址变量
}

/*******************************************************************/
/* */
/*自定义字符写入CGRAM */
/* */
/*******************************************************************/
void writetab()
{
unsigned char i;
lcd_wcmd(0x40); //写CGRAM
for (i = 0; i< 8; i++)
lcd_wdat(mytab[i]);
}

/*******************************************************************/
/* */
/*us级延时函数 */
/* */
/*******************************************************************/

void Delay(unsigned int num)
{
while( --num );
}

/*******************************************************************/
/* */
/*初始化ds1820 */
/* */
/*******************************************************************/
Init_DS18B20(void)
{
DQ = 1; //DQ复位
Delay(8); //稍做延时

DQ = 0; //单片机将DQ拉低
Delay(90); //精确延时大于480us

DQ = 1; //拉高总线
Delay(8);

presence = DQ; //如果=0则初始化成功 =1则初始化失败
Delay(100);
DQ = 1;

return(presence); //返回信号,0=presence,1= no presence
}

/*******************************************************************/
/* */
/* 读一个字节 */
/* */
/*******************************************************************/
ReadOneChar(void)
{
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(4);
}

return (dat);
}

/*******************************************************************/
/* */
/* 写一个字节 */
/* */
/*******************************************************************/
WriteOneChar(unsigned char dat)
{
unsigned char i = 0;
for (i = 8; i > 0; i--)
{
DQ = 0;
DQ = dat&0x01;
Delay(5);

DQ = 1;
dat>>=1;
}
}

/*******************************************************************/
/* */
/* 读取温度 */
/* */
/*******************************************************************/
Read_Temperature(unsigned char x)
{
unsigned char i;
Init_DS18B20();

WriteOneChar(0xCC); // 跳过读序号列号的操作
WriteOneChar(0x44); // 启动温度转换

Init_DS18B20();
// WriteOneChar(0xCC); //跳过读序号列号的操作
WriteOneChar(0x55); //匹配ROM命令
for(i=0;i<8;i++)
{
WriteOneChar(RomCode[x][i]);
}
WriteOneChar(0xBE); //读取温度寄存器

temp_data[0] = ReadOneChar(); //温度低8位
temp_data[1] = ReadOneChar(); //温度高8位
}

/*******************************************************************/
/* */
/* 数据转换与温度显示 */
/* */
/*******************************************************************/
Disp_Temperature(uchar x)
{
display[4]=temp_data[0]&0x0f;
display[0]=ditab[display[4]]+0x30; //查表得小数位的值

display[4]=((temp_data[0]&0xf0)>>4)|((temp_data[1]&0x0f)<<4);
display[3]=display[4]/100+0x30;
display[1]=display[4]%100;
display[2]=display[1]/10+0x30;
display[1]=display[1]%10+0x30;

if(display[3]==0x30) //高位为0,不显示
{
display[3]=0x20;
if(display[2]==0x30) //次高位为0,不显示
display[2]=0x20;
}
if(x==1)
{
lcd_pos(0x48); //在LCD第二行显示
lcd_wdat(display[3]); //百位数显示
lcd_pos(0x49);
lcd_wdat(display[2]); //十位数显示
lcd_pos(0x4a);
lcd_wdat(display[1]); //个位数显示
lcd_pos(0x4c);
lcd_wdat(display[0]); //小数位数显示
}
else
{
lcd_pos(0x08); //在LCD第一行显示
lcd_wdat(display[3]); //百位数显示
lcd_pos(0x09);
lcd_wdat(display[2]); //十位数显示
lcd_pos(0x0a);
lcd_wdat(display[1]); //个位数显示
lcd_pos(0x0c);
lcd_wdat(display[0]); //小数位数显示
}

}

/*******************************************************************/
/* */
/* 蜂鸣器响一声 */
/* */
/*******************************************************************/
void beep()
{
unsigned char y;
for (y=0;y<100;y++)
{
Delay(60);
BEEP=!BEEP; //BEEP取反
}
BEEP=1; //关闭蜂鸣器
Delay(40000);
}

/*******************************************************************/
/* */
/* DS18B20 OK 显示菜单 */
/* */
/*******************************************************************/
void Ok_Menu ()
{
uchar m;
lcd_init(); //初始化LCD

lcd_pos(0); //设置显示位置为第一行的第1个字符
m = 0;
while(cdis1[m] != '\0')
{ //显示字符
lcd_wdat(cdis1[m]);
m++;
}

writetab(); //自定义字符写入CGRAM
delay1(5);
lcd_pos(0x0d);
lcd_wdat(0x00); //显示自定义字符

lcd_pos(0x40); //设置显示位置为第二行第1个字符
m = 0;
while(cdis2[m] != '\0')
{
lcd_wdat(cdis2[m]); //显示字符
m++;
}

// writetab(); //自定义字符写入CGRAM
// delay1(5);
lcd_pos(0x4d);
lcd_wdat(0x00); //显示自定义字符
}

/*******************************************************************/
/* */
/* DS18B20 ERROR 显示菜单 */
/* */
/*******************************************************************/
void Error_Menu ()
{
uchar m;
lcd_init(); //初始化LCD

lcd_pos(0); //设置显示位置为第一行的第1个字符
m = 0;
while(cdis3[m] != '\0')
{ //显示字符
lcd_wdat(cdis3[m]);
m++;
}

lcd_pos(0x40); //设置显示位置为第二行第1个字符
m = 0;
while(cdis4[m] != '\0')
{
lcd_wdat(cdis4[m]); //显示字符
m++;
}
}

/*******************************************************************/
/* */
/* 主函数 */
/* */
/*******************************************************************/
void main()
{
P0=0;
P2&=0x1F;
Ok_Menu ();

do
{
Read_Temperature(0);
Disp_Temperature(0);
delay1(30);
Read_Temperature(1);
Disp_Temperature(1);
delay1(30);
}
while(!presence) ;

Error_Menu ();

do
{
Init_DS18B20();
beep();
}
while(presence);
}

/*******************************************************************/
温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-04-20
DQ BIT P3.3 ;DS18B20的数据口位P3.3

TPH DATA 20H ;存放温度值的高字节
TPL DATA 21H ;存放温度值的低字节

ORG 0
JMP Reset

ORG 100H
Reset:
CALL DS18B20_Reset ;设备复位
MOV A,#0CCH ;跳过ROM命令
CALL DS18B20_WriteByte ;送出命令
MOV A,#044H ;开始转换
CALL DS18B20_WriteByte ;送出命令
JNB DQ,$ ;等待转换完成

CALL DS18B20_Reset ;设备复位
MOV A,#0CCH ;跳过ROM命令
CALL DS18B20_WriteByte ;送出命令
MOV A,#0BEH ;读暂存存储器
CALL DS18B20_WriteByte ;送出命令
CALL DS18B20_ReadByte ;读温度低字节
MOV TPL,A ;存储数据
CALL DS18B20_ReadByte ;读温度高字节
MOV TPH,A ;存储数据

JMP $

;**************************************
;延时X*10微秒(12M)
;不同的工作环境,需要调整此函数
;**************************************
DelayX0us: ;2 当改用1T的MCU时,请调整此延时函数
NOP ;1
NOP ;1
NOP ;1
NOP ;1
NOP ;1
NOP ;1
NOP ;1
NOP ;1
DJNZ R7,DelayX0us ;2
RET ;2

;**************************************
;复位DS18B20,并检测设备是否存在
;入口参数:无
;出口参数:无
;**************************************
DS18B20_Reset:
CLR DQ ;送出低电平复位信号
MOV R7,#48 ;延时至少480us
CALL DelayX0us
SETB DQ ;释放数据线
MOV R7,#6 ;等待60us
CALL DelayX0us
MOV C,DQ ;检测存在脉冲
MOV R7,#42 ;等待设备释放数据线
CALL DelayX0us
JC DS18B20_Reset ;如果设备不存在,则继续等待
RET

;**************************************
;从DS18B20读1字节数据
;入口参数:无
;出口参数:ACC
;**************************************
DS18B20_ReadByte:
CLR A
PUSH 0
MOV 0,#8 ;8位计数器
ReadNext:
CLR DQ ;开始时间片
NOP
NOP
SETB DQ ;准备接收
NOP
NOP
MOV C,DQ ;读取数据
RRC A
MOV R7,#6 ;等待时间片结束
CALL DelayX0us
DJNZ 0,ReadNext
POP 0
RET

;**************************************
;向DS18B20写1字节数据
;入口参数:ACC
;出口参数:无
;**************************************
DS18B20_WriteByte:
PUSH 0
MOV 0,#8 ;8位计数器
WriteNext:
CLR DQ ;开始时间片
NOP
NOP
RRC A ;输出数据
MOV DQ,C
MOV R7,#6 ;等待时间片结束
CALL DelayX0us
SETB DQ ;准备送出下一位数据
DJNZ 0,WriteNext
POP 0
RET

END本回答被提问者采纳
第2个回答  2011-04-20
TPH DATA 20H ;存放温度值的高字节
TPL DATA 21H ;存放温度值的低字节

ORG 0
JMP Reset

ORG 100H
第3个回答  2011-04-20
我存了好多。
第4个回答  2012-04-06
mark
相似回答