通达信寻龙MACD共振副图指标 MACD日周月、年线共振 源码

{寻龙MACD副图——MACD日周月、年线共振 BY 瑞涛}

{日周月趋势}
月DIF:=(EMA(CLOSE,12*4*4)-EMA(CLOSE,26*4*4));
月DEA:=EMA(月DIF,9*4*4);
月MACD:=2*(月DIF-月DEA),COLORSTICK,COLOR111111;

周DIF:=(EMA(CLOSE,12*4)-EMA(CLOSE,26*4));
周DEA:=EMA(周DIF,9*4),COLORWHITE,DOTLINE;
周MACD:=2*(周DIF-周DEA),COLORSTICK,COLOR111111;

日DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26));
日DEA:=EMA(日DIF,9);
日MACD:=2*(日DIF-日DEA),COLORWHITE;

{MACD大行情}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA),COLORRED;
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;
MACD120:=REF(MACD/2,BARSLAST(MACD=HHV(MACD,120))),COLORA67D3D,LINETHICK1;
MACD250:REF(MACD/2,BARSLAST(MACD=HHV(MACD,250))),COLORYELLOW,LINETHICK2;
XG:=NOT(REF(MACD120,1)=MACD120);{WWW.GOODGUPIAO.COM}
{STICKLINE(XG,0,MACD,0,0),COLORYELLOW;}
STICKLINE(MACD>=MACD250,MACD250,MACD,2,0),COLORMAGENTA;
STICKLINE(MACD>=MACD250 AND MACD>REF(MACD,1),MACD,0,1,0),COLORYELLOW;
大行情:=NOT(REF(MACD120,1)=REF(MACD250,1)) AND MACD120=MACD250;

{墨轩启动板成妖}
DIF4:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA4:=EMA(DIF4,9);
ZTB:=C>INTPART(REF(C,1)*(1+10/100)/0.01+0.5)*0.01-0.006 AND C=H;
启动版:=DIF4>-0.2 AND DIF4<0.35 AND ZTB AND REF(ZTB,1)<1 AND COUNT(DIF>=-0.01,5)=5;
DRAWTEXT(启动版,MACD250*1.3,'妖'),COLORRED;

{MACD年线共振色带}
STICKLINE(月MACD>REF(月MACD,1),MACD250,0,5,0),COLORLIMAGENTA;
STICKLINE(月MACD<REF(月MACD,1),MACD250,0,5,0),COLORLIGREEN;
{STICKLINE(周柱>REF(周柱,1),MACD250/2,0,5,0),COLOR3300CC;}
{STICKLINE(周柱<REF(周柱,1),MACD250/2,0,5,0),COLORBLUE;}

DRAWBAND(EMA(周MACD,10),RGB(0,0,180), 周MACD,RGB(255,255,0));

{MACD柱}
STICKLINE(MACD>0 AND MACD>REF(MACD,1),0,MACD,1,0),COLORYELLOW;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,1,0),COLORLIBLUE;
STICKLINE(MACD<0,0,MACD,1,0),COLORGREEN;

{MACD年线加强柱}{WWW.GOODGUPIAO.COM}
STICKLINE(MACD>=MACD250,MACD250,MACD,2,0),COLORMAGENTA;
{STICKLINE(MACD>=MACD250 AND MACD>REF(MACD,1),MACD,0,1,0),COLORYELLOW;}

日MACD1:MACD,COLORYELLOW,LINETHICK4;
MACD2501:REF(MACD/2,BARSLAST(MACD=HHV(MACD,250))),COLORYELLOW,LINETHICK3,NODRAW;