; 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 Wed Nov  4 07:33:53 2009 local time


MODE 13
13:00  1
01:}
MODE 14

MODE 1
SCAN RATE 60
1:P86     ; DO
1:47      ;     set port C7 high

2:P1      ; VOLT (SE)
1:1       ;     1 repetition
2:15      ;     using 2500 mV range, fast integration
3:12      ;     from input channel SE12
4:60      ;     store result in location 60
5:.011    ;     with multiplier * 0.011
6:0       ;     and with offset + 0

3:P3      ; PULSE
1:1       ;     1 repetition
2:1       ;     from pulse counter P1
3:2       ;     as switch closure
4:1       ;     store result in location 1
5:.0133   ;     with multiplier * 0.0133
6:.447    ;     and with offset + 0.447

4: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:2       ;     store result in location 2
5:.098    ;     with multiplier * 0.098
6:0       ;     and with offset + 0

5: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:1       ;     with delay 0.01 sec
6:2500    ;     with 2500 mV excitation
7:3       ;     store result in location 3
8:.142    ;     with multiplier * 0.142
9:0       ;     and with offset + 0

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

7:P11     ; TEMP (107)
1:1       ;     1 repetition
2:5       ;     from input channel SE5
3:3       ;     excitation channel E3
4:6       ;     store result in location 6
5:1       ;     with multiplier * 1
6:0       ;     and with offset + 0

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

9:P4      ; EX-DEL-SE
1:1       ;     1 repetition
2:5       ;     using 2500 mV range, slow integration
3:8       ;     from input channel SE8
4:2       ;     drive excitation channel E2
5:15      ;     with delay 0.15 sec
6:2500    ;     with 2500 mV excitation
7:9       ;     store result in location 9
8:.1      ;     with multiplier * 0.1
9:0       ;     and with offset + 0

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

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

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

13:P86    ; DO
1:42      ;     set port C2 high

14:P86    ; DO
1:73      ;     pulse port C3

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

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

17:P86    ; DO
1:73      ;     pulse port C3

18:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

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

20:P86    ; DO
1:73      ;     pulse port C3

21:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

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

23:P86    ; DO
1:73      ;     pulse port C3

24:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

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

26:P86    ; DO
1:73      ;     pulse port C3

27:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

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

29:P86    ; DO
1:73      ;     pulse port C3

30:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

31:P14    ; TC TEMP (DIFF)
1:1       ;     1 repetition
2:2       ;     using 7.5 mV range, slow integration
3:5       ;     from input channel DIFF5
4:1       ;     for type T thermocouple
5:49      ;     reference to temperature in location 49
6:18      ;     store result in location 18
7:1       ;     with multiplier * 1
8:0       ;     and with offset + 0

32:P86    ; DO
1:73      ;     pulse port C3

33:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

34:P14    ; TC TEMP (DIFF)
1:1       ;     1 repetition
2:2       ;     using 7.5 mV range, slow integration
3:5       ;     from input channel DIFF5
4:1       ;     for type T thermocouple
5:49      ;     reference to temperature in location 49
6:48      ;     store result in location 48
7:1       ;     with multiplier * 1
8:0       ;     and with offset + 0

35:P86    ; DO
1:73      ;     pulse port C3

36:P22    ; EXCIT w/DEL
1:1       ;     drive excitation channel E1
2:0       ;     delay 0 sec w/ excitation
3:10      ;     delay 0.1 sec after excitation
4:0       ;     with 0 mV excitation

37:P2     ; VOLT (DIFF)
1:1       ;     1 repetition
2:0       ;     using auto- range, slow integration
3:5       ;     from input channel DIFF5
4:16      ;     store result in location 16
5:-.171   ;     with multiplier * -.171
6:-17.12  ;     and with offset + -17.12

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

39:P86    ; DO
1:52      ;     set port C2 low

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

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

42:P71    ; AVERAGE
1:1       ;     1 repetition
2:1       ;     value from location 1

43: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:2       ;     wind speed from location 2
5:3       ;     wind direction from location 3

44:P71    ; AVERAGE
1:6       ;     6 repetitions
2:4       ;     value from location 4

45:P72    ; TOTALIZE
1:1       ;     1 repetition
2:10      ;     value from location 10

46:P71    ; AVERAGE
1:6       ;     6 repetitions
2:11      ;     value from location 11

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

48:P71    ; AVERAGE
1:1       ;     1 repetition
2:60      ;     value from location 60

49:P96    ; SERIAL OUT
1:71      ;     storage module 1

50:P92    ; IF TIME
1:30      ;     is 30 minutes into
2:60      ;     60 minute interval
3:46      ;     set port C6 high

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

52:P91    ;     IF FLAG/PORT
1:21      ;         if flag F1 is low
2:56      ;         set port C6 low

53:P95    ; END IF-DO

54:P0     ; NOP

