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

some bugfixing of nearly invisible things

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@3662 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
dietmar63 2013-08-10 19:35:11 +00:00
parent 89751dd755
commit 464963bf77
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
fhem/FHEM/98_RandomTimer.pm
View File

@ -18,6 +18,11 @@
# You should have received a copy of the GNU General Public License
# along with fhem. If not, see <http://www.gnu.org/licenses/>.
#
# define t1 RandomTimer *23:01:10 Zirkulation 23:02:10 100; attr t1 loglevel 3;
# define t2 RandomTimer *23:01:20 Zirkulation 23:03:20 100; attr t2 loglevel 3;
# define t3 RandomTimer *23:01:30 Zirkulation 23:04:30 100; attr t3 loglevel 3;
# define t4 RandomTimer *23:01:40 Zirkulation 23:02:40 100; attr t4 loglevel 3;
#
##############################################################################
package main;
@ -129,7 +134,7 @@ sub RandomTimer_ExecRepeater($)
my ($shour, $smin, $ssec) = split(/:/, $stopTime);
my $timeToStart = $now + 3600*($thour-$hour) + 60*($tmin-$min) + ($tsec-$sec);
my $timeToStop = $now + 3600*($shour-$hour) + 60*($smin-$min) - ($ssec-$sec);
my $timeToStop = $now + 3600*($shour-$hour) + 60*($smin-$min) + ($ssec-$sec);
$timeToStop += 24*3600 if ($timeToStart>=$timeToStop);
my $timeToExec;
@ -145,15 +150,13 @@ sub RandomTimer_ExecRepeater($)
if ($now < $timeToStart) {
$timeToExec = $timeToStart;
} else {
$timeToExec = $now + 5;
$timeToExec = $now;
$timeToExec = $now + 1;
$function = "RandomTimer_Exec";
}
$hash->{STATE} = strftime("%H:%M:%S",localtime($timeToExec));
}
Log $logLevel, "[".$hash->{NAME}. "]"." Next Timer ".strftime("%d.%m.%Y %H:%M:%S",localtime($timeToExec));
Log $logLevel, "[".$hash->{NAME}. "]"." Next timer ".strftime("%d.%m.%Y %H:%M:%S",localtime($timeToExec));
delete $hash->{ABSCHALTZEIT};
RemoveInternalTimer($hash);