B-1
Appendix B. Example Programs
This following example can be used directly with most of our CRBasic
dataloggers.
CRBasic Example B-1. 109 Program Example for CR300-Series, CR800-Series, CR1000,
CR1000X-Series, 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 Datalogger
' 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
(Hourly,True,-1)
DataInterval
(0,60,Min,0)
Average
(1,T109_C,IEEE4,0)
EndTable
BeginProg
Scan
(1,Sec,1,0)
'Measure the temperature
Therm109
(T109_C,1,1,Vx1,0,_60Hz,1.0,0.0)
'Call Data Table
CallTable
(Hourly)
NextScan
EndProg
The following example can be used directly with CR6-series dataloggers.
CRBasic Example B-2. 109 Program Example for CR6 Dataloggers
'Program measures one 109 temperature probe once a second and
'stores the average temperature every 60 minutes.
'Wiring Diagram
'==============
' 109
' Probe
' Lead CR6
' Color Function Terminal
' ----- -------- ------
' Black Voltage-excitation input U10
' Red Analog-voltage output U1
' Purple Bridge-resistor ground Ground Symbol
' Clear Shield Ground Symbol
'Declare the variables for the temperature measurement
Public
T109_C