51单片机

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

2020-01-12 17:10发布

站内问答 / 51单片机
8645 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条回答
sync765
1楼-- · 2020-01-12 18:14
这个要顶了
支持开源
zhuangchao12
2楼-- · 2020-01-12 22:38
不知道为什么附件不能下载，提示老论坛附件，搞什么啊？？？这是新论坛附件啊，
fjourdev
3楼-- · 2020-01-12 23:06
确实支持一下，暂时用不上，研究下解决问题办法不错！
qwerttt
4楼-- · 2020-01-12 23:44
附件可以下载呀
zhuangchao12
5楼-- · 2020-01-12 23:59
 精彩回答 2  元偷偷看……
dtdzlujian
6楼-- · 2020-01-13 05:51
学习了!
1 2 3 4 5 6 7 8 下一页 最后一页

一周热门 更多>