久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: 熱電阻PT10 PT100 Cu50 Cu100電阻轉溫度程序 [打印本頁]

作者: 南天白云 時間: 2015-1-27 12:46
標題: 熱電阻PT10 PT100 Cu50 Cu100電阻轉溫度程序
熱電阻PT10 PT100 Cu50 Cu100電阻轉溫度程序
/*******************************************************************************
*函數描述:PT10&PT100 Cu50&Cu100 熱阻轉溫度
*輸入變量:R 熱阻阻值
      type熱電阻類型 0 PT10
                              1 PT100
                              2 Cu50
                              3 Cu100
*返回變量:float T 溫度
*******************************************************************************/
float RtoT(float R, uchar type)
{
      uchar R0;  // 熱電阻0度時阻值
      float T, tmp, min, mid, max;
      float x, y, z;
      float d = 3.9083/1e3, b = -5.775/1e7, c = -4.183/1e12;

      if(type <= 1)
      {
            if(type == 0)
            {
                     R0 = 10; min = 1.852; mid = 10; max = 39.049;  // Pt10
            }
            else
      {
                     R0 = 100; min = 18.52; mid = 100; max = 390.49; // Pt100
         }
            if(R>=mid && R<=max)
            {
                     y = sqrt(d*d - 4*b*(1-R/R0));
                     T = (y-d) / (2*b);  // 得出溫度
            }
            else if(R<mid && R>=min)
            {
                     x = 0; y = -100; z = -201;
                     tmp = R0*(1 + d*y + b*y*y + c*(y-100)*y*y*y);
                     while(fabs(tmp-R)>=0.007)
                     {
                              if(R > tmp)
                              {
                                    x = x; z = y;
                                    y = (x+y)/2;
                              }
                              else
                              {
                                    x = y; z = z;
                                    y = (y+z)/2;
                              }
                              tmp = R0*(1 + d*y + b*y*y + c*(y-100)*y*y*y);
                     }
                     T = y;  // 得出溫度
            }
      }
      else
      {
            if(type == 2)  // Cu50
                     R0 = 50;
            else          // Cu100
                     R0 = 100;

            x = 150; y = 50; z = -50;
            tmp = R0*(1 + 4.289/1e3*y - 2.133/1e7*y*y + 1.233/1e9*y*y*y);
            while(fabs(tmp-R)>=0.007)
            {
                     if(R > tmp)
                     {
                              x = x; z = y;
                              y = (x+y)/2;
                     }
                     else
                     {
                              x = y; z = z;
                              y = (y+z)/2;
                     }
                     tmp = R0*(1 + 4.28899/1e3*y - 2.133/1e7*y*y + 1.233/1e9*y*y*y);
            }
            T = y;
      }

      return T;
}

作者: admin 時間: 2015-1-28 14:11
資料很好謝謝分享

作者: dzljp 時間: 2015-1-28 22:28
謝謝分享

作者: hclin 時間: 2015-1-29 16:13
very good, nice job !!!

作者: chajiangliang 時間: 2015-1-29 22:59
資料很好謝謝分享

作者: 18231062293 時間: 2016-6-2 20:48
謝謝分享

作者: nzh810124 時間: 2017-8-28 18:43
謝謝分享

作者: yxdz1358 時間: 2018-5-21 16:55
謝謝樓主的分享，不錯的資料！

作者: loong1 時間: 2018-6-7 21:10
看不完？

作者: jifengjianwu 時間: 2019-3-21 19:11
謝謝樓主分享，雖然還是看不懂。

歡迎光臨 (http://www.zg4o1577.cn/bbs/)