; 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 Dec 17 11:04:43 2004 local time MODE 13 13:00 1 01:} MODE 14 MODE 1 SCAN RATE 60 1:P92 ; IF TIME 1:5 ; is 5 minutes into 2:60 ; 60 minute interval 3:30 ; then DO... 2:P91 ; IF FLAG/PORT 1:21 ; if flag F1 is low 2:56 ; set port C6 low 3:P95 ; END IF-DO 4:P92 ; IF TIME 1:1 ; is 1 minute into 2:60 ; 60 minute interval 3:46 ; set port C6 high 5:P86 ; DO 1:41 ; set port C1 high 6: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 7: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 8: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 9:P86 ; DO 1:51 ; set port C1 low 10: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 11: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 12: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 13: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 14: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:.011 ; with multiplier * 0.011 6:0 ; and with offset + 0 15:P17 ; INTERNAL TEMP 1:49 ; store in location 49 16:P10 ; BATT VOLT 1:50 ; store in location 50 17:P92 ; IF TIME 1:0 ; is 0 minutes into 2:60 ; 60 minute interval 3:10 ; set output flag F0 high, output array id 117 18:P77 ; REAL TIME 1:1220 ; year + day(midnight=prev.day) + hour-minute(midnight=2400) 19:P71 ; AVERAGE 1:4 ; 4 repetitions 2:1 ; value from location 1 20: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 21:P71 ; AVERAGE 1:1 ; 1 repetition 2:7 ; value from location 7 22:P72 ; TOTALIZE 1:1 ; 1 repetition 2:8 ; value from location 8 23:P71 ; AVERAGE 1:3 ; 3 repetitions 2:48 ; value from location 48 24:P91 ; IF FLAG/PORT 1:56 ; if port C6 is low 2:30 ; then DO... 25:P96 ; SERIAL OUT 1:71 ; storage module 1 26:P95 ; END IF-DO 27:P0 ; NOP MODE 2 SCAN RATE 3600 1:P92 ; IF TIME 1:0 ; is 0 minutes into 2:180 ; 180 minute interval 3:30 ; then DO... 2:P105 ; SDI-12 RECORDER 1:0 ; address 0 2:8 ; command M8, 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 3: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 4: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 5: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 6:P39 ; Z=SQRT(X) 1:13 ; X value from location 13 2:14 ; store square root in location 14 7: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 8:P34 ; Z=X+F 1:15 ; X value from location 15 2:2 ; fixed value 2 3:16 ; store sum in location 16 9:P92 ; IF TIME 1:0 ; is 0 minutes into 2:180 ; 180 minute interval 3:10 ; set output flag F0 high, output array id 209 10:P77 ; REAL TIME 1:1220 ; year + day(midnight=prev.day) + hour-minute(midnight=2400) 11:P70 ; SAMPLE 1:1 ; 1 repetition 2:10 ; value from location 10 12:P70 ; SAMPLE 1:1 ; 1 repetition 2:16 ; value from location 16 13:P91 ; IF FLAG/PORT 1:56 ; if port C6 is low 2:30 ; then DO... 14:P96 ; SERIAL OUT 1:71 ; storage module 1 15:P95 ; END IF-DO 16:P95 ; END IF-DO 17:P0 ; NOP MODE 3 1:P0 ; NOP MODE 10 1:55 2:72 3:127746 4:458752 5:2048 MODE 12 1:0 1:0 1:0 MODE 11 1:10148 2:26114 3:0 4:9 5:0 6:1 7:7 8:.8225 9:0 10:0 11:.5 ;; CAUTION: experimental output tags follow: ;; ;; output array: ;; 1. id_117 ;; 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.P1 ;; 14. average-Loc48.DIFF2 ;; 15. average-Loc49.panel_temperature_C ;; 16. average-Loc50.logger_battery_voltage ;; ;; output array: ;; 1. id_209 ;; 2. year ;; 3. day ;; 4. hhmm ;; 5. sample-Loc10 ;; 6. sample-Loc16