MODE 2
SCAN RATE 600
1:P1      ; VOLT (SE)
1:1       ;     1 repetition
2:5       ;     using 2500 mV range, slow integration
3:6       ;     from input channel SE6
4:51      ;     store result in location 51
5:.1      ;     with multiplier * 0.1
6:233.15  ;     and with offset + 233.15

2:P105    ; SDI-12 RECORDER
1:0       ;     address 0
2:0       ;     command M, initiate measurement
3:5       ;     port C5
4:52      ;     store result in location 52
5:-1      ;     with multiplier * -1
6:0       ;     and with offset + 0

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

4:P38     ; Z=X/Y
1:51      ;     X value from location 51
2:53      ;     Y value from location 53
3:54      ;     store ratio in location 54

5:P39     ; Z=SQRT(X)
1:54      ;     X value from location 54
2:54      ;     store square root in location 54

6:P36     ; Z=X*Y
1:52      ;     X value from location 52
2:54      ;     Y value from location 54
3:52      ;     store product in location 52

7:P34     ; Z=X+F
1:52      ;     X value from location 52
2:1.78    ;     fixed value 1.78
3:55      ;     store sum in location 55

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

9:P87     ; LOOP
1:0       ;     execute on every pass
2:26      ;     for 26 iterations

10:P86    ;     DO
1:73      ;         pulse port C3

11:P22    ;     EXCIT w/DEL
1:1       ;         drive excitation channel E1
2:0       ;         delay 0 sec w/ excitation
3:10      ;         delay 0.1 sec after excitation
4:0       ;         with 0 mV excitation

12: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:1       ;         with delay 0.01 sec
6:2500    ;         with 2500 mV excitation
7:21--    ;         store result in locations 21 through 46
8:.0004   ;         with multiplier * 0.0004
9:0       ;         and with offset + 0

13:P95    ; END LOOP

14:P59    ; BRIDGE TRANSFORM, Rs=Rf(X/(1-X))
1:26      ;     26 repetitions
2:21      ;     Rs replaces X in location 21
3:100.3   ;     with multiplier Rf = 100.3

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

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

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

18:P71    ; AVERAGE
1:14      ;     14 repetitions
2:21      ;     value from location 21

19:P71    ; AVERAGE
1:2       ;     2 repetitions
2:49      ;     value from location 49

20:P71    ; AVERAGE
1:12      ;     12 repetitions
2:35      ;     value from location 35

21:P70    ; SAMPLE
1:1       ;     1 repetition
2:55      ;     value from location 55

22:P96    ; SERIAL OUT
1:71      ;     storage module 1

23:P0     ; NOP

MODE 3
1:P0      ; NOP

MODE 10
1:60
2:93
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:0

MODE 11
1:24211
2:9893
3:1280
4:0
5:0
6:9801
7:21
8:2.8786
9:0
10:0
11:3.25

;; CAUTION: experimental output tags follow:
;;
;; output array:
;;     1. id_140
;;     2. year
;;     3. day
;;     4. hhmm
;;     5. average-Loc1.P1
;;     6. vector_avg_spd-Loc2.P2
;;     7. vector_avg_dir-Loc3.SE2
;;     8. vector_dir_std_dev
;;     9. average-Loc4
;;     10. average-Loc5
;;     11. average-Loc6.SE5
;;     12. average-Loc7
;;     13. average-Loc8
;;     14. average-Loc9.SE8
;;     15. totalize-Loc10.C8
;;     16. average-Loc11.DIFF5
;;     17. average-Loc12.DIFF5
;;     18. average-Loc13.DIFF5
;;     19. average-Loc14.DIFF5
;;     20. average-Loc15.DIFF5
;;     21. average-Loc16.DIFF5
;;     22. average-Loc47
;;     23. average-Loc48.DIFF5
;;     24. average-Loc49.panel_temperature_C
;;     25. average-Loc50.logger_battery_voltage
;;     26. average-Loc60.SE12
;;
;; output array:
;;     1. id_216
;;     2. year
;;     3. day
;;     4. hhmm
;;     5. average-Loc21
;;     6. average-Loc22
;;     7. average-Loc23
;;     8. average-Loc24
;;     9. average-Loc25
;;     10. average-Loc26
;;     11. average-Loc27
;;     12. average-Loc28
;;     13. average-Loc29
;;     14. average-Loc30
;;     15. average-Loc31
;;     16. average-Loc32
;;     17. average-Loc33
;;     18. average-Loc34
;;     19. average-Loc49.panel_temperature_C
;;     20. average-Loc50.logger_battery_voltage
;;     21. average-Loc35
;;     22. average-Loc36
;;     23. average-Loc37
;;     24. average-Loc38
;;     25. average-Loc39
;;     26. average-Loc40
;;     27. average-Loc41
;;     28. average-Loc42
;;     29. average-Loc43
;;     30. average-Loc44
;;     31. average-Loc45
;;     32. average-Loc46
;;     33. sample-Loc55