Credits der Funkverbindung loggen

[ritchie]

Hallo Zusammen,

ich will den noch verfügbaren Funk Credit grafisch darstellen.

Dafür habe ich mir erst mal folgende Routinen erstellt.

#
# Log of the free/used credit
#
define HM_UsedCredit10ms  dummy
define MAX_UsedCredit10ms  dummy

define HM_internals at +*00:01:00 { evtReadingCredits();; }
attr HM_internals room events

define FileLog_UsedCredit FileLog /var/log/fhem/log/UsedCredit-%Y-%m.log HM_UsedCredit10ms*:.*|MAX_UsedCredit10ms*:.*
attr FileLog_UsedCredit logtype text
attr FileLog_UsedCredit room Logs

und da diese Routine in der my_util

sub  evtReadingCredits()
{
my $trafficStr;

  $trafficStr = ReadingsVal("CUL_0","credit10ms","0");
  fhem("set HM_UsedCredit10ms ".$trafficStr );

  $trafficStr = ReadingsVal("COC","credit10ms","0");
  fhem("set MAX_UsedCredit10ms ".$trafficStr );

  return ;
}

Eigentlich müssten die Vars "freeCredit10ms" heissen.

Nur steht derzeit immer 900 in der Variable. Kann das sein. Habe mir das nie so genau angesehen.
Ich habe aber schon ein paar Türsensoren, Temperatursensoren, Steckdosen, Lichtschalter und Thermostate in Betrieb.

Viele Grüße


R.