CRBasic Example 2: CR6 program
'CR6 Series Data Logger
'Declare Variables and Units
Public
BattV
:
Units
BattV
= Volts
Public
PTemp_C :
Units
PTemp_C = Deg C
Public
PAR_Den :
Units
PAR_Den = µmol/s/m²
Public
PAR_Tot :
Units
PAR_Tot = mmol/m²
'Define Data Tables
DataTable
(Hourly,True,-1)
DataInterval
(0,60,Min,10)
Average
(1,PAR_Den,FP2,False)
EndTable
DataTable
(Daily,True,-1)
DataInterval
(0,1440,Min,10)
Minimum
(1,BattV,FP2,False,False)
Maximum
(1,BattV,FP2,False,False)
Minimum
(1,PTemp_C,FP2,False,False)
Maximum
(1,PTemp_C,FP2,False,False)
Totalize
(1,PAR_Tot,IEEE4,False)
EndTable
'Main Program
BeginProg
Scan
(10,Sec,1,0)
'Default CR6 Data Logger Battery Voltage measurement 'BattV'
Battery
(BattV)
'Default CR6 Data Logger Wiring Panel Temperature measurement 'PTemp_C'
PanelTemp
(PTemp_C,60)
'CS310 Quantum Sensor measurements PAR_Tot and PAR_Den:
VoltSe
(PAR_Den,1,AutoRange,U1,False,0,60,1.0,0)
'Use AutoRange
'Set negative values to zero
If
PAR_Den<0
Then
PAR_Den=0
'Multipliers will differ for each sensor and scan rate
PAR_Tot=PAR_Den * 1
PAR_Den=PAR_Den * 100
'Call Data Tables and Store Data
CallTable
(Hourly)
CallTable
(Daily)
NextSca
n
EndProg
CS310 Quantum Sensor
18