projects
/
dweather.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
729468e
)
add extra per (half) hour stuff
author
Dirk Koopman
<djk@tobit.co.uk>
Fri, 23 Jan 2015 23:50:03 +0000
(23:50 +0000)
committer
Dirk Koopman
<djk@tobit.co.uk>
Fri, 23 Jan 2015 23:50:03 +0000
(23:50 +0000)
loop.pl
patch
|
blob
|
history
diff --git
a/loop.pl
b/loop.pl
index 71464fd208d81390b2fa588a348855c484adaf83..ef8a6734c64ef6ebf14418cf978e71964a86b885 100755
(executable)
--- a/
loop.pl
+++ b/
loop.pl
@@
-13,6
+13,7
@@
use JSON;
use Debug;
use SMGLog;
use Math::Round qw(nearest);
use Debug;
use SMGLog;
use Math::Round qw(nearest);
+use File::Copy;
use constant pi => 3.14159265358979;
use constant pi => 3.14159265358979;
@@
-153,6
+154,14
@@
dbg "after app start";
write_ld();
close $dataf if $dataf;
write_ld();
close $dataf if $dataf;
+# move all the files along one
+copy "$datafn.oooo", "$datafn.ooooo";
+copy "$datafn.ooo", "$datafn.oooo";
+copy "$datafn.oo", "$datafn.ooo";
+copy "$datafn.o", "$datafn.oo";
+copy $datafn, "$datafn.o";
+
+
dbg '***';
dbg "*** ending $0";
dbg '***';
dbg '***';
dbg "*** ending $0";
dbg '***';
@@
-646,7
+655,7
@@
sub read_ld
sub write_ld
{
return unless $dataf;
sub write_ld
{
return unless $dataf;
-
+
seek $dataf, 0, 0;
truncate $dataf, 0;
$ld->{ts} = time;
seek $dataf, 0, 0;
truncate $dataf, 0;
$ld->{ts} = time;
@@
-707,23
+716,34
@@
__DATA__
<br><br>
<table border=1 width=80%>
<br><br>
<table border=1 width=80%>
+<tr>
<th>Time:<td><span id="tm"> </span>
<th>Time:<td><span id="tm"> </span>
+<th>Sunrise:<td><span id="Sunrise"> </span>
+<th>Sunset:<td><span id="Sunset"> </span>
+<th>Console Volts:<td><span id="Batt_Console"> </span>
+<th>TX Battery OK:<td><span id="Batt_TX_OK"> </span>
+
<tr>
<th>Pressure:<td><span id="Pressure"> </span>
<tr>
<th>Pressure:<td><span id="Pressure"> </span>
+<th>Trend:<td><span id="Pressure_Trend_txt"> </span>
+
<tr>
<th>Temperature in:<td> <span id="Temp_In"> </span>
<th>Humidity:<td> <span id="Humidity_In"> </span>
<tr>
<th>Temperature in:<td> <span id="Temp_In"> </span>
<th>Humidity:<td> <span id="Humidity_In"> </span>
+
<tr>
<th>Temperature out:<td> <span id="Temp_Out"> </span>
<th>Min:<td> <span id="Temp_Out_Min"> </span>
<th>Max:<td> <span id="Temp_Out_Max"> </span>
<th>Humidity:<td> <span id="Humidity_Out"> </span>
<th>Dew Point:<td> <span id="Dew_Point"> </span>
<tr>
<th>Temperature out:<td> <span id="Temp_Out"> </span>
<th>Min:<td> <span id="Temp_Out_Min"> </span>
<th>Max:<td> <span id="Temp_Out_Max"> </span>
<th>Humidity:<td> <span id="Humidity_Out"> </span>
<th>Dew Point:<td> <span id="Dew_Point"> </span>
+
<tr>
<th>Wind Direction:<td> <span id="Dir"> </span>
<tr>
<th>Wind Direction:<td> <span id="Dir"> </span>
-<th>Minute:<td> <span id="Dir_1m"> </span>
+<th>Minute
Avg
:<td> <span id="Dir_1m"> </span>
<th>Speed:<td> <span id="Wind"> </span>
<th>Speed:<td> <span id="Wind"> </span>
-<th>Minute:<td> <span id="Wind_1m"> </span>
+<th>Minute Avg:<td> <span id="Wind_1m"> </span>
+
<tr>
<th>Rain Hour:<td> <span id="Rain_1h"> </span>
<th>Day:<td> <span id="Rain_Day"> </span>
<tr>
<th>Rain Hour:<td> <span id="Rain_1h"> </span>
<th>Day:<td> <span id="Rain_Day"> </span>
@@
-731,5
+751,5
@@
__DATA__
<th>Month:<td> <span id="Rain_Month"> </span>
<th>Year:<td> <span id="Rain_Year"> </span>
</table>
<th>Month:<td> <span id="Rain_Month"> </span>
<th>Year:<td> <span id="Rain_Year"> </span>
</table>
-
</body>
+</body>
</html>
</html>