Our full technical support staff does not monitor this forum. If you need assistance from a member of our staff, please submit your question from the Ask a Question page.


Log in or register to post/reply in the forum.

Problem with HMP60 connection


rubberleg Sep 13, 2022 07:26 AM

Hi,

I have an old program from campbell sci for CR1000 with two AM16/32B multiplexers. It's for 16 Vaisala HMP60 sensors and 16 Stevens cs655 sensors.

I wired two HMP 60 sensors (HMP60_1&HMP60_2) to AM16/32B-1 and one HMP60 (HMP60_9) to the second multiplexer AM16/32B-2 to test the operation. T is giving NAN and RH 182-172. RH is changing in monitor, but I suppose that's not the RH i should expect...

Stevens cs sensors are working. I have three on the first multiplexer and two in the second (cs655 1,2,3 & 9,10).

I wired HMP60 black wire to multiplexer 1H, brown 2H, blue 1L and white to 3H. I made a bridge from 1 L to 3 L and 2 H to 4 H; and so on as in the wiring instruction. Why is the bridge needed or is it? I tried to switch black and white, but nothing changes.

I inserted wire from CR1000 ground lug to AM16 COM ground (in instructions GROUND -- COM Ground). Is that ok? I connected also ground lugs from multiplexers to cr 1000 lug and added wire from cr1000 power out G to multiplexer G which were not in the instructions...

What could be the problem?

Here are the wiring instructions and the code which were in the cr1 file:

 

'CR1000
'
' Program Name : CCSL010834_A.CR3
'
'	Created :		N. Wills
'	Date    :   03 April 2014
'
'	Updated :   
' Date    :   
'
' Definition of program :-
'	1.	Measure all sensors at 1min frequency
'	2.	Store values at 60min
'	3.  Store values at 24hr
'	4.	
'	5.	

