Reading Format ändern

[choetzu]

Hallo,

Mein PoolController übermittelt die Pooltemperatur als Readingwert immer mit einer Zahl und einem C dahinter, also z.B. 4,5 C. Ich möchte gerne das C aus dem Reading entfernen. Macht man das mit dem attr StateFormat? oder UserReading?

Danke für die Hilfe.

Lg C

[CoolTux]

Am besten mit userReading machen. Hierfür kannst du ReadingsNum nehmen.

[chrille76]

Hab die Frage auch gerade gestellt.

https://forum.fhem.de/index.php/topic,68431.0.html

[choetzu]

Guten Morgen,
Danke.

Leider gehen beide nicht.

Wenn ich als UserReadings

Code Auswählen Erweitern

(split(/ /,Pool))[0] mache, erscheint weiterhin 4.5 C

Auch bei UserReadings

Code Auswählen Erweitern

ReadingNum(Pool) passiert nix.

Mach ich was falsch?

[betateilchen]

falsche Syntax in beiden Fällen.

[CoolTux]

In der Commandref findest Du unter Perl Specials einen Hinweis darauf wie man die Funktion ReadingsNum verwendet.

[betateilchen]

und in jeder perl Grundlagendoku steht, wie man "split" richtig benutzt. Das ist nix FHEM spezifisches.

[choetzu]

Danke für die Hinweise.. Ich komme der Sache näher, es wird wärmer

In der Commandref findest Du unter Perl Specials einen Hinweis darauf wie man die Funktion ReadingsNum verwendet.

Danke. im Commandref steht:

ReadingsVal(<devicename>,<reading>,<defaultvalue>)
Gibt den Inhalt der "readings" zurück (den Inhalt der in dem "Readings"-Abschnitt von "list device" angezeigt wird)

ReadingsNum(<devicename>,<reading>,<defaultvalue>)
Wie ReadingsVal, löscht aber alles, was kein Zahl ist, um den Wert bei Berechnungen verwenden zu können.

soweit eigentlich klar. Bis auf <defaultvalue>. Was muss man da eingeben? Ich will ja die Temperatur als absolute Zahl. Da gibt es doch kein defaultvalue. Leider ist das dort auch nicht beschrieben.

Was bedeutet "Gibt den Inhalt des "readings" zurück? Wo zurück? Ins reading selbst?

und in jeder perl Grundlagendoku steht, wie man "split" richtig benutzt. Das ist nix FHEM spezifisches.

Auch hier habe ich was für Anfänger einfaches gefunden..

Code Auswählen Erweitern

split()
Hiermit kann eine Zeichenkette an bestimmten Stellen aufgetrennt werden. Die jeweilige Trennstelle gibt ein Suchmuster im ersten Argument an (siehe Regula ̈re Ausdru ̈cke).

#!/usr/local/bin/perl -w
use strict;
my $zeile = join('-','a','b','c','d');
print $zeile."\n";


#!/usr/local/bin/perl -w
use strict;
my $zeile = "a-b-c-d";
my @a = split(/-/,$zeile);     # Anzahl der Elemente
print "@a\n";

abcd
Um die Anzahl der Teilstrings zu begrenzen, kann als drittes Argument noch eine Zahl angegeben werden, die die maximale Anzahl der gebildeten Stu ̈cke darstellt.
#!/usr/local/bin/perl -w
use strict;
my $zeile = "a-b-c-d";
my @a = split(/-/,$zeile,2);
print "@a\n";

a b-c-d

somit sollte der code m.E. im UserReading

Code Auswählen Erweitern

(split(/C/,Pool))[0]
stehen. Wofür aber das

Code Auswählen Erweitern

[0] steht, erschliesst sich mir nicht in der Doku. Und leider funktioniert es auch nicht.

bin ich auf dem richtigen Weg?

[CoolTux]

Danke für die Hinweise.. Ich komme der Sache näher, es wird wärmer

Danke. im Commandref steht:
soweit eigentlich klar. Bis auf <defaultvalue>. Was muss man da eingeben? Ich will ja die Temperatur als absolute Zahl. Da gibt es doch kein defaultvalue. Leider ist das dort auch nicht beschrieben.

Was bedeutet "Gibt den Inhalt des "readings" zurück? Wo zurück? Ins reading selbst?


Auch hier habe ich was für Anfänger einfaches gefunden..

Code Auswählen Erweitern

split()
Hiermit kann eine Zeichenkette an bestimmten Stellen aufgetrennt werden. Die jeweilige Trennstelle gibt ein Suchmuster im ersten Argument an (siehe Regula ̈re Ausdru ̈cke).

#!/usr/local/bin/perl -w
use strict;
my $zeile = join('-','a','b','c','d');
print $zeile."\n";


#!/usr/local/bin/perl -w
use strict;
my $zeile = "a-b-c-d";
my @a = split(/-/,$zeile);     # Anzahl der Elemente
print "@a\n";

