;{CR23X} ;WIRING ; Large Aperture Scintillometer ; Brown (Demod): 3H ; Orange (Cn2): 2H ; Green (Signal Reference): 3L ; Jumper 3L to 2L, and 2L to 1L ; Red (Thermistor): 1:1 Voltage Divider to 1H ; |-10kOhm-|-100kOhm-| ; | | | ; AG 1H 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 Davis ; P1: BLK ; G: RED ;Wind Direction Davis ; 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 ; SW 12V: White ; C4: red ; G: bare ;IRR-P Infrared surface temperature sensor ; G: blue, clear ; Ex2: white ; 7H: green ; 6H: red ; 6L: black *Table 1 Program 01: 1 Execution Interval (seconds) ;1: Temp (107) (P11) ; 1: 1 Reps ; 2: 7 SE Channel ; 3: 1 Excite all reps w/E1 ; 4: 48 Loc [ Air_Temp ] ; 5: 1.0 Mult ; 6: 0.0 Offset 1: Pulse (P3) 1: 1 Reps 2: 1 Pulse Channel 1 3: 22 Switch Closure, Output Hz 4: 50 Loc [ WS_ms ] 5: 1.00575 Mult 6: 0. Offset 2: Excite-Delay (SE) (P4) 1: 1 Reps 2: 24 1000 mV, 60 Hz Reject, Slow Range 3: 8 SE Channel 4: 1 Excite all reps w/Exchan 1 5: 2 Delay (units 0.01 sec) 6: 1000 mV Excitation 7: 51 Loc [ WdirDavis ] 8: 0.355 Mult 9: 0.0 Offset 3: Volt (Diff) (P2) 1: 1 Reps 2: 21 10 mV, 60 Hz Reject, Slow Range 3: 5 DIFF Channel 4: 52 Loc [ SlrW ] 5: 1.0 Multiplier 6: 0.0 Offset 4: Z=X*F (P37) 1: 52 X Loc [ SlrW ] 2: .002 F 3: 53 Z Loc [ SlrMJ ] 5: Z=X*F (P37) 1: 52 X Loc [ SlrW ] 2: 200 F 3: 52 Z Loc [ SlrW ] 6: SDI-12 Recorder (P105) 1: 0 SDI-12 Address 2: 0 Start Measurement (aM!) 3: 8 Port 4: 54 Loc [ T_CS215 ] 5: 1.0 Multiplier 6: 0.0 Offset ;9: Pulse (P3) ; 1: 1 Reps ; 2: 2 Pulse Channel 2 ; 3: 21 Low Level AC, Output Hz ; 4: 57 Loc [ Ws_03005 ] ; 5: 0.75 Multiplier ; 6: 0.2 Offset ; ;10: If (X<=>F) (P89) ; 1: 57 X Loc [ Ws_03005 ] ; 2: 4 < ; 3: 0.21 F ; 4: 30 Then Do ; ; 11: Z=F x 10^n (P30) ; 1: 0 F ; 2: 0 n, Exponent of 10 ; 3: 57 Z Loc [ Ws_03005 ] ; ;12: End (P95) ; START SCINTILLOMETER PROGRAM 7: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 10 Interval (same units as above) 3: 12 Set Flag 2 High 8: If Flag/Port (P91) 1: 22 Do if Flag 2 is Low 2: 30 Then Do 9: Beginning of Loop (P87) 1: 0 Delay 2: 12 Loop Count 10: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 1 Z Loc [ UCN2 ] 11: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 6 Z Loc [ N ] 12: End (P95) 13: End (P95) 14: 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 ; no voltage divider --> half multiplier than manual 15: Volt (Diff) (P2) 1: 1 Reps 2: 25 5000 mV, 60 Hz Reject, Fast Range (same as code 45) 3: 2 DIFF Channel 4: 1 Loc [ UCN2 ] 5: 0.001 Mult 6: 0 Offset ; Do measurements of demod (or signal strength) signal LAS 16: Volt (Diff) (P2) 1: 1 Reps 2: 25 5000 mV, 60 Hz Reject, Fast Range (same as code 45) 3: 3 DIFF Channel 4: 2 Loc [ demod ] 5: 1.0 Mult 6: 0.0 Offset ; convert thermistor voltage from mV to V 17: Volt (Diff) (P2) 1: 1 Reps 2: 25 5000 mV, 60 Hz Reject, Fast Range (same as code 45) 3: 1 DIFF Channel 4: 14 Loc [ U_TH ] 5: .011 Mult 6: 0.0 Offset ;compute internal thermistor temperature from Voltage 18: Polynomial (P55) 1: 1 Reps 2: 14 X Loc [ U_TH ] 3: 13 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. 19: If Flag/Port (P91) 1: 23 Do if Flag 3 is Low 2: 1 Call Subroutine 1 ; Calculate 10^(UCN2) 20: Z=F (P30) 1: 10 F 2: 0 Exponent of 10 3: 3 Z Loc [ Ten ] 21: Z=X^Y (P47) 1: 3 X Loc [ Ten ] 2: 1 Y Loc [ UCN2 ] 3: 4 Z Loc [ PowerUCN2 ] ; Calculate 10^(UCN2)*1000 22: Z=X*F (P37) 1: 4 X Loc [ PowerUCN2 ] 2: 1000 F 3: 5 Z Loc [ PUCN21000 ] ; Counter 23: Z=X+F (P34) 1: 6 X Loc [ N ] 2: 1 F 3: 6 Z Loc [ N ] ; Subtract initial values from measurement signals 24: Z=X-Y (P35) 1: 1 X Loc [ UCN2 ] 2: 7 Y Loc [ UCN2_c ] 3: 9 Z Loc [ UCN2_P62 ] 25: Z=X-Y (P35) 1: 2 X Loc [ demod ] 2: 8 Y Loc [ demod_c ] 3: 10 Z Loc [ demod_P62 ] ; After 10 minutes write data to final storage 26: 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) 27: 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: 9 First Source Loc [ UCN2_P62 ] 9: 11 First Destination Loc [ Var_UCN2 ] ; END SCINTILLOMETER PROGRAM 28: Real Time (P77)^21320 1: 1110 Year,Day,Hour/Minute (midnight = 0000) 29: Resolution (P78) 1: 1 High Resolution 30: Average (P71)^2887 1: 2 Reps 2: 1 Loc [ UCN2 ] 31: Sample (P70)^29807 1: 2 Reps 2: 11 Loc [ Var_UCN2 ] 32: Average (P71)^24871 1: 1 Reps 2: 5 Loc [ PUCN21000 ] 33: Resolution (P78) 1: 0 Low Resolution 34: Sample (P70)^26763 1: 1 Reps 2: 6 Loc [ N ] 35: Average (P71)^30287 1: 1 Reps 2: 13 Loc [ T_TH ] 36: Average (P71)^20502 1: 1 Reps 2: 49 Loc [ Batt_Volt ] 37: Wind Vector (P69)^17986 1: 1 Reps 2: 0 Samples per Sub-Interval 3: 00 Sensor/Output Option 4: 50 Wind Speed/East Loc [ WS_ms ] 5: 51 Wind Direction/North Loc [ WdirDavis ] 38: Average (P71)^20866 1: 4 Reps 2: 52 Loc [ SlrW ] 39: Average (P71)^21399 1: 3 Reps 2: 30 Loc [ VWC_Raw ] 40: Average (P71)^20022 1: 1 Reps 2: 85 Loc [ T_Temp_C ] 41: Average (P71)^1127 1: 1 Reps 2: 46 Loc [ Ref_Tmp ] ; set Flag 3 low to store new first values for next interval 42: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 10 Interval (same units as above) 3: 30 Then Do 43: Do (P86) 1: 23 Set Flag 3 Low 44: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 6 Z Loc [ N ] 45: End (P95) *Table 2 Program 02: 10 Execution Interval (seconds) 1: Panel Temperature (P17) 1: 46 Loc [ Ref_Tmp ] 2: Batt Voltage (P10) 1: 49 Loc [ Batt_Volt ] 3: Do (P86) 1: 49 Turn On Switched 12V 4: Port Serial I/O (P15) 1: 1 Reps 2: 0 8-Bit, TTL ASCII, 1200 Baud 3: 0 TX after CTS 4: 6 No RTS/DTR, C6 TXD/RXD 5: 30 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: 30 Start Loc for RX [ VWC_Raw ] 11: 1 Mult for RX 12: 0 Offset for RX 5: Do (P86) 1: 59 Turn Off Switched 12V ;start infrared sfc temperature 6: AC Half Bridge (P5) 1: 1 Reps 2: 45 5000 mV, 60 Hz Reject, Fast Range 3: 13 SE Channel 4: 2 Excite all reps w/Exchan 2 5: 2500 mV Excitation 6: 66 Loc [ mV_thrm ] 7: 1.0 Multiplier 8: 0.0 Offset 7: Z=1/X (P42) 1: 66 X Loc [ mV_thrm ] 2: 67 Z Loc [ mV_thrm1 ] 8: Z=X+F (P34) 1: 67 X Loc [ mV_thrm1 ] 2: -1 F 3: 68 Z Loc [ mV_thrm2 ] 9: Z=X*F (P37) 1: 68 X Loc [ mV_thrm2 ] 2: 24900 F 3: 69 Z Loc [ R_thrm ] 10: Z=LN(X) (P40) 1: 69 X Loc [ R_thrm ] 2: 70 Z Loc [ lnR_thrm ] 11: Z=X*F (P37) 1: 70 X Loc [ lnR_thrm ] 2: .001 F 3: 71 Z Loc [ Scaled_R ] 12: Polynomial (P55) 1: 1 Reps 2: 71 X Loc [ Scaled_R ] 3: 72 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 13: Z=1/X (P42) 1: 72 X Loc [ SH_Coeffs ] 2: 73 Z Loc [ SB_Temp_K ] 14: Z=X+F (P34) 1: 73 X Loc [ SB_Temp_K ] 2: -273.15 F 3: 74 Z Loc [ SB_Temp_C ] 15: Volt (Diff) (P2) 1: 1 Reps 2: 25 5000 mV, 60 Hz Reject, Fast Range (same as code 45) 3: 6 DIFF Channel 4: 75 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. ; C0 C1 C2 ; 1111 m(SB): 15115.65116 91.92372 0.50192 ; b(SB): -3.51284 -4.94578 0.23950 ; 1148 m(SB): 14712.347123 87.909979 0.69812 ; b(SB): 66.918069 -4.789758 0.203737 ; 1119 M(SB): 15815.55816 103.07703 0.50114 ; b(SB): .92783 -0.27870 -0.11387 ; 1121 m(SB): 15127.55128 93.57894 0.79976 b(SB): -10.91261 -8.92815 0.32751 16: Polynomial (P55) 1: 1 Reps 2: 74 X Loc [ SB_Temp_C ] 3: 76 F(X) Loc [ m_slope ] 4: 15115.6 C0 5: 91.9237 C1 6: .50192 C2 7: 0.0 C3 8: 0.0 C4 9: 0.0 C5 17: Z=X*F (P37) 1: 76 X Loc [ m_slope ] 2: 99999 F 3: 76 Z Loc [ m_slope ] 18: Polynomial (P55) 1: 1 Reps 2: 74 X Loc [ SB_Temp_C ] 3: 77 F(X) Loc [ b_inter ] 4: -3.51284 C0 5: -4.94578 C1 6: .23950 C2 7: 0.0 C3 8: 0.0 C4 9: 0.0 C5 19: Z=X*F (P37) 1: 77 X Loc [ b_inter ] 2: 99999 F 3: 77 Z Loc [ b_inter ] 20: Z=F x 10^n (P30) 1: .4 F 2: 1 n, Exponent of 10 3: 78 Z Loc [ Exponent1 ] 21: Z=F x 10^n (P30) 1: .025 F 2: 1 n, Exponent of 10 3: 79 Z Loc [ Exponent2 ] 22: Z=X^Y (P47) 1: 73 X Loc [ SB_Temp_K ] 2: 78 Y Loc [ Exponent1 ] 3: 80 Z Loc [ SB_4Pow ] 23: Z=X*Y (P36) 1: 75 X Loc [ mV_tpile ] 2: 76 Y Loc [ m_slope ] 3: 81 Z Loc [ mVxm ] 24: Z=X+Y (P33) 1: 80 X Loc [ SB_4Pow ] 2: 81 Y Loc [ mVxm ] 3: 82 Z Loc [ Sum1 ] 25: Z=X+Y (P33) 1: 77 X Loc [ b_inter ] 2: 82 Y Loc [ Sum1 ] 3: 83 Z Loc [ Sum2 ] 26: Z=X^Y (P47) 1: 83 X Loc [ Sum2 ] 2: 79 Y Loc [ Exponent2 ] 3: 84 Z Loc [ T_Temp_K ] 27: Z=X+F (P34) 1: 84 X Loc [ T_Temp_K ] 2: -273.15 F 3: 85 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: 1 First Source Loc [ UCN2 ] 3: 1 Source Step 4: 7 First Destination Loc [ UCN2_c ] 5: 1 Destination Step 4: End (P95) ; END SCINTILLOMETER SUBROUTINE End Program -Input Locations- 1 UCN2 1 4 2 2 demod 1 3 1 3 Ten 1 0 1 4 PowerUCN2 1 0 1 5 PUCN21000 1 0 1 6 N 1 2 3 7 UCN2_c 5 1 1 8 demod_c 17 1 1 9 UCN2_P62 1 1 1 10 demod_P62 1 1 1 11 Var_UCN2 5 1 1 12 Var_demod 17 1 1 13 T_TH 1 1 1 14 U_TH 1 1 1 15 _________ 0 0 0 16 _________ 0 0 0 17 Ux 5 4 2 18 Uy 9 5 2 19 Uz 9 2 2 20 Ts 9 2 2 21 diag 17 4 2 22 zero 1 1 0 23 smpls 5 2 2 24 NaN_csat 9 2 2 25 del_T_f 9 2 2 26 track_f 9 2 1 27 amp_h_f 9 2 1 28 amp_l_f 9 2 1 29 F03F_f 17 1 2 30 VWC_Raw 1 2 1 31 EC_Raw 1 1 0 32 T_Raw 1 1 0 33 diag_work 1 4 2 34 _8000h___ 1 2 1 35 _4000h___ 1 0 1 36 _2000h___ 1 0 1 37 _1000h___ 1 0 1 38 theta 1 0 1 39 diag_abs 1 1 1 40 TC_i1 0 0 0 41 TC_1 0 0 0 42 TC_2 0 0 0 43 TC_3 0 0 0 44 TC_4 0 0 0 45 Vh_in 1 0 0 46 Ref_Tmp 1 1 1 47 TC_in 9 0 0 48 Air_Temp 9 0 1 49 Batt_Volt 1 1 1 50 WS_ms 1 1 1 51 WdirDavis 1 1 1 52 SlrW 1 3 2 53 SlrMJ 1 1 1 54 T_CS215 1 1 1 55 RH_CS215 1 1 0 56 _________ 0 0 0 57 Ws_03005 1 1 2 58 _________ 0 0 0 59 AppTarget 1 1 0 60 SensBodyT 1 1 0 61 Psb 1 0 0 62 Hsb 1 0 0 63 Ksb 1 0 0 64 SEC 1 0 0 65 CTT 1 0 0 66 mV_thrm 1 1 1 67 mV_thrm1 1 1 1 68 mV_thrm2 1 1 1 69 R_thrm 1 1 1 70 lnR_thrm 1 1 1 71 Scaled_R 1 1 1 72 SH_Coeffs 1 1 1 73 SB_Temp_K 1 2 1 74 SB_Temp_C 1 2 1 75 mV_tpile 1 1 1 76 m_slope 1 2 2 77 b_inter 1 2 2 78 Exponent1 1 1 1 79 Exponent2 1 1 1 80 SB_4Pow 1 1 1 81 mVxm 1 1 1 82 Sum1 1 1 1 83 Sum2 1 1 1 84 T_Temp_K 1 1 1 85 T_Temp_C 1 1 1 86 T_Temp_ 1 0 0 -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,21320 0,Day_RTM 0,Hour_Minute_RTM 1,UCN2_AVG~1,2887 1,demod_AVG~2 2,Var_UCN2~11,29807 2,Var_demod~12 3,PUCN21000_AVG~5,24871 4,N~6,26763 5,T_TH_AVG~13,30287 6,Batt_Volt_AVG~49,20502 7,WS_ms_S_WVT~50,17986 7,WdirDavis_D1_WVT~51 7,WdirDavis_SD1_WVT~51 8,SlrW_AVG~52,20866 8,SlrMJ_AVG~53 8,T_CS215_AVG~54 8,RH_CS215_AVG~55 9,VWC_Raw_AVG~30,21399 9,EC_Raw_AVG~31 9,T_Raw_AVG~32 10,T_Temp_C_AVG~85,20022 11,Ref_Tmp_AVG~46,1127