; 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 Aug  7 19:05:24 2015 local time


MODE 13
13:00  1
01:}
MODE 14

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

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

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

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

5: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

6:P95     ; END IF-DO

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

8:P89     ;     IF X < = > F
1:50      ;         if X from location 50
2:3       ;         is >=
3:12.2    ;         fixed value 12.2
4:42      ;         set port C2 high

9:P95     ; END IF-DO

10:P92    ; IF TIME
1:720     ;     is 720 minutes into
2:1440    ;     1440 minute interval
3:42      ;     set port C2 high

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

12:P92    ;     IF TIME
1:5       ;         is 5 minutes into
2:60      ;         60 minute interval
3:52      ;         set port C2 low

13:P95    ; END IF-DO

14:P91    ; IF FLAG/PORT
1:12      ;     if flag F2 is high
2:30      ;     then DO...

15:P86    ;     DO
1:22      ;         set flag F2 low

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

17:P95    ; END IF-DO

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

19: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

20: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

21: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

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

23: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

24: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:0       ;     and with offset + 0

25: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

26:P3     ; PULSE
1:1       ;     1 repetition
2:1       ;     from pulse counter P1
3:2       ;     as switch closure
4:8       ;     store result in location 8
5:.1      ;     with multiplier * 0.1
6:0       ;     and with offset + 0

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:P70    ; SAMPLE
1:1       ;     1 repetition
2:47      ;     value from location 47

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

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

31: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

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

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

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

35:P71    ; AVERAGE
1:1       ;     1 repetition
2:17      ;     value from location 17

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

37:P0     ; NOP

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

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

3:P86     ;     DO
1:78      ;         pulse port C8

4:P4      ;     EX-DEL-SE
1:1       ;         1 repetition
2:25      ;         using 2500 mV range, reject 60 Hz
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

5:P95     ; END LOOP

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

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

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

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

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

11:P86    ;     DO
1:78      ;         pulse port C8

12: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:22--    ;         store result in locations 22 and 23
7:.001    ;         with multiplier * 0.001
8:0       ;         and with offset + 0

13:P86    ;     DO
1:78      ;         pulse port C8

14: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:24--    ;         store result in locations 24 and 25
7:.001    ;         with multiplier * 0.001
8:0       ;         and with offset + 0

15:P86    ;     DO
1:78      ;         pulse port C8

16: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:26--    ;         store result in locations 26 and 27
7:.001    ;         with multiplier * 0.001
8:0       ;         and with offset + 0

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

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

19:P95    ; END IF-DO

20:P30    ; Z=F*10^exp
1:-.078   ;     fixed value -.078
2:0       ;     times 1 (10^0)
3:58      ;     store -0.078 in location 58

21:P30    ; Z=F*10^exp
1:-.039   ;     fixed value -.039
2:0       ;     times 1 (10^0)
3:59      ;     store -0.039 in location 59

22:P30    ; Z=F*10^exp
1:-.116   ;     fixed value -.116
2:0       ;     times 1 (10^0)
3:60      ;     store -0.116 in location 60

23:P30    ; Z=F*10^exp
1:-.078   ;     fixed value -.078
2:0       ;     times 1 (10^0)
3:61      ;     store -0.078 in location 61

24:P30    ; Z=F*10^exp
1:-.039   ;     fixed value -.039
2:0       ;     times 1 (10^0)
3:62      ;     store -0.039 in location 62

25:P30    ; Z=F*10^exp
1:.033    ;     fixed value 0.033
2:0       ;     times 1 (10^0)
3:63      ;     store 0.033 in location 63

26:P30    ; Z=F*10^exp
1:-.11    ;     fixed value -.11
2:0       ;     times 1 (10^0)
3:64      ;     store -0.11 in location 64

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

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

29:P86    ; DO
1:43      ;     set port C3 high

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

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

32: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

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

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

35:P31    ;     Z=X
1:68      ;         X value from location 68
2:96--    ;         store result in locations 96 through 104

36:P86    ;     DO
1:2       ;         call subroutine 2

37:P35    ;     Z=X-Y
1:70      ;         X value from location 70
2:58--    ;         Y value from locations 58 through 66
3:86--    ;         store difference in locations 86 through 94

38:P95    ; END LOOP

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

40: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

41: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

42: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

43: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

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

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

46:P34    ; Z=X+F
1:16      ;     X value from location 16
2:1.5     ;     fixed value 1.5
3:17      ;     store sum in location 17

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

48:P70    ; SAMPLE
1:1       ;     1 repetition
2:47      ;     value from location 47

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

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

51:P71    ; AVERAGE
1:6       ;     6 repetitions
2:22      ;     value from location 22

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

53:P70    ; SAMPLE
1:1       ;     1 repetition
2:17      ;     value from location 17

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

55:P80    ; STORE AREA
1:1       ;     final storage area 1
2:402     ;     set array id to 402

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

57:P71    ; AVERAGE
1:9       ;     9 repetitions
2:86      ;     value from location 86

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

59:P80    ; STORE AREA
1:1       ;     final storage area 1
2:404     ;     set array id to 404

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

61:P71    ; AVERAGE
1:1       ;     1 repetition
2:69      ;     value from location 69

62:P71    ; AVERAGE
1:9       ;     9 repetitions
2:96      ;     value from location 96

63:P18    ; TIME
1:3
2:0
3:52

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

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

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

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

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

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