'-Wiring For CR1000-
'
'  AM16/32-1 Multiplexer (4x16 mode)
'    1H:    COM ODD H
'    G:     COM ODD L
'    SW12:  COM EVEN H
'    C7:    COM EVEN L
'    Ground:  COM Ground
'    G:  GND
'    12V:  12V
'    C1:  CLK
'    C2:  RES
'
'-Wiring For AM16/32-1 Multiplexer (4x16 mode)-
'
'  AM16/32B-1 (Set 1)
'    1H:  HMP60_1 Temperature
'    1L:  HMP60_1 and CS655_1 Ground
'    BGround:  HMP60_1 Shield
'    2H:  HMP60_1 and CS655_1 12V
'    2L:  CS655_1 SDI-12
'    BGround:  CS655_1 Shield
'
'  AM16/32B-1 (Set 2)
'    3H:  HMP60_1 RH
'    3L:  HMP60_1 and CS655_2 Ground
'    BGround:  
'    4H:  HMP60_1 and CS655_2 12V
'    4L:  CS655_2 SDI-12
'    BGround:  CS655_2 Shield
'
'  AM16/32B-1 (Set 3)
'    5H:  HMP60_2 Temperature
'    5L:  HMP60_2 and CS655_3 Ground
'    BGround:  HMP60_2 Shield
'    6H:  HMP60_2 and CS655_3 12V
'    6L:  CS655_3 SDI-12
'    BGround:  CS655_3 Shield
'
'  AM16/32B-1 (Set 4)
'    7H:  HMP60_2 RH
'    7L:  HMP60_2 and CS655_4 Ground
'    BGround:  
'    8H:  HMP60_2 and CS655_4 12V
'    8L:  CS655_4 SDI-12
'    BGround:  CS655_4 Shield
'
'  AM16/32B-1 (Set 5)
'    9H:  HMP60_3 Temperature
'    9L:  HMP60_3 and CS655_5 Ground
'    BGround:  HMP60_3 Shield
'    10H:  HMP60_3 and CS655_5 12V
'    10L:  CS655_5 SDI-12
'    BGround:  CS655_5 Shield
'
'  AM16/32B-1 (Set 6)
'    11H:  HMP60_3 RH
'    11L:  HMP60_3 and CS655_6 Ground
'    BGround:  
'    12H:  HMP60_3 and CS655_6 12V
'    12L:  CS655_6 SDI-12
'    BGround:  CS655_6 Shield
'
'  AM16/32B-1 (Set 7)
'    13H:  HMP60_4 Temperature
'    13L:  HMP60_4 and CS655_7 Ground
'    BGround:  HMP60_4 Shield
'    14H:  HMP60_4 and CS655_7 12V
'    14L:  CS655_7 SDI-12
'    BGround:  CS655_7 Shield
'
'  AM16/32B-1 (Set 8)
'    15H:  HMP60_4 RH
'    5L:  HMP60_4 and CS655_8 Ground
'    BGround:  
'    16H:  HMP60_4 and CS655_8 12V
'    16L:  CS655_8 SDI-12
'    BGround:  CS655_8 Shield
'
'  AM16/32B-1 (Set 9)
'    17H:  HMP60_5 Temperature
'    17L:  HMP60_5 Ground
'    BGround:  HMP60_5 Shield
'    18H:  HMP60_5 12V
'    18L:  
'    BGround:  
'
'  AM16/32B-1 (Set 10)
'    19H:  HMP60_5 RH
'    19L:  HMP60_5 Ground
'    BGround:  
'    20H:  HMP60_5 12V
'    20L:  
'    BGround:  
'
'  AM16/32B-1 (Set 11)
'    21H:  HMP60_6 Temperature
'    21L:  HMP60_6 Ground
'    BGround:  HMP60_6 Shield
'    22H:  HMP60_6 12V
'    22L:  
'    BGround:  
'
'  AM16/32B-1 (Set 12)
'    23H:  HMP60_6 RH
'    23L:  HMP60_6 Ground
'    BGround:  
'    24H:  HMP60_6 12V
'    24L:  
'    BGround:  
'
'  AM16/32B-1 (Set 13)
'    25H:  HMP60_7 Temperature
'    25L:  HMP60_7 Ground
'    BGround:  HMP60_7 Shield
'    26H:  HMP60_7 12V
'    26L:  
'    BGround:  
'
'  AM16/32B-1 (Set 14)
'    27H:  HMP60_7 RH
'    27L:  HMP60_7 Ground
'    BGround:  
'    28H:  HMP60_7 12V
'    28L:  
'    BGround:  
'
'  AM16/32B-1 (Set 15)
'    29H:  HMP60_8 Temperature
'    29L:  HMP60_8 Ground
'    BGround:  HMP60_8 Shield
'    30H:  HMP60_8 12V
'    30L:  
'    BGround:  
'
'  AM16/32B-1 (Set 16)
'    31H:  HMP60_8 RH
'    31L:  HMP60_8 Ground
'    BGround:  
'    32H:  HMP60_8 12V
'    32L:  
'    BGround:  
'
'------------------------
'
'  AM16/32-2 Multiplexer (4x16 mode)
'    1L:    COM ODD H
'    G:     COM ODD L
'    SW12:  COM EVEN H
'    C7:    COM EVEN L
'    Ground:  COM Ground
'    G:  GND
'    12V:  12V
'    C1:  CLK
'    C3:  RES
'
'-Wiring For AM16/32-2 Multiplexer (4x16 mode)-
'
'  AM16/32B-2 (Set 1)
'    1H:  HMP60_9 Temperature
'    1L:  HMP60_9 and CS655_9 Ground
'    BGround:  HMP60_9 Shield
'    2H:  HMP60_9 and CS655_9 12V
'    2L:  CS655_9 SDI-12
'    BGround:  CS655_9 Shield
'
'  AM16/32B-2 (Set 2)
'    3H:  HMP60_9 RH
'    3L:  HMP60_9 and CS655_10 Ground
'    BGround:  
'    4H:  HMP60_9 and CS655_10 12V
'    4L:  CS655_10 SDI-12
'    BGround:  CS655_10 Shield
'
'  AM16/32B-2 (Set 3)
'    5H:  HMP60_10 Temperature
'    5L:  HMP60_10 and CS655_11 Ground
'    BGround:  HMP60_10 Shield
'    6H:  HMP60_10 and CS655_11 12V
'    6L:  CS655_11 SDI-12
'    BGround:  CS655_11 Shield
'
'  AM16/32B-2 (Set 4)
'    7H:  HMP60_10 RH
'    7L:  HMP60_10 and CS655_12 Ground
'    BGround:  
'    8H:  HMP60_10 and CS655_12 12V
'    8L:  CS655_12 SDI-12
'    BGround:  CS655_12 Shield
'
'  AM16/32B-2 (Set 5)
'    9H:  HMP60_11 Temperature
'    9L:  HMP60_11 and CS655_13 Ground
'    BGround:  HMP60_11 Shield
'    10H:  HMP60_11 and CS655_13 12V
'    10L:  CS655_13 SDI-12
'    BGround:  CS655_13 Shield
'
'  AM16/32B-2 (Set 6)
'    11H:  HMP60_11 RH
'    11L:  HMP60_11 and CS655_14 Ground
'    BGround:  
'    12H:  HMP60_11 and CS655_14 12V
'    12L:  CS655_14 SDI-12
'    BGround:  CS655_14 Shield
'
'  AM16/32B-2 (Set 7)
'    13H:  HMP60_12 Temperature
'    13L:  HMP60_12 and CS655_15 Ground
'    BGround:  HMP60_12 Shield
'    14H:  HMP60_12 and CS655_15 12V
'    14L:  CS655_15 SDI-12
'    BGround:  CS655_15 Shield
'
'  AM16/32B-2 (Set 8)
'    15H:  HMP60_12 RH
'    5L:  HMP60_12 and CS655_16 Ground
'    BGround:  
'    16H:  HMP60_12 and CS655_16 12V
'    16L:  CS655_16 SDI-12
'    BGround:  CS655_16 Shield
'
'  AM16/32B-2 (Set 9)
'    17H:  HMP60_13 Temperature
'    17L:  HMP60_13 Ground
'    BGround:  HMP60_13 Shield
'    18H:  HMP60_13 12V
'    18L:  
'    BGround:  
'
'  AM16/32B-2 (Set 10)
'    19H:  HMP60_13 RH
'    19L:  HMP60_13 Ground
'    BGround:  
'    20H:  HMP60_13 12V
'    20L:  
'    BGround:  
'
'  AM16/32B-2 (Set 11)
'    21H:  HMP60_14 Temperature
'    21L:  HMP60_14 Ground
'    BGround:  HMP60_14 Shield
'    22H:  HMP60_14 12V
'    22L:  
'    BGround:  
'
'  AM16/32B-2 (Set 12)
'    23H:  HMP60_14 RH
'    23L:  HMP60_14 Ground
'    BGround:  
'    24H:  HMP60_14 12V
'    24L:  
'    BGround:  
'
'  AM16/32B-2 (Set 13)
'    25H:  HMP60_15 Temperature
'    25L:  HMP60_15 Ground
'    BGround:  HMP60_15 Shield
'    26H:  HMP60_15 12V
'    26L:  
'    BGround:  
'
'  AM16/32B-2 (Set 14)
'    27H:  HMP60_15 RH
'    27L:  HMP60_15 Ground
'    BGround:  
'    28H:  HMP60_15 12V
'    28L:  
'    BGround:  
'
'  AM16/32B-2 (Set 15)
'    29H:  HMP60_16 Temperature
'    29L:  HMP60_16 Ground
'    BGround:  HMP60_16 Shield
'    30H:  HMP60_16 12V
'    30L:  
'    BGround:  
'
'  AM16/32B-2 (Set 16)
'    31H:  HMP60_16 RH
'    31L:  HMP60_16 Ground
'    BGround:  
'    32H:  HMP60_16 12V
'    32L:  
'    BGround:  
'
'  ---------------------------
'
'  05103 Wind Speed & Direction Sensor
'    Ground:  Black
'    Ground:  Clear
'    Ground:  White
'    2H:  Green
'    VX1 OR EX1:  Blue
'    P1:  Red
'
'  ARG100 Rain Gauge (CSL)
'    Ground:  Clear
'    P2:  Black
'
'  SKP215 Quantum Sensor (CSL)
'    Ground:  Blue
'    Ground:  Screen
'    3H:  Green
'    3L:  Blue & Red
'    3L:  Jumper To Ground
'    Ground:  Jumper To 3L





