18B20温度采集＋上位机实时曲线,附源程序第6页 (amobbs.com 阿莫电子技术论坛) -

xuwenjie168 发表于 2011-8-18 19:22:24

记号！

gh031 发表于 2011-8-19 12:18:51

楼主，我现在正在初学单片机，给点资料不知道有没有？谢谢！

hehuabo 发表于 2011-8-19 13:53:24

自已也做过ＤＳ１８Ｂ２０采集温度，可是采集不准，有什么好的意见。

newhz 发表于 2011-8-25 17:15:35

ding

bingshuihuo888 发表于 2011-8-25 19:23:48

mark

bin_ok 发表于 2011-8-26 20:11:43

回复【26楼】fangbao 伍奇
-----------------------------------------------------------------------
刚开始搞上位机不久学的VB和labview 有时间能否打包发我一下谢谢！binbin199001wan@163.com

pipi-mao 发表于 2011-10-11 21:05:46

好好向楼主学习了，，想做个漂亮的上位机。。。楼主给力啊

nickzhn 发表于 2011-10-11 22:49:26

mark

xxjs 发表于 2011-10-12 11:47:48

mark一下

the_ether_zz 发表于 2011-10-13 20:01:55

太强大了，这个暑假我也做了一个上位机，是用vb.net做得，但是和楼主这个比起来真是小巫见大巫了，交个朋友，我加你QQ了。

doujiang 发表于 2011-10-25 13:40:17

邮箱d888w666@126.com望楼主赠送

Earthman 发表于 2011-10-30 01:35:58

看了Delphi的确是个迅捷开发的好东西

tonyone 发表于 2011-10-30 21:13:59

mark一下

yingfeng 发表于 2011-10-31 12:14:47

求大腿

gh031 发表于 2011-11-11 16:18:01

mark

lanjingjing 发表于 2011-11-11 16:39:01

温度采集，先记号。

lianwaziq 发表于 2011-11-12 20:30:02

东西不错，谢谢分享

newhand1991 发表于 2011-12-14 15:03:40

好东西啊

raohao101 发表于 2011-12-16 11:23:16

mark！！！

2343258 发表于 2011-12-16 11:43:19

mark!!!

xiongxie007 发表于 2011-12-16 19:44:00

mark 上位机

swustlx86 发表于 2011-12-20 09:11:19

MARK

hantek 发表于 2012-2-26 18:43:09

牛人啊

liming 发表于 2012-2-26 22:03:42

做的很漂亮

jiantaozzr 发表于 2012-2-28 23:47:10

NBnb 太厉害了

yinnianlong 发表于 2012-4-2 21:48:07

没有VB的吗。。。

yinnianlong 发表于 2012-4-2 21:48:33

mark...........................

leexue 发表于 2012-4-5 20:46:17

学习bcb6

zhenglu891028 发表于 2012-4-6 10:57:51

很好啊，加油

wsxywan 发表于 2012-5-4 13:36:24

楼主来份谢谢 QQ邮箱：1300166265@qq.com

q405228062 发表于 2012-5-23 22:38:46

好东西干看着就是下不了纠结啊

eryueniao 发表于 2012-5-26 15:37:02

呵呵挺棒

yuri_su 发表于 2012-5-29 10:50:51

这个一定要mark......现在论坛下载不了附件

liangws201 发表于 2012-5-31 15:59:25

。╭╩═╮╔════╗╔════╗╔════╗╔════╗╔════╗
╭╯GO╠╣支持楼主╠╣再接再厉╠╣车过留声╠╣人过留帖╠╣拿分 GO ╣
╰⊙═⊙╯╚◎══◎╝╚◎══◎╝╚◎══◎╝╚◎══◎╝╚◎══◎╝工工⊥⊥∞∞

jiespring 发表于 2012-6-18 00:21:30

了解上位机这个太晚了，渴望楼主能传一份给我，谢谢了
308380251@qq.com

rem2013 发表于 2012-7-9 20:34:36

楼主给我发一份吧，谢谢你啦。
noclassify@qq.com

yyj_sd 发表于 2012-7-30 09:11:11

楼主好人耶。谢谢了。

koarm 发表于 2012-8-4 16:44:18

mark一下{:smile:}

linucos 发表于 2012-8-30 17:18:38

多谢分享！

VIP999 发表于 2012-9-15 12:14:09

hymculolo 发表于 2010-10-13 17:21 static/image/common/back.gif
mark

学习单片机以及上位下位类，烦请给个源码学习学习，邮箱vip1630000@163.com，谢谢！

静静2175 发表于 2012-11-1 19:47:34

