超好用的OBV公式源碼

作者：通達信來源：cxh99.com 發布時間：2022年07月01日

相關標簽: obv最新實戰變異源碼、 obv源碼、加強版obv指標公式、通達信金牌obv指標買賣、東方財富obv指標公式、 5分鐘obv指標、 obv指標計算方法、 obv改進版指標公式、通達信obv指標、 obv指標公式源碼、通達信obv指標公式、股票obv指標詳解圖解、

通達信公式超好用的OBV

原理解析：

P賦值:5

VP賦值:如果當前流通股本(手)=0,返回成交額(元)/100000000,否則返回成交量(手)

VA賦值:如果收盤價>1日前的收盤價,返回VP,否則返回-VP

輸出OBV:如果收盤價=1日前的收盤價,返回0,否則返回VA的歷史累和,線寬為2

輸出M12:OBV的12日指數移動平均

輸出M50:OBV的50日指數移動平均,線寬為2,COLOR00FF00

A1賦值:P日前的OBV=2*P+1日內OBV的最高值

B1賦值:A1的P日過濾

C1賦值:若B1則將最近P+1周期置為1

D1賦值:C1的P日過濾

A2賦值:P日前的OBV=2*P+1日內OBV的最低值

B2賦值:A2的P日過濾

C2賦值:若B2則將最近P+1周期置為1

D2賦值:C2的P日過濾

輸出上:上次D1距今天數日前的OBV,COLORFF00FF,NODRAW

輸出下:上次D2距今天數日前的OBV,COLOR00FF00,NODRAW

輸出向上:OBV上穿上*1.01,NODRAW

輸出相對能量:(OBV-下)/(上-下)*100,畫黃色,NODRAW

R11賦值:若是否最后一個周期則將最近上次D1距今天數+1周期置為1

S11賦值:R11>1日前的R11

當滿足條件D1時,在OBV位置畫直線起點，當滿足條件S11時,在OBV位置畫直線終點,1表示是否延長.,畫黃色

T11賦值:若是否最后一個周期則將最近上次D2距今天數+1周期置為1

U11賦值:T11>1日前的T11

當滿足條件D2時,在OBV位置畫直線起點，當滿足條件U11時,在OBV位置畫直線終點,1表示是否延長.,COLOR00FF00

當滿足條件收盤價>0時,在下和下位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00

當滿足條件收盤價>0時,在上和上位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF00FF

當滿足條件OBV上穿上*1.01時,在上位置書寫文字,畫黃色

當滿足條件下*0.99上穿OBV時,在下位置書寫文字,畫黃色

當滿足條件D1時,在OBV位置畫1號圖標

當滿足條件D2時,在OBV位置畫2號圖標

如果M12>M50,返回M12,否則返回無效數,COLORFFFF00

如果M50>1日前的M50,返回M50,否則返回無效數,畫紅色,線寬為2

源碼：

P:=5;
VP:=IF(CAPITAL=0,AMOUNT/100000000,VOL);
VA:=IF(CLOSE>REF(CLOSE,1),VP,-VP);
OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),LINETHICK2;
M12:EMA(OBV,12);
M50:EMA(OBV,50),LINETHICK2,COLOR00FF00;
A1:=REF(OBV,P)=HHV(OBV,2*P+1);
B1:=FILTER(A1,P);
C1:=BACKSET(B1,P+1);
D1:=FILTER(C1,P);{高點}
A2:=REF(OBV,P)=LLV(OBV,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);{低點}
上:REF(OBV,BARSLAST(D1)),COLORFF00FF,NODRAW;
下:REF(OBV,BARSLAST(D2)),COLOR00FF00,NODRAW;
向上:CROSS(OBV,上*1.01),NODRAW;
相對能量:(OBV-下)/(上-下)*100,COLORYELLOW,NODRAW;
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
S11:=R11>REF(R11,1);{股票公式下載70822.com}
DRAWLINE(D1,OBV,S11,OBV,1),COLORYELLOW;
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
U11:=T11>REF(T11,1);
DRAWLINE(D2,OBV,U11,OBV,1),COLOR00FF00;
STICKLINE(C>0,下,下,1,0),COLOR00FF00;
STICKLINE(C>0,上,上,1,0),COLORFF00FF;
DRAWTEXT(CROSS(OBV,上*1.01),上,"上"),COLORYELLOW;
DRAWTEXT(CROSS(下*0.99,OBV),下,"下"),COLORYELLOW;
DRAWICON(D1,OBV,1);
DRAWICON(D2,OBV,2);
IF(M12>M50,M12,DRAWNULL),COLORFFFF00;
IF(M50>REF(M50,1),M50,DRAWNULL),COLORRED,LINETHICK2;

公式導入教程: 【通達信公式源碼導入方法教程】【同花順公式源碼導入方法教程】【大智慧新一代公式源碼導入方法教程】