'Declare Variables and Units
Public BattV
Public PTemp_C
Public CS65X(96)
Public HMP60_1(8)
Public HMP60_2(8)
Public HMP60_3(8)
Public HMP60_4(8)
Public WS_ms
Public WindDir
Public Rain_mm
Public QR

Alias CS65X(1)=VWC_1  : Units VWC_1=m^3/m^3
Alias CS65X(2)=EC_1   : Units EC_1=dS/m
Alias CS65X(3)=T_1    : Units T_1=Deg C
Alias CS65X(4)=P_1    : Units P_1=unitless
Alias CS65X(5)=PA_1   : Units PA_1=nSec
Alias CS65X(6)=VR_1   : Units VR_1=unitless
Alias CS65X(7)=VWC_2  : Units VWC_2=m^3/m^3
Alias CS65X(8)=EC_2   : Units EC_2=dS/m
Alias CS65X(9)=T_2    : Units T_2=Deg C
Alias CS65X(10)=P_2   : Units P_2=unitless
Alias CS65X(11)=PA_2  : Units PA_2=nSec
Alias CS65X(12)=VR_2  : Units VR_2=unitless
Alias CS65X(13)=VWC_3 : Units VWC_3=m^3/m^3
Alias CS65X(14)=EC_3  : Units EC_3=dS/m
Alias CS65X(15)=T_3   : Units T_3=Deg C
Alias CS65X(16)=P_3   : Units P_3=unitless
Alias CS65X(17)=PA_3  : Units PA_3=nSec
Alias CS65X(18)=VR_3  : Units VR_3=unitless
Alias CS65X(19)=VWC_4 : Units VWC_4=m^3/m^3
Alias CS65X(20)=EC_4  : Units EC_4=dS/m
Alias CS65X(21)=T_4   : Units T_4=Deg C
Alias CS65X(22)=P_4   : Units P_4=unitless
Alias CS65X(23)=PA_4  : Units PA_4=nSec
Alias CS65X(24)=VR_4  : Units VR_4=unitless
Alias CS65X(25)=VWC_5 : Units VWC_5=m^3/m^3
Alias CS65X(26)=EC_5  : Units EC_5=dS/m
Alias CS65X(27)=T_5   : Units T_5=Deg C
Alias CS65X(28)=P_5   : Units P_5=unitless
Alias CS65X(29)=PA_5  : Units PA_5=nSec
Alias CS65X(30)=VR_5  : Units VR_6=unitless
Alias CS65X(31)=VWC_6 : Units VWC_6=m^3/m^3
Alias CS65X(32)=EC_6  : Units EC_6=dS/m
Alias CS65X(33)=T_6   : Units T_6=Deg C
Alias CS65X(34)=P_6   : Units P_6=unitless
Alias CS65X(35)=PA_6  : Units PA_6=nSec
Alias CS65X(36)=VR_6  : Units VR_6=unitless
Alias CS65X(37)=VWC_7 : Units VWC_7=m^3/m^3
Alias CS65X(38)=EC_7  : Units EC_7=dS/m
Alias CS65X(39)=T_7   : Units T_7=Deg C
Alias CS65X(40)=P_7   : Units P_7=unitless
Alias CS65X(41)=PA_7  : Units PA_7=nSec
Alias CS65X(42)=VR_7  : Units VR_7=unitless
Alias CS65X(43)=VWC_8 : Units VWC_8=m^3/m^3
Alias CS65X(44)=EC_8  : Units EC_8=dS/m
Alias CS65X(45)=T_8   : Units T_8=Deg C
Alias CS65X(46)=P_8   : Units P_8=unitless
Alias CS65X(47)=PA_8  : Units PA_8=nSec
Alias CS65X(48)=VR_8  : Units VR_8=unitless
Alias CS65X(49)=VWC_9  : Units VWC_9=m^3/m^3
Alias CS65X(50)=EC_9   : Units EC_9=dS/m
Alias CS65X(51)=T_9    : Units T_9=Deg C
Alias CS65X(52)=P_9    : Units P_9=unitless
Alias CS65X(53)=PA_9   : Units PA_9=nSec
Alias CS65X(54)=VR_9   : Units VR_9=unitless
Alias CS65X(55)=VWC_10 : Units VWC_10=m^3/m^3
Alias CS65X(56)=EC_10  : Units EC_10=dS/m
Alias CS65X(57)=T_10   : Units T_10=Deg C
Alias CS65X(58)=P_10   : Units P_10=unitless
Alias CS65X(59)=PA_10  : Units PA_10=nSec
Alias CS65X(60)=VR_10  : Units VR_10=unitless
Alias CS65X(61)=VWC_11 : Units VWC_11=m^3/m^3
Alias CS65X(62)=EC_11  : Units EC_11=dS/m
Alias CS65X(63)=T_11   : Units T_11=Deg C
Alias CS65X(64)=P_11   : Units P_11=unitless
Alias CS65X(65)=PA_11  : Units PA_11=nSec
Alias CS65X(66)=VR_11  : Units VR_11=unitless
Alias CS65X(67)=VWC_12 : Units VWC_12=m^3/m^3
Alias CS65X(68)=EC_12  : Units EC_12=dS/m
Alias CS65X(69)=T_12   : Units T_12=Deg C
Alias CS65X(70)=P_12   : Units P_12=unitless
Alias CS65X(71)=PA_12  : Units PA_12=nSec
Alias CS65X(72)=VR_12  : Units VR_12=unitless
Alias CS65X(73)=VWC_13 : Units VWC_13=m^3/m^3
Alias CS65X(74)=EC_13  : Units EC_13=dS/m
Alias CS65X(75)=T_13   : Units T_13=Deg C
Alias CS65X(76)=P_13   : Units P_13=unitless
Alias CS65X(77)=PA_13  : Units PA_13=nSec
Alias CS65X(78)=VR_13  : Units VR_13=unitless
Alias CS65X(79)=VWC_14 : Units VWC_14=m^3/m^3
Alias CS65X(80)=EC_14  : Units EC_14=dS/m
Alias CS65X(81)=T_14   : Units T_14=Deg C
Alias CS65X(82)=P_14   : Units P_14=unitless
Alias CS65X(83)=PA_14  : Units PA_14=nSec
Alias CS65X(84)=VR_14  : Units VR_14=unitless
Alias CS65X(85)=VWC_15 : Units VWC_15=m^3/m^3
Alias CS65X(86)=EC_15  : Units EC_15=dS/m
Alias CS65X(87)=T_15   : Units T_15=Deg C
Alias CS65X(88)=P_15   : Units P_15=unitless
Alias CS65X(89)=PA_15  : Units PA_15=nSec
Alias CS65X(90)=VR_15  : Units VR_15=unitless
Alias CS65X(91)=VWC_16 : Units VWC_16=m^3/m^3
Alias CS65X(92)=EC_16  : Units EC_16=dS/m
Alias CS65X(93)=T_16   : Units T_16=Deg C
Alias CS65X(94)=P_16   : Units P_16=unitless
Alias CS65X(95)=PA_16  : Units PA_16=nSec
Alias CS65X(96)=VR_16  : Units VR_16=unitless

