From 2107efa64ec722fbeaeed382cdecaac78a816b71 Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Sun, 14 Jul 2013 09:15:15 +0000 Subject: [PATCH] minNum/maxNum added, changed to multiple attributes (justme1968) git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@3417 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/99_Utils.pm | 41 +++++++++++++++++++++++++++++++++-------- 1 file changed, 33 insertions(+), 8 deletions(-) diff --git a/fhem/FHEM/99_Utils.pm b/fhem/FHEM/99_Utils.pm index cbe088cdb..e771dfcbe 100644 --- a/fhem/FHEM/99_Utils.pm +++ b/fhem/FHEM/99_Utils.pm @@ -21,21 +21,46 @@ time_str2num($) } sub -min($$) +min($@) { - my ($a,$b) = @_; - return $a if($a lt $b); - return $b; + my ($min, @vars) = @_; + for (@vars) { + $min = $_ if $_ lt $min; + } + return $min; } sub -max($$) +max($@) { - my ($a,$b) = @_; - return $a if($a gt $b); - return $b; + my ($max, @vars) = @_; + for (@vars) { + $max = $_ if $_ gt $max; + } + return $max; } +sub +minNum($@) +{ + my ($min, @vars) = @_; + for (@vars) { + $min = $_ if $_ < $min; + } + return $min; +} + +sub +maxNum($@) +{ + my ($max, @vars) = @_; + for (@vars) { + $max = $_ if $_ > $max; + } + return $max; +} + + sub abstime2rel($) {