70:P70    ;     SAMPLE
1:1       ;         1 repetition
2:17      ;         value from location 17

71:P95    ; END IF-DO

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

73:P0     ; NOP

MODE 3
1:P85     ; BEGIN SUBROUTINEARRAY(0x81e8428)
1:2       ;     call subr_2()

2:P42     ;     Z=1/X
1:68      ;         X value from location 68
2:71      ;         store inverse in location 71

3:P35     ;     Z=X-Y
1:69      ;         X value from location 69
2:68      ;         Y value from location 68
3:72      ;         store difference in location 72

4:P38     ;     Z=X/Y
1:72      ;         X value from location 72
2:68      ;         Y value from location 68
3:72      ;         store ratio in location 72

5:P37     ;     Z=X*F
1:72      ;         X value from location 72
2:20      ;         fixed value 20
3:82      ;         store product in location 82

6:P40     ;     Z=LN(X)
1:82      ;         X value from location 82
2:83      ;         store natural log in location 83

7:P30     ;     Z=F*10^exp
1:2.486   ;         fixed value 2.486
2:3       ;         times 1000 (10^3)
3:73      ;         store 2486 in location 73

8:P30     ;     Z=F*10^exp
1:2.5079  ;         fixed value 2.5079
2:4       ;         times 10000 (10^4)
3:74      ;         store 25079 in location 74

9:P30     ;     Z=F*10^exp
1:3.1754  ;         fixed value 3.1754
2:7       ;         times 10000000 (10^7)
3:75      ;         store 31754000 in location 75

10:P36    ;     Z=X*Y
1:83      ;         X value from location 83
2:74      ;         Y value from location 74
3:76      ;         store product in location 76

11:P36    ;     Z=X*Y
1:83      ;         X value from location 83
2:83      ;         Y value from location 83
3:77      ;         store product in location 77

12:P36    ;     Z=X*Y
1:83      ;         X value from location 83
2:77      ;         Y value from location 77
3:77      ;         store product in location 77

13:P36    ;     Z=X*Y
1:75      ;         X value from location 75
2:77      ;         Y value from location 77
3:78      ;         store product in location 78

14:P33    ;     Z=X+Y
1:76      ;         X value from location 76
2:78      ;         Y value from location 78
3:79      ;         store sum in location 79

15:P33    ;     Z=X+Y
1:73      ;         X value from location 73
2:79      ;         Y value from location 79
3:95      ;         store sum in location 95

16:P42    ;     Z=1/X
1:95      ;         X value from location 95
2:81      ;         store inverse in location 81

17:P34    ;     Z=X+F
1:81      ;         X value from location 81
2:-273.15 ;         fixed value -273.15
3:70      ;         store sum in location 70

18:P95    ; END SUBROUTINE

19:P0     ; NOP

MODE 10
1:105
2:103
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:2

MODE 11
1:13493
2:65295
3:2304
4:3
5:0
6:1
7:14
8:3.0859
9:99
10:00--
11:27

;; CAUTION: experimental output tags follow:
;;
;; output array:
;;     1. id_127
;;     2. sample-Loc47
;;     3. year
;;     4. day
;;     5. hhmm
;;     6. average-Loc1
;;     7. average-Loc2
;;     8. average-Loc3
;;     9. average-Loc4
;;     10. vector_avg_spd-Loc5.P2
;;     11. vector_avg_dir-Loc6.SE2
;;     12. vector_dir_std_dev
;;     13. average-Loc7.DIFF5
;;     14. totalize-Loc8.P1
;;     15. average-Loc49.panel_temperature_C
;;     16. average-Loc50.logger_battery_voltage
;;     17. average-Loc17
;;
;; output array:
;;     1. id_247
;;     2. sample-Loc47
;;     3. year
;;     4. day
;;     5. hhmm
;;     6. average-Loc31
;;     7. average-Loc32
;;     8. average-Loc33
;;     9. average-Loc34
;;     10. average-Loc35
;;     11. average-Loc36
;;     12. average-Loc37
;;     13. average-Loc38
;;     14. average-Loc39
;;     15. average-Loc40
;;     16. average-Loc41
;;     17. average-Loc42
;;     18. average-Loc22
;;     19. average-Loc23
;;     20. average-Loc24
;;     21. average-Loc25
;;     22. average-Loc26
;;     23. average-Loc27
;;     24. sample-Loc10
;;     25. sample-Loc17
;;
;; output array:
;;     1. id_254
;;
;; output array:
;;     1. id_402
;;     2. year
;;     3. day
;;     4. hhmm
;;     5. average-Loc86
;;     6. average-Loc87
;;     7. average-Loc88
;;     8. average-Loc89
;;     9. average-Loc90
;;     10. average-Loc91
;;     11. average-Loc92
;;     12. average-Loc93
;;     13. average-Loc94
;;
;; output array:
;;     1. id_258
;;
;; output array:
;;     1. id_404
;;     2. year
;;     3. day
;;     4. hhmm
;;     5. average-Loc69.SE4
;;     6. average-Loc96
;;     7. average-Loc97
;;     8. average-Loc98
;;     9. average-Loc99
;;     10. average-Loc100
;;     11. average-Loc101
;;     12. average-Loc102
;;     13. average-Loc103
;;     14. average-Loc104
;;
;; output array:
;;     1. id_268
;;     2. day
;;     3. hhmm
;;     4. sample-Loc17