no y2 tics if not needed. other script

Ignore-this: 7da813657e0093494b2428919c94f393

darcs-hash:20090908181744-0cb85-73f5f460de655559c8d1ef503a20e869d400ec72.gz
This commit is contained in:
Dima Kogan 2009-09-08 11:17:44 -07:00
parent c3f314cf9e
commit a66cbbf424

View File

@ -143,10 +143,13 @@ sub mainThread {
} }
print PIPE "set xtics\n"; print PIPE "set xtics\n";
if($options{"y2"})
{
print PIPE "set ytics nomirror\n"; print PIPE "set ytics nomirror\n";
print PIPE "set y2tics\n"; print PIPE "set y2tics\n";
print PIPE "set yrange [". $options{"ymin"} . ":" . $options{"ymax"} ."]\n" if $options{"y2max"};
print PIPE "set y2range [". $options{"y2min"} . ":" . $options{"y2max"} ."]\n" if $options{"y2max"}; print PIPE "set y2range [". $options{"y2min"} . ":" . $options{"y2max"} ."]\n" if $options{"y2max"};
}
print PIPE "set yrange [". $options{"ymin"} . ":" . $options{"ymax"} ."]\n" if $options{"y2max"};
print PIPE "set style data $style\n"; print PIPE "set style data $style\n";
print PIPE "set grid\n"; print PIPE "set grid\n";