patch_ic24 #69
@ -886,13 +886,13 @@ sub setState {
|
||||
if ( AttrVal( $name, 'model', 'unknown' ) eq 'ic24' ){
|
||||
my @ic24opened_ventils;
|
||||
my $state_string = ''; my $nearst_irrigation = '2999-12-12 24:00';
|
||||
my $has_scheduling = false;
|
||||
my $has_scheduling = 0;
|
||||
my @valves_connected = split(',', ReadingsVal( $name, 'ic24-valves_connected', ''));
|
||||
for (@valves_connected){
|
||||
## add to opened ventils, if watering active
|
||||
push @ic24opened_ventils, $_ if ( ( ( ReadingsVal( $name, "watering-watering_timer_".$_."_duration", 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms ) ? $_ : 0 ) > 0 );
|
||||
## find nearst timestamp
|
||||
$has_scheduling = true if ( ReadingsVal($name, 'scheduling-schedules_paused_until_'.$_ , '') ne '2038-01-18T00:00:00.000Z');
|
||||
$has_scheduling = 1 if ( ReadingsVal($name, 'scheduling-schedules_paused_until_'.$_ , '') ne '2038-01-18T00:00:00.000Z');
|
||||
|
||||
if ( ReadingsVal($name, 'scheduling-scheduled_watering_next_start_'.$_, '') ne '') {
|
||||
$nearst_irrigation = ReadingsVal($name, 'scheduling-scheduled_watering_next_start_'.$_, '') if ( Time::Piece->strptime( ReadingsVal($name, 'scheduling-scheduled_watering_next_start_'.$_, ''), "%Y-%m-%d %H:%M") < Time::Piece->strptime( $nearst_irrigation, "%Y-%m-%d %H:%M"))
|
||||
|
@ -1,2 +1,2 @@
|
||||
UPD 2022-05-28_13:13:38 49520 FHEM/73_GardenaSmartBridge.pm
|
||||
UPD 2022-06-10_20:24:37 66965 FHEM/74_GardenaSmartDevice.pm
|
||||
UPD 2022-06-10_20:26:59 66958 FHEM/74_GardenaSmartDevice.pm
|
||||
|
Loading…
x
Reference in New Issue
Block a user