我做的上位机是VB 下位机用的是单片机下位机这块可以正常显示温度但是和上位机连接的时候上位机显示的温度不对
我做的可以让它实现的功能是：下位机可以正常显示温度，当上位机发送给下位机1时发送给VB温度的数据！就是出现了点问题我用串口调试助手测试了下下位机的程序它显示的是乱码？？不知道是为什么？想和你交流下！呵呵呵

静静2175 发表于 2012-11-1 19:56:04

我最近也是做温度采集系统出现了点问题！希望和你交流下！
上位机用VB下位机用51单片机
实现的功能：当上位机向下位机发送数据1时下位机将采集到得温度值返回给上位机
现在只是实现了正常的温度采集将采集的温度发送到上位机时显示的温度值和单片机显示的不一致
我用串口调试助手调试了下接受单片机的值是乱码？？不知道什么原因？想向你请教下！

这是下位机的程序看下哪里有问题？谢谢！
#include<reg51.H>
#include<absacc.H>
#include <intrins.h>
#include<stdio.h>

#define XTAL 110592;//CPU晶振频率
#define baudrate 9600 //通信波特率

#define uchar unsigned char
#define uint unsigned int

//不带小数点
uchar code TAB[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
//带小数点
uchar code TAB1[]={0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef};

sbit DQ=P3^3;//定义DS18B20的端口DQ

void delay(uint i) //精确延时程序
{

while(i--);
}

void DelayMS(uint ms)
{
uchar i;
while(ms--) for(i=0;i<120;i++);
}

void display(int k)//数码管显示
{
P2=0xf7;
P0=0x39; //显示C
DelayMS(1);

P2=0xfb;
P0=0x63;//显示°
DelayMS(1);

P2=0xfd;
P0=TAB;//显示个位
DelayMS(1);

P2=0xfe;
P0=TAB;//显示十位
DelayMS(1);

}

init_DS(void) //DS18B20初始化
{
uchar x=0;
DQ=1; //DQ复位
delay(8); //延时
DQ=0; //单片机拉低总线
delay(85); //延时
DQ=1; //释放总线，单片机拉高总线
delay(14);
x=DQ; //稍作延时后，如果X=0则初始化成功，X=1则失败
delay(20);
}

Read(void)    //读一个字节
{
uchar i=0;
uchar dat=0;
for(i=8;i>0;i--)
{
DQ=0; //给脉冲信号
dat>>=1; //让脉冲读到的位数据，依次从高位移到低位
DQ=1; //释放总线
if(DQ) //控制器进行采样
dat|=0x80; //读出数据放入高位，最后右移到低位
delay(4); //延时
}
return(dat);
}

write(uchar dat) //写一个字节
{
uchar i=0;
for(i=8;i>0;i--)
{
DQ=0; //拉低总线
DQ=dat&0x01; //从低位开始写入
delay(5);
DQ=1; //写完后释放总线
dat>>=1;

}
delay(4); //延时
}

Readtem(void) //获取温度
{
uchar a=0,b=0;

float t=0,t1;
init_DS(); //初始化
write(0xcc);//跳过读序列号操作
write(0x44);//启动温度转换
delay(125);

init_DS();//初始化
write(0xcc);//跳过读序列号操作
write(0xbe);// 读温度寄存器

a=Read();//读取温度低位LSB
b=Read();//读取温度低位HSB
t1=(a&0x0f)*0.0625;//取小数部分

t=((b<<4)|(a>>4));//取整数部分
return(t);
}

void init(void) //串口初始化
{
EA=1; //中断总允许

TMOD=0x20;//设置定时器1为工作方式2

TH1=0xfd;//给定时器赋初值
TL1=0xfd;
TR1=1;//启动定时器1

//SCON=0x50;//设置串行口工作方式1，允许接收
//PCON&=0x00;//波特率不倍增

SM0=0;
SM1=1;
REN=1;

IE=0x00;//禁止任何中断
}

void send_char(uchar c) //传送温度数据
{
SBUF = c;
while(TI == 0);
TI = 0;

}

void main()//主函数
{
float tp;
unsigned char dataREC = 0X00;
init();
while(1)
{
tp=Readtem(); //读取温度
display((uint) tp); //显示温度
if(RI) //是否有数据到来
{
   RI=0;
   dataREC = SBUF;
   if(dataREC == 49)//是否开始采集温度
   {
   send_char((uchar) tp);//传送采集的温度
}
}
}
}

静静2175 发表于 2012-11-2 15:58:28

您好！我最近也是做一个温度采集系统的设计
在此期间出现了点问题想向你请教下
我做的上位机用VB 下位机用单片机
我是希望当上位机向下位机发送1的时候下位机将把显示的数据传送给上位机
现在下位机我自己焊接的单片机是你可以正常显示温度值
但是传送给上位机的数据和显示的不一致我用串口调试助手调试了一下
它发送出去的数据是乱码？不知道该怎么办了？请教你下了！

司马朝阳007 发表于 2012-11-3 11:06:37

我正想学DELPHI，楼住可否将你收集的DELPHI资料和IOCOMP iplot曲线图控件传给我1334896360@qq.com 谢谢了

kxb 发表于 2012-11-3 17:01:49

不错，好好学习下

kxb 发表于 2012-11-4 21:29:53

不错，收藏了

wu_qi0613 发表于 2012-11-7 16:24:44

327888317@qq.com谢谢

wb9988 发表于 2012-11-7 19:31:49

楼主，VB易学还是DE易学，DELPHI教材太少了，书店基本没有几本

xiaoluoshan 发表于 2012-11-16 17:14:58

不错啊，我正想学DELPHI，楼住可否将你收集的DELPHI资料和IOCOMP iplot曲线图控件传给我xiaoluoshan2005@126.com谢谢了

1240257186 发表于 2012-11-30 17:22:18

神奇啊，好强大。请指教383145944@qq.com

sangyue 发表于 2012-11-30 18:48:53

学习学习

流着泪笑 发表于 2013-1-11 14:36:06

不错！！！学习啦！！

humancn 发表于 2013-1-19 21:05:30

楼主，可以给我一份IPLOT控件么，我用的是VC++ 谢谢啦，我的邮箱是humancn@126.com

feixiang1990 发表于 2013-1-20 10:11:42

高人面前唯有埋头苦干了

hhl1023 发表于 2013-3-21 13:15:19

xiciqq@sina.com可以把那三个控件发给我吗？xiciqq@sina.com

？老男孩？、 发表于 2013-4-11 10:03:37

楼主能不能麻烦把详细的资料发给我额，邮箱1154309661@qq.com xiexie

？老男孩？、 发表于 2013-4-17 11:23:21

谁帮帮忙也发给我一份啊 1154309661@qq.com

lxh413458727 发表于 2013-5-10 12:08:05

本人初学Delphi，一直不知道这么酷的界面是控件做的。发我一份吧：1837507461@qq.com
谢谢。

lxh413458727 发表于 2013-5-10 13:02:58

想提东西上门拜师

pf313313 发表于 2013-5-11 02:36:24

今天才看到能把全部资料发我一份吗1139193886@qq.com

dtdzlujian 发表于 2013-5-11 10:28:21

不错啊支持LZ

木石云水 发表于 2013-5-11 16:12:52

schminj 发表于 2008-8-6 17:24 static/image/common/back.gif
不错啊，我正想学DELPHI，楼住可否将你收集的DELPHI资料和IOCOMP iplot曲线图控件传给我schminj@163.com...

现在也在做多个参数的测量显示，楼主可以发点delphi资料和你做的18B20工程给我参考下不。1589777084@qq.com

yuantingxue2008 发表于 2013-5-22 11:33:13

留个脚印以后用的时候来找

qq502835899 发表于 2013-5-22 13:24:38

这帖子竟然被趴出来了

faith_2013 发表于 2013-5-22 14:24:30

强，{:victory:}

wenweima123 发表于 2013-8-18 23:48:22

非常感谢！学习了

KingYoung 发表于 2013-8-25 12:21:41

{:smile:}{:smile:}{:smile:}

Taoj 发表于 2013-9-24 09:55:27

楼主你好，正好需要您上传的东西请发到我邮箱980802743@qq.com

紫风幻月 发表于 2013-10-10 15:42:02

我做的是基于CAN总线的多点温度采集，打算用51单片机控制，硬件电路图LZ有吗？51+SJA1000+TJA1050

yeksw206 发表于 2013-10-10 16:12:03

学习！！！！！！！！！

JESTER9 发表于 2013-10-10 16:21:30

很好的东西，学习学习

xiepan2010 发表于 2013-10-10 17:27:07

xiepan2010@hotmail.com

多谢哥们

林州发表于 2013-12-23 21:55:14

留个记号了

starsun 发表于 2013-12-28 15:24:24

不错，现在这个应该很成熟了吧，应用程序能传一个吗

ljs183 发表于 2014-8-5 16:43:11

MARK,,,,正在学习

Victorsixy 发表于 2014-8-5 20:47:10

不错，不错

qqliyunpeng 发表于 2014-8-5 21:54:26

实时性在这里看还是可以接受的，本来以为i2c来读18b20的值会有点慢呢。

suming1189 发表于 2014-8-6 08:17:17

界面很漂亮。。。

bbingdao 发表于 2014-8-6 09:30:22

一定要mark.

页: 1 2 3 4 5 [6]

amobbs.com 阿莫电子技术论坛's Archiver