// makeNameChange(a[i]);
// }
- setTimeout("getdata('update.pl',UpdatePage)",1000);
+ options = "min="+document.getElementById("min").value+"&max="+document.getElementById("max").value;
+ setTimeout("getdata('update.pl?'+options,UpdatePage)",1000);
}
</script>
<body>
<div id="header">
<h1>Temperature Measurements</h1>
- <div id="info"></div>
+ <div id="settings" style="float:right">Min: <input type="text" name="mymin" id="min"><br>Max: <input type="text" name="mymax" id="max"></div>
</div>
<div id="container">
</div>
my $query = CGI->new;
my $lines = $query->param('lines') || 50;
+my $mymin = $query->param('min');
+my $mymax = $query->param('max');
sub defineScale {
$min = floor($min/5)*5;
$max = ceil($max/5)*5;
-
+
+ $min = $mymin if defined $mymin && $mymin ne "";
+ $max = $mymax if defined $mymax && $mymax ne "";
}
my $step = (($max-$min)/1000.);
-
if ($v == 0) {
- $r = 220;
- $g = 220;
- $b = 220;
- } else {
+ $r = 170;
+ $g = 170;
+ $b = 170;
+ }
+ elsif($v<$min || $v>$max) {
+ $r = 230;
+ $g = 230;
+ $b = 230;
+ }
+ else {
$v -= $min;
$v = $v/$step if $step;
if ($v<240) { $r = 255-$v/240*255;}
$str .= "<table class=\"scale\"><tr>";
$str .= sprintf("<td style=\"background-color:%4s;\">",findcolor(0,0,$steps,0));
return $str.="</table>" if $max == $min;
- $str .= sprintf("<td class=\"label\">%#2.3G",$min);
+ $str .= sprintf("<td class=\"label\">%3i",$min);
for (my $i = 1;$i<$steps;$i++) {
# my $j = ($max-$min)/$steps*$i;
$str .= sprintf("<td style=\"background-color:%7s;\" title=\"%.2f\">",findcolor($i,0,$steps,0),($max-$min)/$steps*$i+$min);
}
- $str .= sprintf("<td class=\"label\">%#2.3G",$max);
+ $str .= sprintf("<td class=\"label\">%3i",$max);
$str .= "</table>\n";
return $str;
}
jspc29 / labtools.git / commitdiff