;{CR23X}
*Table 1 Program
  01: 3.0000    Execution Interval (seconds)

1:  Z=F (P30)
 1: 25       F
 2: 0        Exponent of 10
 3: 1        Z Loc [ stationid ]

2:  Z=F (P30)
 1: .26139   F
 2: 0        Exponent of 10
 3: 2        Z Loc [ latitude  ]

3:  Z=F (P30)
 1: 1.0947   F
 2: 0        Exponent of 10
 3: 3        Z Loc [ longitude ]

4:  Signature (P19)
 1: 4        Loc [ signature ]

5:  Z=F (P30)
 1: 1        F
 2: 0        Exponent of 10
 3: 5        Z Loc [ obsinsumm ]

6:  Batt Voltage (P10)
 1: 6        Loc [ battery   ]

7:  Panel Temperature (P17)
 1: 7        Loc [ paneltemp ]

8:  Thermocouple Temp (DIFF) (P14)
 1: 4        Reps
 2: 11       10 mV, Fast Range
 3: 1        DIFF Channel
 4: 1        Type T (Copper-Constantan)
 5: 7        Ref Temp (Deg. C) Loc [ paneltemp ]
 6: 8        Loc [ soilsfc   ]
 7: 1        Mult
 8: 0        Offset

9:  Excite-Delay (SE) (P4)
 1: 1        Reps
 2: 24       1000 mV, 60 Hz Reject, Slow Range
 3: 10       SE Channel
 4: 1        Excite all reps w/Exchan 1
 5: 2        Delay (units 0.01 sec)
 6: 5000     mV Excitation
 7: 29       Loc [ mmtsvolt  ]
 8: 1        Mult
 9: 0        Offset

10:  Z=LN(X) (P40)
 1: 29       X Loc [ mmtsvolt  ]
 2: 30       Z Loc [ mmtslog   ]

11:  Polynomial (P55)
 1: 1        Reps
 2: 30       X Loc [ mmtslog   ]
 3: 12       F(X) Loc [ tempmmts  ]
 4: -75.321  C0
 5: 23.077   C1
 6: -5.0971  C2
 7: 1.5176   C3
 8: -.19409  C4
 9: .0106    C5

12:  3W Half Bridge (P7)
 1: 1        Reps
 2: 13       200 mV, Fast Range
 3: 11       SE Channel
 4: 2        Excite all reps w/Exchan 2
 5: 800      mV Excitation
 6: 31       Loc [ prtratio  ]
 7: 100      Mult
 8: 0        Offset

13:  Temperature RTD (P16)
 1: 1        Reps
 2: 31       R/R0 Loc [ prtratio  ]
 3: 13       Loc [ tempprtd  ]
 4: 1        Mult
 5: 0        Offset

14:  Temp (107) (P11)
 1: 1        Reps
 2: 9        SE Channel
 3: 1        Excite all reps w/E1
 4: 14       Loc [ temp9m107 ]
 5: 1        Mult
 6: 0        Offset

15:  Volt (SE) (P1)
 1: 1        Reps
 2: 25       5000 mV, 60 Hz Reject, Fast Range
 3: 13       SE Channel
 4: 15       Loc [ relhumid  ]
 5: .1       Mult
 6: 0        Offset

16:  Volt (SE) (P1)
 1: 1        Reps
 2: 25       5000 mV, 60 Hz Reject, Fast Range
 3: 15       SE Channel
 4: 17       Loc [ barpress  ]
 5: .184     Mult
 6: -400     Offset

17:  Volt (SE) (P1)
 1: 1        Reps
 2: 22       50 mV, 60 Hz Reject, Slow Range
 3: 17       SE Channel
 4: 19       Loc [ totalsrad ]
 5: .1       Mult
 6: 0        Offset

18:  Volt (SE) (P1)
 1: 1        Reps
 2: 22       50 mV, 60 Hz Reject, Slow Range
 3: 18       SE Channel
 4: 20       Loc [ quantmrad ]
 5: .2       Mult
 6: 0        Offset