Alias HMP60_1(1)=AirTC_1 : Units AirTC_1=Deg C
Alias HMP60_1(2)=RH_1    : Units RH_1=%
Alias HMP60_1(3)=AirTC_2 : Units AirTC_2=Deg C
Alias HMP60_1(4)=RH_2    : Units RH_2=%
Alias HMP60_1(5)=AirTC_3 : Units AirTC_3=Deg C
Alias HMP60_1(6)=RH_3    : Units RH_3=%
Alias HMP60_1(7)=AirTC_4 : Units AirTC_4=Deg C
Alias HMP60_1(8)=RH_4    : Units RH_4=%

Alias HMP60_2(1)=AirTC_5 : Units AirTC_5=Deg C
Alias HMP60_2(2)=RH_5    : Units RH_5=%
Alias HMP60_2(3)=AirTC_6 : Units AirTC_6=Deg C
Alias HMP60_2(4)=RH_6    : Units RH_6=%
Alias HMP60_2(5)=AirTC_7 : Units AirTC_7=Deg C
Alias HMP60_2(6)=RH_7    : Units RH_7=%
Alias HMP60_2(7)=AirTC_8 : Units AirTC_8=Deg C
Alias HMP60_2(8)=RH_8    : Units RH_8=%

Alias HMP60_3(1)=AirTC_9 : Units AirTC_9=Deg C
Alias HMP60_3(2)=RH_9    : Units RH_9=%
Alias HMP60_3(3)=AirTC_10 : Units AirTC_10=Deg C
Alias HMP60_3(4)=RH_10    : Units RH_10=%
Alias HMP60_3(5)=AirTC_11 : Units AirTC_11=Deg C
Alias HMP60_3(6)=RH_11    : Units RH_11=%
Alias HMP60_3(7)=AirTC_12 : Units AirTC_12=Deg C
Alias HMP60_3(8)=RH_12    : Units RH_12=%

