Campbell Scientific CS431 Submersible Pressure Transducer - Manual (Page 12)

CS431 Submersible Pressure Transducer
5.1.1.2 Example CR1000 P ROGRAM – E NHANCED C ALIBRATION – Two Sensors
'Program = Sample Enhanced Program for two CS431s
'Sensor 1 is 5 psig, Sensor 2 is 15 psig
'Declare Variables and Units
Public m2(2)
'first calibration multiplier, one per sensor
Public m1(2) 'second calibration multiplier, one per sensor
Public m0(2) 'third calibration multiplier, one per sensor
Public
b2(2) 'first calibration offset, one per sensor
Public b1(2) 'second calibration offset, one per sensor
Public b0(2) 'third calibration offset, one per sensor
Public
V(4) 'reference voltage, then output voltage for each sensor
'For example: V(1)=Vr 1st sensor, V(2)=Vo 1st sensor
'V(3)=Vr 2nd sensor, V(4)=Vo 2nd sensor
Public Temp(2)
'temperature, one per sensor
Public L(2) 'L factor (Vo/Vr * 100), one per sensor
Public P(2) 'Enhanced calibrated pressure in psi, one per sensor
Public Batt_volt
Units Batt_Volt=Volts
Dim me
Dim be
'Define Data Tables
DataTable(Table1,True,-1)
DataInterval(0,500,msec,10)
Sample(1,Batt_Volt, IEEE4) 'battery voltage
Sample(4,V(),IEEE4) 'excitation voltage, then output voltage, each sensor
'For example: V(1)=Vr for 1st sensor, V(2)=Vo for 1st sensor
'V(3)=Vr for 2nd sensor, V(4)=Vo for 2nd sensor
Sample
(2,Temp(),Ieee4) 'temperature, one per sensor
Sample (2,L(),Ieee4) 'L factor (Vo/Vr * 100), one per sensor
Sample (2,P(),IEEE4) 'Standard pressure in psi, one per sensor
EndTable
'Main Program
BeginProg
'Set mulitpliers and offsets - from calibration sheet
'Sensor 1 (typical 5 psig sensor)
m2(1)
= -0.00000042199
m1(1) = 0.00002049701
m0(1) = 0.07816585737
b2(1) = 0.00001242100
b1(1) = 0.00099866224
b0(1) = 0.02247116187
(cont.)
8