; NOTE: the following CSI logger program annotations may contain errors.
; From an experimental perl module, Campbell::Program, by fnkci@uaf.edu
; output generated on host shand at Sat Apr 25 01:11:17 2015 local time


MODE 13
13:00  1
01:}
MODE 14

MODE 1
SCAN RATE 60
1:P10     ; BATT VOLT
1:50      ;     store in location 50

2:P20     ; PORT SET
1:9999    ;     P8=nc, P7=nc, P6=nc, P5=nc
2:9799    ;     P4=nc, P3=output, P2=nc, P1=nc

3:P89     ; IF X < = > F
1:50      ;     if X from location 50
2:4       ;     is <
3:12.55   ;     fixed value 12.55
4:21      ;     set flag F1 low

4:P92     ; IF TIME
1:3       ;     is 3 minutes into
2:60      ;     60 minute interval
3:30      ;     then DO...

5:P89     ;     IF X < = > F
1:50      ;         if X from location 50
2:3       ;         is >=
3:12.35   ;         fixed value 12.35
4:43      ;         set port C3 high

6:P95     ; END IF-DO

7:P92     ; IF TIME
1:720     ;     is 720 minutes into
2:1440    ;     1440 minute interval
3:43      ;     set port C3 high

8:P91     ; IF FLAG/PORT
1:21      ;     if flag F1 is low
2:30      ;     then DO...

9:P92     ;     IF TIME
1:10      ;         is 10 minutes into
2:60      ;         60 minute interval
3:53      ;         set port C3 low

10:P95    ; END IF-DO

11:P91    ; IF FLAG/PORT
1:13      ;     if flag F3 is high
2:30      ;     then DO...

12:P86    ;     DO
1:23      ;         set flag F3 low

13:P86    ;     DO
1:53      ;         set port C3 low

14:P95    ; END IF-DO

15:P86    ; DO
1:41      ;     set port C1 high

16:P22    ; EXCIT w/DEL
1:2       ;     drive excitation channel E2
2:0       ;     delay 0 sec w/ excitation
3:15      ;     delay 0.15 sec after excitation
4:0       ;     with 0 mV excitation

17:P1     ; VOLT (SE)
1:2       ;     2 repetitions
2:5       ;     using 2500 mV range, slow integration
3:5       ;     from input channel SE5
4:1--     ;     store result in locations 1 and 2
5:.1      ;     with multiplier * 0.1
6:-40     ;     and with offset + -40

18:P1     ; VOLT (SE)
1:2       ;     2 repetitions
2:5       ;     using 2500 mV range, slow integration
3:7       ;     from input channel SE7
4:3--     ;     store result in locations 3 and 4
5:.1      ;     with multiplier * 0.1
6:0       ;     and with offset + 0

19:P86    ; DO
1:51      ;     set port C1 low

20:P3     ; PULSE
1:1       ;     1 repetition
2:2       ;     from pulse counter P2
3:21      ;     as low level AC, discard long interval counts, output frequency (Hz)
4:5       ;     store result in location 5
5:.098    ;     with multiplier * 0.098
6:0       ;     and with offset + 0

21:P4     ; EX-DEL-SE
1:1       ;     1 repetition
2:5       ;     using 2500 mV range, slow integration
3:2       ;     from input channel SE2
4:3       ;     drive excitation channel E3
5:2       ;     with delay 0.02 sec
6:2500    ;     with 2500 mV excitation
7:6       ;     store result in location 6
8:.142    ;     with multiplier * 0.142
9:-10     ;     and with offset + -10

22:P2     ; VOLT (DIFF)
1:1       ;     1 repetition
2:4       ;     using 250 mV range, slow integration
3:5       ;     from input channel DIFF5
4:7       ;     store result in location 7
5:1       ;     with multiplier * 1
6:0       ;     and with offset + 0

23:P3     ; PULSE
1:1       ;     1 repetition
2:8       ;     from control port C8
3:2       ;     as switch closure
4:8       ;     store result in location 8
5:.1      ;     with multiplier * 0.1
6:0       ;     and with offset + 0

24:P2     ; VOLT (DIFF)
1:1       ;     1 repetition
2:5       ;     using 2500 mV range, slow integration
3:2       ;     from input channel DIFF2
4:48      ;     store result in location 48
5:.01098  ;     with multiplier * 0.01098
6:0       ;     and with offset + 0

25:P17    ; INTERNAL TEMP
1:49      ;     store in location 49

