Campbell Scientific AM16/32B AM16/32B Relay Multiplexer - Page 25

_Blk & Clear

Page 25 highlights

AM16/32B Relay Multiplexer Wiring for CR1000 Program Example CR1000 AM16/32B (4x16) CS616* Control/Common Sensor Terminals C4 RES Odd H CS616#1_Green C5 CLK Odd L CS616#2_Green 12 V 12 V Gnd #1,2,3_Blk & Clear Gnd Gnd Even H CS616#3_Green 1H COM Odd H Even L #1,2,3_Orange 1L COM Odd L Gnd Gnd 2H COM Even H C6 COM Even L *Three sensors to each set of AM16/32B terminals. CR1000 Program Example 'Declare Public & Dim Variables Public batt_volt Public Panel_temp Public Period(48) Public VWC(48) Public Flag(1) Dim I 'Declare Constants 'CS616 Default Calibration Constants const a0= -0.0663 const a1= -0.0063 const a2= 0.0007 'Flag logic constants const high = true const low = false 'Define Data Tables DataTable (Dat30min,1,-1) DataInterval (0,30,Min,10) Minimum (1,batt_volt,FP2,0,False) Average (1,Panel_temp,FP2,0) Sample (48,Period(),FP2) Sample (48,VWC(),FP2) EndTable 'Main Program BeginProg Scan (5,Sec,0,0) 'scan instructions every 5 sec Battery (Batt_volt) PanelTemp (Panel_temp,250) ' 'Set flag 1 High every 30 min (Note: User can manually set flag 1 high/low) If IfTime (0,30,min)Then flag (1)=high If Flag(1)=high Then 'measure 48ea CS616 probes on AM16/32B in (4x16) mode PortSet (4,1) 'Set Mux Reset line High ' I=1 'set sub scan loop counter SubScan (0,mSec,16) 15

  • 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
  • 47
  • 48
  • 49
  • 50
  • 51
  • 52

AM16/32B Relay Multiplexer
Wiring for CR1000 Program Example
CR1000
AM16/32B (4x16)
CS616*
ol/Com
Contr
mon
ensor
S
Terminals
C4
ES
d H
CS616#1_Green
R
Od
C5
CLK
dd L
CS616#2_Green
O
12 V
12 V
Gnd
#1,2,3_Blk & Clear
Gnd
Gnd
Even H
CS616#3_Green
1H
COM Odd H
Even L
#1,2,3_Orange
1L
COM Odd L
Gnd
Gnd
2H
COM Even H
C6
COM Even L
*Three sensors to each set of AM16/32B terminals.
CR1000 Program E
'Declare Public &
xample
Dim Variables
Public batt_volt
Public Panel_temp
Public Period(48)
Public VWC(48)
Public Flag(1)
Dim I
'Declare Constants
'CS616 Default Cal
tants
ibration Cons
const a0= -0.0663
const a1= -0.0063
const a2= 0.0007
'Flag logic constants
const high = true
const low = false
'Define Data Tables
DataTable (Dat30min,1,-1)
DataInterval (0,30,Min,10)
Minimum (1,batt_volt,FP2,0,False)
Average (1,Panel_temp,FP2,0)
Sample (48,Period(),FP2)
Sample (48,VWC(),FP2)
EndTable
'Main Program
BeginProg
Scan (5,Sec,0,0)
'scan instructions every 5 sec
Battery (Batt_volt)
PanelTemp (Panel_temp,250)
'
'Set flag 1 High every 30 min (Note: User can manually set flag 1 high/low)
If IfTime (0,30,min)Then flag (1)=high
'++++++++++++++++++++++++
If Flag(1)=high Then
'measure 48ea CS616 probes on AM16/32B in (4x16) mode
PortSet (4,1)
'Set Mux Reset line High
'
I=1
'set sub scan loop counter
SubScan (0,mSec,16)
15