;{CR10X} *Table 1 Program 01: 1.0000 Execution Interval (seconds) 1: If Flag/Port (P91) 1: 11 Do if Flag 1 is High 2: 30 Then Do 2: Z=Z+1 (P32) 1: 18 Z Loc [ Cal_Timer ] 3: Z=X+Y (P33) 1: 13 X Loc [ Rain_In ] 2: 17 Y Loc [ Cal_Rain ] 3: 17 Z Loc [ Cal_Rain ] 4: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 2 Interval (same units as above) 3: 10 Set Output Flag High (Flag 0) 5: Set Active Storage Area (P80) 1: 3 Input Storage Area 2: 14 Loc [ _________ ] 6: Average (P71) 1: 1 Reps 2: 9 Loc [ Temp_F ] 7: Average (P71) 1: 1 Reps 2: 4 Loc [ Rel_Humid ] 8: Average (P71) 1: 1 Reps 2: 12 Loc [ DewPt_F ] 9: Do (P86) 1: 20 Set Output Flag Low (Flag 0) 10: Else (P94) 11: Beginning of Loop (P87) 1: 0 Delay 2: 5 Loop Count 12: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 14 -- Z Loc [ Cal_Temp ] 13: End (P95) 14: End (P95) 15: If (X<=>F) (P89) 1: 18 X Loc [ Cal_Timer ] 2: 3 >= 3: 10800 F 4: 21 Set Flag 1 Low 16: Batt Voltage (P10) 1: 1 Loc [ BatVolts ] 17: If (X<=>F) (P89) 1: 52 X Loc [ FirstPass ] 2: 1 = 3: 0 F 4: 30 Then Do 18: Signature (P19) 1: 2 Loc [ ProgSign ] 19: Z=Z+1 (P32) 1: 52 Z Loc [ FirstPass ] 20: End (P95) 21: Do (P86) 1: 41 Set Port 1 High 22: Excitation with Delay (P22) 1: 3 Ex Channel 2: 0 Delay W/Ex (units = 0.01 sec) 3: 15 Delay After Ex (units = 0.01 sec) 4: 0 mV Excitation 23: Volt (SE) (P1) 1: 1 Reps 2: 5 2500 mV Slow Range 3: 1 SE Channel 4: 3 Loc [ Temp_C ] 5: .1 Mult 6: -40 Offset 24: Volt (SE) (P1) 1: 1 Reps 2: 5 2500 mV Slow Range 3: 2 SE Channel 4: 4 Loc [ Rel_Humid ] 5: .1 Mult 6: 0 Offset 25: Do (P86) 1: 51 Set Port 1 Low 26: Z=X*F (P37) 1: 3 X Loc [ Temp_C ] 2: 1.8 F 3: 9 Z Loc [ Temp_F ] 27: Z=X+F (P34) 1: 9 X Loc [ Temp_F ] 2: 32 F 3: 9 Z Loc [ Temp_F ] 28: If (X<=>F) (P89) 1: 4 X Loc [ Rel_Humid ] 2: 3 >= 3: 100 F 4: 30 Then Do 29: Z=F (P30) 1: 100 F 2: 0 Exponent of 10 3: 4 Z Loc [ Rel_Humid ] 30: End (P95) 31: Do (P86) 1: 1 Call Subroutine 1 32: If time is (P92) 1: 50 -- Minutes (Seconds --) into a 2: 60 -- Interval (same units as above) 3: 42 Set Port 2 High 33: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 1 Interval (same units as above) 3: 30 Then Do 34: Volt (SE) (P1) 1: 1 Reps 2: 25 2500 mV 60 Hz Rejection Range 3: 3 SE Channel 4: 5 Loc [ Press_mb ] 5: .184 Mult 6: 608.9 Offset 35: Z=X*F (P37) 1: 5 X Loc [ Press_mb ] 2: .1 F 3: 10 Z Loc [ Press_kPa ] 36: Z=X*F (P37) 1: 5 X Loc [ Press_mb ] 2: .02953 F 3: 11 Z Loc [ PressInHg ] 37: Do (P86) 1: 52 Set Port 2 Low 38: End (P95) 39: Pulse (P3) 1: 1 Reps 2: 1 Pulse Channel 1 3: 20 High Frequency, Output Hz 4: 7 Loc [ Wind_Spd ] 5: .10514 Mult 6: .5 Offset 40: If (X<=>F) (P89) 1: 7 X Loc [ Wind_Spd ] 2: 1 = 3: .5 F 4: 30 Then Do 41: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 7 Z Loc [ Wind_Spd ] 42: End (P95) 43: Excite-Delay (SE) (P4) 1: 1 Reps 2: 5 2500 mV Slow Range 3: 4 SE Channel 4: 2 Excite all reps w/Exchan 2 5: 2 Delay (units 0.01 sec) 6: 2500 mV Excitation 7: 6 Loc [ Wind_Dir ] 8: .144 Mult 9: 0 Offset 44: Pulse (P3) 1: 1 Reps 2: 2 Pulse Channel 2 3: 2 Switch Closure, All Counts 4: 13 Loc [ Rain_In ] 5: .01 Mult 6: 0 Offset 45: Z=X*F (P37) 1: 13 X Loc [ Rain_In ] 2: 25.4 F 3: 8 Z Loc [ Rain_mm ] 46: Do (P86) 1: 10 Set Output Flag High (Flag 0) 47: Set Active Storage Area (P80) 1: 3 Input Storage Area 2: 32 Loc [ _________ ] 48: Real Time (P77) 1: 1110 Year,Day,Hour/Minute (midnight = 0000) 49: Do (P86) 1: 20 Set Output Flag Low (Flag 0) 50: Z=X MOD F (P46) 1: 32 X Loc [ Year ] 2: 4 F 3: 35 Z Loc [ LeapYear ] 51: Z=F (P30) 1: -6999 F 2: 0 Exponent of 10 3: 37 Z Loc [ Con__6999 ] 52: Z=F (P30) 1: 1808 F 2: 0 Exponent of 10 3: 36 Z Loc [ BAAQMD_ID ] 53: If (X<=>Y) (P88) 1: 9 X Loc [ Temp_F ] 2: 3 >= 3: 19 Y Loc [ Max_Temp ] 4: 30 Then Do 54: Z=X (P31) 1: 9 X Loc [ Temp_F ] 2: 19 Z Loc [ Max_Temp ] 55: Z=X (P31) 1: 34 X Loc [ Time_HHMM ] 2: 20 Z Loc [ Time_MaxT ] 56: End (P95) 57: If (X<=>Y) (P88) 1: 9 X Loc [ Temp_F ] 2: 4 < 3: 21 Y Loc [ Min_Temp ] 4: 30 Then Do 58: Z=X (P31) 1: 9 X Loc [ Temp_F ] 2: 21 Z Loc [ Min_Temp ] 59: Z=X (P31) 1: 34 X Loc [ Time_HHMM ] 2: 22 Z Loc [ Time_MinT ] 60: End (P95) 61: If (X<=>Y) (P88) 1: 7 X Loc [ Wind_Spd ] 2: 3 >= 3: 23 Y Loc [ Max_Wind ] 4: 30 Then Do 62: Z=X (P31) 1: 7 X Loc [ Wind_Spd ] 2: 23 Z Loc [ Max_Wind ] 63: Z=X (P31) 1: 34 X Loc [ Time_HHMM ] 2: 24 Z Loc [ Time_MaxW ] 64: Z=X (P31) 1: 6 X Loc [ Wind_Dir ] 2: 25 Z Loc [ DirofMaxW ] 65: End (P95) 66: Z=X+Y (P33) 1: 13 X Loc [ Rain_In ] 2: 26 Y Loc [ DailyRain ] 3: 26 Z Loc [ DailyRain ] 67: Z=X+Y (P33) 1: 13 X Loc [ Rain_In ] 2: 31 Y Loc [ Seas_Rain ] 3: 31 Z Loc [ Seas_Rain ] 68: If Flag/Port (P91) 1: 11 Do if Flag 1 is High 2: 0 Go to end of Program Table 69: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 15 Interval (same units as above) 3: 10 Set Output Flag High (Flag 0) 70: Set Active Storage Area (P80) 1: 1 Final Storage Area 1 2: 15 Array ID 71: Sample (P70) 1: 1 Reps 2: 36 Loc [ BAAQMD_ID ] 72: Real Time (P77) 1: 1220 Year,Day,Hour/Minute (midnight = 2400) 73: Wind Vector (P69) 1: 1 Reps 2: 0 Samples per Sub-Interval 3: 0 S, é1, & å(é1) Polar 4: 7 Wind Speed/East Loc [ Wind_Spd ] 5: 6 Wind Direction/North Loc [ Wind_Dir ] 74: Average (P71) 1: 1 Reps 2: 9 Loc [ Temp_F ] 75: Average (P71) 1: 1 Reps 2: 4 Loc [ Rel_Humid ] 76: Minimum (P74) 1: 1 Reps 2: 0 Value Only 3: 1 Loc [ BatVolts ] 77: Maximum (P73) 1: 1 Reps 2: 0 Value Only 3: 7 Loc [ Wind_Spd ] 78: Sample (P70) 1: 1 Reps 2: 37 Loc [ Con__6999 ] 79: Totalize (P72) 1: 1 Reps 2: 13 Loc [ Rain_In ] 80: Resolution (P78) 1: 1 High Resolution 81: Average (P71) 1: 1 Reps 2: 5 Loc [ Press_mb ] 82: Resolution (P78) 1: 0 Low Resolution 83: Average (P71) 1: 1 Reps 2: 12 Loc [ DewPt_F ] 84: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 60 Interval (same units as above) 3: 10 Set Output Flag High (Flag 0) 85: Set Active Storage Area (P80) 1: 1 Final Storage Area 1 2: 60 Array ID 86: Sample (P70) 1: 1 Reps 2: 36 Loc [ BAAQMD_ID ] 87: Real Time (P77) 1: 1220 Year,Day,Hour/Minute (midnight = 2400) 88: Wind Vector (P69) 1: 1 Reps 2: 900 Samples per Sub-Interval 3: 0 S, é1, & å(é1) Polar 4: 7 Wind Speed/East Loc [ Wind_Spd ] 5: 6 Wind Direction/North Loc [ Wind_Dir ] 89: Average (P71) 1: 1 Reps 2: 9 Loc [ Temp_F ] 90: Average (P71) 1: 1 Reps 2: 4 Loc [ Rel_Humid ] 91: Minimum (P74) 1: 1 Reps 2: 0 Value Only 3: 1 Loc [ BatVolts ] 92: Maximum (P73) 1: 1 Reps 2: 0 Value Only 3: 7 Loc [ Wind_Spd ] 93: Sample (P70) 1: 1 Reps 2: 37 Loc [ Con__6999 ] 94: Totalize (P72) 1: 1 Reps 2: 13 Loc [ Rain_In ] 95: Resolution (P78) 1: 1 High Resolution 96: Average (P71) 1: 1 Reps 2: 5 Loc [ Press_mb ] 97: Resolution (P78) 1: 0 Low Resolution 98: Average (P71) 1: 1 Reps 2: 12 Loc [ DewPt_F ] 99: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 1440 Interval (same units as above) 3: 10 Set Output Flag High (Flag 0) 100: Set Active Storage Area (P80) 1: 1 Final Storage Area 1 2: 200 Array ID 101: Sample (P70) 1: 1 Reps 2: 36 Loc [ BAAQMD_ID ] 102: Real Time (P77) 1: 1220 Year,Day,Hour/Minute (midnight = 2400) 103: Wind Vector (P69) 1: 1 Reps 2: 900 Samples per Sub-Interval 3: 0 S, é1, & å(é1) Polar 4: 7 Wind Speed/East Loc [ Wind_Spd ] 5: 6 Wind Direction/North Loc [ Wind_Dir ] 104: Average (P71) 1: 1 Reps 2: 9 Loc [ Temp_F ] 105: Average (P71) 1: 1 Reps 2: 4 Loc [ Rel_Humid ] 106: Minimum (P74) 1: 1 Reps 2: 0 Value Only 3: 1 Loc [ BatVolts ] 107: Sample (P70) 1: 3 Reps 2: 23 Loc [ Max_Wind ] 108: Sample (P70) 1: 4 Reps 2: 19 Loc [ Max_Temp ] 109: Sample (P70) 1: 1 Reps 2: 26 Loc [ DailyRain ] 110: Sample (P70) 1: 1 Reps 2: 31 Loc [ Seas_Rain ] 111: Maximum (P73) 1: 1 Reps 2: 0 Value Only 3: 4 Loc [ Rel_Humid ] 112: Minimum (P74) 1: 1 Reps 2: 0 Value Only 3: 4 Loc [ Rel_Humid ] 113: Average (P71) 1: 1 Reps 2: 5 Loc [ Press_mb ] 114: Resolution (P78) 1: 1 High Resolution 115: Maximum (P73) 1: 1 Reps 2: 10 Value with Hr-Min 3: 5 Loc [ Press_mb ] 116: Minimum (P74) 1: 1 Reps 2: 10 Value with Hr-Min 3: 5 Loc [ Press_mb ] 117: Resolution (P78) 1: 0 Low Resolution 118: Average (P71) 1: 1 Reps 2: 12 Loc [ DewPt_F ] 119: Serial Out (P96) 1: 71 Storage Module 120: If time is (P92) 1: 0 Minutes (Seconds --) into a 2: 1440 Interval (same units as above) 3: 30 Then Do 121: Z=X (P31) 1: 19 X Loc [ Max_Temp ] 2: 27 Z Loc [ Ystd_MaxT ] 122: Z=X (P31) 1: 21 X Loc [ Min_Temp ] 2: 28 Z Loc [ Ystd_MinT ] 123: Z=X (P31) 1: 23 X Loc [ Max_Wind ] 2: 29 Z Loc [ Ystd_MaxW ] 124: Z=X (P31) 1: 26 X Loc [ DailyRain ] 2: 30 Z Loc [ Ystd_Rain ] 125: Z=X (P31) 1: 9 X Loc [ Temp_F ] 2: 19 Z Loc [ Max_Temp ] 126: Z=F (P30) 1: 1 F 2: 0 Exponent of 10 3: 20 Z Loc [ Time_MaxT ] 127: Z=X (P31) 1: 9 X Loc [ Temp_F ] 2: 21 Z Loc [ Min_Temp ] 128: Z=F (P30) 1: 1 F 2: 0 Exponent of 10 3: 22 Z Loc [ Time_MinT ] 129: Z=X (P31) 1: 7 X Loc [ Wind_Spd ] 2: 23 Z Loc [ Max_Wind ] 130: Z=F (P30) 1: 1 F 2: 0 Exponent of 10 3: 24 Z Loc [ Time_MaxW ] 131: Z=X (P31) 1: 6 X Loc [ Wind_Dir ] 2: 25 Z Loc [ DirofMaxW ] 132: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 26 Z Loc [ DailyRain ] 133: If (X<=>F) (P89) 1: 35 X Loc [ LeapYear ] 2: 1 = 3: 0 F 4: 30 Then Do 134: If (X<=>F) (P89) 1: 33 X Loc [ Day ] 2: 1 = 3: 183 F 4: 30 Then Do 135: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 31 Z Loc [ Seas_Rain ] 136: End (P95) 137: End (P95) 138: If (X<=>F) (P89) 1: 35 X Loc [ LeapYear ] 2: 2 <> 3: 0 F 4: 30 Then Do 139: If (X<=>F) (P89) 1: 33 X Loc [ Day ] 2: 1 = 3: 182 F 4: 30 Then Do 140: Z=F (P30) 1: 0 F 2: 0 Exponent of 10 3: 31 Z Loc [ Seas_Rain ] 141: End (P95) 142: End (P95) 143: End (P95) *Table 2 Program 01: 0.0000 Execution Interval (seconds) *Table 3 Subroutines 1: Beginning of Subroutine (P85) 1: 1 Subroutine 1 2: Saturation Vapor Pressure (P56) 1: 3 Temperature Loc [ Temp_C ] 2: 38 Loc [ Sat_VP ] 3: Z=X*Y (P36) 1: 4 X Loc [ Rel_Humid ] 2: 38 Y Loc [ Sat_VP ] 3: 39 Z Loc [ RH_Sat_VP ] 4: Z=X*F (P37) 1: 39 X Loc [ RH_Sat_VP ] 2: .01 F 3: 40 Z Loc [ Vap_Pres ] 5: Z=F (P30) 1: .61078 F 2: 0 Exponent of 10 3: 41 Z Loc [ C1 ] 6: Z=F (P30) 1: 17.269 F 2: 0 Exponent of 10 3: 42 Z Loc [ C2a ] 7: Z=F (P30) 1: .3882 F 2: 3 -- Exponent of 10 3: 43 Z Loc [ C2b ] 8: Z=X+Y (P33) 1: 42 X Loc [ C2a ] 2: 43 Y Loc [ C2b ] 3: 44 Z Loc [ C2 ] 9: Z=F (P30) 1: 237.3 F 2: 0 Exponent of 10 3: 45 Z Loc [ C3 ] 10: Z=X/Y (P38) 1: 40 X Loc [ Vap_Pres ] 2: 41 Y Loc [ C1 ] 3: 46 Z Loc [ VP_C1 ] 11: Z=LN(X) (P40) 1: 46 X Loc [ VP_C1 ] 2: 47 Z Loc [ Ln_VP_C1 ] 12: Z=X*Y (P36) 1: 45 X Loc [ C3 ] 2: 47 Y Loc [ Ln_VP_C1 ] 3: 48 Z Loc [ A_of_A_B ] 13: Z=X-Y (P35) 1: 44 X Loc [ C2 ] 2: 47 Y Loc [ Ln_VP_C1 ] 3: 49 Z Loc [ B_of_A_B ] 14: Z=X/Y (P38) 1: 48 X Loc [ A_of_A_B ] 2: 49 Y Loc [ B_of_A_B ] 3: 50 Z Loc [ DewPt_C ] 15: Z=X*F (P37) 1: 50 X Loc [ DewPt_C ] 2: 1.8 F 3: 12 Z Loc [ DewPt_F ] 16: Z=X+F (P34) 1: 12 X Loc [ DewPt_F ] 2: 32 F 3: 12 Z Loc [ DewPt_F ] 17: Z=X-Y (P35) 1: 38 X Loc [ Sat_VP ] 2: 40 Y Loc [ Vap_Pres ] 3: 51 Z Loc [ VPD ] 18: End (P95) End Program -Input Locations- 1 BatVolts 1 3 1 2 ProgSign 1 0 1 3 Temp_C 1 2 1 4 Rel_Humid 1 8 2 5 Press_mb 1 7 1 6 Wind_Dir 1 5 1 7 Wind_Spd 1 9 2 8 Rain_mm 1 0 1 9 Temp_F 1 11 2 10 Press_kPa 1 0 1 11 PressInHg 1 0 1 12 DewPt_F 1 5 2 13 Rain_In 1 6 1 14 Cal_Temp 1 0 2 15 Cal_RH 0 0 0 16 Cal_DewPt 0 0 0 17 Cal_Rain 1 1 1 18 Cal_Timer 1 1 1 19 Max_Temp 1 3 2 20 Time_MaxT 1 1 2 21 Min_Temp 1 3 2 22 Time_MinT 1 1 2 23 Max_Wind 1 3 2 24 Time_MaxW 1 1 2 25 DirofMaxW 1 1 2 26 DailyRain 1 3 2 27 Ystd_MaxT 1 0 1 28 Ystd_MinT 1 0 1 29 Ystd_MaxW 1 0 1 30 Ystd_Rain 1 0 1 31 Seas_Rain 1 2 3 32 Year 1 1 1 33 Day 1 2 0 34 Time_HHMM 1 3 0 35 LeapYear 1 2 1 36 BAAQMD_ID 1 3 1 37 Con__6999 1 2 1 38 Sat_VP 1 2 1 39 RH_Sat_VP 1 1 1 40 Vap_Pres 1 2 1 41 C1 1 1 1 42 C2a 1 1 1 43 C2b 1 1 1 44 C2 1 1 1 45 C3 1 1 1 46 VP_C1 1 1 1 47 Ln_VP_C1 1 2 1 48 A_of_A_B 1 1 1 49 B_of_A_B 1 1 1 50 DewPt_C 1 1 1 51 VPD 1 0 1 52 FirstPass 1 1 1 -Program Security- 0 0 0 -Mode 4- -Final Storage Area 2- 0 -CR10X ID- 0 -CR10X Power Up- 3