Manual | NEP-695
Status: Final | Not confidential
Page 49 | 51
V20221009
11.5 Example code
The following script can be adapted to perform similar operations (e.g. change scanning intervals, add
data storing tables, change units, etc…).
'CR300 Series
'Declare Variables and Units
Public BattV
Public PTemp_C
Public
SDI12_1
(
1
)
Public
SDI12_2
(
6
)
Alias
SDI12_1
(
1
)=
Wipe_stats
Alias
SDI12_2
(
1
)=
Turbidity
Alias
SDI12_2
(
2
)=
Temperature
Alias
SDI12_2
(
3
)=
Median
Alias
SDI12_2
(
4
)=
Average
Alias
SDI12_2
(
5
)=
Minimum
Alias
SDI12_2
(
6
)=
Maximum
Units BattV=Volts
Units PTemp_C=Deg C
Units Wipe_stats=Unit
Units Turbidity=NTU
Units Temperature=Deg C
Units Median=NTU
Units Average=NTU
Units Minimum=NTU
Units Maximum=NTU
'Define Data Tables
DataTable(Table1,True,-1)
DataInterval(0,
5,Min
,10)
Sample(1,
Wipe_stats
,FP2)
Sample(1,
Turbidity
,FP2)
Sample(1,
Temperature
,FP2)
Sample(1,
Median
,FP2)
Sample(1,
Average
,FP2)
Sample(1,
Minimum
,FP2)
Sample(1,
Maximum
,FP2)
EndTable
DataTable(Table2,True,-1)
DataInterval(0,
1440,Min
,10)
Minimum(1,BattV,FP2,False,False)
Sample(1,BattV,FP2)
Sample(1,PTemp_C,FP2)
EndTable
'Main Program
BeginProg
'Main Scan
Scan(
5,Min
,1,0)
SW12(1)
Delay(0,5,SEC)
'Default CR300 Datalogger Battery Voltage measurement 'BattV'
Battery(BattV)
'Default CR300 Datalogger Processor Temperature measurement 'PTemp_C'
PanelTemp(PTemp_C,60)
'Generic SDI-12
Sensor measurements 'Wipe_stats'
SDI12Recorder(SDI12_1(),C1,"0","
M1!
",1,0)
'Generic SDI-12
Full measurements 'statistical'
SDI12Recorder(SDI12_2(),C1,"0","
M6!
",1,0,-1)
'Call Data Tables and Store Data
CallTable Table1
CallTable Table2
SW12(0)
NextScan
EndProg
