CR1000 Manual - Campbell Scientific

Section 7. Installation
'Declare Public (viewable) Variables
Public Batt_Volt As FLOAT
Public PTemp_C
Public AirTemp_C
Public AirTemp_F
Public AirTemp2_F
Public DeltaT_C
Public HowMany
Public Counter As Long
Public SiteName As String * 16
'Declared as Float
'Float by default
'Float by default
'Float by default
'Float by default
'Float by default
'Float by default
'Declared as Long so counter does not have
'rounding error
'Declared as String with 16 chars for a
'site name (optional)
'Declare program control flags & terms. Set the words “High” and “Low” to equal “TRUE”
'and “FALSE” respectively
Public Flag(1) As Boolean
Const High = True
Const Low = False
'Optional – Declare a Station Name into a location in the Status table.
StationName(CR1000_on_desk)
'Optional -- Declare units. Units are not used in programming, but only appear in the
'data file header.
Units Batt_Volt = Volts
Units PTemp = deg C
Units AirTemp = deg C
Units AirTempF2 = deg F
Units DeltaT_C = deg C
'Declare an interval driven output table
DataTable(OneMin,True,-1)
DataInterval(0,1,Min,0)
Average(1,AirTemp_C,IEEE4,0)
Maximum(1,AirTemp_C,IEEE4,0,False)
Minimum(1,AirTemp_C,FP2,0,False)
Minimum(1,Batt_Volt,FP2,0,False)
Sample(1,Counter,Long)
Sample(1,SiteName,String)
Sample(1,HowMany, FP2)
EndTable
'Declare an event driven data output table
DataTable(Event,True,1000)
DataInterval(0,5,Sec,10)
DataEvent(0,DeltaT_C >= 3,DeltaT_C < 3,0)
Maximum(1,AirTemp_C,FP2,0,False)
'Time driven data storage
'Controls the interval
'Stores temperature average in high
'resolution format
'Stores temperature maximum in high
'resolution format
'Stores temperature minimum in low
'resolution format
'Stores battery voltage minimum in low
'resolution format
'Stores counter in integer format
'Stores site name as a string
'Stores how many data events in low
'resolution format
'Data table – event driven
'—AND interval driven
'—AND event range driven
'Stores temperature maximum in low
'resolution format
244