Example cr1000 datalogger program for measuring a, Windsonic1 using comn port, Communications and serialinrecord() – Campbell Scientific WINDSONIC 2-D Sonic Wind Sensors User Manual

Page 21: 6. wiring, Cr1000 example program

Advertising
background image

WindSonic Two-Dimensional Sonic Anemometer

TABLE 7-5. CRBasic Datalogger Operating

Systems that Support RS-232

Communications and SerialInRecord()

Datalogger Model

Operating System

CR800-series 4.0

or

later

CR1000

13.0 or later

CR3000 6.0

or

later

7.3.1 Example CR1000 Datalogger Program for Measuring a WindSonic1

using COMn Port

TABLE 7-6. Wiring for CR1000 Example Program

Description Color

CR1000

WindSonic RxD

Green COM1 Tx (C1)

WindSonic TxD

White COM1 Rx (C2)

Power Red

+12

Vdc

RS-232/Power reference

Black

G

Shield Clear

G

'CR1000 Series Datalogger
Dim in_bytes_str As String * 21

Dim windsonic(4) As String
Public nmbr_bytes_rtrnd

Public wind_direction
Public wind_speed
Public diag

Units wind_direction = degrees
Units wind_speed = m/s
Units diag = unitless

Dim checksum_flg As Boolean
Dim disable_flg As Boolean
Dim n

Units n = arb
DataTable (stats,TRUE,-1)
DataInterval (0,30,Min,10)

WindVector (1,wind_speed,wind_direction,IEEE4,disable_flg,0,0,0)
FieldNames ("mean_wind_speed,mean_wind_direction,std_wind_dir")

Totalize (1,n,IEEE4,disable_flg)
FieldNames ("samples_TOT")
Totalize (1,n,IEEE4,diag<>1)

FieldNames ("diag_1_TOT")
Totalize (1,n,IEEE4,diag<>2)
FieldNames ("diag_2_TOT")

Totalize (1,n,IEEE4,diag<>4)
FieldNames ("diag_4_TOT")
Totalize (1,n,IEEE4,diag<>8)

FieldNames ("diag_8_TOT")
Totalize (1,n,IEEE4,diag<>9)

FieldNames ("diag_9_TOT")
Totalize (1,n,IEEE4,diag<>10)

13

Advertising