奇狐社區論壇 - [問題]前10大量平均

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 22 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [問題]前10大量平均 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=17134)

由 cgjj 在 2012-10-05 12:25 發表:

引用:
最初由 Markchu7 發表
了解!那我就用前三天前10大量平均的方式盤中再去觀察!感恩!

控制只算運算近期N根, 可以減輕些負荷
註: N1 和 N2 請自行帶入

原碼:


MAXKBAR:=500; //設定運算近期N根(0為全部)

StPos:=datacount-MAXKBAR+1;

if StPos<1 or MAXKBAR=0 then StPos:=1;

MM:C*0;

for i=datacount downto StPos do begin

  P1:=i-N1; P2:=i-1;

  if P1<1 then begin

    StPos:=i+1; break;

  end;

  SV:=V; x:=SETLBOUND(SV,P1);    

  x:=SORT(SV,0,P1,P2); SS:=0;

  for j=0 to N2-1 do begin

    SS:=SS+SV[P2-j];

  end;

  MM[i]:=SS/N2;

end;

x:=SETLBOUND(MM,StPos);

由 Markchu7 在 2012-10-05 22:57 發表:

感謝指導!

由 wqew2002 在 2012-10-26 17:03 發表:

了不起

由 wqew2002 在 2012-10-28 20:37 發表:

由 Markchu7 在 2013-02-20 12:43 發表:

請問總版主:
上述源碼放在最末端,若只在5分鐘周期才執行,其他週期則跳出,請問要如何控制?感恩!

由 cgjj 在 2013-02-20 12:49 發表:

引用:
最初由 Markchu7 發表
請問總版主:
上述源碼放在最末端,若只在5分鐘周期才執行,其他週期則跳出,請問要如何控制?感恩!

在上述源碼前端加入此行就可
if DATATYPE<>2 then exit;

由 Markchu7 在 2013-02-20 15:56 發表:

感謝指導!

全部時間均為台灣時間, 現在時間為16:12

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 22 個文章