;{CR10X} ;WIRING ; Large Aperture Scintillometer ; Brown (Demod): 3H ; Green (Signal Reference): 3L ; Jumper 3L to 1L ; Orange (Cn2): 1:1 Voltage Divider to 1H ; |-10kOhm-|-10kOhm-| ; | | | ; AG 1H Orange ; Red (Thermistor): 1:10 Voltage Divider to 2H ; |-10kOhm-|-100kOhm-| ; | | | ; AG 2H Red ; 10kOhm resistors are blue, 100kOhm resistors are brown/tan ; blue: G (not SDM) ; purple: 12V (not SDM) ; all other wires: taped off ; ;Wind Speed and Wind Direction Davis ; P1: BLK ; G: RED ; EX1: YEL ; 4L: GRE ;T107 Temperature ; 4H: RED ; EX1: BLK ; AG: PURPLE ; G: CLR ;LI200X Pyranometer ; 5H: Red ; 5L: Black ; Ground: White ; G: Clear ;CS215 Temperature & Relative Humidity Sensor ; G: White ; G: Black ; G: Clear ; 12V: Red ; C8: Green ;ECHO-TE Soil ; C3: Jumper to 12V-CTRL ; SW-12V: White ; C4: Red ; G: clear ;IRR-P Infrared surface temperature ; 2L: green ; 6H: red ; 6L: black ; AG: clear, blue ; E2: white *Table 1 Program 01: 1 Execution Interval (seconds) ; START SCINTILLOMETER PROGRAM 1: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 10 Interval (same units as above) 3: 12 Set Flag 2 High 2: If Flag/Port (P91) 1: 22 Do if Flag 2 is Low 2: 30 Then Do 3: Beginning of Loop (P87) 1: 0 Delay 2: 12 Loop Count 4: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 4 Z Loc [ UCN2 ] 5: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 6 Z Loc [ N ] 6: End (P95) 7: End (P95) 8: If Flag/Port (P91) 1: 22 Do if Flag 2 is Low 2: 0 Go to end of Program Table ; Do measurements of CN2 signal LAS in Volts ; voltage divider 9: Volt (Diff) (P2) 1: 1 Reps 2: 25 2500 mV 60 Hz Rejection Range 3: 1 DIFF Channel 4: 4 Loc [ UCN2 ] 5: 0.002 Mult 6: 0 Offset ; Do measurements of demod (or signal strength) signal LAS 10: Volt (Diff) (P2) 1: 1 Reps 2: 25 2500 mV 60 Hz Rejection Range 3: 3 DIFF Channel 4: 5 Loc [ demod ] 5: 1.0 Mult 6: 0.0 Offset ; measurement of thermistor temperature w/ voltage divider ; and convert to V ;11: Volt (Diff) (P2) ; 1: 1 Reps ; 2: 25 2500 mV 60 Hz Rejection Range ; 3: 2 DIFF Channel ; 4: 8 Loc [ U_TH ] ; 5: .011 Mult ; 6: 0.0 Offset 11: Volt (SE) (P1) 1: 1 Reps 2: 25 2500 mV 60 Hz Rejection Range 3: 3 SE Channel 4: 8 Loc [ U_TH ] 5: .011 Multiplier 6: 0.0 Offset ;compute internal thermistor temperature from Voltage 12: Polynomial (P55) 1: 1 Reps 2: 8 X Loc [ U_TH ] 3: 9 F(X) Loc [ T_TH ] 4: 71.54 C0 5: -10.87 C1 6: 0.35 C2 7: 0.0 C3 8: 0.0 C4 9: 0.0 C5 ; At the beginning of each measurement interval the first measurements ; are stored. The initial values are used to subtract the following ; measurements resulting in signals that fluctuate close to zero. These ; small values prevent overflow problems of the data logger. 13: If Flag/Port (P91) 1: 23 Do if Flag 3 is Low 2: 1 Call Subroutine 1 ; Calculate 10^(UCN2) 14: Z=F (P30) 1: 10 F 2: 0 Exponent of 10 3: 10 Z Loc [ Ten ] 15: Z=X^Y (P47) 1: 10 X Loc [ Ten ] 2: 4 Y Loc [ UCN2 ] 3: 11 Z Loc [ PowerUCN2 ] ; Calculate 10^(UCN2)*1000 16: Z=X*F (P37) 1: 11 X Loc [ PowerUCN2 ] 2: 1000 F 3: 12 Z Loc [ PUCN21000 ] ; Counter 17: Z=X+F (P34) 1: 6 X Loc [ N ] 2: 1 F 3: 6 Z Loc [ N ] ; Subtract initial values from measurement signals 18: Z=X-Y (P35) 1: 4 X Loc [ UCN2 ] 2: 13 Y Loc [ UCN2_c ] 3: 16 Z Loc [ UCN2_P62 ] 19: Z=X-Y (P35) 1: 5 X Loc [ demod ] 2: 14 Y Loc [ demod_c ] 3: 17 Z Loc [ demod_P62 ] ; After 10 minutes write data to final storage 20: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 10 Interval (same units as above) 3: 10 Set Output Flag High (Flag 0) 21: Covariance/Correlation (P62) 1: 2 No. of Input Locations 2: 0 No. of Means 3: 2 No. of Variances 4: 0 No. of Std. Dev. 5: 0 No. of Covariance 6: 0 No. of Correlations 7: 600 Samples per Average 8: 16 First Source Loc [ UCN2_P62 ] 9: 20 First Destination Loc [ Var_UCN2 ] ; END SCINTILLOMETER PROGRAM 22: Real Time (P77)^24515 1: 1110 Year,Day,Hour/Minute (midnight = 0000) 23: Resolution (P78) 1: 1 High Resolution 24: Average (P71)^26890 1: 2 Reps 2: 4 Loc [ UCN2 ] 25: Sample (P70)^30125 1: 2 Reps 2: 20 Loc [ Var_UCN2 ] 26: Average (P71)^13256 1: 1 Reps 2: 12 Loc [ PUCN21000 ] 27: Resolution (P78) 1: 0 Low Resolution 28: Sample (P70)^19245 1: 1 Reps 2: 6 Loc [ N ] 29: Average (P71)^17393 1: 1 Reps 2: 9 Loc [ T_TH ] 30: Wind Vector (P69)^20389 1: 1 Reps 2: 0 Samples per Sub-Interval 3: 00 Sensor/Output Option 4: 2 Wind Speed/East Loc [ WS_ms ] 5: 23 Wind Direction/North Loc [ WdirDavis ] 31: Average (P71)^9842 1: 1 Reps 2: 24 Loc [ SlrW ] 32: Average (P71)^11255 1: 1 Reps 2: 51 Loc [ T_Temp_C ] 33: Average (P71)^13501 1: 2 Reps 2: 26 Loc [ T_CS215 ] 34: Average (P71)^2269 1: 1 Reps 2: 1 Loc [ Air_Temp ] 35: Average (P71)^13505 1: 1 Reps 2: 3 Loc [ Batt_Volt ] 36: Average (P71)^20032 1: 3 Reps 2: 29 Loc [ VWC_Raw ] 37: Average (P71)^8176 1: 1 Reps 2: 41 Loc [ SB_Temp_C ] ; set Flag 3 low to store new first values for next interval 38: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 10 Interval (same units as above) 3: 30 Then Do 39: Do (P86) 1: 23 Set Flag 3 Low 40: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 6 Z Loc [ N ] 41: End (P95) *Table 2 Program 02: 10 Execution Interval (seconds) 1: Do (P86) 1: 43 Set Port 3 High 2: Port Serial I/O (P15) 1: 1 Reps 2: 0 8-Bit, TTL ASCII, 1200 Baud 3: 0 TX after CTS 4: 40 C4 TX/RX, No RTS/DTR (OS>1.14) 5: 29 Start Loc for TX [ VWC_Raw ] 6: 0 Number of Locs to TX 7: 256 Termination Character for RX 8: 50 Max Characters to RX 9: 50 Time Out for CTS (TX) and/or RX (0.01 sec units) 10: 29 Start Loc for RX [ VWC_Raw ] 11: 1.0 Multiplier for RX 12: 0.0 Offset for RX 3: Do (P86) 1: 53 Set Port 3 Low 4: Temp (107) (P11) 1: 1 Reps 2: 7 SE Channel 3: 1 Excite all reps w/E1 4: 1 Loc [ Air_Temp ] 5: 1.0 Mult 6: 0.0 Offset 5: Pulse (P3) 1: 1 Reps 2: 1 Pulse Channel 1 3: 22 Switch Closure, Output Hz 4: 2 Loc [ WS_ms ] 5: 1.00575 Mult 6: 0. Offset 6: Excite-Delay (SE) (P4) 1: 1 Reps 2: 5 2500 mV Slow Range 3: 8 SE Channel 4: 1 Excite all reps w/Exchan 1 5: 2 Delay (units 0.01 sec) 6: 2500 mV Excitation 7: 23 Loc [ WdirDavis ] 8: 0.142 Mult 9: 0.0 Offset 7: Batt Voltage (P10) 1: 3 Loc [ Batt_Volt ] 8: Volt (Diff) (P2) 1: 1 Reps 2: 22 7.5 mV 60 Hz Rejection Range 3: 5 DIFF Channel 4: 24 Loc [ SlrW ] 5: 1.0 Multiplier 6: 0.0 Offset ;9: Z=X*F (P37) ; 1: 24 X Loc [ SlrW ] ; 2: .002 F ; 3: 25 Z Loc [ SlrMJ ] 9: Z=X*F (P37) 1: 24 X Loc [ SlrW ] 2: 200 F 3: 24 Z Loc [ SlrW ] 10: SDI-12 Recorder (P105) 1: 0 SDI-12 Address 2: 0 Start Measurement (aM!) 3: 8 Port 4: 26 Loc [ T_CS215 ] 5: 1.0 Multiplier 6: 0.0 Offset ;start infrared sfc temperature 11: AC Half Bridge (P5) 1: 1 Reps 2: 25 2500 mV 60 Hz Rejection Range 3: 4 SE Channel 4: 2 Excite all reps w/Exchan 2 5: 2500 mV Excitation 6: 33 Loc [ mV_thrm ] 7: 1.0 Multiplier 8: 0.0 Offset 12: Z=1/X (P42) 1: 33 X Loc [ mV_thrm ] 2: 34 Z Loc [ mV_thrm1 ] 13: Z=X+F (P34) 1: 34 X Loc [ mV_thrm1 ] 2: -1.0 F 3: 35 Z Loc [ mV_thrm2 ] 14: Z=X*F (P37) 1: 35 X Loc [ mV_thrm2 ] 2: 24900 F 3: 36 Z Loc [ R_thrm ] 15: Z=LN(X) (P40) 1: 36 X Loc [ R_thrm ] 2: 37 Z Loc [ lnR_thrm ] 16: Z=X*F (P37) 1: 37 X Loc [ lnR_thrm ] 2: .001 F 3: 38 Z Loc [ Scaled_R ] 17: Polynomial (P55) 1: 1 Reps 2: 38 X Loc [ Scaled_R ] 3: 39 F(X) Loc [ SH_Coeffs ] 4: .001129 C0 5: .234108 C1 6: 0.0 C2 7: 87.7547 C3 8: 0.0 C4 9: 0.0 C5 18: Z=1/X (P42) 1: 39 X Loc [ SH_Coeffs ] 2: 40 Z Loc [ SB_Temp_K ] 19: Z=X+F (P34) 1: 40 X Loc [ SB_Temp_K ] 2: -273.15 F 3: 41 Z Loc [ SB_Temp_C ] 20: Volt (Diff) (P2) 1: 1 Reps 2: 21 2.5 mV 60 Hz Rejection Range 3: 6 DIFF Channel 4: 42 Loc [ mV_tpile ] 5: 1.0 Multiplier 6: 0.0 Offset ; calculation of m (slope) coefficient for target temperature calculation. Each sensor has unique C0, C1, C2 values. 21: Polynomial (P55) 1: 1 Reps 2: 41 X Loc [ SB_Temp_C ] 3: 43 F(X) Loc [ m_slope ] 4: 15127.5 C0 5: 93.5789 C1 6: .79976 C2 7: 0.0 C3 8: 0.0 C4 9: 0.0 C5 22: Z=X*F (P37) 1: 43 X Loc [ m_slope ] 2: 99999 F 3: 43 Z Loc [ m_slope ] ; calculation of b (intercept) coefficient for target temperature calculation. Each sensor has unique C0, C1, C2 values. 23: Polynomial (P55) 1: 1 Reps 2: 41 X Loc [ SB_Temp_C ] 3: 44 F(X) Loc [ b_inter ] 4: -10.9126 C0 5: -8.92815 C1 6: .32751 C2 7: 0.0 C3 8: 0.0 C4 9: 0.0 C5 24: Z=X*F (P37) 1: 44 X Loc [ b_inter ] 2: 99999 F 3: 44 Z Loc [ b_inter ] 25: Z=F x 10^n (P30) 1: .4 F 2: 1 n, Exponent of 10 3: 45 Z Loc [ Exponent1 ] 26: Z=F x 10^n (P30) 1: .025 F 2: 1 n, Exponent of 10 3: 46 Z Loc [ Exponent2 ] 27: Z=X^Y (P47) 1: 40 X Loc [ SB_Temp_K ] 2: 45 Y Loc [ Exponent1 ] 3: 47 Z Loc [ SB_4Pow ] 28: Z=X*Y (P36) 1: 42 X Loc [ mV_tpile ] 2: 43 Y Loc [ m_slope ] 3: 52 Z Loc [ mVxm ] 29: Z=X+Y (P33) 1: 47 X Loc [ SB_4Pow ] 2: 52 Y Loc [ mVxm ] 3: 48 Z Loc [ Sum1 ] 30: Z=X+Y (P33) 1: 44 X Loc [ b_inter ] 2: 48 Y Loc [ Sum1 ] 3: 49 Z Loc [ Sum2 ] 31: Z=X^Y (P47) 1: 49 X Loc [ Sum2 ] 2: 46 Y Loc [ Exponent2 ] 3: 50 Z Loc [ T_Temp_K ] 32: Z=X+F (P34) 1: 50 X Loc [ T_Temp_K ] 2: -273.15 F 3: 51 Z Loc [ T_Temp_C ] *Table 3 Subroutines 1: Beginning of Subroutine (P85) 1: 1 Subroutine 1 2: Do (P86) 1: 13 Set Flag 3 High 3: Block Move (P54) 1: 2 No. of Values 2: 4 First Source Loc [ UCN2 ] 3: 1 Source Step 4: 13 First Destination Loc [ UCN2_c ] 5: 1 Destination Step 4: End (P95) ; END SCINTILLOMETER SUBROUTINE End Program -Input Locations- 1 Air_Temp 1 1 1 2 WS_ms 1 2 1 3 Batt_Volt 1 1 1 4 UCN2 5 4 2 5 demod 1 1 1 6 N 1 3 3 7 _________ 0 0 0 8 U_TH 1 1 2 9 T_TH 1 1 1 10 Ten 1 1 1 11 PowerUCN2 1 1 1 12 PUCN21000 1 1 1 13 UCN2_c 5 1 1 14 demod_c 17 2 1 15 _________ 0 0 0 16 UCN2_P62 1 1 1 17 demod_P62 1 0 1 18 _________ 0 0 0 19 _________ 0 0 0 20 Var_UCN2 5 1 1 21 Var_demod 17 1 1 22 _________ 0 0 0 23 WdirDavis 1 1 1 24 SlrW 5 3 2 25 SlrMJ 1 0 1 26 T_CS215 1 1 1 27 RH_CS215 1 1 0 28 B 1 0 0 29 VWC_Raw 1 2 1 30 EC_Raw 0 0 0 31 T_Raw 0 0 0 32 _________ 0 0 0 33 mV_thrm 1 1 1 34 mV_thrm1 1 1 1 35 mV_thrm2 1 1 1 36 R_thrm 1 1 1 37 lnR_thrm 1 1 1 38 Scaled_R 1 1 1 39 SH_Coeffs 1 1 1 40 SB_Temp_K 1 2 1 41 SB_Temp_C 1 3 1 42 mV_tpile 1 1 1 43 m_slope 1 2 2 44 b_inter 1 2 2 45 Exponent1 1 1 1 46 Exponent2 1 1 1 47 SB_4Pow 1 1 1 48 Sum1 1 1 1 49 Sum2 1 1 1 50 T_Temp_K 1 1 1 51 T_Temp_C 1 1 1 52 mVxm 1 1 1 -Program Security- 0000 0000 0000 -Mode 4- -Final Storage Area 2- 0 -CR10X ID- 0 -CR10X Power Up- 3 -CR10X Compile Setting- 3 -CR10X RS-232 Setting- -1 -DLD File Labels- 0 -Final Storage Labels- 0,Year_RTM,24515 0,Day_RTM 0,Hour_Minute_RTM 1,UCN2_AVG~4,26890 1,demod_AVG~5 2,Var_UCN2~20,30125 2,Var_demod~21 3,PUCN21000_AVG~12,13256 4,N~6,19245 5,T_TH_AVG~9,17393 6,WS_ms_S_WVT~2,20389 6,WdirDavis_D1_WVT~23 6,WdirDavis_SD1_WVT~23 7,SlrW_AVG~24,9842 8,Air_Temp_AVG~1,2269 9,Batt_Volt_AVG~3,13505 10,VWC_Raw_AVG~29,20032 10,EC_Raw_AVG~30 10,T_Raw_AVG~31 11,T_CS215_AVG~26,13501 11,RH_CS215_AVG~27 12,T_Temp_C_AVG~51,11255 13,SB_Temp_C_AVG~41,8176