您现在的位置:程序化交易>> 股票公式>> 通达信>> 通达信公式>>正文内容

超好用的OBV公式源码[通达信公式]

相关标签: 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);{股票公式下载cxh99.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;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容