diff --git a/fhem/FHEM/76_SMAInverter.pm b/fhem/FHEM/76_SMAInverter.pm index 4cee99224..5c3eb710d 100644 --- a/fhem/FHEM/76_SMAInverter.pm +++ b/fhem/FHEM/76_SMAInverter.pm @@ -32,7 +32,10 @@ eval "use FHEM::Meta;1" or my $modMetaAbsent = 1; # Versions History by DS_Starter our %SMAInverter_vNotesIntern = ( - "2.15.0" => "14.06.2021 MadMax: SBS5.0-10, SBS6.0-10 read battery data included ", + "2.16.1" => "21.06.2021 MadMax: hide unavailable data", + "2.16.0" => "21.06.2021 MadMax: AC Voltage and AC Curren read fixed, read CosPhi included ", + "2.15.1" => "18.06.2021 MadMax: SBS1.5, SBS2.0, SBS2.5 read battery data included ", + "2.15.0" => "14.06.2021 MadMax: SBS5.0-10, SBS6.0-10, SBS3.7-10 read battery data included ", "2.14.2" => "02.06.2021 new inverter type 9359=SBS6.0-10 ", "2.14.1" => "27.02.2021 change save .etotal_yesterday, Forum: https://forum.fhem.de/index.php/topic,56080.msg1134664.html#msg1134664 ", "2.14.0" => "08.10.2019 readings bat_loadtotal (BAT_LOADTOTAL), bat_loadtoday (BAT_LOADTODAY) included by 300P, Forum: #topic,56080.msg986302.html#msg986302", @@ -109,6 +112,9 @@ our %SMAInverter_vNotesIntern = ( # $inv_SPOT_UAC1 # Grid voltage phase L1 # $inv_SPOT_UAC2 # Grid voltage phase L2 # $inv_SPOT_UAC3 # Grid voltage phase L3 +# $inv_SPOT_UAC1_2 # Grid voltage phase L1 - L2 +# $inv_SPOT_UAC2_3 # Grid voltage phase L2 - L3 +# $inv_SPOT_UAC3_1 # Grid voltage phase L3 - L1 # $inv_SPOT_IAC1 # Grid current phase L1 # $inv_SPOT_IAC2 # Grid current phase L2 # $inv_SPOT_IAC3 # Grid current phase L3 @@ -531,6 +537,7 @@ sub SMAInverter_getstatusDoParse($) { $sup_ChargeStatus, $sup_SpotDCVoltage, $sup_SpotACVoltage, + $sup_SpotACCurrent, $sup_BatteryInfo, $sup_BatteryInfo_2, #SBS(1.5|2.0|2.5) $sup_BatteryInfo_TEMP, @@ -556,7 +563,9 @@ sub SMAInverter_getstatusDoParse($) { $inv_SPOT_UDC1, $inv_SPOT_UDC2, $inv_SPOT_IDC1, $inv_SPOT_IDC2, $inv_SPOT_UAC1, $inv_SPOT_UAC2, $inv_SPOT_UAC3, + $inv_SPOT_UAC1_2, $inv_SPOT_UAC2_3, $inv_SPOT_UAC3_1, $inv_SPOT_IAC1, $inv_SPOT_IAC2, $inv_SPOT_IAC3, + $inv_SPOT_CosPhi, $inv_BAT_UDC, $inv_BAT_UDC_A, $inv_BAT_UDC_B, $inv_BAT_UDC_C, $inv_BAT_IDC, $inv_BAT_IDC_A, $inv_BAT_IDC_B, $inv_BAT_IDC_C, $inv_BAT_CYCLES, $inv_BAT_CYCLES_A, $inv_BAT_CYCLES_B, $inv_BAT_CYCLES_C, @@ -631,6 +640,7 @@ sub SMAInverter_getstatusDoParse($) { # Detail Level 1 or 2 >> get voltage and current levels push(@commands, "sup_SpotDCVoltage"); # Check SpotDCVoltage push(@commands, "sup_SpotACVoltage"); # Check SpotACVoltage + push(@commands, "sup_SpotACCurrent"); # Check SpotACCurrent if (ReadingsVal($name,"INV_TYPE","") =~ /SBS(6\.0|5\.0|3\.7)/xs || ReadingsVal($name,"device_type","") =~ /SBS(6\.0|5\.0|3\.7)/xs) { @@ -694,7 +704,11 @@ sub SMAInverter_getstatusDoParse($) { ($sup_SpotDCVoltage,$inv_SPOT_UDC1,$inv_SPOT_UDC2,$inv_SPOT_IDC1,$inv_SPOT_IDC2,$inv_susyid,$inv_serial) = SMAInverter_SMAcommand($hash, $hash->{HOST}, 0x53800200, 0x00451F00, 0x004521FF); } elsif ($i eq "sup_SpotACVoltage") { - ($sup_SpotACVoltage,$inv_SPOT_UAC1,$inv_SPOT_UAC2,$inv_SPOT_UAC3,$inv_SPOT_IAC1,$inv_SPOT_IAC2,$inv_SPOT_IAC3,$inv_susyid,$inv_serial) = SMAInverter_SMAcommand($hash, $hash->{HOST}, 0x51000200, 0x00464800, 0x004655FF); + ($sup_SpotACVoltage,$inv_SPOT_UAC1,$inv_SPOT_UAC2,$inv_SPOT_UAC3,$inv_SPOT_UAC1_2,$inv_SPOT_UAC2_3,$inv_SPOT_UAC3_1,$inv_SPOT_CosPhi,$inv_susyid,$inv_serial) = SMAInverter_SMAcommand($hash, $hash->{HOST}, 0x51000200, 0x00464800, 0x004656FF); + } + elsif ($i eq "sup_SpotACCurrent") { + Log3 $name, 5, "$name -> sup_SpotACCurrent"; + ($sup_SpotACCurrent,$inv_SPOT_IAC1,$inv_SPOT_IAC2,$inv_SPOT_IAC3,$inv_susyid,$inv_serial) = SMAInverter_SMAcommand($hash, $hash->{HOST}, 0x51000200, 0x00465300, 0x004655FF); } elsif ($i eq "sup_BatteryInfo_TEMP") { Log3 $name, 5, "$name -> sup_BatteryInfo_TEMP"; @@ -826,9 +840,9 @@ sub SMAInverter_getstatusDoParse($) { push(@row_array, "string_2_pdc ".sprintf("%.3f",$inv_SPOT_PDC2/1000)."\n"); } if($sup_SpotACPower) { - push(@row_array, "phase_1_pac ".sprintf("%.3f",$inv_SPOT_PAC1/1000)."\n"); - push(@row_array, "phase_2_pac ".sprintf("%.3f",$inv_SPOT_PAC2/1000)."\n"); - push(@row_array, "phase_3_pac ".sprintf("%.3f",$inv_SPOT_PAC3/1000)."\n"); + push(@row_array, "phase_1_pac ".sprintf("%.3f",$inv_SPOT_PAC1/1000)."\n") if ($inv_SPOT_PAC1 ne "-"); + push(@row_array, "phase_2_pac ".sprintf("%.3f",$inv_SPOT_PAC2/1000)."\n") if ($inv_SPOT_PAC2 ne "-"); + push(@row_array, "phase_3_pac ".sprintf("%.3f",$inv_SPOT_PAC3/1000)."\n") if ($inv_SPOT_PAC3 ne "-"); } if($sup_SpotACTotalPower) { push(@row_array, "total_pac ".sprintf("%.3f",$inv_SPOT_PACTOT/1000)."\n"); @@ -858,12 +872,18 @@ sub SMAInverter_getstatusDoParse($) { push(@row_array, "string_2_idc ".sprintf("%.3f",$inv_SPOT_IDC2)."\n"); } if($sup_SpotACVoltage) { - push(@row_array, "phase_1_uac ".sprintf("%.2f",$inv_SPOT_UAC1)."\n"); - push(@row_array, "phase_2_uac ".sprintf("%.2f",$inv_SPOT_UAC2)."\n"); - push(@row_array, "phase_3_uac ".sprintf("%.2f",$inv_SPOT_UAC3)."\n"); - push(@row_array, "phase_1_iac ".sprintf("%.3f",$inv_SPOT_IAC1)."\n"); - push(@row_array, "phase_2_iac ".sprintf("%.3f",$inv_SPOT_IAC2)."\n"); - push(@row_array, "phase_3_iac ".sprintf("%.3f",$inv_SPOT_IAC3)."\n"); + push(@row_array, "phase_1_uac ".sprintf("%.2f",$inv_SPOT_UAC1)."\n") if ($inv_SPOT_UAC1 ne "-"); + push(@row_array, "phase_2_uac ".sprintf("%.2f",$inv_SPOT_UAC2)."\n") if ($inv_SPOT_UAC2 ne "-"); + push(@row_array, "phase_3_uac ".sprintf("%.2f",$inv_SPOT_UAC3)."\n") if ($inv_SPOT_UAC3 ne "-"); + push(@row_array, "phase_1_2_uac ".sprintf("%.3f",$inv_SPOT_UAC1_2)."\n") if ($inv_SPOT_UAC1_2 ne "-"); + push(@row_array, "phase_2_3_uac ".sprintf("%.3f",$inv_SPOT_UAC2_3)."\n") if ($inv_SPOT_UAC2_3 ne "-"); + push(@row_array, "phase_3_1_uac ".sprintf("%.3f",$inv_SPOT_UAC3_1)."\n") if ($inv_SPOT_UAC3_1 ne "-"); + push(@row_array, "cosphi ".sprintf("%.3f",$inv_SPOT_CosPhi)."\n") if ($inv_SPOT_CosPhi ne "-"); + } + if($sup_SpotACCurrent) { + push(@row_array, "phase_1_iac ".sprintf("%.2f",$inv_SPOT_IAC1)."\n") if ($inv_SPOT_IAC1 ne "-"); + push(@row_array, "phase_2_iac ".sprintf("%.2f",$inv_SPOT_IAC2)."\n") if ($inv_SPOT_IAC2 ne "-"); + push(@row_array, "phase_3_iac ".sprintf("%.2f",$inv_SPOT_IAC3)."\n") if ($inv_SPOT_IAC3 ne "-"); } if($sup_BatteryInfo || $sup_BatteryInfo_2) { push(@row_array, "bat_udc ".$inv_BAT_UDC."\n"); @@ -871,15 +891,15 @@ sub SMAInverter_getstatusDoParse($) { } if($sup_BatteryInfo_UDC) { push(@row_array, "bat_udc ".$inv_BAT_UDC."\n"); - push(@row_array, "bat_udc_a ".$inv_BAT_UDC_A."\n"); - push(@row_array, "bat_udc_b ".$inv_BAT_UDC_B."\n"); - push(@row_array, "bat_udc_c ".$inv_BAT_UDC_C."\n"); + push(@row_array, "bat_udc_a ".$inv_BAT_UDC_A."\n") if ($inv_BAT_UDC_A ne "-"); + push(@row_array, "bat_udc_b ".$inv_BAT_UDC_B."\n") if ($inv_BAT_UDC_B ne "-"); + push(@row_array, "bat_udc_c ".$inv_BAT_UDC_C."\n") if ($inv_BAT_UDC_C ne "-"); } if($sup_BatteryInfo_IDC) { push(@row_array, "bat_udc ".$inv_BAT_UDC."\n"); - push(@row_array, "bat_idc_a ".$inv_BAT_IDC_A."\n"); - push(@row_array, "bat_idc_b ".$inv_BAT_IDC_B."\n"); - push(@row_array, "bat_idc_c ".$inv_BAT_IDC_C."\n"); + push(@row_array, "bat_idc_a ".$inv_BAT_IDC_A."\n") if ($inv_BAT_IDC_A ne "-"); + push(@row_array, "bat_idc_b ".$inv_BAT_IDC_B."\n") if ($inv_BAT_IDC_B ne "-"); + push(@row_array, "bat_idc_c ".$inv_BAT_IDC_C."\n") if ($inv_BAT_IDC_C ne "-"); } if($sup_SpotBatteryLoad) { push(@row_array, "bat_loadtotal ".($inv_BAT_LOADTOTAL/1000)."\n"); @@ -897,9 +917,9 @@ sub SMAInverter_getstatusDoParse($) { } if($sup_BatteryInfo_TEMP) { push(@row_array, "bat_temp ".$inv_BAT_TEMP."\n"); - push(@row_array, "bat_temp_a ".$inv_BAT_TEMP_A."\n"); - push(@row_array, "bat_temp_b ".$inv_BAT_TEMP_B."\n"); - push(@row_array, "bat_temp_c ".$inv_BAT_TEMP_C."\n"); + push(@row_array, "bat_temp_a ".$inv_BAT_TEMP_A."\n") if ($inv_BAT_TEMP_A ne "-"); + push(@row_array, "bat_temp_b ".$inv_BAT_TEMP_B."\n") if ($inv_BAT_TEMP_B ne "-"); + push(@row_array, "bat_temp_c ".$inv_BAT_TEMP_C."\n") if ($inv_BAT_TEMP_C ne "-"); } if($sup_SpotGridFrequency) { push(@row_array, "grid_freq ".sprintf("%.2f",$inv_SPOT_FREQ)."\n"); @@ -945,9 +965,9 @@ sub SMAInverter_getstatusDoParse($) { push(@row_array, "SPOT_PDC2 ".$inv_SPOT_PDC2."\n"); } if($sup_SpotACPower) { - push(@row_array, "SPOT_PAC1 ".$inv_SPOT_PAC1."\n"); - push(@row_array, "SPOT_PAC2 ".$inv_SPOT_PAC2."\n"); - push(@row_array, "SPOT_PAC3 ".$inv_SPOT_PAC3."\n"); + push(@row_array, "SPOT_PAC1 ".$inv_SPOT_PAC1."\n") if ($inv_SPOT_PAC1 ne "-"); + push(@row_array, "SPOT_PAC2 ".$inv_SPOT_PAC2."\n") if ($inv_SPOT_PAC2 ne "-"); + push(@row_array, "SPOT_PAC3 ".$inv_SPOT_PAC3."\n") if ($inv_SPOT_PAC3 ne "-"); } if($sup_SpotACTotalPower) { push(@row_array, "SPOT_PACTOT ".$inv_SPOT_PACTOT."\n"); @@ -975,12 +995,18 @@ sub SMAInverter_getstatusDoParse($) { push(@row_array, "SPOT_IDC2 ".$inv_SPOT_IDC2."\n"); } if($sup_SpotACVoltage) { - push(@row_array, "SPOT_UAC1 ".$inv_SPOT_UAC1."\n"); - push(@row_array, "SPOT_UAC2 ".$inv_SPOT_UAC2."\n"); - push(@row_array, "SPOT_UAC3 ".$inv_SPOT_UAC3."\n"); - push(@row_array, "SPOT_IAC1 ".$inv_SPOT_IAC1."\n"); - push(@row_array, "SPOT_IAC2 ".$inv_SPOT_IAC2."\n"); - push(@row_array, "SPOT_IAC3 ".$inv_SPOT_IAC3."\n"); + push(@row_array, "SPOT_UAC1 ".$inv_SPOT_UAC1."\n") if ($inv_SPOT_UAC1 ne "-"); + push(@row_array, "SPOT_UAC2 ".$inv_SPOT_UAC2."\n") if ($inv_SPOT_UAC2 ne "-"); + push(@row_array, "SPOT_UAC3 ".$inv_SPOT_UAC3."\n") if ($inv_SPOT_UAC3 ne "-"); + push(@row_array, "SPOT_UAC1_2 ".sprintf("%.3f",$inv_SPOT_UAC1_2)."\n") if ($inv_SPOT_UAC1_2 ne "-"); + push(@row_array, "SPOT_UAC2_3 ".sprintf("%.3f",$inv_SPOT_UAC2_3)."\n") if ($inv_SPOT_UAC2_3 ne "-"); + push(@row_array, "SPOT_UAC3_1 ".sprintf("%.3f",$inv_SPOT_UAC3_1)."\n") if ($inv_SPOT_UAC3_1 ne "-"); + push(@row_array, "SPOT_CosPhi ".sprintf("%.3f",$inv_SPOT_CosPhi)."\n") if ($inv_SPOT_CosPhi ne "-"); + } + if($sup_SpotACCurrent) { + push(@row_array, "SPOT_IAC1 ".sprintf("%.2f",$inv_SPOT_IAC1)."\n") if ($inv_SPOT_IAC1 ne "-"); + push(@row_array, "SPOT_IAC2 ".sprintf("%.2f",$inv_SPOT_IAC2)."\n") if ($inv_SPOT_IAC2 ne "-"); + push(@row_array, "SPOT_IAC3 ".sprintf("%.2f",$inv_SPOT_IAC3)."\n") if ($inv_SPOT_IAC3 ne "-"); } if($sup_BatteryInfo || $sup_BatteryInfo_2) { push(@row_array, "BAT_UDC ". $inv_BAT_UDC."\n"); @@ -988,15 +1014,15 @@ sub SMAInverter_getstatusDoParse($) { } if($sup_BatteryInfo_UDC) { push(@row_array, "BAT_UDC ". $inv_BAT_UDC."\n"); - push(@row_array, "BAT_UDC_A ".$inv_BAT_UDC_A."\n"); - push(@row_array, "BAT_UDC_B ".$inv_BAT_UDC_B."\n"); - push(@row_array, "BAT_UDC_C ".$inv_BAT_UDC_C."\n"); + push(@row_array, "BAT_UDC_A ".$inv_BAT_UDC_A."\n") if ($inv_BAT_UDC_A ne "-"); + push(@row_array, "BAT_UDC_B ".$inv_BAT_UDC_B."\n") if ($inv_BAT_UDC_B ne "-"); + push(@row_array, "BAT_UDC_C ".$inv_BAT_UDC_C."\n") if ($inv_BAT_UDC_C ne "-"); } if($sup_BatteryInfo_IDC) { push(@row_array, "BAT_IDC ". $inv_BAT_IDC."\n"); - push(@row_array, "BAT_IDC_A ".$inv_BAT_IDC_A."\n"); - push(@row_array, "BAT_IDC_B ".$inv_BAT_IDC_B."\n"); - push(@row_array, "BAT_IDC_C ".$inv_BAT_IDC_C."\n"); + push(@row_array, "BAT_IDC_A ".$inv_BAT_IDC_A."\n") if ($inv_BAT_IDC_A ne "-"); + push(@row_array, "BAT_IDC_B ".$inv_BAT_IDC_B."\n") if ($inv_BAT_IDC_B ne "-"); + push(@row_array, "BAT_IDC_C ".$inv_BAT_IDC_C."\n") if ($inv_BAT_IDC_C ne "-"); } if($sup_SpotBatteryLoad) { push(@row_array, "BAT_LOADTOTAL ".$inv_BAT_LOADTOTAL."\n"); @@ -1014,9 +1040,9 @@ sub SMAInverter_getstatusDoParse($) { } if($sup_BatteryInfo_TEMP) { push(@row_array, "BAT_TEMP ". $inv_BAT_TEMP."\n"); - push(@row_array, "BAT_TEMP_A ".$inv_BAT_TEMP_A."\n"); - push(@row_array, "BAT_TEMP_B ".$inv_BAT_TEMP_B."\n"); - push(@row_array, "BAT_TEMP_C ".$inv_BAT_TEMP_C."\n"); + push(@row_array, "BAT_TEMP_A ".$inv_BAT_TEMP_A."\n") if ($inv_BAT_TEMP_A ne "-"); + push(@row_array, "BAT_TEMP_B ".$inv_BAT_TEMP_B."\n") if ($inv_BAT_TEMP_B ne "-"); + push(@row_array, "BAT_TEMP_C ".$inv_BAT_TEMP_C."\n") if ($inv_BAT_TEMP_C ne "-"); } if($sup_SpotGridFrequency) { push(@row_array, "SPOT_FREQ ".$inv_SPOT_FREQ."\n"); @@ -1179,7 +1205,9 @@ sub SMAInverter_SMAcommand($$$$$) { $inv_SPOT_UDC1, $inv_SPOT_UDC2, $inv_SPOT_IDC1, $inv_SPOT_IDC2, $inv_SPOT_UAC1, $inv_SPOT_UAC2, $inv_SPOT_UAC3, + $inv_SPOT_UAC1_2, $inv_SPOT_UAC2_3, $inv_SPOT_UAC3_1, $inv_SPOT_IAC1, $inv_SPOT_IAC2, $inv_SPOT_IAC3, + $inv_SPOT_CosPhi, $inv_BAT_UDC, $inv_BAT_UDC_A, $inv_BAT_UDC_B, $inv_BAT_UDC_C, $inv_BAT_IDC, $inv_BAT_IDC_A, $inv_BAT_IDC_B, $inv_BAT_IDC_C, $inv_BAT_CYCLES, $inv_BAT_CYCLES_A, $inv_BAT_CYCLES_B, $inv_BAT_CYCLES_C, @@ -1359,11 +1387,11 @@ sub SMAInverter_SMAcommand($$$$$) { if($data_ID eq 0x4640) { $inv_SPOT_PAC1 = unpack("l*", substr $data, 62, 4); - if($inv_SPOT_PAC1 eq -2147483648) {$inv_SPOT_PAC1 = 0; } # Catch 0x80000000 as 0 value + if($inv_SPOT_PAC1 eq -2147483648) {$inv_SPOT_PAC1 = "-"; } # Catch 0x80000000 as 0 value $inv_SPOT_PAC2 = unpack("l*", substr $data, 90, 4); - if($inv_SPOT_PAC2 eq -2147483648) {$inv_SPOT_PAC2 = 0; } # Catch 0x80000000 as 0 value + if($inv_SPOT_PAC2 eq -2147483648) {$inv_SPOT_PAC2 = "-"; } # Catch 0x80000000 as 0 value $inv_SPOT_PAC3 = unpack("l*", substr $data, 118, 4); - if($inv_SPOT_PAC3 eq -2147483648) {$inv_SPOT_PAC3 = 0; } # Catch 0x80000000 as 0 value + if($inv_SPOT_PAC3 eq -2147483648) {$inv_SPOT_PAC3 = "-"; } # Catch 0x80000000 as 0 value Log3 $name, 5, "$name - Found Data SPOT_PAC1=$inv_SPOT_PAC1 and SPOT_PAC2=$inv_SPOT_PAC2 and SPOT_PAC3=$inv_SPOT_PAC3"; return (1,$inv_SPOT_PAC1,$inv_SPOT_PAC2,$inv_SPOT_PAC3,$inv_susyid,$inv_serial); } @@ -1421,18 +1449,41 @@ sub SMAInverter_SMAcommand($$$$$) { $inv_SPOT_UAC1 = unpack("l*", substr $data, 62, 4); $inv_SPOT_UAC2 = unpack("l*", substr $data, 90, 4); $inv_SPOT_UAC3 = unpack("l*", substr $data, 118, 4); - $inv_SPOT_IAC1 = unpack("l*", substr $data, 146, 4); - $inv_SPOT_IAC2 = unpack("l*", substr $data, 174, 4); - $inv_SPOT_IAC3 = unpack("l*", substr $data, 202, 4); - if(($inv_SPOT_UAC1 eq -2147483648) || ($inv_SPOT_UAC1 eq 0xFFFFFFFF) || $inv_SPOT_UAC1 < 0) {$inv_SPOT_UAC1 = 0; } else {$inv_SPOT_UAC1 = $inv_SPOT_UAC1 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value - if(($inv_SPOT_UAC2 eq -2147483648) || ($inv_SPOT_UAC2 eq 0xFFFFFFFF) || $inv_SPOT_UAC2 < 0) {$inv_SPOT_UAC2 = 0; } else {$inv_SPOT_UAC2 = $inv_SPOT_UAC2 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value - if(($inv_SPOT_UAC3 eq -2147483648) || ($inv_SPOT_UAC3 eq 0xFFFFFFFF) || $inv_SPOT_UAC3 < 0) {$inv_SPOT_UAC3 = 0; } else {$inv_SPOT_UAC3 = $inv_SPOT_UAC3 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value - if(($inv_SPOT_IAC1 eq -2147483648) || ($inv_SPOT_IAC1 eq 0xFFFFFFFF)) {$inv_SPOT_IAC1 = 0; } else {$inv_SPOT_IAC1 = $inv_SPOT_IAC1 / 1000; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value - if(($inv_SPOT_IAC2 eq -2147483648) || ($inv_SPOT_IAC2 eq 0xFFFFFFFF)) {$inv_SPOT_IAC2 = 0; } else {$inv_SPOT_IAC2 = $inv_SPOT_IAC2 / 1000; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value - if(($inv_SPOT_IAC3 eq -2147483648) || ($inv_SPOT_IAC3 eq 0xFFFFFFFF)) {$inv_SPOT_IAC3 = 0; } else {$inv_SPOT_IAC3 = $inv_SPOT_IAC3 / 1000; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + $inv_SPOT_UAC1_2 = unpack("l*", substr $data, 146, 4); + $inv_SPOT_UAC2_3 = unpack("l*", substr $data, 174, 4); + $inv_SPOT_UAC3_1 = unpack("l*", substr $data, 202, 4); + + if($size >= 230) { + $inv_SPOT_CosPhi = unpack("l*", substr $data, 230, 4); + if(($inv_SPOT_CosPhi eq -2147483648) || ($inv_SPOT_CosPhi eq 0xFFFFFFFF)) {$inv_SPOT_CosPhi = "-"; } else {$inv_SPOT_CosPhi = $inv_SPOT_CosPhi / 100; } + } + else + { + $inv_SPOT_CosPhi = "-"; + } + + if(($inv_SPOT_UAC1 eq -2147483648) || ($inv_SPOT_UAC1 eq 0xFFFFFFFF) || $inv_SPOT_UAC1 < 0) {$inv_SPOT_UAC1 = "-"; } else {$inv_SPOT_UAC1 = $inv_SPOT_UAC1 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_UAC2 eq -2147483648) || ($inv_SPOT_UAC2 eq 0xFFFFFFFF) || $inv_SPOT_UAC2 < 0) {$inv_SPOT_UAC2 = "-"; } else {$inv_SPOT_UAC2 = $inv_SPOT_UAC2 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_UAC3 eq -2147483648) || ($inv_SPOT_UAC3 eq 0xFFFFFFFF) || $inv_SPOT_UAC3 < 0) {$inv_SPOT_UAC3 = "-"; } else {$inv_SPOT_UAC3 = $inv_SPOT_UAC3 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_UAC1_2 eq -2147483648) || ($inv_SPOT_UAC1_2 eq 0xFFFFFFFF) || $inv_SPOT_UAC1_2 < 0) {$inv_SPOT_UAC1_2 = "-"; } else {$inv_SPOT_UAC1_2 = $inv_SPOT_UAC1_2 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_UAC2_3 eq -2147483648) || ($inv_SPOT_UAC2_3 eq 0xFFFFFFFF) || $inv_SPOT_UAC2_3 < 0) {$inv_SPOT_UAC2_3 = "-"; } else {$inv_SPOT_UAC2_3 = $inv_SPOT_UAC2_3 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_UAC3_1 eq -2147483648) || ($inv_SPOT_UAC3_1 eq 0xFFFFFFFF) || $inv_SPOT_UAC3_1 < 0) {$inv_SPOT_UAC3_1 = "-"; } else {$inv_SPOT_UAC3_1 = $inv_SPOT_UAC3_1 / 100; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value - Log3 $name, 5, "$name - Found Data SPOT_UAC1=$inv_SPOT_UAC1 and SPOT_UAC2=$inv_SPOT_UAC2 and SPOT_UAC3=$inv_SPOT_UAC3 and SPOT_IAC1=$inv_SPOT_IAC1 and SPOT_IAC2=$inv_SPOT_IAC2 and SPOT_IAC3=$inv_SPOT_IAC3"; - return (1,$inv_SPOT_UAC1,$inv_SPOT_UAC2,$inv_SPOT_UAC3,$inv_SPOT_IAC1,$inv_SPOT_IAC2,$inv_SPOT_IAC3,$inv_susyid,$inv_serial); + Log3 $name, 5, "$name - Found Data SPOT_UAC1=$inv_SPOT_UAC1 and SPOT_UAC2=$inv_SPOT_UAC2 and SPOT_UAC3=$inv_SPOT_UAC3 and inv_SPOT_UAC1_2=$inv_SPOT_UAC1_2 and inv_SPOT_UAC2_3=$inv_SPOT_UAC2_3 and inv_SPOT_UAC3_1=$inv_SPOT_UAC3_1 and inv_SPOT_CosPhi=$inv_SPOT_CosPhi"; + return (1,$inv_SPOT_UAC1,$inv_SPOT_UAC2,$inv_SPOT_UAC3,$inv_SPOT_UAC1_2,$inv_SPOT_UAC2_3,$inv_SPOT_UAC3_1,$inv_SPOT_CosPhi,$inv_susyid,$inv_serial); + } + + if($data_ID eq 0x4653) { + $inv_SPOT_IAC1 = unpack("l*", substr $data, 62, 4); + $inv_SPOT_IAC2 = unpack("l*", substr $data, 90, 4); + $inv_SPOT_IAC3 = unpack("l*", substr $data, 118, 4); + + if(($inv_SPOT_IAC1 eq -2147483648) || ($inv_SPOT_IAC1 eq 0xFFFFFFFF) || $inv_SPOT_IAC1 < 0) {$inv_SPOT_IAC1 = "-"; } else {$inv_SPOT_IAC1 = $inv_SPOT_IAC1 / 1000; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_IAC2 eq -2147483648) || ($inv_SPOT_IAC2 eq 0xFFFFFFFF) || $inv_SPOT_IAC2 < 0) {$inv_SPOT_IAC2 = "-"; } else {$inv_SPOT_IAC2 = $inv_SPOT_IAC2 / 1000; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + if(($inv_SPOT_IAC3 eq -2147483648) || ($inv_SPOT_IAC3 eq 0xFFFFFFFF) || $inv_SPOT_IAC3 < 0) {$inv_SPOT_IAC3 = "-"; } else {$inv_SPOT_IAC3 = $inv_SPOT_IAC3 / 1000; } # Catch 0x80000000 and 0xFFFFFFFF as 0 value + + Log3 $name, 5, "$name - Found Data inv_SPOT_IAC1=$inv_SPOT_IAC1 and inv_SPOT_IAC2=$inv_SPOT_IAC2 and inv_SPOT_IAC3=$inv_SPOT_IAC3"; + return (1,$inv_SPOT_IAC1,$inv_SPOT_IAC2,$inv_SPOT_IAC3,$inv_susyid,$inv_serial); } if ($data_ID eq 0x495B && (ReadingsVal($name,"INV_TYPE","") =~ /SBS(1\.5|2\.0|2\.5)/xs || @@ -1443,7 +1494,7 @@ sub SMAInverter_SMAcommand($$$$$) { $inv_BAT_IDC = unpack("l*", substr $data, 118, 4); if($inv_BAT_IDC eq -2147483648) { # Catch 0x80000000 as 0 value - $inv_BAT_IDC = 0; + $inv_BAT_IDC = "-"; } else { $inv_BAT_IDC = $inv_BAT_IDC / 1000; @@ -1525,7 +1576,7 @@ sub SMAInverter_SMAcommand($$$$$) { $inv_BAT_IDC = unpack("l*", substr $data, 146, 4); if($inv_BAT_IDC eq -2147483648) { # Catch 0x80000000 as 0 value - $inv_BAT_IDC = 0; + $inv_BAT_IDC = "-"; } else { $inv_BAT_IDC = $inv_BAT_IDC / 1000; @@ -2116,58 +2167,62 @@ The retrieval of the inverter will be executed non-blocking. You can adjust the Readings

@@ -2350,57 +2405,61 @@ Die Abfrage des Wechselrichters wird non-blocking ausgeführt. Der Timeoutwert f Readings

@@ -2421,15 +2480,15 @@ Die Abfrage des Wechselrichters wird non-blocking ausgeführt. Der Timeoutwert f "PV", "inverter" ], - "version": "v1.1.1", + "version": "v2.16.1", "release_status": "stable", "author": [ - "Thomas Schoedl (sct14675)", + "Maximilian Paries", "Heiko Maaz ", null ], "x_fhem_maintainer": [ - "sct14675", + "MadMax", "DS_Starter", null ],