Campbell CR1000 User Manual

Section 7. Installation
CRBasic Example 35. NSEC — One Element Time Array
'This program example demonstrates the use of NSEC data type to determine seconds since
'00:00:00 1 January 1990. A time stamp is retrieved into variable TimeVar(1) as seconds
'since 00:00:00 1 January 1990. Because the variable is dimensioned to 1, NSEC assumes
'the value = seconds since 00:00:00 1 January 1990.
'Declarations
Public PTemp
Public TimeVar(1) As Long
DataTable(FirstTable,True,-1)
DataInterval(0,1,Sec,10)
Sample(1,PTemp,FP2)
EndTable
DataTable(SecondTable,True,-1)
DataInterval(0,5,Sec,10)
Sample(1,TimeVar,Nsec)
EndTable
'Program
BeginProg
Scan(1,Sec,0,0)
TimeVar = FirstTable.TimeStamp
CallTable FirstTable
CallTable SecondTable
NextScan
EndProg
CRBasic Example 36. NSEC — Two Element Time Array
'This program example demonstrates how to determine seconds since 00:00:00 1 January 1990,
'and microseconds into the last second. This is done by retrieving variable TimeStamp into
'variables TimeOfMaxVar(1) and TimeOfMaxVar(2). Because the variable TimeOfMaxVar() is
'dimensioned to 2, NSEC assumes the following:
' 1) TimeOfMaxVar(1) = seconds since 00:00:00 1 January 1990, and
' 2) TimeOfMaxVar(2) = microseconds into a second.
'Declarations
Public PTempC
Public MaxVar
Public TimeOfMaxVar(2) As Long
DataTable(FirstTable,True,-1)
DataInterval(0,1,Min,10)
Maximum(1,PTempC,FP2,False,True)
EndTable
DataTable(SecondTable,True,-1)
DataInterval(0,5,Min,10)
Sample(1,MaxVar,FP2)
Sample(1,TimeOfMaxVar,Nsec)
EndTable
203

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