} MODE 1 SCAN RATE 60 1:P10 ; BATT VOLT 1:28 ; store in location 28 2:P17 ; INTERNAL TEMP 1:27 ; store in location 27 3: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:1 ; store result in location 1 5:.098 ; with multiplier * 0.098 6:0 ; and with offset + 0 4:P4 ; EX-DEL-SE 1:1 ; 1 repetition 2:5 ; using 2500 mV range, slow integration 3:5 ; from input channel SE5 4:2 ; drive excitation channel E2 5:2 ; with delay 0.02 sec 6:2500 ; with 2500 mV excitation 7:5 ; store result in location 5 8:.142 ; with multiplier * 0.142 9:0 ; and with offset + 0 5:P3 ; PULSE 1:1 ; 1 repetition 2:1 ; from pulse counter P1 3:22 ; as switch closure, discard long interval counts, output frequency (Hz) 4:25 ; store result in location 25 5:.8 ; with multiplier * 0.8 6:.447 ; and with offset + 0.447 6:P1 ; VOLT (SE) 1:1 ; 1 repetition 2:25 ; using 2500 mV range, reject 60 Hz 3:1 ; from input channel SE1 4:2 ; store result in location 2 5:.1 ; with multiplier * 0.1 6:-40 ; and with offset + -40 7:P1 ; VOLT (SE) 1:1 ; 1 repetition 2:25 ; using 2500 mV range, reject 60 Hz 3:2 ; from input channel SE2 4:3 ; store result in location 3 5:.1 ; with multiplier * 0.1 6:0 ; and with offset + 0 8:P86 ; DO 1:44 ; set port C4 high 9: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 10:P1 ; VOLT (SE) 1:1 ; 1 repetition 2:5 ; using 2500 mV range, slow integration 3:9 ; from input channel SE9 4:29 ; store result in location 29 5:.1 ; with multiplier * 0.1 6:-40 ; and with offset + -40 11:P1 ; VOLT (SE) 1:1 ; 1 repetition 2:5 ; using 2500 mV range, slow integration 3:10 ; from input channel SE10 4:30 ; store result in location 30 5:.1 ; with multiplier * 0.1 6:0 ; and with offset + 0 12:P86 ; DO 1:54 ; set port C4 low 13:P2 ; VOLT (DIFF) 1:1 ; 1 repetition 2:24 ; using 250 mV range, reject 60 Hz 3:4 ; from input channel DIFF4 4:4 ; store result in location 4 5:1 ; with multiplier * 1 6:0 ; and with offset + 0 14:P3 ; PULSE 1:1 ; 1 repetition 2:8 ; from control port C8 3:2 ; as switch closure 4:18 ; store result in location 18 5:1 ; with multiplier * 1 6:0 ; and with offset + 0 15:P92 ; IF TIME 1:0 ; is 0 minutes into 2:180 ; 180 minute interval 3:30 ; then DO... 16:P34 ; Z=X+F 1:2 ; X value from location 2 2:273.15 ; fixed value 273.15 3:31 ; store sum in location 31 17:P20 ; PORT SET 1:9999 ; P8=nc, P7=nc, P6=nc, P5=nc 2:9130 ; P4=nc, P3=set high, P2=1 ms pulse, P1=set low 18:P86 ; DO 1:72 ; pulse port C2 19:P86 ; DO 1:41 ; set port C1 high 20:P86 ; DO 1:72 ; pulse port C2 21:P86 ; DO 1:51 ; set port C1 low 22:P87 ; LOOP 1:0 ; execute on every pass 2:6 ; for 6 iterations 23:P86 ; DO 1:72 ; pulse port C2 24:P95 ; END LOOP 25:P86 ; DO 1:42 ; set port C2 high 26:P22 ; EXCIT w/DEL 1:1 ; drive excitation channel E1 2:1 ; delay 0.01 sec w/ excitation 3:0 ; delay 0 sec after excitation 4:0 ; with 0 mV excitation 27:P86 ; DO 1:53 ; set port C3 low 28:P86 ; DO 1:43 ; set port C3 high 29:P22 ; EXCIT w/DEL 1:1 ; drive excitation channel E1 2:8 ; delay 0.08 sec w/ excitation 3:0 ; delay 0 sec after excitation 4:0 ; with 0 mV excitation 30:P20 ; PORT SET 1:9999 ; P8=nc, P7=nc, P6=nc, P5=nc 2:9908 ; P4=nc, P3=nc, P2=set low, P1=input 31:P30 ; Z=F*10^exp 1:1 ; fixed value 1 2:0 ; times 1 (10^0) 3:33 ; store 1 in location 33 32:P30 ; Z=F*10^exp 1:0 ; fixed value 0 2:0 ; times 1 (10^0) 3:34 ; store 0 in location 34 33:P87 ; LOOP 1:0 ; execute on every pass 2:16 ; for 16 iterations 34:P86 ; DO 1:72 ; pulse port C2 35:P91 ; IF FLAG/PORT 1:41 ; if port C1 is high 2:30 ; then DO... 36:P33 ; Z=X+Y 1:33 ; X value from location 33 2:34 ; Y value from location 34 3:34 ; store sum in location 34 37:P95 ; END IF-DO 38:P37 ; Z=X*F 1:33 ; X value from location 33 2:2 ; fixed value 2 3:33 ; store product in location 33 39:P95 ; END LOOP 40:P30 ; Z=F*10^exp 1:291 ; fixed value 291 2:0 ; times 1 (10^0) 3:32 ; store 291 in location 32 41:P38 ; Z=X/Y 1:31 ; X value from location 31 2:32 ; Y value from location 32 3:35 ; store ratio in location 35 42:P39 ; Z=SQRT(X) 1:35 ; X value from location 35 2:36 ; store square root in location 36 43:P36 ; Z=X*Y 1:34 ; X value from location 34 2:36 ; Y value from location 36 3:37 ; store product in location 37 44:P37 ; Z=X*F 1:37 ; X value from location 37 2:.52176 ; fixed value 0.52176 3:37 ; store product in location 37 45:P34 ; Z=X+F 1:37 ; X value from location 37 2:-16 ; fixed value -16 3:37 ; store sum in location 37 46:P20 ; PORT SET 1:9999 ; P8=nc, P7=nc, P6=nc, P5=nc 2:9000 ; P4=nc, P3=set low, P2=set low, P1=set low 47:P95 ; END IF-DO 48:P92 ; IF TIME 1:0 ; is 0 minutes into 2:60 ; 60 minute interval 3:10 ; set output flag F0 high, output array id 148 49:P77 ; REAL TIME 1:1220 ; year + day(midnight=prev.day) + hour-minute(midnight=2400) 50:P71 ; AVERAGE 1:3 ; 3 repetitions 2:2 ; value from location 2 51:P71 ; AVERAGE 1:2 ; 2 repetitions 2:29 ; value from location 29 52:P71 ; AVERAGE 1:1 ; 1 repetition 2:25 ; value from location 25 53:P71 ; AVERAGE 1:2 ; 2 repetitions 2:27 ; value from location 27 54:P69 ; WIND VECTOR 1:1 ; 1 repetition 2:60 ; 60 scans for standard deviation subinterval 3:0 ; avg spd, avg dir, std dev of dir (Yamartino), for anem. & vane 4:1 ; wind speed from location 1 5:5 ; wind direction from location 5 55:P72 ; TOTALIZE 1:1 ; 1 repetition 2:18 ; value from location 18 56:P70 ; SAMPLE 1:1 ; 1 repetition 2:37 ; value from location 37 57:P96 ; SERIAL OUT 1:71 ; storage module 1 58:P0 ; NOP MODE 2 SCAN RATE 60 1:P92 ; IF TIME 1:0 ; is 0 minutes into 2:5 ; 5 minute interval 3:30 ; then DO... 2:P86 ; DO 1:46 ; set port C6 high 3:P87 ; LOOP 1:0 ; execute on every pass 2:11 ; for 11 iterations 4:P86 ; DO 1:77 ; pulse port C7 5:P4 ; EX-DEL-SE 1:1 ; 1 repetition 2:5 ; using 2500 mV range, slow integration 3:3 ; from input channel SE3 4:1 ; drive excitation channel E1 5:10 ; with delay 0.1 sec 6:2500 ; with 2500 mV excitation 7:6-- ; store result in locations 6 through 16 8:.0004 ; with multiplier * 0.0004 9:0 ; and with offset + 0 6:P59 ; BRIDGE TRANSFORM, Rs=Rf(X/(1-X)) 1:1 ; 1 repetition 2:6-- ; Rs replaces X in locations 6 through 16 3:14.94 ; with multiplier Rf = 14.94 7:P95 ; END LOOP 8:P86 ; DO 1:56 ; set port C6 low 9:P95 ; END IF-DO 10:P22 ; EXCIT w/DEL 1:1 ; drive excitation channel E1 2:100 ; delay 1 sec w/ excitation 3:0 ; delay 0 sec after excitation 4:0 ; with 0 mV excitation 11:P92 ; IF TIME 1:0 ; is 0 minutes into 2:180 ; 180 minute interval 3:13 ; set flag F3 high 12:P91 ; IF FLAG/PORT 1:13 ; if flag F3 is high 2:30 ; then DO... 13:P86 ; DO 1:46 ; set port C6 high 14:P87 ; LOOP 1:0 ; execute on every pass 2:5 ; for 5 iterations 15:P86 ; DO 1:77 ; pulse port C7 16:P86 ; DO 1:45 ; set port C5 high 17:P27 ; PERIOD AVG (SE) 1:1 ; 1 repetition 2:4 ; period in 10e-6 seconds, range 2.0 V, max 200 kHz 3:4 ; from input channel SE4 4:10 ; measure for 10 cycles 5:5 ; with timeout of 0.05 seconds 6:19-- ; store result in locations 19 through 23 7:.001 ; with multiplier * 0.001 8:0 ; and with offset + 0 18:P86 ; DO 1:55 ; set port C5 low 19:P95 ; END LOOP 20:P86 ; DO 1:56 ; set port C6 low 21:P86 ; DO 1:10 ; set output flag F0 high, output array id 221 22:P77 ; REAL TIME 1:1220 ; year + day(midnight=prev.day) + hour-minute(midnight=2400) 23:P70 ; SAMPLE 1:5 ; 5 repetitions 2:19 ; value from location 19 24:P71 ; AVERAGE 1:11 ; 11 repetitions 2:6 ; value from location 6 25:P96 ; SERIAL OUT 1:71 ; storage module 1 26:P86 ; DO 1:23 ; set flag F3 low 27:P95 ; END IF-DO 28:P0 ; NOP MODE 3 1:P0 ; NOP MODE 10 1:39 2:64 3:0 4:586546 5:2048 MODE 12 1:0 1:0 1:0 MODE 11 1:25066 ;; end of program listing ;; CAUTION: experimental output tags follow: ;; ;; output array: ;; 1. id_148 ;; 2. year ;; 3. day ;; 4. hhmm ;; 5. average-Loc2.SE1 ;; 6. average-Loc3.SE2 ;; 7. average-Loc4.DIFF4 ;; 8. average-Loc29.SE9 ;; 9. average-Loc30.SE10 ;; 10. average-Loc25.P1 ;; 11. average-Loc27.panel_temperature_C ;; 12. average-Loc28.logger_battery_voltage ;; 13. vector_avg_spd-Loc1.P2 ;; 14. vector_avg_dir-Loc5.SE5 ;; 15. vector_dir_std_dev ;; 16. totalize-Loc18.C8 ;; 17. sample-Loc37 ;; ;; output array: ;; 1. id_221 ;; 2. year ;; 3. day ;; 4. hhmm ;; 5. sample-Loc19 ;; 6. sample-Loc20 ;; 7. sample-Loc21 ;; 8. sample-Loc22 ;; 9. sample-Loc23 ;; 10. average-Loc6 ;; 11. average-Loc7 ;; 12. average-Loc8 ;; 13. average-Loc9 ;; 14. average-Loc10 ;; 15. average-Loc11 ;; 16. average-Loc12 ;; 17. average-Loc13 ;; 18. average-Loc14 ;; 19. average-Loc15 ;; 20. average-Loc16