26:P10    ; BATT VOLT
1:50      ;     store in location 50

27:P92    ; IF TIME
1:0       ;     is 0 minutes into
2:60      ;     60 minute interval
3:10      ;     set output flag F0 high, output array id 127

28:P77    ; REAL TIME
1:1220    ;     year + day(midnight=prev.day) + hour-minute(midnight=2400)

29:P71    ; AVERAGE
1:4       ;     4 repetitions
2:1       ;     value from location 1

30:P69    ; WIND VECTOR
1:1       ;     1 repetition
2:10      ;     10 scans for standard deviation subinterval
3:0       ;     avg spd, avg dir, std dev of dir (Yamartino), for anem. & vane
4:5       ;     wind speed from location 5
5:6       ;     wind direction from location 6

31:P71    ; AVERAGE
1:1       ;     1 repetition
2:7       ;     value from location 7

32:P72    ; TOTALIZE
1:1       ;     1 repetition
2:8       ;     value from location 8

33:P71    ; AVERAGE
1:3       ;     3 repetitions
2:48      ;     value from location 48

34:P0     ; NOP

MODE 2
SCAN RATE 300
1:P18     ; TIME
1:3
2:0
3:51

2:P86     ; DO
1:47      ;     set port C7 high

3:P87     ; LOOP
1:0       ;     execute on every pass
2:12      ;     for 12 iterations

4:P86     ;     DO
1:76      ;         pulse port C6

5:P4      ;     EX-DEL-SE
1:1       ;         1 repetition
2:5       ;         using 2500 mV range, slow integration
3:1       ;         from input channel SE1
4:1       ;         drive excitation channel E1
5:10      ;         with delay 0.1 sec
6:2500    ;         with 2500 mV excitation
7:31--    ;         store result in locations 31 through 42
8:.0004   ;         with multiplier * 0.0004
9:0       ;         and with offset + 0

6:P95     ; END LOOP

7:P86     ; DO
1:57      ;     set port C7 low

8:P59     ; BRIDGE TRANSFORM, Rs=Rf(X/(1-X))
1:12      ;     12 repetitions
2:31      ;     Rs replaces X in location 31
3:14.94   ;     with multiplier Rf = 14.94

9:P92     ; IF TIME
1:0       ;     is 0 minutes into
2:60      ;     60 minute interval
3:30      ;     then DO...

10:P86    ;     DO
1:47      ;         set port C7 high

11:P86    ;     DO
1:44      ;         set port C4 high

12:P86    ;     DO
1:76      ;         pulse port C6

13:P27    ;     PERIOD AVG (SE)
1:2       ;         2 repetitions
2:4       ;         period in 10e-6 seconds, range 2.0 V, max 200 kHz
3:11      ;         from input channel SE11
4:10      ;         measure for 10 cycles
5:5       ;         with timeout of 0.05 seconds
6:21--    ;         store result in locations 21 and 22
7:.001    ;         with multiplier * 0.001
8:0       ;         and with offset + 0

14:P86    ;     DO
1:76      ;         pulse port C6

15:P27    ;     PERIOD AVG (SE)
1:2       ;         2 repetitions
2:4       ;         period in 10e-6 seconds, range 2.0 V, max 200 kHz
3:11      ;         from input channel SE11
4:10      ;         measure for 10 cycles
5:5       ;         with timeout of 0.05 seconds
6:23--    ;         store result in locations 23 and 24
7:.001    ;         with multiplier * 0.001
8:0       ;         and with offset + 0

16:P86    ;     DO
1:76      ;         pulse port C6

17:P27    ;     PERIOD AVG (SE)
1:2       ;         2 repetitions
2:4       ;         period in 10e-6 seconds, range 2.0 V, max 200 kHz
3:11      ;         from input channel SE11
4:10      ;         measure for 10 cycles
5:5       ;         with timeout of 0.05 seconds
6:25--    ;         store result in locations 25 and 26
7:.001    ;         with multiplier * 0.001
8:0       ;         and with offset + 0

18:P86    ;     DO
1:54      ;         set port C4 low

19:P86    ;     DO
1:57      ;         set port C7 low

20:P95    ; END IF-DO

21:P105   ; SDI-12 RECORDER
1:0       ;     address 0
2:1       ;     command M1, see SDI-12 sensor
3:5       ;     port C5
4:10      ;     store result in location 10
5:-1      ;     with multiplier * -1
6:0       ;     and with offset + 0

