Instruction manual
Appendix B. Example Programs
The following example can be used directly with CR200(X) series dataloggers.
'Program measures one 109SS temperature probe once a second and
'stores the average temperature every 60 minutes.
'Wiring Diagram
'==============
' 109SS
' 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 T109SS_C
‘Define a data table for 60 minute averages
DataTable(Table1,True,-1)
DataInterval(0,60,min)
Average(1,T109SS_C,False)
EndTable
BeginProg
Scan(1,sec)
'Measure the temperature
Therm109(T109SS_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 109SS temperature probe once a second and
'stores the average temperature every 60 minutes.
'Wiring Diagram
'==============
' 109SS
' 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 T109SS_C
'Define a data table for 60 minute averages:
DataTable(Table1,True,-1)
DataInterval(0,60,Min,0)
Average(1,T109SS_C,IEEE4,0)
EndTable
B-1