patch_ic24 #69
@ -890,23 +890,17 @@ sub setState {
|
|||||||
my $opened_ventils = 0;
|
my $opened_ventils = 0;
|
||||||
my $state_string = '';
|
my $state_string = '';
|
||||||
## calc bit wise 1 - 6 dec => 1 - 63 dec ( 11 1111 )
|
## calc bit wise 1 - 6 dec => 1 - 63 dec ( 11 1111 )
|
||||||
for (my $i = 1; $i < 7; $i++){
|
my @valves_connected = split(',', ReadingsVal( $name, 'ic24-valves_connected', ''));
|
||||||
|
|
||||||
|
|
||||||
|
for (@valves_connected){
|
||||||
$activ_watering = 0;
|
$activ_watering = 0;
|
||||||
my $zahl = ( ReadingsVal( $name, "watering-watering_timer_".$i."_duration", 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms ) ? ($i -1) : 0;
|
my $zahl = ( ReadingsVal( $name, "watering-watering_timer_".$_."_duration", 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms ) ? $_ : 0;
|
||||||
$activ_watering = $i if ( $zahl > 0 );
|
$activ_watering = $_ if ( $zahl > 0 );
|
||||||
$opened_ventils=$opened_ventils+(2**$zahl) if ( $zahl > 0 );
|
$opened_ventils=$opened_ventils+(2**$zahl) if ( $zahl > 0 );
|
||||||
Log3 $name, 3, "[DEBUG] - GardenaSmartDevice ($name) / watering-watering_timer_".$i."_duration - wasser timer($i) =-1 ( $zahl ) : $opened_ventils";
|
Log3 $name, 3, "[DEBUG] - GardenaSmartDevice ($name) / watering-watering_timer_".$_."_duration - wasser timer($_) =-1 ( $zahl ) : $opened_ventils";
|
||||||
|
|
||||||
|
|
||||||
# $activ_watering = 1 if ( ReadingsVal( $name, 'watering-watering_timer_1_duration', 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms );
|
|
||||||
# $activ_watering = 2 if ( ReadingsVal( $name, 'watering-watering_timer_2_duration', 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms );
|
|
||||||
# $activ_watering = 3 if ( ReadingsVal( $name, 'watering-watering_timer_3_duration', 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms );
|
|
||||||
# $activ_watering = 4 if ( ReadingsVal( $name, 'watering-watering_timer_4_duration', 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms );
|
|
||||||
# $activ_watering = 5 if ( ReadingsVal( $name, 'watering-watering_timer_5_duration', 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms );
|
|
||||||
# $activ_watering = 6 if ( ReadingsVal( $name, 'watering-watering_timer_6_duration', 0 ) =~ m{\A[1-9]([0-9]+)?\z}xms );
|
|
||||||
# Log3 $name, 3, "[DEBUG] - GardenaSmartDevice ($name) - wasser timer: $activ_watering";
|
|
||||||
# ### eventuell auf binare bits und shiften
|
# ### eventuell auf binare bits und shiften
|
||||||
|
|
||||||
$state_string .= $activ_watering > 0
|
$state_string .= $activ_watering > 0
|
||||||
# offen
|
# offen
|
||||||
?
|
?
|
||||||
|
@ -1,2 +1,2 @@
|
|||||||
UPD 2022-05-28_13:13:38 49520 FHEM/73_GardenaSmartBridge.pm
|
UPD 2022-05-28_13:13:38 49520 FHEM/73_GardenaSmartBridge.pm
|
||||||
UPD 2022-05-31_15:40:11 66362 FHEM/74_GardenaSmartDevice.pm
|
UPD 2022-05-31_19:47:33 65578 FHEM/74_GardenaSmartDevice.pm
|
||||||
|
Loading…
x
Reference in New Issue
Block a user