abcd
Um die Anzahl der Teilstrings zu begrenzen, kann als drittes Argument noch eine Zahl angegeben werden, die die maximale Anzahl der gebildeten Stu ̈cke darstellt.
#!/usr/local/bin/perl -w
use strict;
my $zeile = "a-b-c-d";
my @a = split(/-/,$zeile,2);
print "@a\n";

a b-c-d

somit sollte der code m.E. im UserReading

Code Auswählen Erweitern

(split(/C/,Pool))[0]
stehen. Wofür aber das

Code Auswählen Erweitern

[0] steht, erschliesst sich mir nicht in der Doku. Und leider funktioniert es auch nicht.

bin ich auf dem richtigen Weg?

Defaultvalue gibt an was genommen werden soll wenn das Reading nicht gelesen werden soll.
Da müsste eigentlich stehen liest aus und nicht gibt zurück

Code Auswählen Erweitern


{ ReadingsNum("Device","Reading","Hoelle") }

Gib das mal in die cmd Line oben im FHEM Web ein und passe Device und Reading an. Dann sollte der Wert des Readings ausgegeben werden. Das Beispiel geht natürlich nur wenn auch wenigstens eine Zahl im Reading steht.

Hier ist die offizielle Doku zu Split
http://perldoc.perl.org/functions/split.html

Desweiteren gibt du in Google ein
perl split only first element

Und dann fügst du alles zusammen.



Grüße

[choetzu]

Code Auswählen Erweitern


{ ReadingsNum("Device","Reading","Hoelle") }

Gib das mal in die cmd Line oben im FHEM Web ein und passe Device und Reading an. Dann sollte der Wert des Readings ausgegeben werden. Das Beispiel geht natürlich nur wenn auch wenigstens eine Zahl im Reading steht.

Hier ist die offizielle Doku zu Split
http://perldoc.perl.org/functions/split.html

Desweiteren gibt du in Google ein
perl split only first element

Und dann fügst du alles zusammen.

Grüße

hallo,

herzlichen Dank. ReadingNum hat funktioniert. Es gibt den richtigen Wert aus.. Super, danke. Aber wie spiele ich nun diesen Wert zurück in das entsprechende Reading

mit

Code Auswählen Erweitern

attr PoolController userReadings Pool { ReadingsNum("PoolController","Pool","default") } geht das nicht..

Und hinsichtlich Perl-Split habe ich mich da nun ca. 1 Std damit befasst.. Ich komme vermutlich nicht drum herum mich grundsätzlich mit perl auseinander zu setzen... Das klingt noch sehr spanisch mit den variablen und den verschiedenen Platzhaltern... Aber heute ist ein guter Tag um etwas tiefer in die Materie zu gucken..

[CoolTux]

Zurück spielen kann man nicht. Mit userReading erzeugt Du ein neues Reading.

Code Auswählen Erweitern


attr PoolController userReadings numPool { ReadingsNum("PoolController","Pool","none") }


So sollte es gehen. Komme aber gerade aus dem Mittagsschlaf und mein Kurzer hüpft auf meinen Bauch Rum, also ohne Gewähr.

[choetzu]

perfekt, das wars.. Ich musste ein neues Reading generieren. Das macht Sinn..

Danke für deine Hilfestellung..

Viel Spass mit den Bauchübungen, du kannst es ja aushalten mit deiner Muskelkonstellation

[CoolTux]

perfekt, das wars.. Ich musste ein neues Reading generieren. Das macht Sinn..

Danke für deine Hilfestellung..

Viel Spass mit den Bauchübungen, du kannst es ja aushalten mit deiner Muskelkonstellation

Du kannst den Devicenamen PoolController noch gegen $name ohne Anführungszeichen ändern da Du ja aus dem selben Device list.

Das mit den Muskeln ist leider schon 3 Jahre her. Wenn du kleine Kinder hast fehlt Dir die Zeit für sowas. Ist schade, aber die Kleinen sind es wert. In paar Jahren komme ich bestimmt wieder zum trainieren.


Grüße

[andies]

Darf ich mir hier noch einmal hineinhängen? Bei mir klappte

Code Auswählen Erweitern

userReadings power_no { ReadingsNum($name,"power",0)}
wobei (analog oben) das Reading "power" den Eintrag "120 W" hatte. Wäre es auch gegangen, den Wert des Readings in ein Attribut einzulesen, auch wenn dabei der Zeitstempel verloren geht? Mir gelang nicht wirklich so etwas wie

Code Auswählen Erweitern

userattr power_no { ReadingsNum($name,"power",0)}
und gibt es eine Begründung, warum man das nicht tun soll oder tun kann?

[CoolTux]

Nein das kann auch nicht gehen. Alleine schon wenn Du Dir an liest was userattr eigentlich genau macht.
Es gibt Dir die Möglichkeit eigene Attribute in die Attribute Liste hinzufügen.
Man kann aus einer 99_myUtils Sub heraus ein Userattribut befüllen, hat aber das Problem das man die Änderung jedesmal speichern muß, ist also irgendwie die doof.