Appendix b. example programs, Appendix b – Campbell Scientific 109-L Temperature Probe User 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