通达信极品macd背离阶段指标公式源码

 
VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);
QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORMAGENTA;
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5);
BD:=BARSLAST(FILTERX(CROSS(0,MACD),BARSCOUNT(C)));
前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1);
BDTJ:=IF(MACD<0,FILTERX(MACD=LLV(MACD,BARSLAST(MACD>0)),
BARSCOUNT(C)),DRAWNULL);
TSBDTJ:=BARSLAST(BDTJ);
BDZH:=FILTERX(MACD<CONST(LLV(MACD,BD+1)),BARSCOUNT(C));
BDTS:=BARSLAST(BDZH);
本低:IF(BD+1>=1,CONST(LLV(MACD,BD+1)),DRAWNULL);
BDCL:=CROSS(COUNT(CROSS(MACD>本低/2 AND MACD<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0;
终点:=IF(ISLASTBAR AND MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)),1,
IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL));
UU:=(终点=1 OR 终点=2) AND MACD>0;
ZZ:=FILTERX(UU,BARSCOUNT(C));
本高:DRAWLINE(ZZ,MACD,REF(ZZ,1),REF(MACD,1),1),COLORWHITE;
横线:=CONST(REF(MACD,BARSLAST(ZZ)));
WW:=MACD>横线;
起始点:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(C));
天数:=BARSLAST(起始点),COLORYELLOW,NODRAW;
上横线:=DRAWLINE(起始点,横线,ZZ,横线,0),COLORGREEN,DOTLINE;
下横线:=DRAWLINE(BDZH,CONST(LLV(MACD,BD+1)),BDTJ=1,MACD,0),COLOR8080FF,DOTLINE;
DRAWNUMBER(BDTJ,CONST(LLV(MACD,BD+1))*0.9,BDTS);
DRAWNUMBER(ZZ,上横线*1.1,天数);
TJ:=IF(起始点,BARSNEXT(ZZ),DRAWNULL);
红柱数量:=IF(天数>0 AND 天数<=REF(TJ,天数),SUM(MACD>0,天数),DRAWNULL),COLORWHITE,NODRAW;
横线起始价:=REF(C,天数),NODRAW;
空间评估:=(横线起始价-C)/C*100,NODRAW;
TT:=BARSLAST(ZZ);
WQG:=CROSS(COUNT(CROSS(MACD<本高/2 AND MACD>0,0.5),ZZ)=1,0.5) AND ZZ>=0;
STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(CROSS(MACD<本高/2,0.5))>0 AND
MACD>(前高+本高)/2,MACD,前高,1,0),COLORYELLOW;
前高本高二分位:IF(MACD>0 AND 本高!=前高,DRAWLINE(WQG,(前高+本高)/2,REF(WQG,1),REF((前高+本高)/2,1),1)
,DRAWNULL),COLORC0C000,DOTLINE;
AA:=STRCAT(STRCAT(STRCAT('〖','上升空间'),'〗'),CON2STR(IF(空间评估,空间评估,
DRAWNULL),2));
DRAWTEXT(WQG,MACD*1.1,'本高成立'),COLORWHITE;
DRAWTEXT(BDCL,MACD*1.1,'本低成立'),COLORWHITE;
STICKLINE(MACD>前高,MACD,前高,1,0),COLORYELLOW;
STICKLINE(WQG,MACD,0,1,0),COLORGREEN;
STICKLINE(MACD<0 AND MACD<前低 AND 前低<0,MACD,前低,1,0),COLORBLUE;
B1:=IF(CROSS(MACD<0,0.5),BARSNEXT(BDTJ),DRAWNULL);
TSB1:=BARSLAST(MACD>0)-1;
STICKLINE(BARSLAST(BDCL)>=0 AND MACD<前低 AND MACD<0,MACD,前低,1,0),COLORGREEN;
STICKLINE(BDCL,MACD,0,1,0),COLORWHITE;
STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(WQG)>0,
MACD,前高,1,0),COLORRED;
DRAWTEXT(VA2 AND VA2!=UU,(MACD/10)*9,'前');
DRAWTEXT(VA2 AND VA2!=UU,MACD/10,'高');
DRAWTEXT(ZZ,(MACD/10)*9,'本'),COLORWHITE;
DRAWTEXT(ZZ,MACD/10,'高'),COLORWHITE;
DRAWTEXT(BDTJ,(MACD/10)*9,'低'),COLORRED;
DRAWTEXT(BDTJ,MACD/10,'本'),COLORRED;
IF(BARSLAST(BDCL)>=0,本低/2,DRAWNULL),COLORRED,DOTLINE;
DRAWTEXT_FIX(1,0.05,0.04,0,'【黑码拉升由两个阶段构成:同步上涨阶段(黄芯柱)
和惯性上涨阶段(背离阶段、红芯柱)】'),COLORFFFF00;
 



来函数检测结果如下
该公式包含未来函数:BACKSET
该公式包含未来函数:BARSNEXT
该公式包含未来函数:REFX

解密、定制、编写指标公式请联系QQ或微信同号:88652583
置顶指标

相关指标公式

VA1赋值:上次平滑异同平均线<0距今天数+1日内平滑异同平均线距今天数
VA2赋值:若0上穿平滑异同平均线则将最近1日前的VA1+2周期置为1上穿0.5
QG赋值:若0上穿平滑异同平均线OR(ISLASTBARANDMACD>0)则将最近1日前的VA1+2周期置为1上穿0.5
输出前高:当满足条件VA2时,在平滑异同平均线位置画直线起点,当满足条件1日前的VA2时,在1日前的平滑异同平均线位置画直线终点,1表示是否延长.,画洋红色
VA3赋值:上次平滑异同平均线>0距今天数+1日内平滑异同平均线距今天数
VA4赋值:若平滑异同平均线上穿0则将最近1日前的VA3+2周期置为1上穿0.5
BD赋值:上次0上穿平滑异同平均线的收盘价的有效数据周期数日反向过滤距今天数
输出前低:当满足条件VA4时,在平滑异同平均线位置画直线起点,当满足条件1日前的VA4时,在1日前的平滑异同平均线位置画直线终点,1表示是否延长.
BDTJ赋值:如果平滑异同平均线<0,返回平滑异同平均线=上次平滑异同平均线>0距今天数日内平滑异同平均线的最低值的收盘价的有效数据周期数日反向过滤,否则返回无效数
TSBDTJ赋值:上次BDTJ距今天数
BDZH赋值:平滑异同平均线BDTS赋值:上次BDZH距今天数
输出本低:如果BD+1>=1,返回BD+1日内平滑异同平均线的最低值的最后一日取值设为常数,否则返回无效数
BDCL赋值:统计TSBDTJ日中满足平滑异同平均线>本低/2ANDMACD<0上穿0.5的天数=1上穿0.5 AND TSBDTJ>=0
终点赋值:如果ISLASTBARANDMACD>0ANDMACD=上次平滑异同平均线<0距今天数日内平滑异同平均线的最高值,返回1,否则返回如果QG的收盘价的有效数据周期数日反向过滤,返回2,否则返回无效数
UU赋值:(终点=1 OR 终点=2) AND 平滑异同平均线>0
ZZ赋值:UU的收盘价的有效数据周期数日反向过滤
输出本高:当满足条件ZZ时,在平滑异同平均线位置画直线起点,当满足条件1日前的ZZ时,在1日前的平滑异同平均线位置画直线终点,1表示是否延长.,画白色
横线赋值:上次ZZ距今天数日前的平滑异同平均线的最后一日取值设为常数
WW赋值:平滑异同平均线>横线
起始点赋值:1日后的上次WW距今天数=1的收盘价的有效数据周期数日反向过滤
天数赋值:上次起始点距今天数,画黄色,NODRAW
上横线赋值:当满足条件起始点时,在横线位置画直线起点,当满足条件ZZ时,在横线位置画直线终点,0表示是否延长.,画绿色,DOTLINE
下横线赋值:当满足条件BDZH时,在BD+1日内平滑异同平均线的最低值的最后一日取值设为常数位置画直线起点,当满足条件BDTJ=1时,在平滑异同平均线位置画直线终点,0表示是否延长.,COLOR8080FF,DOTLINE
当满足条件BDTJ时,在BD+1日内平滑异同平均线的最低值的最后一日取值设为常数*0.9位置书写数字
当满足条件ZZ时,在上横线*1.1位置书写数字
TJ赋值:如果起始点,返回下次ZZ距今天数,否则返回无效数
红柱数量赋值:如果天数>0AND天数<=天数日前的TJ,返回平滑异同平均线>0的天数日累和,否则返回无效数,画白色,NODRAW
横线起始价赋值:天数日前的收盘价,NODRAW
空间评估赋值:(横线起始价-收盘价)/收盘价*100,NODRAW
TT赋值:上次ZZ距今天数
WQG赋值:统计ZZ日中满足平滑异同平均线<本高/2ANDMACD>0上穿0.5的天数=1上穿0.5 AND ZZ>=0
当满足条件平滑异同平均线>前高AND本高>前高ANDBARSLAST(平滑异同平均线<本高/2上穿0.5)>0ANDMACD>(前高+本高)/2时,在平滑异同平均线和前高位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
输出前高本高二分位:如果平滑异同平均线>0AND本高不等于前高,返回当满足条件WQG时,在(前高+本高)/2位置画直线起点,当满足条件1日前的WQG时,在1日前的(前高+本高)/2位置画直线终点,1表示是否延长.,否则返回无效数,COLORC0C000,DOTLINE
AA赋值:字符串相加
当满足条件WQG时,在平滑异同平均线*1.1位置书写文字,画白色
当满足条件BDCL时,在平滑异同平均线*1.1位置书写文字,画白色
当满足条件平滑异同平均线>前高时,在平滑异同平均线和前高位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
当满足条件WQG时,在平滑异同平均线和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色
当满足条件平滑异同平均线<0ANDMACD<前低AND前低<0时,在平滑异同平均线和前低位置之间画柱状线,宽度为1,0不为0则画空心柱.,画蓝色
B1赋值:如果平滑异同平均线<0上穿0.5,返回下次BDTJ距今天数,否则返回无效数
TSB1赋值:上次平滑异同平均线>0距今天数-1
当满足条件上次BDCL距今天数>=0ANDMACD<前低ANDMACD<0时,在平滑异同平均线和前低位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色
当满足条件BDCL时,在平滑异同平均线和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画白色
当满足条件平滑异同平均线>前高AND本高>前高ANDBARSLAST(WQG)>0时,在平滑异同平均线和前高位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色
当满足条件VA2ANDVA2不等于UU时,在(平滑异同平均线/10)*9位置书写文字
当满足条件VA2ANDVA2不等于UU时,在平滑异同平均线/10位置书写文字
当满足条件ZZ时,在(平滑异同平均线/10)*9位置书写文字,画白色
当满足条件ZZ时,在平滑异同平均线/10位置书写文字,画白色
当满足条件BDTJ时,在(平滑异同平均线/10)*9位置书写文字,画红色
当满足条件BDTJ时,在平滑异同平均线/10位置书写文字,画红色
如果上次BDCL距今天数>=0,返回本低/2,否则返回无效数,画红色,DOTLINE
当满足条件1时,在横轴0.05纵轴0.04位置书写文字,COLORFFFF00

指标安装下载帮助  |   联系我们  |  指标公式网  |  指标网   |  指标公式  |   加入收藏   |  设为主页

@2005-2023 浙ICP备2024071487号-2 指标公式网别名指标网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:指标公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图