Specifications
Appendix D. Default Programs
Maximum(1, LogrTmpC, FP2, 0, False)
Minimum(1, LogrTmpC, FP2, 0, False)
Maximum(1, WindSpd_ms,IEEE4,disable_flag, False)
WindVector (1,WindSpd_ms,WindDir,IEEE4,disable_flag,0,0,1)
Totalize(1, Rain_mm, FP2, 0)
Average(1, AirTempC, FP2, 0)
Maximum(1, AirTempC, FP2, 0, False)
Minimum(1, AirTempC, FP2, 0, False)
Average(1, RelHum, FP2, 0)
Maximum(1, RelHum, FP2, 0, False)
Minimum(1, RelHum, FP2, 0, False)
Average(1, SlrRad_W, FP2, 0)
Maximum(1, SlrRad_W, FP2, 0, False)
Maximum (1,DewPntC,FP2,False,False)
Minimum (1,DewPntC,FP2,False,False)
Maximum (1,WindChilC,FP2,False,False)
Minimum (1,WindChilC,FP2,False,False)
Maximum (1,HeatIndxC,FP2,False,False)
Minimum (1,HeatIndxC,FP2,False,False)
EndTable
DataTable (STATS,TRUE,168)
DataInterval (0,60,Min,10)
Totalize (1,one,IEEE4,disable_flag)
FieldNames ("n_TOT")
Totalize (1,one,IEEE4,diag<>1)
FieldNames ("diag_1_TOT")
Totalize (1,one,IEEE4,diag<>2)
FieldNames ("diag_2_TOT")
Totalize (1,one,IEEE4,diag<>4)
FieldNames ("diag_4_TOT")
Totalize (1,one,IEEE4,diag<>8)
FieldNames ("diag_8_TOT")
Totalize (1,one,IEEE4,diag<>9)
FieldNames ("diag_9_TOT")
Totalize (1,one,IEEE4,diag<>10)
FieldNames ("diag_10_TOT")
Totalize (1,one,IEEE4,diag<>NaN)
FieldNames ("no_data_TOT")
EndTable
BeginProg
'Set all rain variables to zero.
For n = 1 To 24
Rain(n) = 0
Next n
one = 1
SerialOpen (Com1,38400,3,0,432)
Scan(5,Sec, 3, 0)
BattVolt = Status.Battery(1,1)
LogrTmpC = Status.PanelTemp(1,1)
WatchDog = Status.WatchdogErrors(1,1)
Overruns = Status.SkippedScan(1,1)
LowVolts = Status.Low12VCount(1,1)
LiBattV = Status.LithiumBattery(1,1)
D-2