希望可以帮我修改，谢谢
问题：用这个程序烧写到单片机里面结果发现。三位数码管中总有两位显示的时候闪个不停，并且亮度较正常显示的时候暗。求大神教
数码管显示温度程序如下：
#include<reg52.h> //包含单片机寄存器的头文件
#include<intrins.h> //包含_nop_()函数定义的头文件
unsigned char flag,tltemp; //负温度标志 和临时暂存变量
unsigned char code s8[16]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};//数码管数字0-9
void delay1ms()
{
unsigned char i,j;
for(i=0;i<4;i++)
for(j=0;j<33;j++)
;
}
void delaynms(unsigned char n)
{
unsigned char i;
for(i=0;i<n;i++)
delay1ms();
}
/************************************************************************
以下是DS18B20的操作程序
************************************************************************/
sbit DQ=P3^3;
unsigned char time; //设置全局变量，专门用于严格延时
/*****************************************************
函数功能：将DS18B20传感器初始化，读取应答信号
出口参数：flag
***************************************************/
bit Init_DS18B20(void)
{
bit flag; //储存DS18B20是否存在的标志，flag=0，表示存在；flag=1，表示不存在
DQ = 1; //先将数据线拉高
for(time=0;time<2;time++) //略微延时约6微秒
;
DQ = 0; //再将数据线从高拉低，要求保持480~960us
for(time=0;time<200;time++) //略微延时约600微秒
; //以向DS18B20发出一持续480~960us的低电平复位脉冲
DQ = 1; //释放数据线（将数据线拉高）
for(time=0;time<10;time++)
; //延时约30us（释放总线后需等待15~60us让DS18B20输出存在脉冲）
flag=DQ; //让单片机检测是否输出了存在脉冲（DQ=0表示存在）
for(time=0;time<200;time++) //延时足够长时间，等待存在脉冲输出完毕
;
return (flag); //返回检测成功标志
}
/*****************************************************
函数功能：从DS18B20读取一个字节数据
出口参数：dat
***************************************************/
unsigned char ReadOneChar(void)
{
unsigned char i=0;
unsigned char dat; //储存读出的一个字节数据
for (i=0;i<8;i++)
{
DQ =1; // 先将数据线拉高
_nop_(); //等待一个机器周期
DQ = 0; //单片机从DS18B20读书据时,将数据线从高拉低即启动读时序
_nop_(); //等待一个机器周期
DQ = 1; //将数据线"人为"拉高,为单片机检测DS18B20的输出电平作准备
for(time=0;time<2;time++)
; //延时约6us，使主机在15us内采样
dat>>=1;
if(DQ==1)
dat|=0x80; //如果读到的数据是1，则将1存入dat
else
dat|=0x00;//如果读到的数据是0，则将0存入dat
//将单片机检测到的电平信号DQ存入r
for(time=0;time<8;time++)
; //延时3us,两个读时序之间必须有大于1us的恢复期
}
return(dat); //返回读出的十六进制数据
}
/*****************************************************
函数功能：向DS18B20写入一个字节数据
入口参数：dat
***************************************************/
WriteOneChar(unsigned char dat)
{
unsigned char i=0;
for (i=0; i<8; i++)
{
DQ =1; // 先将数据线拉高
_nop_(); //等待一个机器周期
DQ=0; //将数据线从高拉低时即启动写时序
DQ=dat&0x01; //利用与运算取出要写的某位二进制数据,
//并将其送到数据线上等待DS18B20采样
for(time=0;time<10;time++)
;//延时约30us，DS18B20在拉低后的约15~60us期间从数据线上采样
DQ=1; //释放数据线
for(time=0;time<1;time++)
;//延时3us,两个写时序间至少需要1us的恢复期
dat>>=1; //将dat中的各二进制位数据右移1位
}
for(time=0;time<4;time++)
; //稍作延时,给硬件一点反应时间
}
/*****************************************************
函数功能：做好读温度的准备
***************************************************/
void ReadyReadTemp(void)
{
Init_DS18B20(); //将DS18B20初始化
WriteOneChar(0xCC); // 跳过读序号列号的操作
WriteOneChar(0x44); // 启动温度转换
delaynms(200); //转换一次需要延时一段时间
Init_DS18B20(); //将DS18B20初始化
WriteOneChar(0xCC); //跳过读序号列号的操作
WriteOneChar(0xBE); //读取温度寄存器,前两个分别是温度的低位和高位
}
/*****************************************************
函数功能：显示温度的整数部分
入口参数：x
***************************************************/
void display_temp1(unsigned char x)
{
unsigned char k,l; //j,k,l分别储存温度的百位、十位和个位
k=(x%100)/10; //取十位
l=x%10; //取个位
P0=0x00;
P0=s8[l]; //将个位数字的字符常量写入数码管
P2=0xfd; //将十位数字的字符常量写入数码管
delaynms(20); //延时1ms给硬件一点反应时间
P0=0x00;
P0=s8[k];
P2=0xfe;
delaynms(1);
}
/*****************************************************
函数功能：显示温度的小数数部分
入口参数：x
***************************************************/
void display_temp2(unsigned char x)
{
P0=0x00;
P0=s8[x];
P2=0xfb;
delaynms(20);
}
/*****************************************************
函数功能：主函数
***************************************************/
void main(void)
{
unsigned char TL; //储存暂存器的温度低位
unsigned char TH; //储存暂存器的温度高位
unsigned char TN; //储存温度的整数部分
unsigned char TD; //储存温度的小数部分
delaynms(5); //延时5ms给硬件一点反应时间
while(1) //不断检测并显示温度
{
flag=0;
ReadyReadTemp(); //读温度准备
TL=ReadOneChar(); //先读的是温度值低位
TH=ReadOneChar(); //接着读的是温度值高位
TN=TH*16+TL/16; //实际温度值=(TH*256+TL)/16,即：TH*16+TL/16
//这样得出的是温度的整数部分,小数部分被丢弃了
TD=(TL%16)*10/16; //计算温度的小数部分,将余数乘以10再除以16取整，
//这样得到的是温度小数部分的第一位数字(保留1位小数)
display_temp2(TD);
display_temp1(TN); //显示温度的整数部
delaynms(1);
}
}
|
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
顶
踩
