beautypg.com

4 sample program 4 – Campbell Scientific CS615 Water Content Reflectometer User Manual

Page 13

background image

CS615 WATER CONTENT REFLECTOMETER

9

;delay loop to wait remainder of execution
;interval once AM416 is clocked, and one
;complete execution interval for precise
;pulse count interval.

7: Beginning of Loop (P87)

1:

1

Delay

2:

2

Loop Count

8: End (P95) ;end of delay loop

9: Pulse (P3) ;read CS615s

1:

3

Reps

2:

1

Pulse Input Channel

3:

21

Low Level AC, Output Hz

4:

1

Loc [ kHz#1 ]

5:

.001

Mult

6:

0.0

Offset

;convert frequencies to period. 0.001 multiplier
;converts kHz to milliseconds.

10: Z=1/X (P42)

1:

1

X Loc [ kHz#1 ]

2:

4

Z Loc [ period#1 ]

11: Z=1/X (P42)

1:

2

X Loc [ kHz#2 ]

2:

5

Z Loc [ period#2 ]

12: Z=1/X (P42)

1:

3

X Loc [ kHz#3 ]

2:

6

Z Loc [ period#3 ]

13: Polynomial (P55) ;apply calibration

1:

3

Reps

2:

4

X Loc [ period#1 ]

3:

7--

F(X) Loc [ water#1 ]

4:

-.187

C0

5:

.037

C1

6:

.335

C2

7:

0.0

C3

8:

0.0

C4

9:

0.0

C5

14: End (P95)

15: Do (P86) ;set CS615 enable low

1:

53

Set Port 3 Low

16: Do (P86) ;set AM416 reset low

1:

51

Set Port 1 Low

17: Do (P86)

1:

10

Set Output Flag High

18: Sample (P70)

1:

48

Reps

2:

7

Loc [ water#1 ]

19: End (P95)

End Program

10.4 SAMPLE PROGRAM 4

Program using the Period Averaging Instruction
(P27) of CR10 datalogger and AM416
multiplexer to read 48 CS615 probes

CAUTION:

1.

The probe rods of the CS615 are
essentially antennae which transmit and
receive radio waves. Interference can
occur when enabled probes are in close
proximity and electrical conductivity of
the measured medium is high.
Generally, interference is not a problem
when the distance between enabled
probes is greater than 20 cm. It may be
necessary to configure probe
placement and multiplexer connection
to alleviate probe interaction.

;{CR10}
;
*Table 1 Program

01:

1.0

Execution Interval (seconds)

;Once an Hour, Read Probes

1: If time is (P92)

1:

0

Minutes into a

2:

60

Minute Interval

3:

30

Then Do

; enable multiplexer

2: Do (P86)

1:

41

Set Port 1 High

; turn on port that enables 615s

3: Do (P86)

1:

43

Set Port 3 High

;Multiplexer loop

4: Beginning of Loop (P87)

1:

0

Delay

2:

16

Loop Count

; clock multiplexer

5: Do (P86)

1:

72

Pulse Port 2