Na sleep benutze ich ungern.
Hier das Notify:
fl_iButton_blau:.* {
if ($EVENT eq "present: 1") {
fhem "set Android_Terminal ttsSay Hallo Daniel";
my $gpio = CommandGet("","az_OW_LCD1 gpio");
$gpio = substr($gpio,19,2);
$gpio = switchBit($gpio,1,0);
$gpio = switchBit($gpio,2,1);
fhem( "set az_OW_LCD1 gpio $gpio" );
fhem "set az_OW_LCD1 line 1 ********************";
fhem "set az_OW_LCD1 line 2 *** Hallo Daniel ***";
fhem "set az_OW_LCD1 line 3 ********************";
fhem ("define Alarm_LCD_CLEAR_Line_1 at +00:00:10 set az_OW_LCD1 line 1 ");
fhem ("define Alarm_LCD_CLEAR_Line_2 at +00:00:10 set az_OW_LCD1 line 2 ");
fhem ("define Alarm_LCD_CLEAR_Line_3 at +00:00:10 set az_OW_LCD1 line 3 ");
}
if ($EVENT eq "present: 0") {
fhem "set Android_Terminal ttsSay Tschüss Daniel";
my $Meldungen = "";
if (ReadingsVal("bz_Fenster","state","unkown") eq "open") {
$Meldungen = $Meldungen . "Bad ";
}
if (ReadingsVal("wz_Fenster","state","unkown") eq "open" or ReadingsVal("wz_Fenster","state","unkown") eq "tilted") {
$Meldungen = $Meldungen . "WZ ";
}
if (ReadingsVal("sz_Fenster","state","unkown") eq "open" or ReadingsVal("sz_Fenster","state","unkown") eq "tilted") {
$Meldungen = $Meldungen . "SZ ";
}
fhem "set az_OW_LCD1 line 1 Tschüs Daniel";
if ($Meldungen eq "") {
fhem "set az_OW_LCD1 line 2 Alle Fenster zu!";
fhem "set az_OW_LCD1 line 3 keine Meldungen";
}
else {
fhem "set Android_Terminal ttsSay Achtung, es sind noch Fenster geöffnet";
fhem "set az_OW_LCD1 line 2 Fenster offen im:";
fhem "set az_OW_LCD1 line 3 $Meldungen";
}
fhem ("define Alarm_LCD_CLEAR_Line_1 at +00:00:10 set az_OW_LCD1 line 1 ");
fhem ("define Alarm_LCD_CLEAR_Line_2 at +00:00:10 set az_OW_LCD1 line 2 ");
fhem ("define Alarm_LCD_CLEAR_Line_3 at +00:00:10 set az_OW_LCD1 line 3 ");
}
if ($EVENT eq "present: 0" and ReadingsVal("fl_iButton_gelb","present","unkown") eq "0") {
my $gpio = CommandGet("","az_OW_LCD1 gpio");
$gpio = substr($gpio,19,2);
$gpio = switchBit($gpio,1,1);
$gpio = switchBit($gpio,2,0);
fhem( "set az_OW_LCD1 gpio $gpio" );
}
}