19:  Excite-Delay (SE) (P4)
 1: 1        Reps
 2: 15       5000 mV, Fast Range
 3: 19       SE Channel
 4: 3        Excite all reps w/Exchan 3
 5: 2        Delay (units 0.01 sec)
 6: 5000     mV Excitation
 7: 21       Loc [ winddr3m  ]
 8: .072     Mult
 9: 0        Offset

20:  Excite-Delay (SE) (P4)
 1: 1        Reps
 2: 15       5000 mV, Fast Range
 3: 20       SE Channel
 4: 3        Excite all reps w/Exchan 3
 5: 2        Delay (units 0.01 sec)
 6: 5000     mV Excitation
 7: 22       Loc [ winddr10m ]
 8: .071     Mult
 9: 0        Offset

21:  Pulse (P3)
 1: 1        Reps
 2: 1        Pulse Channel 1
 3: 22       Switch Closure, Output Hz
 4: 23       Loc [ windsp3m  ]
 5: .8       Mult
 6: .447     Offset

22:  Pulse (P3)
 1: 1        Reps
 2: 2        Pulse Channel 2
 3: 21       Low Level AC, Output Hz
 4: 24       Loc [ windsp10m ]
 5: .098     Mult
 6: 0        Offset

23:  Pulse (P3)
 1: 1        Reps
 2: 3        Pulse Channel 3
 3: 2        Switch Closure, All Counts
 4: 28       Loc [ preciptip ]
 5: .25      Mult
 6: 0        Offset

24:  Z=X+Y (P33)
 1: 35       X Loc [ accumtip  ]
 2: 28       Y Loc [ preciptip ]
 3: 35       Z Loc [ accumtip  ]

25:  Volt (SE) (P1)
 1: 1        Reps
 2: 25       5000 mV, 60 Hz Reject, Fast Range
 3: 21       SE Channel
 4: 25       Loc [ precapnew ]
 5: .01      Mult
 6: 0        Offset

26:  Z=X-Y (P35)
 1: 25       X Loc [ precapnew ]
 2: 26       Y Loc [ precapold ]
 3: 27       Z Loc [ precapdif ]

27:  Z=X (P31)
 1: 25       X Loc [ precapnew ]
 2: 26       Z Loc [ precapold ]

28:  If (X<=>F) (P89)
 1: 27       X Loc [ precapdif ]
 2: 4        <
 3: -.01     F
 4: 30       Then Do

29:  Z=F (P30)
 1: 0        F
 2: 0        Exponent of 10
 3: 27       Z Loc [ precapdif ]

30:  End (P95)

31:  Z=X-Y (P35)
 1: 34       X Loc [ accumcap  ]
 2: 27       Y Loc [ precapdif ]
 3: 34       Z Loc [ accumcap  ]

32:  If (X<=>F) (P89)
 1: 6        X Loc [ battery   ]
 2: 3        >=
 3: 12.2     F
 4: 49       Turn On Switched 12V

33:  If (X<=>F) (P89)
 1: 6        X Loc [ battery   ]
 2: 4        <
 3: 12       F
 4: 59       Turn Off Switched 12V

34:  Do (P86)
 1: 10       Set Output Flag High (Flag 0)

35:  Set Active Storage Area (P80)
 1: 2        Final Storage Area 2
 2: 113      Array ID

36:  Sample (P70)
 1: 1        Reps
 2: 1        Loc [ stationid ]

37:  Real Time (P77)
 1: 1221     Year,Day,Hour/Minute,Seconds (midnight = 2400)

38:  Resolution (P78)
 1: 1        High Resolution

39:  Sample (P70)
 1: 28       Reps
 2: 8        Loc [ soilsfc   ]

40:  Resolution (P78)
 1: 0        Low Resolution

41:  If time is (P92)
 1: 0        Minutes (Seconds --) into a
 2: 1        Interval (same units as above)
 3: 10       Set Output Flag High (Flag 0)

42:  Set Active Storage Area (P80)
 1: 1        Final Storage Area 1
 2: 102      Array ID

43:  Sample (P70)
 1: 3        Reps
 2: 1        Loc [ stationid ]

