From b5e1929d4c99e30dc89458da11a2f6045916d3cb Mon Sep 17 00:00:00 2001 From: Damian <> Date: Sat, 30 Jan 2021 10:49:48 +0000 Subject: [PATCH] 98_DOIF.pm: svg function ring2 minor bug fixes git-svn-id: https://svn.fhem.de/fhem/trunk@23640 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_DOIF.pm | 22 ++++++---------------- 1 file changed, 6 insertions(+), 16 deletions(-) diff --git a/fhem/FHEM/98_DOIF.pm b/fhem/FHEM/98_DOIF.pm index d51aa874c..ef6a44192 100644 --- a/fhem/FHEM/98_DOIF.pm +++ b/fhem/FHEM/98_DOIF.pm @@ -4512,9 +4512,8 @@ sub ring $size=100 if (!defined $size); my $prop=($value-$min)/($max-$min); my ($x1,$y1,$x2,$y2); - ($x1,$y1,$x2,$y2)=($prop*100,-20,0,(1-$prop)*100); + ($x1,$y1,$x2,$y2)=($prop*100,0,0,(1-$prop)*100); my $val1=int($prop*100)+20; - my $y=125-$val1; my $currColor; if (defined $func) { if (defined($model)) { @@ -4611,9 +4610,8 @@ sub ring2 $size=100 if (!defined $size); my $prop=($value-$min)/($max-$min); - my ($x1,$y1,$x2,$y2)=($prop*100,-20,0,(1-$prop)*100); + my ($x1,$y1,$x2,$y2)=($prop*100,0,0,(1-$prop)*100); my $val1=int($prop*100)+20; - my $y=125-$val1; my $currColor; if (defined $func) { $currColor=&{$func}($value); @@ -4642,12 +4640,11 @@ sub ring2 $min2=$value2 if ($value2<$min2); my $prop2=($value2-$min2)/($max2-$min2); my ($x12,$y12,$x22,$y22); - ($x12,$y12,$x22,$y22)=($prop2*100,-20,0,(1-$prop2)*100); + ($x12,$y12,$x22,$y22)=($prop2*100,0,0,(1-$prop2)*100); my $val12=int($prop2*100)+20; - $y2=125-$val12; my $currColor2; if (defined $func2) { - $currColor2=&{$func2}($value2); + $currColor2=&{$func2}($value2); } else { if ($minColor2 < $maxColor2) { $currColor2=$prop2*($maxColor2-$minColor2)+$minColor2; @@ -4690,21 +4687,14 @@ sub ring2 $out.=sprintf('',$currColor2,$minColor2,(defined $lr ? $lr:-1)); $out.=describeArc(40, 30, 23.5, 0, int($prop2*280)); $out.=''; - $out.=''; + $out.=''; $out.=describeArc(40, 30, 25.2, 0, 1.5); $out.=''; $out.=''; $out.=describeArc(40, 30, 25.2, 279, 280.5); $out.=''; - #$out.=sprintf('',color($maxColor)); - #$out.=describeArc(40, 30, 27, 273, 280); - #$out.=''; - - #$out.=sprintf('',color($maxColor2)); - #$out.=describeArc(40, 30, 23.5, 273, 280); - #$out.=''; - + $out.= sprintf('%s',color($currColor,$ln),sprintf($format,$val)); $out.= sprintf('%s',color($currColor,$ln),$unit) if (defined $unit);