State Sequencer Program

The state sequencer program is loaded into the IOC, and used to perform the Current monitor calibration.

program calibrate

This state sequencer program is designed to peform the Hall A Beam Current Monitor Calibration.
To compile it, type "snc calib.st" (this converts it into a .c file)
then you have to type "make" to have it compile and ready to be loaded
The program is loaded into the IOC Hallasc5 memory and executed by Epics
All files are located in: "/hac_epics/ioc/hallasc5/epics/seq/".
Written in 1997 by:
Yves Roblin
Geraud Laveissiere

INCLUDE LIBRARIES
%% #include
%% #include

INTEGER DECLARATIONS
u corresponds to the Unser monitor
1 corresponds to the Upstream BCM
2 corresponds to the Downstream BCM
o corresponds to the Unser monitor offset

Step Variables
indexes of current values
int i; Unser,bcm1,bcm2
int io; Unser offset
numbers of stored values
int j; Unser,bcm1,bcm2
int jo; Unser offset

int k;

Step time limit = 1minute
int timelimit;

position in step 0=offset 1=top
int position;

uncrash variable ?????
int machin;

number of steps
int step;

autorize computation of coefficients 0=yes 1=no
int compute;

autorize update of date 0=no 1=yes
int update;

Control Button
0 = Calibration OFF
1 = Calibration ON
int done;

Alarm variable: is set if the time since last calibration is more than 12h
0 = Calibration still good
1 = Calibration bad; time has elapsed
int uncalibrated;

Blinking signal
0 = Message not visible
1 = Message visible
int blicky;

stopwatch used to measure the time since last calibration
int swsec;
int swmin;
int swhr;
int swday;
int swblicky;

# of correction needed for each bcm
int correct1;
int correct2;

FLOATING POINTS DECLARATIONS
u corresponds to the Unser monitor
1 corresponds to the Upstream BCM
2 corresponds to the Downstream BCM
o corresponds to the Unser monitor offset

Low threshold that defines offset computation
It is set at the beginning of the program.
float threshold_b;

sum of all stored values during a step
float s1;
float s2;
float su;
float so;

coefficients modifications for the 2 bcms
float modif1;
float modif2;

stored values during a step *
float top1[70];
float top2[70];
float topu[70];
float offset[70];

list of all steps coefficients
float values1[20];
float values2[20];

List of steps that need correction
0 = value OK
1 = need correction
float correction1[20];
float correction2[20];

Unser,BCM1,BCM2 readings
float bcm1;
float bcm2;
float unser;

Final coefficients and standard deviations
float A1;
float A2;
float sdev1;
float sdev2;

high threshold that defines Unser and bcms computation. It is defined by user through another screen.
float threshold_t;

FILES POINTERS DECLARATIONS

%% FILE *fpcoef;
%% FILE *fpdate;
%% FILE *fpthres;

ASSIGN VARIABLES TO CHANNELS

assign done to "hac_bcm_done";
assign uncalibrated to "hac_bcm_uncalibrated";
assign blicky to "hac_bcm_blicky";
assign bcm1 to "hac_bcm_dvm1_read";
assign bcm2 to "hac_bcm_dvm2_read";
assign unser to "hac_unser_current";
assign A1 to "hac_bcm_A1";
assign A2 to "hac_bcm_A2";
assign sdev1 to "hac_bcm_A1sdev";
assign sdev2 to "hac_bcm_A2sdev";
assign step to "hac_bcm_count";
assign swmin to "hac_bcm_swmin";
assign swhr to "hac_bcm_swhr";
assign swday to "hac_bcm_swday";
assign threshold_t to "hac_bcm_threshold_t";

CHANNEL ACCESS MONITORING

monitor unser;
monitor done;
monitor bcm1;
monitor bcm2;
monitor threshold_t;

BEGINNING OF PROGRAM

ss calibrate {