Alias HMP60_4(1)=AirTC_13 : Units AirTC_13=Deg C
Alias HMP60_4(2)=RH_13    : Units RH_13=%
Alias HMP60_4(3)=AirTC_14 : Units AirTC_14=Deg C
Alias HMP60_4(4)=RH_14    : Units RH_14=%
Alias HMP60_4(5)=AirTC_15 : Units AirTC_15=Deg C
Alias HMP60_4(6)=RH_15    : Units RH_15=%
Alias HMP60_4(7)=AirTC_16 : Units AirTC_16=Deg C
Alias HMP60_4(8)=RH_16    : Units RH_16=%

Units BattV=Volts
Units PTemp_C=Deg C
Units WS_ms=meters/second
Units WindDir=degrees
Units Rain_mm=mm
Units QR=umol/m^2/s

Dim LCount1
Dim LCount2

'Define Data Tables
DataTable(Table1,True,-1)
  DataInterval(0,60,Min,10)
  Average(96,CS65X(1),FP2,False)
  Average(1,AirTC_1,FP2,False)
  Average(1,AirTC_2,FP2,False)
  Average(1,AirTC_3,FP2,False)
  Average(1,AirTC_4,FP2,False)
  Average(1,AirTC_5,FP2,False)
  Average(1,AirTC_6,FP2,False)
  Average(1,AirTC_7,FP2,False)
  Average(1,AirTC_8,FP2,False)
  Average(1,AirTC_9,FP2,False)
  Average(1,AirTC_10,FP2,False)
  Average(1,AirTC_11,FP2,False)
  Average(1,AirTC_12,FP2,False)
  Average(1,AirTC_13,FP2,False)
  Average(1,AirTC_14,FP2,False)
  Average(1,AirTC_15,FP2,False)
  Average(1,AirTC_16,FP2,False)
  Sample(1,RH_1,FP2)
  Sample(1,RH_2,FP2)
  Sample(1,RH_3,FP2)
  Sample(1,RH_4,FP2)
  Sample(1,RH_5,FP2)
  Sample(1,RH_6,FP2)
  Sample(1,RH_7,FP2)
  Sample(1,RH_8,FP2)
  Sample(1,RH_9,FP2)
  Sample(1,RH_10,FP2)
  Sample(1,RH_11,FP2)
  Sample(1,RH_12,FP2)
  Sample(1,RH_13,FP2)
  Sample(1,RH_14,FP2)
  Sample(1,RH_15,FP2)
  Sample(1,RH_16,FP2)
  WindVector (1,WS_ms,WindDir,FP2,False,0,0,0)
  FieldNames("WS_ms_S_WVT,WindDir_D1_WVT,WindDir_SD1_WVT")
  Totalize(1,Rain_mm,FP2,False)
  Average(1,QR,FP2,False)
  Minimum(1,BattV,FP2,False,False)
  Average(1,PTemp_C,FP2,False)
