当前位置:首页 > 通达信 > 正文

【通达信源码分享】精品指标公式-传奇MACD指标源码

2022-12-22未知 编 辑:掌上指标


公式源码:
 
{趋势传奇}
 
ABC:=MEMA(XMA((((C-O)*2)+O),30),13);
 
私募资金:=MEMA(MEMA((((C-O)*2)+O),5),13);
 
趋势传奇:(ABC-私募资金)*2,NODRAW,COLOR4D4DFF;
 
W1:STICKLINE(趋势传奇>0,趋势传奇,0,3,1),COLORRED;
 
W2:STICKLINE(趋势传奇<0,趋势传奇,0,3,1),COLORCYAN;
 
VA1:=HHVBARS(趋势传奇,BARSLAST(趋势传奇<0)+1);
 
VA2:=CROSS(BACKSET(CROSS(0,趋势传奇),REF(VA1,1)+2),0.5);
 
QG:=CROSS(BACKSET(CROSS(0,趋势传奇) OR (ISLASTBAR AND 趋势传奇>0),REF(VA1,1)+2),0.5);
 
前高:DRAWLINE(VA2,趋势传奇,REF(VA2,1),REF(趋势传奇,1),1),COLORMAGENTA;
 
VA3:=LLVBARS(趋势传奇,BARSLAST(趋势传奇>0)+1);
 
VA4:=CROSS(BACKSET(CROSS(趋势传奇,0),REF(VA3,1)+2),0.5);
 
BD:=BARSLAST(FILTERX(CROSS(0,趋势传奇),BARSCOUNT(C)));
 
前低:DRAWLINE(VA4,趋势传奇,REF(VA4,1),REF(趋势传奇,1),1);
 
BDTJ:=IF(趋势传奇<0,FILTERX(趋势传奇=LLV(趋势传奇,BARSLAST(趋势传奇>0)),
 
BARSCOUNT(C)),DRAWNULL);
 
TSBDTJ:=BARSLAST(BDTJ);
 
BDZH:=FILTERX(趋势传奇<CONST(LLV(趋势传奇,BD+1)),BARSCOUNT(C));
 
BDTS:=BARSLAST(BDZH);
 
本低:IF(BD+1>=1,CONST(LLV(趋势传奇,BD+1)),DRAWNULL);
 
BDCL:=CROSS(COUNT(CROSS(趋势传奇>本低/2 AND 趋势传奇<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0;
 
终点:=IF(ISLASTBAR AND 趋势传奇>0 AND 趋势传奇=HHV(趋势传奇,BARSLAST(趋势传奇<0)),1,
 
IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL));
 
UU:=(终点=1 OR 终点=2) AND 趋势传奇>0;
 
ZZ:=FILTERX(UU,BARSCOUNT(C));
 
本高:DRAWLINE(ZZ,趋势传奇,REF(ZZ,1),REF(趋势传奇,1),1),COLORWHITE;
 
横线:=CONST(REF(趋势传奇,BARSLAST(ZZ)));
 
WW:=趋势传奇>横线;
 
起始点:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(C));
 
天数:BARSLAST(起始点),COLORYELLOW,NODRAW;
 
上横线:DRAWLINE(起始点,横线,ZZ,横线,0),COLORGREEN,DOTLINE;
 
下横线:DRAWLINE(BDZH,CONST(LLV(趋势传奇,BD+1)),BDTJ=1,趋势传奇,0),COLOR8080FF,DOTLINE;
 
DRAWNUMBER(BDTJ,CONST(LLV(趋势传奇,BD+1))*0.9,BDTS);
 
DRAWNUMBER(ZZ,上横线*1.1,天数);
 
TJ:=IF(起始点,BARSNEXT(ZZ),DRAWNULL);
 
红柱数量:IF(天数>0 AND 天数<=REF(TJ,天数),SUM(趋势传奇>0,天数),DRAWNULL),COLORWHITE,NODRAW;
 
横线起始价:REF(C,天数),NODRAW;
 
空间评估:(横线起始价-C)/C*100,NODRAW;
 
TT:=BARSLAST(ZZ);
 
WQG:=CROSS(COUNT(CROSS(趋势传奇<本高/2 AND 趋势传奇>0,0.5),ZZ)=1,0.5) AND ZZ>=0;
 
STICKLINE(趋势传奇>前高 AND 本高>前高 AND BARSLAST(CROSS(趋势传奇<本高/2,0.5))>0 AND
 
趋势传奇>(前高+本高)/2,趋势传奇,前高,1,0),COLORYELLOW;
 
前高本高二分位:IF(趋势传奇>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,趋势传奇*1.1,'本高成立'),COLORWHITE;
 
DRAWTEXT(BDCL,趋势传奇*1.1,'本低成立'),COLORWHITE;
 
STICKLINE(趋势传奇>前高,趋势传奇,前高,1,0),COLORYELLOW;
 
STICKLINE(WQG,趋势传奇,0,2,0),COLORGREEN;
 
STICKLINE(趋势传奇<0 AND 趋势传奇<前低 AND 前低<0,趋势传奇,前低,2,0),COLORBLUE;
 
B1:=IF(CROSS(趋势传奇<0,0.5),BARSNEXT(BDTJ),DRAWNULL);
 
TSB1:=BARSLAST(趋势传奇>0)-1;
 
STICKLINE(BARSLAST(BDCL)>=0 AND 趋势传奇<前低 AND 趋势传奇<0,趋势传奇,前低,2,0),COLORGREEN;
 
STICKLINE(BDCL,趋势传奇,0,1,0),COLORWHITE;
 
STICKLINE(趋势传奇>前高 AND 本高>前高 AND BARSLAST(WQG)>0,
 
趋势传奇,前高,1,0),COLORRED;
 
DRAWTEXT(VA2 AND VA2!=UU,(趋势传奇/10)*9,'前');
 
DRAWTEXT(VA2 AND VA2!=UU,趋势传奇/10,'高');
 
DRAWTEXT(ZZ,(趋势传奇/10)*9,'本'),COLORWHITE;
 
DRAWTEXT(ZZ,趋势传奇/10,'高'),COLORWHITE;
 
DRAWTEXT(BDTJ,(趋势传奇/10)*9,'低'),COLOR00FF00;
 
DRAWTEXT(BDTJ,趋势传奇/10,'本'),COLOR00FF00;
 
IF(BARSLAST(BDCL)>=0,本低/2,DRAWNULL),COLORRED,DOTLINE;
大家都爱看
查看更多热点新闻
点击进入掌上指标资源网-下载各类指标