FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

98_logProxy.pm: added logProxy_xy2Data

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7745 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2015-01-27 19:46:23 +00:00
parent 5c1e93b19d
commit ec6b6c1015
1 changed files with 22 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
fhem/FHEM/98_logProxy.pm
View File

@ -607,7 +607,7 @@ logProxy_data2Array($)
return (\@ret,$comment); return (\@ret,$comment);
} }
#parse create plot data from array #create plot data from array
sub sub
logProxy_array2Data($$) logProxy_array2Data($$)
{ {
@ -636,13 +636,32 @@ logProxy_array2Data($$)
return (\$ret,$min,$max,$last); return (\$ret,$min,$max,$last);
} }
#create plot data from xy-array
sub
logProxy_xy2Data($)
{
my ($array) = @_;
my $ret = ";c 0\n";
my $min = 999999;
my $max = -999999;
my $last;
return ($ret,$min,$max,$last) if( !ref($array) eq "ARRAY" );
foreach my $point ( @{$array} ) {
$ret .= ";p $point->[0] $point->[1]\n";
}
return ($ret,$min,$max,$last);
}
sub sub
logProxy_Get($@) logProxy_Get($@)
{ {
my ($hash, $name, @a) = @_; my ($hash, $name, @a) = @_;
#Log 3, "logProxy_Get"; #Log 3, "logProxy_Get";
#Log 3, Dumper @a; Log 3, Dumper @a;
my $inf = shift @a; my $inf = shift @a;
my $outf = shift @a; my $outf = shift @a;
@ -787,7 +806,7 @@ logProxy_Get($@)
next; next;
} }
use strict "refs"; use strict "refs";
$data = $d; $data = $d;
$comment = "#$a[$i]\n"; $comment = "#$a[$i]\n";