Campbell CR1000 User Manual

Section 7. Installation
CRBasic Example 54. Measure Sensors / Send RS-232 Data
'This program example demonstrates the import and export serial data via the CR1000 RS-232
'port. Imported data are expected to have the form of the legacy Campbell Scientific
'time set C command:
' [YR:DAY:HR:MM:SS]C
'Exported data has the form of the legacy Campbell Scientific Printable ASCII format:
' 01+0115. 02+135 03+00270 04+7999 05+00138 06+07999 07+04771
'Declarations
'Visible Variables
Public StationID
Public KWH_In
Public KVarH_I
Public KWHHold
Public KVarHold
Public KWHH
Public KvarH
Public InString As String * 25
Public OutString As String * 100
'Hidden Variables
Dim i, rTime(9), OneMinData(6), OutFrag(6) As String
Dim InStringSize, InStringSplit(5) As String
Dim Date, Month, Year, DOY, Hour, Minute, Second, uSecond
Dim LeapMOD4, LeapMOD100, LeapMOD400
Dim Leap4 As Boolean, Leap100 As Boolean, Leap400 As Boolean
Dim LeapYear As Boolean
Dim ClkSet(7) As Float
'One Minute Data Table
DataTable(OneMinTable,true,-1)
OpenInterval 'sets interval same as found in CR510
DataInterval(0,1,Min,10)
Totalize(1, KWHH,FP2,0)
Sample(1, KWHHold,FP2)
Totalize(1, KvarH,FP2,0)
Sample(1, KVarHold,FP2)
Sample(1, StationID,FP2)
EndTable
'Clock Set Record Data Table
DataTable(ClockSetRecord,True,-1)
Sample(7,ClkSet(),FP2)
EndTable
260

Campbell CR1000 Specifications

General

Power Requirements	9.6 to 16 VDC
Data Logger Operating System	CRBasic
Memory	4 MB
Analog Inputs	16 single-ended or 8 differential
Analog Input Resolution	13 bits
Analog Input Range	+/-2.5V
Digital I/O	8
Pulse Counters	2
Communication Ports	RS-232
Operating Temperature	-25°C to +50°C
Pulse Channels	4