改良OBV寫法

kao 發文於 2018/11/05

請問有 NOBV指標的寫法？

input:length(50);

variable:OBV1(0),OBV2(0),obvolume(0);

//value1=((O*2-L-H)/(L+H))*volume ;

if CurrentBar = 1 then

obvolume = 0

else

begin

if close > close[1] then

obvolume = obvolume[1] + volume

else

begin

if close < close[1] then

obvolume = obvolume[1] - volume

else

obvolume = obvolume[1];

end;

value1=((close-low)-(high-OPEN)) / (HIGH-low) * obvolume;

OBV1=average(value1,1);

OBV2=average(value1,50);

Plot1(OBV1, "NOBV1");

Plot2(OBV2, "NOBV2");

http://blog.cnyes.com/My/stocksway/article2628009

請問這是哪邊有錯？

是不是哪有寫錯？

我要寫的是改良OBV

1 評論

XQ小幫手發文於 2018/11/06

Hi kao,

您好，猜想您的錯誤，指的是加入指標的時候有計算分母為0的狀況，

若是的話，可以用 if 判斷式，避開分母為0的狀況，例如以下程式碼範例：

if (HIGH-low) * obvolume <> 0 then
    value1=((close-low)-(high-OPEN)) / (HIGH-low) * obvolume
else
    value1 = 0;

這樣線圖就會跑出來了，若數值不符合您的預期，

可以使用 Print 語法檢驗相關運算數值與您的策略想法有何落差，

以上方向供您參考，謝謝。

發表回覆

分類