PT100 Berechnung der Temperatur @ Widerstand

Gast #703466
Lesenswert?

Hier eine kleine Möglichkeit, die Temperatur anhand des gemessenen 
Widerstandes zu berechnen (Platin-Temperaturkoeffizienten):
1
/* Diesen Block am Anfang global initialisieren.
2
double const A = 3.9083E-3;
3
double const B = -5.775E-7;
4
double const C = -4.183E-12;
5
double const R0 = 100;          // Widerstand bei 0°C
6
double T = 0;                   // Temperatur bei 0°C
7
*/
8

9
double PT100_Temp (double R)  // Temperaturberechnung -30 .. 500°C ausreichend genau
10
{
11
  T = ((-A*R0)+(sqrt(((A*R0)*(A*R0))-(4*B*R0*(R0-R)))))/(2*B*R0);
12
  return T;
13
}

Zwischen -30°C und 400°C ist die Berechnung ausreichend genau, obwohl 
die DIN IEC 751 nur Temperaturen >0°C zulässt.

Ist ein bischen 'Krieg der Klammern' geworden, aber der Compiler 
optimiert die Rechenzeit auf 2.5µs @ 16MHz.

Für Verbesserungen bin ich jederzeit dankbar.
Gast #703675
Lesenswert?

Welchen denn? Das Teil ist in meinem Regler integriert, ohne weitere 
Includes krieg' ich das nicht auseinandergefieselt.

Lass' es doch einfach über den Debugger im AVR-Studio laufen, die 
Stoppuhr zeigt dir die Zeit korrekt an!

mfg
Gast #703679
Lesenswert?

Vielleicht hilft das weiter:
Quelltext:
1
#include <avr/io.h>
2
#include <math.h>
3

4

5
double const A = 3.9083E-3;
6
double const B = -5.775E-7;
7
double const C = -4.183E-12;
8
double const R0 = 100;          // Widerstand bei 0°C
9
double T = 0;                   // Temperatur bei 0°C
10
double Dummy = 0;
11

12

13
double PT100_Temp (double R)    // Temperaturberechnung -30 .. 500°C ausreichend genau
14
{
15
  T = ((-A*R0)+(sqrt(((A*R0)*(A*R0))-(4*B*R0*(R0-R)))))/(2*B*R0);
16
  return T;
17
}  
18

19
int main (void)
20
{
21

22
Dummy = PT100_Temp (109);
23

24
for (;;)
25
  {
26
  
27
  }
28
}
und das compilierte Hex-File als Anhang.
Angehängte Dateien:
#703845
Lesenswert?

THM wrote:
> Muss mich korrigieren, die Rechenzeit beträgt 1.38µs @ 16MHz.

Wohl eher 1.38 ms
Zumindest bewegt sich auf meinem Debugger die Zeit in diesem
Bereich. Was bei knapp 16000 verbrauchten Taktzyklen auch nicht
weiter verwunderlich ist.
Wurzel berechnen kostet nun mal seine Zeit.
#703847
Lesenswert?

Weiß gerade einer aus dem Stehgreif, wie der Compiler die Wurzel 
umsetzt? Das einzige Verfahren, das mir spontan einfällt ist das 
Heron-Verfahren und das braucht eine Division pro Approximationszyklus - 
und die muss auch erstmal dem Mega32 beigebracht werden...

Ich hätt's wahrscheinlich eher als Wertetabelle mit linearer 
Interpolation umgesetzt - oder kubisch, wenn's zu ungenau würde.

Können ja 'nen Contest draus machen, wer die schnellste Implementierung 
hinkriegt ;)=
(Macht natürlich nur Sinn, wenn die aktuelle Messlatte wirklich bei 
16000 liegt)
Gast #703859
Lesenswert?

So, hab's nochmal extra getestet: komme auf 242.94µs.

So langsam glaube ich dem Debugger nix mehr! :(
Hat mich ehrlich gesagt auch gewundert, dass das Teil so schnell war ;)
1
#include <stdio.h>
2
#include <math.h>
3
#include <avr/io.h>
4

5

6
double const A = 3.9083E-3;
7
double const B = -5.775E-7;
8
double const C = -4.183E-12;
9
double const R0 = 100;          // Widerstand bei 0°C
10
double T = 0;                   // Temperatur bei 0°C
11
double Dummy = 0;
12

13

14
double PT100_Temp (double R)    // Temperaturberechnung -30 .. 500°C ausreichend genau
15
{
16
  T = ((-A*R0)+(sqrt(((A*R0)*(A*R0))-(4*B*R0*(R0-R)))))/(2*B*R0);
17
  return T;
18
}  
19

20
int main (void)
21
{
22

23
Dummy = PT100_Temp (109);
24
Dummy = 0;
25
for (;;)
26
  {
27
  }
28
return 0;
29
}
#703872
Lesenswert?

