51单片机

8种热电偶mV转温度，温度转mV程序，

2020-01-12 17:10发布

站内问答 / 51单片机
8590 100 100
本帖最后由 qwerttt 于 2012-6-17 22:15 编辑

多年前做的过程信号校验仪，其中一项关于热电偶测量和输出的换算程序
根据90温标上的公式编写，供大家测试

程序里的判断，请自行修改

相关链接：
热电阻PT10 PT100 Cu50 Cu100电阻转温度程序
http://www.amobbs.com/thread-5480954-1-1.html

以下是K型mV转温度程序
  1. // K型温度转电压系数
  2. float code Var_TtoV_K[3][11]=
  3. {
  4.         {0, 3.9450128025/1e2, 2.3622373598/1e5, -3.2858906784/1e7, -4.9904828777/1e9,
  5.                 -6.7509059173/1e11, -5.7410327428/1e13, -3.1088872894/1e15,
  6.                 -1.0451609365/1e17, -1.9889266878/1e20, -1.6322697486/1e23},
  7.         {-1.7600413686/1e2, 3.8921204975/1e2, 1.8558770032/1e5, -9.9457592874/1e8,
  8.                 3.1840945719/1e10, -5.6072844889/1e13, 5.6075059059/1e16,
  9.                 -3.2020720003/1e19, 9.7151147152/1e23, -1.2104721275/1e26},
  10.         {1.185976/1e1,-1.183432/1e4}
  11. };

  13. /******************************************************************************
  14. *函数描述:K型 电压转温度(冷端温度为0)
  15.                   毫伏范围：-5.891 ~ +54.819
  16.                   温度范围：-199.933C° ~ +1370.057C°
  17. *输入变量:mV 毫伏
  18. *返回变量:value 温度
  19. ******************************************************************************/
  20. float K_VtoT(float mV)
  21. {
  22.         uchar i = 0;
  23.         float value = 0;
  24.        
  25.         if(mV >= -6.478 && mV < 0)
  26.         {
  27.                 value = Var_VtoT_K[0][8];
  28.                
  29.                 for(i = 8; i >0; i--)
  30.                         value = mV * value + Var_VtoT_K[0][i-1];
  31.         }
  32.         else if(mV >= 0 && mV < 20.644)
  33.         {
  34.                 value = Var_VtoT_K[1][9];
  35.                
  36.                 for(i = 9; i >0; i--)
  37.                         value = mV * value + Var_VtoT_K[1][i-1];
  38.         }
  39.         else if(mV >= 20.644 && mV <= 54.900)
  40.         {
  41.                 value = Var_VtoT_K[2][6];
  42.                
  43.                 for(i = 6; i >0; i--)
  44.                         value = mV * value + Var_VtoT_K[2][i-1];
  45.         }
  46.        
  47.         return value;
  48. }
复制代码
友情提示: 此问题已得到解决，问题已经关闭,关闭后问题禁止继续编辑，回答。
该问题目前已经被作者或者管理员关闭, 无法添加新回复
99条回答
绝对零度
1楼-- · 2020-01-22 00:09
证在研究 不错的 顶一个
tj7856
2楼-- · 2020-01-22 03:23
好贴！ 收藏！！！
Hjun88
3楼-- · 2020-01-22 08:52
 精彩回答 2  元偷偷看……
qwerttt
4楼-- · 2020-01-22 09:22
发现K型 电压转温度 20mv以上有问题 楼主是否可以解答下 扣扣2393575163
carney
5楼-- · 2020-01-22 09:57
Hjun88 发表于 2014-10-23 09:15
发现K型 电压转温度 20mv以上有问题 楼主是否可以解答下 扣扣2393575163

请问k型错在哪里，你是怎样验证？
刚计算了3个mv点没有问题
40.23mv  973.2562
25mv      602.2277
32.77mv 787.7048度
linquan315
6楼-- · 2020-01-22 11:02
这个要收藏一下，感谢分享
首页 上一页 10 11 12 13 14 15 16 17 下一页

一周热门 更多>