44:  Real Time (P77)
 1: 1220     Year,Day,Hour/Minute (midnight = 2400)

45:  Totalize (P72)
 1: 2        Reps
 2: 27       Loc [ precapdif ]

46:  Sample (P70)
 1: 2        Reps
 2: 34       Loc [ accumcap  ]

47:  Sample (P70)
 1: 18       Reps
 2: 8        Loc [ soilsfc   ]

48:  Maximum (P73)
 1: 2        Reps
 2: 0        Value Only
 3: 23       Loc [ windsp3m  ]

49:  Wind Vector (P69)
 1: 2        Reps
 2: 0        Samples per Sub-Interval
 3: 2        S, U, éu, å(éu) Polar
 4: 23       Wind Speed/East Loc [ windsp3m  ]
 5: 21       Wind Direction/North Loc [ winddr3m  ]

50:  Standard Deviation (P82)
 1: 2        Reps
 2: 23       Sample Loc [ windsp3m  ]

51:  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)

52:  Set Active Storage Area (P80)
 1: 1        Final Storage Area 1
 2: 160      Array ID

53:  Sample (P70)
 1: 3        Reps
 2: 1        Loc [ stationid ]

54:  Real Time (P77)
 1: 1220     Year,Day,Hour/Minute (midnight = 2400)

55:  Sample (P70)
 1: 1        Reps
 2: 4        Loc [ signature ]

56:  Resolution (P78)
 1: 1        High Resolution

57:  Totalize (P72)
 1: 1        Reps
 2: 5        Loc [ obsinsumm ]

58:  Resolution (P78)
 1: 0        Low Resolution

59:  Totalize (P72)
 1: 2        Reps
 2: 27       Loc [ precapdif ]

60:  Sample (P70)
 1: 18       Reps
 2: 8        Loc [ soilsfc   ]

61:  Average (P71)
 1: 13       Reps
 2: 8        Loc [ soilsfc   ]

62:  Wind Vector (P69)
 1: 2        Reps
 2: 0        Samples per Sub-Interval
 3: 2        S, U, éu, å(éu) Polar
 4: 23       Wind Speed/East Loc [ windsp3m  ]
 5: 21       Wind Direction/North Loc [ winddr3m  ]

63:  Standard Deviation (P82)
 1: 2        Reps
 2: 23       Sample Loc [ windsp3m  ]

64:  Maximum (P73)
 1: 20       Reps
 2: 10       Value with Hr-Min
 3: 6        Loc [ battery   ]

65:  Minimum (P74)
 1: 20       Reps
 2: 10       Value with Hr-Min
 3: 6        Loc [ battery   ]

66:  If time is (P92)
 1: 420      Minutes (Seconds --) into a
 2: 1440     Interval (same units as above)
 3: 10       Set Output Flag High (Flag 0)

67:  Set Active Storage Area (P80)
 1: 1        Final Storage Area 1
 2: 107      Array ID

68:  Sample (P70)
 1: 3        Reps
 2: 1        Loc [ stationid ]

69:  Real Time (P77)
 1: 1220     Year,Day,Hour/Minute (midnight = 2400)

70:  Sample (P70)
 1: 1        Reps
 2: 4        Loc [ signature ]

71:  Resolution (P78)
 1: 1        High Resolution

72:  Totalize (P72)
 1: 1        Reps
 2: 5        Loc [ obsinsumm ]

73:  Resolution (P78)
 1: 0        Low Resolution

74:  Totalize (P72)
 1: 2        Reps
 2: 27       Loc [ precapdif ]

75:  Sample (P70)
 1: 18       Reps
 2: 8        Loc [ soilsfc   ]

76:  Average (P71)
 1: 13       Reps
 2: 8        Loc [ soilsfc   ]

77:  Wind Vector (P69)
 1: 2        Reps
 2: 0        Samples per Sub-Interval
 3: 2        S, U, éu, å(éu) Polar
 4: 23       Wind Speed/East Loc [ windsp3m  ]
 5: 21       Wind Direction/North Loc [ winddr3m  ]

