Campbell Scientific 109-L Temperature Probe - Manual (Page 23)

Appendix B. Example Programs
The following example can be used directly with CR200(X) series dataloggers.
'Program measures one 109 temperature probe once a second and
'stores the average temperature every 60 minutes.
'Wiring Diagram
'==============
' 109
' Probe
' Lead CR200(X)
' Color Function Terminal
' ----- -------- ------
' Black Voltage-excitation input VX1/EX1
' Red Analog-voltage output SE1
' Purple Bridge-resistor ground Ground Symbol
' Clear Shield Ground Symbol
‘Declare the variable for the temperature measurement
Public T109_C
‘Define a data table for 60 minute averages
DataTable (Table1,True,-1)
DataInterval (0,60,min)
Average (1,T109_C,False)
EndTable
BeginProg
Scan (1,sec)
'Measure the temperature
Therm109 (T109_C,1,1,Ex1,1.0,0)
'Call Data Table
CallTable Table1
NextScan
EndProg
This following example can be used directly with CR800 series, CR1000,
CR3000, and CR5000 dataloggers.
'Program measures one 109 temperature probe once a second and
'stores the average temperature every 60 minutes.
'Wiring Diagram
'==============
' 109
' Probe
' Lead CR1000
' Color Function Terminal
' ----- -------- ------
' Black Voltage-excitation input VX1 or EX1
' Red Analog-voltage output SE1
' Purple Bridge-resistor ground Ground Symbol
' Clear Shield Ground Symbol
'Declare the variables for the temperature measurement
Public T109_C
'Define a data table for 60 minute averages:
DataTable (Table1,True,-1)
DataInterval (0,60,Min,0)
Average (1,T109_C,IEEE4,0)
EndTable
B-1