mehrere messungen in einer Schleife laufen lassen und die Ergebnisse 
über RS232 an PC senden und speichern. Und Uhrzeit jede sek. übertragen. 
Aus dem Abzählen der Übertragungen zwischen den Sekunden kann man die 
Rechenzeit berechnen. Das geht allerdings nur, wenn der RS232 keinen 
Engpaß darstellt.
Aber zwischen 2 µs und 230µs ist schon ein Riesenunterschied und man 
sollte auch die Glaubhaftigkeit anhand der Assemblerliste überprüfen. 
Deshalb hatte ich ja danach gefragt.

mfg
#704307
Lesenswert?

> Double reicht dafür dicke.

Dafür reichen normalerweise auch die (32-bit) floats mit denen der avr 
rechnet.

> Die Genauigkeit bezieht sich auf den berechneten Widerstand, bei 400°C
> sind das ca. 0.3°C Abweichung. Meines erachtens noch tolerierbar.

Da müsste auch mit floats ein Fehler << 0.1 K rauskommen.
Allerdings sollte man sich auch nicht auf jede Tabelle verlassen!
Mal sinds 247.038 Ohm, mal 247.07 Ohm oder 247.092 Ohm bei 400 °C.
(247.092 Ohm sollte man mit der Standardformel bei 400 °C rausbekommen)
1
    // simple Look-up-Tabelle
2
    // Fehler sind afair +-0.05 °C 
3
    ushort PT100Pos[150 + 1];
4
    ushort PT100Neg[40];
5

6
    // ohm = Widerstand * 100
7
    // Ergebnis = Temperatur in °C * 100
8
    int R2Temp(int ohm) {
9
        int r100 = ohm / 100;
10
        int r100rem = ohm - r100 * 100;
11
        int r1, r2;
12
        int r3;        
13
        if (ohm >= 10000) {
14
            r1 = PT100Pos[r100 - 100];
15
            r2 = PT100Pos[r100 - 100 + 1];
16
        } else {
17
            r1 = PT100Neg[100 - r100];
18
            r2 = PT100Neg[100 - r100 + 1];
19
        }
20
        r3 = (r2 - r1) * r100rem;
21
         
22
        return r1 + r3 / 100;
23
    }
24

25
    // Tabellenerzeugung
26
    for (int res = 100; res < 250 + 1; res += 1) {
27
        PT100Pos[res - 100] = (ushort)(RTDOhmToTemp(100.0, res) * 100.0);
28
    }
29
    for (int res = 100; res > 60; res -= 1) {
30
        PT100Neg[100 - res] = (ushort)(-RTDOhmToTemp(100.0, res) * 100.0);
31
    }

247.092 Ohm
http://grundpraktikum.physik.uni-saarland.de/scripts/Platin_Widerstandsthermometer.pdf
247.04 Ohm
http://www.temp-web.de/cms/front_content.php?idcat=214
#704615
Lesenswert?

Kommt davon wenn man sowas aus dem Kopf postet...
Also noch mal das ganze
1
// int = 32-Bit 
2
// short = 16-Bit
3
// Tabellenerzeugung
4
void CreateTableUShort(void) {
5
    for (int res = 100; res < 250 + 1; res += 1) {
6
        PT100Pos[res - 100] = (ushort)(RTDOhmToTemp(100.0, res) * 100.0);
7
    }
8
    for (int res = 100; res > 60; res -= 1) {
9
        PT100Neg[100 - res] = (ushort)(-RTDOhmToTemp(100.0, res) * 100.0);
10
    }
11
}
12

13
int R2TempUS(ushort res) {
14
    ushort r100 = res / 100;
15
    ushort r100rem = res - r100 * 100;
16
    ushort r1, r2;
17
    int r3;
18
    if (res >= 10000) {
19
        r1 = PT100PosUS[r100 - 100];
20
        r2 = PT100PosUS[r100 - 100 + 1];
21
        r3 = (r2 - r1) * r100rem;
22
        return r1 + r3 / 100;
23
    } else {
24
        r1 = PT100NegUS[100 - r100];
25
        r2 = PT100NegUS[100 - r100 - 1];
26
        r3 = (r2 - r1) * r100rem;
27
        return -(r1 + r3 / 100);
28
    }
29
}
30

31

32
// Variante bis ~320 °C und signed short
33
void CreateTableShort(void) {
34
    for (int res = 100; res < 220 + 1; res += 1) {
35
        PT100PosS[res - 100] = (short)(RTDOhmToTemp(100.0, res) * 100.0);
36
    }
37
    for (int res = 100; res > 60; res -= 1) {
38
        PT100NegS[100 - res] = (short)(RTDOhmToTemp(100.0, res) * 100.0);
39
    }
40
}
41

42
short R2TempS(short res) {
43
    short r100 = res / 100;
44
    short r100rem = res - r100 * 100;
45
    short r1, r2;
46
    short r3;
47
    if (res >= 10000) {
48
        r1 = PT100PosS[r100 - 100];
49
        r2 = PT100PosS[r100 - 100 + 1];
50
    } else {
51
        r1 = PT100NegS[100 - r100];
52
        r2 = PT100NegS[100 - r100 - 1];
53
    }
54
    r3 = (r2 - r1) * r100rem;
55
           
56
    return r1 + r3 / 100;
57
}

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren