From 63efda2e683444536a660f7c42feef8bff466fab Mon Sep 17 00:00:00 2001 From: "www@jspc55" Date: Thu, 6 Mar 2014 11:21:46 +0100 Subject: [PATCH] minor fixes concerning scaleoffset --- tools/adcread.pl | 6 +++--- tools/plotService.pl | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/tools/adcread.pl b/tools/adcread.pl index 67b703f..35fef3b 100755 --- a/tools/adcread.pl +++ b/tools/adcread.pl @@ -97,7 +97,7 @@ print "$mean\t$stdev\t$min\t$max\n"; sub getVal{ my $read = trb_register_read($self->{FPGA},$self->{address}); - my $value = ($read->{$self->{FPGA}} & 0xFFFF ) * $self->{scale} + $self->{scaleoffset}; + my $value = ($read->{$self->{FPGA}} & 0xFFFF ) * $self->{scale} + ($self->{scaleoffset}||0); return $value; } @@ -105,8 +105,8 @@ sub minMax{ # read min and max my $read = trb_register_read($self->{FPGA},$self->{address}+0x30); my $minmax = ($read->{$self->{FPGA}} ) ; - my $min = ($minmax & 0x0000FFFF) * $self->{scale} + $self->{scaleoffset}; # lower 16 bit - my $max = ($minmax >> 16 ) * $self->{scale} + $self->{scaleoffset}; # upper 16 bit + my $min = ($minmax & 0x0000FFFF) * $self->{scale} + ($self->{scaleoffset}||0); # lower 16 bit + my $max = ($minmax >> 16 ) * $self->{scale} + ($self->{scaleoffset}||0); # upper 16 bit return ($min, $max); } diff --git a/tools/plotService.pl b/tools/plotService.pl index 6fb4782..2d01435 100755 --- a/tools/plotService.pl +++ b/tools/plotService.pl @@ -206,12 +206,12 @@ sub sample { # sample random number for debug # HPlot::PlotAdd($self->{requestString},rand()); my $read = trb_register_read($self->{FPGA},$self->{address}); - my $value = ($read->{$self->{FPGA}} & 0xFFFF ) * $self->{scale} + $self->{scaleoffset}; + my $value = ($read->{$self->{FPGA}} & 0xFFFF ) * $self->{scale} + ($self->{scaleoffset}||0); # read min and max my $read = trb_register_read($self->{FPGA},$self->{address}+0x30); my $minmax = ($read->{$self->{FPGA}} ) ; - my $min = ($minmax & 0x0000FFFF) * $self->{scale} + $self->{scaleoffset}; # lower 16 bit - my $max = ($minmax >> 16 ) * $self->{scale} + $self->{scaleoffset}; # upper 16 bit + my $min = ($minmax & 0x0000FFFF) * $self->{scale} + ($self->{scaleoffset}||0); # lower 16 bit + my $max = ($minmax >> 16 ) * $self->{scale} + ($self->{scaleoffset}||0); # upper 16 bit # print $value."\n" if $myverbose; HPlot::PlotAdd($self->{requestString},$value,0); HPlot::PlotAdd($self->{requestString},$min,1); -- 2.43.0