EndTable

DataTable(Table2,True,-1)
  DataInterval(0,1440,Min,10)
  Average(96,CS65X(1),FP2,False)
  Average(1,AirTC_1,FP2,False)
  Average(1,AirTC_2,FP2,False)
  Average(1,AirTC_3,FP2,False)
  Average(1,AirTC_4,FP2,False)
  Average(1,AirTC_5,FP2,False)
  Average(1,AirTC_6,FP2,False)
  Average(1,AirTC_7,FP2,False)
  Average(1,AirTC_8,FP2,False)
  Average(1,AirTC_9,FP2,False)
  Average(1,AirTC_10,FP2,False)
  Average(1,AirTC_11,FP2,False)
  Average(1,AirTC_12,FP2,False)
  Average(1,AirTC_13,FP2,False)
  Average(1,AirTC_14,FP2,False)
  Average(1,AirTC_15,FP2,False)
  Average(1,AirTC_16,FP2,False)
  Sample(1,RH_1,FP2)
  Sample(1,RH_2,FP2)
  Sample(1,RH_3,FP2)
  Sample(1,RH_4,FP2)
  Sample(1,RH_5,FP2)
  Sample(1,RH_6,FP2)
  Sample(1,RH_7,FP2)
  Sample(1,RH_8,FP2)
  Sample(1,RH_9,FP2)
  Sample(1,RH_10,FP2)
  Sample(1,RH_11,FP2)
  Sample(1,RH_12,FP2)
  Sample(1,RH_13,FP2)
  Sample(1,RH_14,FP2)
  Sample(1,RH_15,FP2)
  Sample(1,RH_16,FP2)
  WindVector (1,WS_ms,WindDir,FP2,False,0,0,0)
  FieldNames("WS_ms_S_WVT,WindDir_D1_WVT,WindDir_SD1_WVT")
  Totalize(1,Rain_mm,FP2,False)
  Average(1,QR,FP2,False)
  Minimum(1,BattV,FP2,False,False)
  Average(1,PTemp_C,FP2,False)