78:  Standard Deviation (P82)
 1: 2        Reps
 2: 23       Sample Loc [ windsp3m  ]

79:  Maximum (P73)
 1: 20       Reps
 2: 10       Value with Hr-Min
 3: 6        Loc [ battery   ]

80:  Minimum (P74)
 1: 20       Reps
 2: 10       Value with Hr-Min
 3: 6        Loc [ battery   ]

81:  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)

82:  Set Active Storage Area (P80)
 1: 1        Final Storage Area 1
 2: 124      Array ID

83:  Sample (P70)
 1: 3        Reps
 2: 1        Loc [ stationid ]

84:  Real Time (P77)
 1: 1220     Year,Day,Hour/Minute (midnight = 2400)

85:  Sample (P70)
 1: 1        Reps
 2: 4        Loc [ signature ]

86:  Resolution (P78)
 1: 1        High Resolution

87:  Totalize (P72)
 1: 1        Reps
 2: 5        Loc [ obsinsumm ]

88:  Resolution (P78)
 1: 0        Low Resolution

89:  Totalize (P72)
 1: 2        Reps
 2: 27       Loc [ precapdif ]

90:  Sample (P70)
 1: 18       Reps
 2: 8        Loc [ soilsfc   ]

91:  Average (P71)
 1: 13       Reps
 2: 8        Loc [ soilsfc   ]

92:  Wind Vector (P69)
 1: 2        Reps
 2: 0        Samples per Sub-Interval
 3: 2        S, U, éu, å(éu) Polar
 4: 23       Wind Speed/East Loc [ windsp3m  ]
 5: 21       Wind Direction/North Loc [ winddr3m  ]

93:  Standard Deviation (P82)
 1: 2        Reps
 2: 23       Sample Loc [ windsp3m  ]

94:  Maximum (P73)
 1: 20       Reps
 2: 10       Value with Hr-Min
 3: 6        Loc [ battery   ]

95:  Minimum (P74)
 1: 20       Reps
 2: 10       Value with Hr-Min
 3: 6        Loc [ battery   ]

96:  If time is (P92)
 1: 0        Minutes (Seconds --) into a
 2: 1440     Interval (same units as above)
 3: 30       Then Do

97:  Z=F (P30)
 1: 0        F
 2: 0        Exponent of 10
 3: 34       Z Loc [ accumcap  ]

98:  Z=F (P30)
 1: 0        F
 2: 0        Exponent of 10
 3: 35       Z Loc [ accumtip  ]

99:  End (P95)

*Table 2 Program
  01: 0.0000    Execution Interval (seconds)

*Table 3 Subroutines

End Program

-Input Locations-
1 stationid 1 5 1
2 latitude  1 4 1
3 longitude 1 4 1
4 signature 1 3 1
5 obsinsumm 1 3 1
6 battery   1 8 1
7 paneltemp 1 7 1
8 soilsfc   5 14 1
9 soil5cm   9 14 1
10 soil10cm  9 14 1
11 soil25cm  17 14 1
12 tempmmts  1 14 1
13 tempprtd  1 14 1
14 temp9m107 1 14 1
15 relhumid  1 14 1
16 backuprh  1 14 0
17 barpress  1 14 1
18 backupbp  1 14 0
19 totalsrad 1 14 1
20 quantmrad 1 14 1
21 winddr3m  1 15 1
22 winddr10m 1 15 1
23 windsp3m  1 20 1
24 windsp10m 1 20 1
25 precapnew 1 13 1
26 precapold 1 2 1
27 precapdif 1 7 2
28 preciptip 1 6 1
29 mmtsvolt  1 2 1
30 mmtslog   1 2 1
31 prtratio  1 2 1
32 csi107vlt 1 1 0
33 csi107log 1 1 0
34 accumcap  1 3 2
35 accumtip  1 3 2
-Program Security-
0
0
0
-Mode 4-
-Final Storage Area 2-
32400
-CR10X ID-
0
-CR10X Power Up-
3
-CR10X Compile Setting-
3
-CR10X RS-232 Setting-
-1