奇狐社區論壇 - PVI 正量指標 NVI 負量指標

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- PVI 正量指標 NVI 負量指標 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=4541)

由 lin123 在 2006-01-21 21:16 發表:

PVI 正量指標 NVI 負量指標

請教如何改寫??
=============
初始值 NVI=100
IF VOL<REF(VOL,1)
NVI=REF（NVI,1）+(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*REF(NVI,1)=CLOSE/REF(CLOSE,1)*REF(NVI,1)

IF VOL>=REF(VOL,1)
NVI=REF(NVI,1)

初始值 PVI=100

IF VOL>REF(VOL,1)
PVI=REF(PVI,1)+(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*REF(PVI,1)

否則 PVI=REF（PVI，1）

==========================
以上如何改寫成奇狐公式

由 cgjj 在 2006-01-23 10:20 發表:

以 PVI 給您當範例參考

原碼:


cc:=close;

vv:=vol;

BeginNo:=lbound(vv);

EndNo:=ubound(vv);

PVI:vol*0;

PVI[BeginNo]:=100;

for i=BeginNo+1 to EndNo do begin

  if vv[i] > vv[i-1] then begin

    PVI[i]:=PVI[i-1]+(cc[i]-cc[i-1])/cc[i-1]*PVI[i-1];

  end;

  else begin

    PVI[i]:=PVI[i-1];

  end;

end;

由 lin123 在 2006-01-23 13:56 發表:

PVI

CGJJ,

Thank you !!

全部時間均為台灣時間, 現在時間為20:08

在這個頁面顯示本主題全部的 3 個文章