如何对GPRS传输过来的气象数据进行简单的折线图分析？？？

bufangqi

我想实现的功能是：通过对GPRS传输过来的气象数据进行折线图绘制的简单分析处理，可以直观显示出一天中每个小时的气象数据的变化趋势。具体点的话我应该怎么做呢？我自己想象的情况是，可不可以通过编程，在传输气象数据同时进行折线图的绘制显示；还是在进行一定量的数据传输后（比如一天或者几个小时）再进行折线图的绘制显示（只要能通过简单的EXCEL显示就行）大家有做过类似的工作没，具体这个工作是怎么实现的呢，希望能给一些详细的建议，看我需要补充学习哪些方面的知识。谢谢大家。

正点原子

肯定可以啊，关键在你的思路，按你的思路来写代码吧

bufangqi

正点原子 发表于 2018-9-1 01:54
肯定可以啊，关键在你的思路，按你的思路来写代码吧

原子哥，您对这方面有了解吗，能不能再更进一步点化一下呢？谢谢

正点原子

bufangqi 发表于 2018-9-2 08:41
原子哥，您对这方面有了解吗，能不能再更进一步点化一下呢？谢谢

没哦，你百度了解下吧

shiyikuangxia

肯定是先存于数组中，等积累一些数据后再开始画折线图，应该是不复杂的，就 是一些坐标的设置和计算，我用LCD12864作过示波器，就是采集120个数据后更新显示一幅波形图，12864由于分辨率较低，因此波形实际上只是120个点组成的，有时候不连续，而将数据传到上位机之后，可以在高分辨率情况下利用高级语言画线获得平滑流畅的波形

bufangqi

shiyikuangxia 发表于 2018-9-3 08:00
肯定是先存于数组中，等积累一些数据后再开始画折线图，应该是不复杂的，就 是一些坐标的设置和计算，我用L ...

好的，谢谢你。有什么疑问在向你请教

bufangqi

shiyikuangxia 发表于 2018-9-3 08:00
肯定是先存于数组中，等积累一些数据后再开始画折线图，应该是不复杂的，就 是一些坐标的设置和计算，我用L ...

您好，可否能够参考一下你以前写过的类似程序。对此，我还是有些迷茫。如果传到上位机后，一般会用什么语言写呢？谢谢。

shiyikuangxia

bufangqi 发表于 2018-9-7 20:54
您好，可否能够参考一下你以前写过的类似程序。对此，我还是有些迷茫。如果传到上位机后，一般会用什么语 ...

上位机我用的是VB6.0写的，我发现 VC和VB很相似，但我没用过VC
大致就是设置通信控件的串口收到120个数据后，产生ONCOM事件（相当于中断），然后读取缓冲区数据并计算坐标然后画线，程序比较简单画图部分程序如下：
'画方格网
For i = 0 To 40 Step 1 '画横线
y1 = 100 + i * 200
Picture1.Line (60, y1)-Step(10240, 0), QBColor(6) '黄色
Next i

For i = 1 To 52 Step 1  '画竖线
x1 = 60 + i * 200
Picture1.Line (x1, 100)-Step(0, 8000), QBColor(6) '黄色
Next i

Picture1.Line (60, 4100)-(10500, 4100), QBColor(9) '原点至X轴终点　蓝色
Picture1.Line -Step(-150, -40), QBColor(9)       '箭头
Picture1.Line (10500, 8100)-Step(--150, 40), QBColor(9) '箭头

Picture1.Line (60, 8100)-(60, 0), QBColor(9) 'Y轴最下端至最上端终点
Picture1.Line -Step(-40, 100), QBColor(9)        '箭头
Picture1.Line (60, 0)-Step(40, 100), QBColor(9) '箭头

'写横坐标
Picture1.PSet (10150, 3900)
Picture1.Print "t "
Picture1.PSet (10120, 4080)
Picture1.Print "(ms)"
'写纵坐标
Picture1.PSet (100, 0)
Picture1.Print "V "


'画波形
For i = 0 To (ll - 1)
VV1 = inbuff(i)
X(i) = x0 + i * 100
y(i) = y0 - 4000 * VV1 / 256
X(i + 1) = x0 + (i + 1) * 100
VV2 = inbuff(i + 1)
y(i + 1) = y0 - 4000 * VV2 / 256
Picture1.DrawWidth = 2
Picture1.Line (X(i), y(i))-(X(i + 1), y(i + 1)), QBColor(11) '青色
Next i

strHex = " "

前提是会控制串口，收到数据，这部分内容可网上搜一下“VB串口通信”
这是接收界面，和一般的串口助手类似

bufangqi

shiyikuangxia 发表于 2018-9-10 09:01
上位机我用的是VB6.0写的，我发现 VC和VB很相似，但我没用过VC
大致就是设置通信控件的串口收到120个数 ...

不好意思这么久才回话。谢谢你。

bufangqi

shiyikuangxia 发表于 2018-9-10 09:01
上位机我用的是VB6.0写的，我发现 VC和VB很相似，但我没用过VC
大致就是设置通信控件的串口收到120个数 ...

您好，我想问一下就是，我不想让VB通过串口接收采集到的数据。因为我用GPRS模块将数据传到电脑的网络调试助手上，能不能再通过调用已存到电脑中的数据给VB。
我做的工作是，我的采集器距离我的上位机有很远的距离，通过GPRS模块进行数据传输。而我如何讲这些数据通过VB进行显示折线图呢？你有没有好一些的方法？谢谢了。

shiyikuangxia

bufangqi 发表于 2018-10-8 15:41
您好，我想问一下就是，我不想让VB通过串口接收采集到的数据。因为我用GPRS模块将数据传到电脑的网络调试 ...

网络调试助手是别人编写的程序，也没有源代码，根本不知道怎么调用它的数据。

FreeStrong

GPRS模块WIS800C支持MQTT/HTTP/HTTPS/TCP/UDP 连接
WIS800C 规格书已上传，可自行下载。后续几天将会上传
一些相关的案例，GPRS模块使用说明，以及应用文档。

http://club.szlcsc.com/article/details_37618_1.html