Anzahl Anwesender feststellen

[meddie]

Hallo Zusammen,

ich habe hier von Björn einen Auszug aus seinem Coder erhalten, den habe ich versucht an meine Umgebung anzupassen, aber bisher leider nicht erfolgreich.

Ich nutze das Roommate Modul für Anwesendheitserkennung. Nun möchte ich die Anzahl der Anwesenden feststellen, dazu habe ich einen Dummy sowie ein Notify erstellt:

Code Auswählen Erweitern



define AnzahlAnwesende dummy
attr AnzahlAnwesende readingList Zaehler
attr AnzahlAnwesende setList state Zaehler
attr AnzahlAnwesende userReadings Zaehler
define nt_AnzahlAnwesende notify (rr_Mate1|rr_Mate2|rr_Mate3|rr_Mate4) {\ my $bisherigeAnwesende = ReadingsVal("AnzahlAnwesende",$NAME,0);;\ my $Wert=ReadingsVal("AnzahlAnwesende","Zaehler",0);;\ if($EVENT eq "home" && $bisherigeAnwesende ne "home")\ {$Wert = $Wert+1;;\ fhem("setreading AnzahlAnwesende Zaehler $Wert");;\ fhem("setreading AnzahlAnwesende $NAME home");;\ fhem("set AnzahlAnwesende $Wert");;\ } \ elsif($EVENT eq "absent" && $bisherigeAnwesende ne "absent") \ {$Wert = $Wert-1;;\ fhem("setreading AnzahlAnwesende Zaehler $Wert");;\ fhem("set AnzahlAnwesende $Wert");;\ fhem("setreading AnzahlAnwesende $NAME absent");;\ }\ }



Könnt Ihr mal drüber schauen warum bei mir der Wert der Zähler nicht erhöht wird wenn sie der Status der einzelnen Roommates ändert.

Vielen Dank im Voraus

[CoolTux]

Code Auswählen Erweitern


     2016-12-08 08:24:15   residentsHome   2
     2016-12-08 08:24:15   residentsHomeDevs rr_Marko,rr_Nadin
     2016-12-08 08:24:15   residentsHomeNames Marko, Nadin


Aus dem Residents Modul

[meddie]

Warum so einfach wenn es auch komplizierter geht. Aber manchmal sieht man ja den Wald vor lauter Bäumen nicht
Vielen Dank! Mit Deiner Lösung ging es ja ganz einfach
Gruß Eddie