Campbell 107

B-1
Appendix B. Example Programs
This following example can be used directly with CR300-series, CR800-series,
CR1000, CR1000X-series, CR3000, and CR5000 dataloggers.
CRBasic Example B-1. 107 Program Example for CR300-Series, CR800-Series, CR1000,
CR1000X-Series, CR3000, and CR5000 Dataloggers
'Program measures one 107 temperature probe once a second and
'stores the average temperature every 60 minutes.
'Wiring Diagram
'==============
' 107
' Probe
' Lead Datalogger
' 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 variables for the temperature measurement
Public T107_C
'Define a data table for 60 minute averages:
DataTable(Hourly,True,-1)
DataInterval(0,60,Min,0)
Average(1,T107_C,IEEE4,0)
EndTable
BeginProg
Scan(1,Sec,1,0)
'Measure the temperature
Therm107(T107_C,1,1,Vx1,0,_60Hz,1.0,0.0)
'Call Data Table
CallTable(Hourly)
NextScan
EndProg