FSS Slow set point to be zero
op340m:FSS>cat FSSSlowServo
#!/usr/bin/perl -w
# PID Servo for PSL-FSS (Slow)
# Tobin Fricke 2007-01-09
use strict;
#use Scalar::Util qw(looks_like_number);
sub looks_like_number {
return ($_[0] =~ /^-?\d+\.?\d*$/); #FIXME
}
use EpicsTools;
# Parameters
my $process = 'C1:PSL-FSS_FAST';
my $actuator = 'C1:PSL-FSS_SLOWDC';
#my $setpoint = 5.5;
my $setpoint = 0;
my $blinkystatus = 0;
op340m:scripts>/opt/rtcds/caltech/c1/scripts/PSL/FSS/FSSSlowServo > /cvs/cds/caltech/logs/scripts/FSSslow.cronlog & |