Campbell Scientific WINDSONIC1 WINDSONIC 2-D Sonic Wind Sensors - Page 28

Example CR200(X) Datalogger Program for Measuring a WindSonic4, TABLE 7-11.

Page 28 highlights

WindSonic Two-Dimensional Sonic Anemometer *Table 3 Subroutines End Program -Input Locations1 wnd_dir 2 wnd_spd 3 ws_diag 4 samples 7.4.2 Example CR200(X) Datalogger Program for Measuring a WindSonic4 TABLE 7-11. Wiring for CR200(X) Program Example Description SDI-12 data SDI-12 power SDI-12 reference Shield Color Green Red Black Clear CR200(X) C1/SDI-12 +12 Vdc G G 'CR200(X) Series Datalogger Public windsonic(3) Alias windsonic(1) = wind_direction Alias windsonic(2) = wind_speed Alias windsonic(3) = diag Units wind_direction = degrees Units wind_speed = m/s Units diag = unitless Dim disable_flag Dim one Units one = samples DataTable (stats,TRUE,-1) DataInterval (0,30,Min) WindVector (wind_speed,wind_direction,disable_flag,0,0) FieldNames ("mean_wnd_spd,mean_wnd_dir,std_wnd_dir") Totalize (1,one,disable_flag) FieldNames ("n_TOT") Totalize (1,one,diag1) FieldNames ("diag_1_TOT") Totalize (1,one,diag2) FieldNames ("diag_2_TOT") Totalize (1,one,diag4) FieldNames ("diag_4_TOT") Totalize (1,one,diag8) FieldNames ("diag_8_TOT") Totalize (1,one,diag9) FieldNames ("diag_9_TOT") Totalize (1,one,diag10) FieldNames ("diag_10_TOT") 20

  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31
  • 32
  • 33
  • 34
  • 35
  • 36
  • 37
  • 38
  • 39
  • 40
  • 41
  • 42
  • 43
  • 44
  • 45
  • 46

WindSonic Two-Dimensional Sonic Anemometer
*Table 3 Subroutines
End Program
-Input Locations-
1 wnd_dir
2 wnd_spd
3 ws_diag
4 samples
7.4.2
Example CR200(X) Datalogger Program for Measuring a
WindSonic4
TABLE 7-11.
Wiring for CR200(X) Program Example
Description
Color
CR200(X)
SDI-12 data
Green
C1/SDI-12
SDI-12 power
Red
+12 Vdc
SDI-12 reference
Black
G
Shield
Clear
G
'CR200(X) Series Datalogger
Public windsonic(3)
Alias windsonic(1) = wind_direction
Alias windsonic(2) = wind_speed
Alias windsonic(3) = diag
Units wind_direction = degrees
Units wind_speed = m/s
Units diag = unitless
Dim disable_flag
Dim one
Units one = samples
DataTable (stats,TRUE,-1)
DataInterval (0,30,Min)
WindVector (wind_speed,wind_direction,disable_flag,0,0)
FieldNames ("mean_wnd_spd,mean_wnd_dir,std_wnd_dir")
Totalize (1,one,disable_flag)
FieldNames ("n_TOT")
Totalize (1,one,diag<>1)
FieldNames ("diag_1_TOT")
Totalize (1,one,diag<>2)
FieldNames ("diag_2_TOT")
Totalize (1,one,diag<>4)
FieldNames ("diag_4_TOT")
Totalize (1,one,diag<>8)
FieldNames ("diag_8_TOT")
Totalize (1,one,diag<>9)
FieldNames ("diag_9_TOT")
Totalize (1,one,diag<>10)
FieldNames ("diag_10_TOT")
20