EndTable

'Main Program
BeginProg
  'Main Scan
  Scan(5,Min,3,0)
    'Default Datalogger Battery Voltage measurement 'BattV'
    Battery(BattV)
    
    'Default Wiring Panel Temperature measurement 'PTemp_C'
    PanelTemp(PTemp_C,_50Hz)
    
    'Turn AM16/32-1 Multiplexer On
    PortSet(2,1)
    Delay(0,150,mSec)
    LCount1=1
    LCount2=1
    SubScan(0,uSec,8)
      'Switch to next AM16/32-1 Multiplexer channel
      PulsePort(1,10000)
      
      'Turn on 12V power to HMP60 and CS655 - SW12 channel
      SW12 (1)
      'Delay for 3s to allow sensors to warm up
      Delay(0,3,Sec)
      
      'CS650/655 Water Content Reflectometer measurements 'VWC', 'EC', and 'T'
      SDI12Recorder(CS65X(LCount1),7,"0","M3!",1,0)
      
      'HMP60 Temperature & Relative Humidity Sensor measurements 'AirTC' and 'RH'
      VoltSe(HMP60_1(LCount2),1,mV2500,1,0,0,_50Hz,0.1,0)
      
      'Turn off 12V power to HMP60 and CS655 - SW12 channel
      SW12 (0)
      LCount1=LCount1+6
      LCount2=LCount2+1
      
    NextSubScan
    
    LCount1=1
    LCount2=1
    SubScan(0,uSec,8)
      'Switch to next AM16/32-1 Multiplexer channel
      PulsePort(1,10000)

      'Turn on 12V power to HMP60 and CS655 - SW12 channel
      SW12 (1)
      'Delay for 3s to allow sensors to warm up
      Delay(0,3,Sec)
      
      'HMP60 Temperature & Relative Humidity Sensor measurements 'AirTC' and 'RH'
      VoltSe(HMP60_2(LCount2),1,mV2500,1,0,0,_50Hz,0.1,0)
      
      'Turn off 12V power to HMP60 and CS655 - SW12 channel
      SW12 (0)
      LCount2=LCount2+1
      
    NextSubScan
    
    'Turn AM16/32-1 Multiplexer Off
		PortSet(2,0)
		Delay(0,150,mSec)
		
    'Turn AM16/32-2 Multiplexer On
    PortSet(3,1)
    Delay(0,150,mSec)
    LCount1=49
    LCount2=1
    SubScan(0,uSec,8)
      'Switch to next AM16/32-2 Multiplexer channel
      PulsePort(1,10000)
            
      'Turn on 12V power to HMP60 and CS655 - SW12 channel
      SW12 (1)
      'Delay for 3s to allow sensors to warm up
      Delay(0,3,Sec)
      
      'CS650/655 Water Content Reflectometer measurements 'VWC', 'EC', and 'T'
      SDI12Recorder(CS65X(LCount1),7,"0","M3!",1,0)
      
      'HMP60 Temperature & Relative Humidity Sensor measurements 'AirTC' and 'RH'
      VoltSe(HMP60_3(LCount2),1,mV2500,2,0,0,_50Hz,0.1,0)
      
      'Turn off 12V power to HMP60 and CS655 - SW12 channel
      SW12 (0)
      LCount1=LCount1+6
      LCount2=LCount2+1
      
    NextSubScan
    
    LCount1=1
    LCount2=1
    SubScan(0,uSec,8)
      'Switch to next AM16/32-2 Multiplexer channel
      PulsePort(1,10000)

      'Turn on 12V power to HMP60 and CS655 - SW12 channel
      SW12 (1)
      'Delay for 3s to allow sensors to warm up
      Delay(0,3,Sec)
      
      'HMP60 Temperature & Relative Humidity Sensor measurements 'AirTC' and 'RH'
      VoltSe(HMP60_4(LCount2),1,mV2500,2,0,0,_50Hz,0.1,0)
      
      'Turn off 12V power to HMP60 and CS655 - SW12 channel
      SW12 (0)
      LCount2=LCount2+1
      
    NextSubScan
    
    'Turn AM16/32-2 Multiplexer Off
		PortSet(3,0)
		Delay(0,150,mSec)
		
    AirTC_1 = AirTC_1-40
    AirTC_2 = AirTC_2-40
    AirTC_3 = AirTC_3-40
    AirTC_4 = AirTC_4-40
    AirTC_5 = AirTC_5-40
    AirTC_6 = AirTC_6-40
    AirTC_7 = AirTC_7-40
    AirTC_8 = AirTC_8-40
    AirTC_9 = AirTC_9-40
    AirTC_10 = AirTC_10-40
    AirTC_11 = AirTC_11-40
    AirTC_12 = AirTC_12-40
    AirTC_13 = AirTC_13-40
    AirTC_14 = AirTC_14-40
    AirTC_15 = AirTC_15-40
    AirTC_16 = AirTC_16-40
    
		'If (RH>100) AND (RH<108) Then RH=100
		If (RH_1>100) AND (RH_1<108) Then RH_1=100
		If (RH_2>100) AND (RH_2<108) Then RH_2=100
		If (RH_3>100) AND (RH_3<108) Then RH_3=100
		If (RH_4>100) AND (RH_4<108) Then RH_4=100
		If (RH_5>100) AND (RH_5<108) Then RH_5=100
		If (RH_6>100) AND (RH_6<108) Then RH_6=100
		If (RH_7>100) AND (RH_7<108) Then RH_7=100
		If (RH_8>100) AND (RH_8<108) Then RH_8=100
	  If (RH_9>100) AND (RH_9<108) Then RH_9=100
		If (RH_10>100) AND (RH_10<108) Then RH_10=100
		If (RH_11>100) AND (RH_11<108) Then RH_11=100
		If (RH_12>100) AND (RH_12<108) Then RH_12=100
		If (RH_13>100) AND (RH_13<108) Then RH_13=100
		If (RH_14>100) AND (RH_14<108) Then RH_14=100
		If (RH_15>100) AND (RH_15<108) Then RH_15=100
		If (RH_16>100) AND (RH_16<108) Then RH_16=100
		
    '05103 Wind Speed & Direction Sensor measurements 'WS_ms' and 'WindDir'
    PulseCount(WS_ms,1,1,1,1,0.098,0)
    BrHalf(WindDir,1,mV2500,3,1,1,2500,True,0,_50Hz,355,0)
    If WindDir>=360 OR WindDir<0 Then WindDir=0
    
    'ARG100 Tipping Bucket Rain Gauge measurement 'Rain_mm'
    PulseCount(Rain_mm,1,2,2,0,0.2,0)
    
    'SKP215 Quantum Sensor (CSL) measurements 'QR'
    VoltDiff(QR,1,mV25,3,True,0,_50Hz,100,0)
    If QR<0 Then QR=0
    
    'Call Data Tables and Store Data
    CallTable(Table1)
    CallTable(Table2)
  NextScan
EndProg

 

    Log in or register to post/reply in the forum.