AbfallentsorgungBerlin BSR, ALBA und BerlinRecycling - neue Module

[mfeske]

Super Erklärung das hat für mich etwas Licht ins Dunkel gebracht auch wenn ich es alleine nicht zustande bekommen würde.
Ich muss also eigentlich nur den einen Block anpassen. Bei dem verstehe ich aber nicht woher der Raum Info kommt (hab ich jetzt beim machen gefunden) der bei mir Kalender wäre.
Auch nicht ganz klar um welche Uhrzeit die Nachricht kommt.

Code Auswählen Erweitern

my $display = join(", ",@morgen);;\
 my $pushmsg = 'Morgen: '.$display;;\
 fhem("attr -silent Abfall stateFormat <span style='color:#cc0000'>$display</span>");;\
 fhem("attr -silent Abfall room Kalender");;;;fhem("set pushmsg msg 🚮: $pushmsg");;\


[andies]

Ich habe diese Infos bei mir im Raum Info, du eben in Kalender. Ansonsten sieht das gut aus!

Du musst noch ein at definieren, das um 6 Uhr morgens Abfall aktualisiert. Erst dann ist das Ereignis da, welches die pushmsg usw auslöst. Ich löse das mit eine Modul von Peter A Henning, YAAHM. Sonst frage einfach ChatGPT, dass er dir ein at bastelt, das jeden Morgen 6 Uhr auslöst. Irgendwie so

Code Auswählen Erweitern

defmod AbfallAusloeser at *06:00:00 set Abfall update

[mfeske]

so habe fertig und bin gespannt ob es morgen funktioniert. Die at´s habe ich leider nicht in eins vereint bekommen.

Code Auswählen Erweitern

define Abfall BSR
attr Abfall addrKey 0490
attr Abfall comment HM = Hausmüll (Restmüll)\
BI = Biotonne\
WS = Wertstofftonne (Gelber Sack/Tonne)\
LT = Laubtonne (falls vorhanden)\
WB = Weihnachtsbaum
attr Abfall intervalDays 14
attr Abfall room Kalender

define Abfall_notify notify Abfall:next_BI:.* {\
use POSIX qw(strftime);;\
\
my $today    = strftime("%Y-%m-%d", localtime(time));;\
my $tomorrow = strftime("%Y-%m-%d", localtime(time + 86400));;\
\
my @cats  = ('HM','BI','WS','LT','WB');;\
my %names = (\
  HM => "Hausmüll",\
  BI => "Biotonne",\
  WS => "Wertstofftonne",\
  LT => "Laubtonne",\
  WB => "Weihnachtsbaum"\
);;\
\
my (@heute, @morgen);;\
\
foreach my $c (@cats) {\
  my $v = ReadingsVal("Abfall","next_$c","");;\
  push @heute,  $names{$c} if $v eq $today;;\
  push @morgen, $names{$c} if $v eq $tomorrow;;\
}\
\

if (@heute) {\
  my $display = join(", ", @heute);;\
  my $pushmsg = "Heute: $display";;\
  fhem("attr -silent Abfall stateFormat <span style='color:#00aa00'>$display</span>");;\
  fhem("attr -silent Abfall room Kalender");;\
  fhem("set pushmsg msg 🚮 $pushmsg");;\
}\
\

elsif (@morgen) {\
  my $display = join(", ", @morgen);;\
  my $pushmsg = "Morgen: $display";;\
  fhem("attr -silent Abfall stateFormat <span style='color:#cc0000'>$display</span>");;\
  fhem("attr -silent Abfall room Kalender");;\
  fhem("set pushmsg msg 🚮 $pushmsg");;\
}\
\

else {\
  fhem("attr -silent Abfall stateFormat -");;\
  fhem("deleteattr -silent Abfall room");;\
}\
}\

attr Abfall_notify event-min-interval .*:7200
attr Abfall_notify room Kalender
define Abfall_at_06 at *06:00 set Abfall update
attr Abfall_at_06 room Kalender
attr Abfall_at_06 verbose 0
define Abfall_at_18 at *18:00 set Abfall update
attr Abfall_at_18 room Kalender
attr Abfall_at_18 verbose 0