这是stc89c51单片机，晶振24兆，测试成功，有用就采纳，希望带给你帮助。
#include<reg52h>//载入头文件
#include<intrinsh>//_nop_();
#define uint unsigned int
#define uchar unsigned char
sbit dula=P2^2;
sbit wela=P2^3;
sbit ds=P1^3;//定义数据线管脚
uchar code utable[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};//无小数点
uchar code table[]={0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef};//有小数点
uchar code weima[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//数码管位码
float f_temp;uint temp;
delayms(uint t) //定时tms
{
uint x,y;
for(x=t;x>0;x--)
for(y=110;y>0;y--);
}
delayus(uchar i,uchar j,uchar k)//定时us
{
uchar a,b,c;
for(a=0;a<i;a++)
for(b=0;b<j;b++)
for(c=0;c<k;c++);
}
void delay5us()//定时5us一个NOP（）一微秒
{_nop_();_nop_();_nop_();_nop_();_nop_();}
void dsrest()//传感器复位函数
{
ds=1; //数据线置零
_nop_(); //延时1us尽可能短点
ds=0; //数据线拉低
delayus(7,1,63);//等待700us可以在480-960之间
ds=1; //释放数据线
delayus(1,1,48);//延时等待80us由ds18b20给一个低电平
}
void tempwritebyte(char dat)//写字节数据
{
uchar j;
bit testb;//用于区别写0还是写1
for(j=1;j<=8;j++)//循环8次用于写入1个字节
{
testb=dat&0x01;//判断需写入的是0还是1，由低位写入
dat=dat>>1; //将数据各位依次移到最低位
if(testb) //写1
{
ds=0;
_nop_();_nop_();_nop_();//延时3us
ds=1; //数据线置1
delayus(2,1,9); //延时40us
_nop_();_nop_();_nop_();_nop_();_nop_();//延时5us，
ds=1;
}
else
{
ds=0;
delayus(1,1,28);
ds=1;
}
}
}
tempreadbit()//读一位数据
{
bit dat;
ds=1; //置1
_nop_();_nop_(); //延时2us
ds=0; //数据线拉低
delay5us(); //延时5us
ds=1; //数据线拉高
_nop_();_nop_();_nop_();_nop_();//延时4us大于1us
dat=ds;//读取数据，如读入的是低电平则数据线自动拉低，实现读取0
delayus(1,1,15);//延时30us
return dat; //返回读取的数据
}
uchar tempread()//读一个字节数据
{
uchar i,j,dat;
dat=0;
for(i=1;i<=8;i++)
{
j=tempreadbit();//将读取的每位给j
dat=(j<<7)|(dat>>1);//8位组合成一个字节
}
return dat;
}
void tempchange()//读取温度变化
{
dsrest();
delayms(1);
tempwritebyte(0xcc);//写跳过ROM指令
tempwritebyte(0x44);//写温度转换指令
}
uint gettemp()
{
uchar a,b;
dsrest();
delayms(1);
tempwritebyte(0xcc);
tempwritebyte(0xbe);
a=tempread();
b=tempread();
temp=b;
temp<<=8;
temp=temp|a;
f_temp=temp00625;
temp=f_temp10+005;
f_temp=f_temp+005;
return temp;//十进制
}
void display(uchar dat1,uchar dat2,uchar dat3)//数码管显示
{
wela=1;
P0=0xfe;
wela=0;
P0=0xff;
dula=1;
P0=utable[dat1];
dula=0;
delayms(5);
wela=1;
P0=0xfd;
wela=0;
P0=0xff;
dula=1;
P0=table[dat2];
dula=0;
delayms(5);
wela=1;
P0=0xfb;
wela=0;
P0=0xff;
dula=1;
P0=utable[dat3];
dula=0;
delayms(5);
wela=1;
P0=0xf7;
wela=0;
P0=0xff;
dula=1;
P0=0x39;
dula=0;
delayms(5);
}
void distemp(uint t)//分离并显示
{
uchar dat1,dat2,dat3;
dat1=t/100;
dat2=t%100/10;
dat3=t%100%10;
display(dat1,dat2,dat3);
}
void main()
{
dula=0;
wela=0;
while(1)
{
tempchange();//温度转换
distemp(gettemp());//获取温度并转换
}
}
;这是关于DS18B20的读写程序,数据脚P22,晶振12MHZ
;温度传感器18B20汇编程序,采用器件默认的12位转化,最大转化时间750微秒
;可以将检测到的温度直接显示到AT89C51开发实验板的两个数码管上
;显示温度00到99度,很准确哦~~无需校正!
ORG 0000H ;单片机内存分配申明!
TEMPER_L EQU 29H;用于保存读出温度的低8位
TEMPER_H EQU 28H;用于保存读出温度的高8位
FLAG1 EQU 38H;是否检测到DS18B20标志位
a_bit equ 20h ;数码管个位数存放内存位置
b_bit equ 21h ;数码管十位数存放内存位置
TEMP_TH EQU
MAIN:
LCALL GET_TEMPER;调用读温度子程序 ,显示范围00到99度,显示精度为1度
;因为12位转化时每一位的精度为00625度,我们不要求显示小数所以可以抛弃29H的低4位
;将28H中的低4位移入29H中的高4位,这样获得一个新字节,这个字节就是实际测量获得的温度
MOV A,29H
MOV C,40H;将28H中的最低位移入C
RRC A
MOV C,41H
RRC A
MOV C,42H
RRC A
MOV C,43H
RRC A
MOV 29H,A
LCALL DISPLAY ;调用数码管显示子程序
CPL P10
AJMP MAIN
; 这是DS18B20复位初始化子程序
INIT_1820:
SETB P35
NOP
CLR P35 ;主机发出延时537微秒的复位低脉冲
MOV R1,#3
TSR1:MOV R0,#107
DJNZ R0,$
DJNZ R1,TSR1
SETB P35 ;然后拉高数据线
NOP
NOP
NOP
MOV R0,#25H
TSR2:
JNB P35,TSR3 ;等待DS18B20回应
DJNZ R0,TSR2
LJMP TSR4 ; 延时
TSR3:
SETB FLAG1 ; 置标志位,表示DS1820存在
CLR P17 ;检查到DS18B20就点亮P17LED
LJMP TSR5
TSR4:
CLR FLAG1 ; 清标志位,表示DS1820不存在
CLR P11 ;点亮P1。1脚LED表示温度传感器通信失败
LJMP TSR7
TSR5:
MOV R0,#117
TSR6:
DJNZ R0,TSR6 ; 时序要求延时一段时间
TSR7:
SETB P35
RET
; 读出转换后的温度值
GET_TEMPER:
SETB P35
LCALL INIT_1820 ;先复位DS18B20
JB FLAG1,TSS2
CLR P12
RET ; 判断DS1820是否存在若DS18B20不存在则返回
TSS2:
CLR P13 ;DS18B20已经被检测到!!!!!!!!!!!!!!!!!!
MOV A,#0CCH
LCALL WRITE_1820
MOV A,#44H ;发出温度转换命令
LCALL WRITE_1820
;这里通过调用显示子程序实现延时一段时间,等待AD转换结束,12位的话750微秒
LCALL DISPLAY
LCALL INIT_1820 ;准备读温度前先复位
MOV A,#0CCH ; 跳过ROM匹配
LCALL WRITE_1820
MOV A,#0BEH ; 发出读温度命令
LCALL WRITE_1820
LCALL READ_18200; 将读出的温度数据保存到35H/36H
CLR P14
RET
;写DS18B20的子程序(有具体的时序要求)
WRITE_1820:
MOV R2,#8;一共8位数据
CLR C
WR1:
CLR P35
MOV R3,#6
DJNZ R3,$
RRC A
MOV P35,C
MOV R3,#23
DJNZ R3,$
SETB P35
NOP
DJNZ R2,WR1
SETB P35
RET
; 读DS18B20的程序,从DS18B20中读出两个字节的温度数据
READ_18200:
MOV R4,#2 ; 将温度高位和低位从DS18B20中读出
MOV R1,#29H ; 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H)
RE00:
MOV R2,#8;数据一共有8位
RE01:
CLR C
SETB P35
NOP
NOP
CLR P35
NOP
NOP
NOP
SETB P35
MOV R3,#9
RE10:
DJNZ R3,RE10
MOV C,P35
MOV R3,#23
RE20:
DJNZ R3,RE20
RRC A
DJNZ R2,RE01
MOV @R1,A
DEC R1
DJNZ R4,RE00
RET
;显示子程序
display: mov a,29H;将29H中的十六进制数转换成10进制
mov b,#10 ;10进制/10=10进制
div ab
mov b_bit,a ;十位在a
mov a_bit,b ;个位在b
mov dptr,#numtab ;指定查表启始地址
mov r0,#4
dpl1: mov r1,#250 ;显示1000次
dplop: mov a,a_bit ;取个位数
MOVC A,@A+DPTR ;查个位数的7段代码
mov p1,a ;送出个位的7段代码
setb p20 ;开个位显示
acall d1ms ;显示1ms
clr p20
mov a,b_bit ;取十位数
MOVC A,@A+DPTR ;查十位数的7段代码
mov p1,a ;送出十位的7段代码
setb p21 ;开十位显示
acall d1ms ;显示1ms
clr p21
djnz r1,dplop ;100次没完循环
djnz r0,dpl1 ;4个100次没完循环
ret
;1MS延时(按12MHZ算)
D1MS: MOV R7,#80
DJNZ R7,$
RET
numtab: ;数码管共阳极0～9代码
DB 0C0H,0F9H,0A4H,0B0H,99H, 92H,82H,0F8H,80H,90H
end
;单片机DS18B20温度计C语言程序
;标签：单片机 c语言 ds18b20 温度计 51 mcu
>
distab[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e,0xff,0xfe,0xf7};❓
uchar dismod=0,xiaodou1=0,xiaodou2=0,currtemp;
bit flag;❓定义一个位变量
void t0isr() interrupt 1
{
TH0=(65536-5000)/256;❓定时器0 5ms溢出一次参数高八位
TL0=(65536-5000)%256;❓定时器0 5ms溢出一次参数低八位
switch(number)❓显示第number位
{
case 0:
P2=0x08;❓第一位选
P0=distab[TempBuffer1[0]];❓第一段码
break;❓退出switch
case 1:
P2=0x04;
P0=distab[TempBuffer1[1]];
break;
case 2:
P2=0x02;
P0=distab[TempBuffer1[2]]&0x7f;
break;
case 3:
P2=0x01;
P0=distab[TempBuffer1[3]];❓第四段码
break;
default:
break;
}
number++;
if(number>3)number=0;
}
void delay_18B20(unsigned int i)❓延时
{
while(i--);
}
/ds18b20初始化函数/
void Init_DS18B20(void)
{
bit x=0;
do{
DQ=1;
delay_18B20(8);
DQ = 0; //单片机将DQ❓数据位送0
delay_18B20(90); //精确延时 大于 480us
DQ = 1; //拉高总线❓数据位送1
delay_18B20(14);
x=DQ; //稍做延时后 如果x=0则初始化成功 x=1则初始化失败,继续初始化
}while(x);
delay_18B20(20);
}
/ds18b20读一个字节/
unsigned char ReadOneChar(void)
{
unsigned char i=0;
unsigned char dat = 0;
for (i=8;i>0;i--)
{
DQ = 0; // 给脉冲信号❓数据送0
dat>>=1;
DQ = 1; // 给脉冲信号
i
以上就是关于DS18B20，C51单片机温度显示的程序全部的内容，包括:DS18B20，C51单片机温度显示的程序、51单片机制作温度计的简单程序、单片机DS18B20温度计C语言程序等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）