; 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 Fri May  1 06:04:33 2015 local time


MODE 13
13:00  1
01:}
MODE 14

MODE 1
SCAN RATE 60
1:P30     ; Z=F*10^exp
1:3014    ;     fixed value 3014
2:0       ;     times 1 (10^0)
3:10      ;     store 3014 in location 10

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

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

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

5:P95     ; END IF-DO

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

7:P89     ;     IF X < = > F
1:27      ;         if X from location 27
2:3       ;         is >=
3:12.4    ;         fixed value 12.4
4:48      ;         set port C8 high

8:P95     ; END IF-DO

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

10:P89    ;     IF X < = > F
1:27      ;         if X from location 27
2:3       ;         is >=
3:12.3    ;         fixed value 12.3
4:48      ;         set port C8 high

11:P89    ;     IF X < = > F
1:27      ;         if X from location 27
2:3       ;         is >=
3:12      ;         fixed value 12
4:30      ;         then DO...

12:P92    ;         IF TIME
1:720     ;             is 720 minutes into
2:1440    ;             1440 minute interval
3:48      ;             set port C8 high

13:P95    ;     END IF-DO

14:P95    ; END IF-DO

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

16:P91    ;     IF FLAG/PORT
1:21      ;         if flag F1 is low
2:58      ;         set port C8 low

17:P95    ; END IF-DO

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

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

20:P86    ;     DO
1:58      ;         set port C8 low

21:P95    ; END IF-DO

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

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

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

25:P1     ; VOLT (SE)
1:1       ;     1 repetition
2:5       ;     using 2500 mV range, slow integration
3:2       ;     from input channel SE2
4:2       ;     store result in location 2
5:.1      ;     with multiplier * 0.1
6:0       ;     and with offset + 0

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

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

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

29:P10    ; BATT VOLT
1:27      ;     store in location 27

30:P17    ; INTERNAL TEMP
1:28      ;     store in location 28

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

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

33:P77    ; REAL TIME
1:1120    ;     year + day + hour-minute(midnight=2400)

34:P71    ; AVERAGE
1:2       ;     2 repetitions
2:1       ;     value from location 1

35:P71    ; AVERAGE
1:2       ;     2 repetitions
2:27      ;     value from location 27

36:P0     ; NOP

MODE 2
SCAN RATE 5

MODE 3
1:P0      ; NOP

MODE 10
1:28
2:64
3:0
4:573441
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:2

MODE 11
1:48081
2:4573
3:1280
4:7
5:0
6:1
7:13
8:3.1584
9:99
10:0
11:1.5

;; CAUTION: experimental output tags follow:
;;
;; output array:
;;     1. id_131
;;     2. sample-Loc10
;;     3. year
;;     4. day
;;     5. hhmm
;;     6. average-Loc1.SE1
;;     7. average-Loc2.SE2
;;     8. average-Loc27.logger_battery_voltage
;;     9. average-Loc28.panel_temperature_C