;{CR10} ; ;Datalogger PD ; ;Pacific Tomato Growers WEATHER STATION ; ;written on 01/02/98 by John Capece ;updated on 01/02/98 by John Capece ; ;TestTemp thermocouple provided as a field calibration check ; ;output: ; A1. Station ID = 901 ; B2. Year ; C3. Julian Day ; D4. HourMinute ; E5. Battery Voltage ; F6. Reference Temperature (C) ; G7. Wind Speed (mph) ; H8. Rain (inches) ; I9. Air Temperature (F) ; J10. Relative Humidity ; K11. Solar Radiation ; ;wiring: ; RefTemp (CR10T) E3=Black, AG=Silver, Red=1H ; Wind (Young 3001) P1=Black, G=Silver, G=White ; Rain (Texas Elec.) P2=Black, G=Silver, G=White ; AirTemp (ThermoElectric TTX) 2H=Blue, 2L=Red ; TestTemp (ThermoElectric TTX) 3H=Blue, 3L=Red ; Humidity ; Solar ; ; *Table 1 Program 01: 60 Execution Interval (seconds) 1: Z=F (P30) 1: 904 F 2: 00 Exponent of 10 3: 1 Z Loc [ ID ] 2: Batt Voltage (P10) 1: 2 Loc [ Volts ] 3: Temp (107) (P11) 1: 1 Reps 2: 1 SE Channel 3: 3 Excite all reps w/Exchan 3 4: 3 Loc [ RefTemp ] 5: 1 Mult 6: 0 Offset 4: Pulse (P3) 1: 1 Reps 2: 1 Pulse Input Channel 3: 21 Low Level AC, Output Hz 4: 4 Loc [ Wind ] 5: 1.0 Mult 6: 0 Offset 5: If (X<=>F) (P89) 1: 4 X Loc [ Wind ] 2: 3 >= 3: 1 F 4: 30 Then Do 6: Z=X*F (P37) 1: 4 X Loc [ Wind ] 2: 1.677 F 3: 4 Z Loc [ Wind ] 7: Z=X+F (P34) 1: 4 X Loc [ Wind ] 2: 0.4 F 3: 4 Z Loc [ Wind ] 8: End (P95) 9: Pulse (P3) 1: 1 Reps 2: 2 Pulse Input Channel 3: 2 Switch Closure, All Counts 4: 5 Loc [ Rain ] 5: .01 Mult 6: 0.0 Offset 10: Thermocouple Temp (DIFF) (P14) 1: 1 Reps 2: 1 2.5 mV Slow Range 3: 2 DIFF Channel 4: 1 Type T (Copper-Constantan) 5: 3 Ref Temp (Deg. C) Loc [ RefTemp ] 6: 6 Loc [ AirTemp ] 7: 1.8 Mult 8: 32 Offset 11: Thermocouple Temp (DIFF) (P14) 1: 1 Reps 2: 1 2.5 mV Slow Range 3: 3 DIFF Channel 4: 1 Type T (Copper-Constantan) 5: 3 Ref Temp (Deg. C) Loc [ RefTemp ] 6: 9 Loc [ TestTemp ] 7: 1.8 Mult 8: 32 Offset 12: Z=X*F (P37) 1: 3 X Loc [ RefTemp ] 2: 1.8 F 3: 3 Z Loc [ RefTemp ] 13: Z=X+F (P34) 1: 3 X Loc [ RefTemp ] 2: 32 F 3: 3 Z Loc [ RefTemp ] 14: Z=F (P30) 1: 9999 F 2: 00 Exponent of 10 3: 7 Z Loc [ Humidity ] 15: Z=F (P30) 1: 9999 F 2: 00 Exponent of 10 3: 8 Z Loc [ Solar ] 16: If time is (P92) 1: 0000 Minutes (Seconds --) into a 2: 15 Interval (same units as above) 3: 10 Set Output Flag High 17: Sample (P70) 1: 1 Reps 2: 1 Loc [ ID ] 18: Real Time (P77) 1: 1110 Year,Day,Hour/Minute (midnight = 0000) 19: Average (P71) 1: 1 Reps 2: 1 Loc [ ID ] 20: Average (P71) 1: 1 Reps 2: 2 Loc [ Volts ] 21: Average (P71) 1: 1 Reps 2: 3 Loc [ RefTemp ] 22: Average (P71) 1: 1 Reps 2: 4 Loc [ Wind ] 23: Average (P71) 1: 1 Reps 2: 5 Loc [ Rain ] 24: Average (P71) 1: 1 Reps 2: 6 Loc [ AirTemp ] 25: Average (P71) 1: 1 Reps 2: 7 Loc [ Humidity ] *Table 2 Program 02: 0.0000 Execution Interval (seconds) *Table 3 Subroutines End Program -Input Locations- 1 ID 1 2 1 2 Volts 1 1 1 3 RefTemp 1 5 3 4 Wind 1 4 3 5 Rain 1 1 1 6 AirTemp 1 1 1 7 Humidity 1 1 1 8 Solar 1 0 1 9 TestTemp 1 0 1 10 _________ 0 0 0 11 _________ 0 0 0 12 _________ 0 0 0 13 _________ 0 0 0 14 _________ 0 0 0 15 _________ 0 0 0 16 _________ 0 0 0 17 _________ 0 0 0 18 _________ 0 0 0 19 _________ 0 0 0 20 _________ 0 0 0 21 _________ 0 0 0 22 _________ 0 0 0 23 _________ 0 0 0 24 _________ 0 0 0 25 _________ 0 0 0 26 _________ 0 0 0 27 _________ 0 0 0 28 _________ 0 0 0 -Program Security- 0000 0000 0000 -Mode 4- -Final Storage Area 2- 0