ユーザーフォーラム Campbell Scientific ユーザーのための 24 時間年中無休のリソース（英語のみの対応です）

I wrote a program that performs a running average of wind speed, every minute. Sampling is every 2 seconds for a total of 30 samples per minute. At the end of 10 minutes, 10 values ​​were received and I want to get the highest running minute in those 10 minutes, to a table. 10 minutes later the same action will be performed again. How to perform?

Const ws_BUF = 30

Public ws_1(ws_BUF), I1
Public ws_1mn_avg
Public WS

'\\\\\\\\\\\\\\\\\\\\\\\\ OUTPUT SECTION ////////////////////////

DataTable(Table001,true,-1)
DataInterval(0,1,Min,-1)
Average(1, WS, FP2, 0)
EndTable

DataTable(Table110,true,-1)
DataInterval(0,10,Min,-1)
Maximum(1, ws_1mn_avg, FP2, 0, True)
EndTable

'\\\\\\\\\\\\\\\\\\\\\\\\\\\ PROGRAM ////////////////////////////

BeginProg
Scan(2,sec,3,0)

'*******************************************
PulseCount(WS, 1, P1, 5, 1, 0.098, 0)
For I1=2 To ws_BUF
ws_1(I1-1)=ws_1(I1)
Next I
ws_1(ws_BUF)=WS
AvgRun (ws_1mn_avg, 1, WS ,30)
'*******************************************

CallTable Table110
CallTable Table001
NextScan
EndProg