22:P30    ; Z=F*10^exp
1:273.15  ;     fixed value 273.15
2:0       ;     times 1 (10^0)
3:11      ;     store 273.15 in location 11

23:P33    ; Z=X+Y
1:11      ;     X value from location 11
2:1       ;     Y value from location 1
3:12      ;     store sum in location 12

24:P38    ; Z=X/Y
1:12      ;     X value from location 12
2:11      ;     Y value from location 11
3:13      ;     store ratio in location 13

25:P39    ; Z=SQRT(X)
1:13      ;     X value from location 13
2:14      ;     store square root in location 14

26:P36    ; Z=X*Y
1:10      ;     X value from location 10
2:14      ;     Y value from location 14
3:15      ;     store product in location 15

27:P34    ; Z=X+F
1:15      ;     X value from location 15
2:1.65    ;     fixed value 1.65
3:16      ;     store sum in location 16

28:P92    ; IF TIME
1:0       ;     is 0 minutes into
2:180     ;     180 minute interval
3:10      ;     set output flag F0 high, output array id 228

29:P77    ; REAL TIME
1:1220    ;     year + day(midnight=prev.day) + hour-minute(midnight=2400)

30:P71    ; AVERAGE
1:12      ;     12 repetitions
2:31      ;     value from location 31

31:P71    ; AVERAGE
1:6       ;     6 repetitions
2:21      ;     value from location 21

32:P70    ; SAMPLE
1:1       ;     1 repetition
2:10      ;     value from location 10

33:P70    ; SAMPLE
1:1       ;     1 repetition
2:16      ;     value from location 16

34:P89    ; IF X < = > F
1:52      ;     if X from location 52
2:4       ;     is <
3:121     ;     fixed value 121
4:18      ;     set flag F8 high

35:P89    ; IF X < = > F
1:52      ;     if X from location 52
2:3       ;     is >=
3:258     ;     fixed value 258
4:18      ;     set flag F8 high

36:P91    ; IF FLAG/PORT
1:18      ;     if flag F8 is high
2:30      ;     then DO...

37:P86    ;     DO
1:28      ;         set flag F8 low

38:P92    ;     IF TIME
1:0       ;         is 0 minutes into
2:5       ;         5 minute interval
3:10      ;         set output flag F0 high, output array id 238

39:P77    ;     REAL TIME
1:220     ;         day(midnight=prev.day) + hour-minute(midnight=2400)

40:P70    ;     SAMPLE
1:1       ;         1 repetition
2:16      ;         value from location 16

41:P95    ; END IF-DO

42:P0     ; NOP

MODE 3
1:P0      ; NOP

MODE 10
1:56
2:73
3:0
4:1097729
5:2048

MODE 12
1:0
1:0
1:0

MODE 13
13:8
8:0

MODE 13
13:9
9:0

MODE 13
13:10
10:0

MODE 13
13:13
13:0

MODE 11
1:37504
2:65295
3:2304
4:20
5:0
6:1
7:14
8:3.3029
9:1
10:00--
11:.25

;; CAUTION: experimental output tags follow:
;;
;; output array:
;;     1. id_127
;;     2. year
;;     3. day
;;     4. hhmm
;;     5. average-Loc1
;;     6. average-Loc2
;;     7. average-Loc3
;;     8. average-Loc4
;;     9. vector_avg_spd-Loc5.P2
;;     10. vector_avg_dir-Loc6.SE2
;;     11. vector_dir_std_dev
;;     12. average-Loc7.DIFF5
;;     13. totalize-Loc8.C8
;;     14. average-Loc48.DIFF2
;;     15. average-Loc49.panel_temperature_C
;;     16. average-Loc50.logger_battery_voltage
;;
;; output array:
;;     1. id_228
;;     2. year
;;     3. day
;;     4. hhmm
;;     5. average-Loc31
;;     6. average-Loc32
;;     7. average-Loc33
;;     8. average-Loc34
;;     9. average-Loc35
;;     10. average-Loc36
;;     11. average-Loc37
;;     12. average-Loc38
;;     13. average-Loc39
;;     14. average-Loc40
;;     15. average-Loc41
;;     16. average-Loc42
;;     17. average-Loc21
;;     18. average-Loc22
;;     19. average-Loc23
;;     20. average-Loc24
;;     21. average-Loc25
;;     22. average-Loc26
;;     23. sample-Loc10
;;     24. sample-Loc16
;;
;; output array:
;;     1. id_238
;;     2. day
;;     3. hhmm
;;     4. sample-Loc16