通达信H超级KMACD 副图源码

通达信H超级KMACD源码副图

{通达信'H超级KMACD'源码}
H0:=0.25;
L0:=(H+L+C)/3;
L1:=H0*(L0-MA(L0,21))/(AVEDEV(L0,21));
超级K:SMA(L1,3,1);
超级D:SMA(超级K,3,1);
超级J:超级K*3-超级D*2,COLORCC66BB;
H1:=3.809*H0+REVERSE(EMA(超级J,1));
H2:=-2.809*H0+REVERSE(EMA(超级J,1));
IF(超级J>H1,超级J,DRAWNULL),COLORAAAA33,LINETHICK3;
做顶:IF(超级J>H1,1,0),COLORCYAN,NODRAW;
IF(超级J<H2,1,0),COLOR880088,NODRAW;
筑底:IF(超级J<H2,超级J,DRAWNULL),COLORDD00DD,LINETHICK3;
H3:=CROSS(超级K,超级D);
H4:=超级J<REF(超级J,1) AND REF(超级J,1)>REF(超级D,1) AND 超级J<=超级D;
H5:=超级J>H1 AND NOT(REF(超级J>H1,1));
拉升为1:IF(H5,1,0),COLORFFFFCC,NODRAW;
金叉:IF(H3,1,0),COLORRED,NODRAW;
死叉:IF(H4,1,0),COLORGREEN,NODRAW;
【选股基准线】:CONST(HHV(MAX(MAX(超级K,超级D),超级J),0))*1.1,COLORLIRED;
DIF0:=EMA(DCLOSE,8)-EMA(DCLOSE,22);
DEA0:=EMA(DIF0,7);
MACD:=2*(DIF0-DEA0);
D0:=HHV(ABS(MACD),100);
M0:=COUNT(CROSS(DIF0,DEA0),BARSLAST(DEA0>=0));
M1:=BARSLAST(REF(CROSS(MACD,0),1));
M2:=BARSLAST(REF(CROSS(DEA0,DIF0),1));
M3:=LLV(MACD,4)>0 AND MACD<REF(MACD,1) AND REF(MACD,1)>REF(MACD,2)
AND REF(MACD,2)>REF(MACD,3);
M4:=HHV(MACD,4)<0 AND MACD>REF(MACD,1) AND REF(MACD,1)<REF(MACD,2)
AND REF(MACD,2)<REF(MACD,3);
低位金叉:IF(CROSS(DIF0,DEA0) AND DIF0<-0.1,D0*0.4+【选股基准线】,0+【选股基准线】),COLORFF00FF;
二次金叉:IF(CROSS(DIF0,DEA0) AND DEA0<0 AND COUNT(M0=2,21)=1,D0*0.8+【选股基准线】,
0+【选股基准线】),COLORFFFF00;
启点:IF(FILTER(MACD>0 AND MACD>5*REF(MACD,1),2),D0+【选股基准线】,0+【选股基准线】),COLOR0044FF;
底背离:=REF(CLOSE,M1+1)>CLOSE AND MACD>REF(MACD,M1+1),COLORGREEN;
D1:=7;D2:=30;D3:=6;
DIF1:=EMA(C,D1)-EMA(C,D2),COLORFFFFFF;
DEA1:=EMA(DIF1,D3),COLORFF6666;
MACD1:=(DIF1-DEA1)*2,COLORSTICK,COLORRED;
F0:=V*(O+C+H+L)/4;
F1:=IF(V>0,F0/V,(O+C+H+L)/4);
F2:=(F1-LLV(F1,5))/(HHV(F1,5)-LLV(F1,5));
F3:=SMA(F2,13,1);
F4:=SMA(F3,13,1);
F5:=3*F3-2*F4;
F6:=2*F5-0.5;
F7:=F1*(1-(F6-F4)/40);
F8:=CROSS(F1,F7) AND C/REF(C,1)<1.03 AND SUM(DYNAINFO(23),5)>=3000;
MACD拉升:IF(FILTER(F8,10) AND MACD1>0,D0*1.2+【选股基准线】,0+【选股基准线】),COLOR6600FF;
MACD选长:=IF(CROSS(DIF1,DEA1),HHV(ABS(MACD1),100)+【选股基准线】,0),COLORLIRED;
DIF:DIF0+【选股基准线】,COLORFFFFFF;
DEA:DEA0+【选股基准线】,COLOR00AAAA;
0,COLOR888888,POINTDOT;
DRAWTEXT(FILTER(F8,10) AND MACD1>0,D0*1.1+【选股基准线】,'拉'),COLOR6600FF;
STICKLINE(H5,超级J*1.2,超级J*0.8,0,-1),COLORFFFFCC;
DRAWTEXT(H5,超级J*1.25,'拉'),COLORFFFFCC;
DRAWICON(H4,超级K*1.3,2);
DRAWICON(H3,超级K*0.7,1);
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0+【选股基准线】,MACD+【选股基准线】,1,0),COLOR6699FF;
STICKLINE(MACD>=0 AND MACD<=REF(MACD,1),0+【选股基准线】,MACD+【选股基准线】,1,-1),COLOR008800;
STICKLINE(MACD<=0 AND MACD>=REF(MACD,1),0+【选股基准线】,MACD/2+【选股基准线】,1,0),COLORAAAAAA;
STICKLINE(MACD<=0 AND MACD<=REF(MACD,1),0+【选股基准线】,MACD/2+【选股基准线】,1,-1),COLORCC6600;
DRAWTEXT(FILTER(M3,3),-0.15+【选股基准线】,'转空'),COLOR00FF00;
DRAWTEXT(FILTER(M4,3),D0*0.5+【选股基准线】,'转多'),COLORFFFFBB;
DRAWTEXT(CROSS(DIF0,DEA0) AND DIF0<-0.1,D0*0.3+【选股基准线】,'低位X'),COLORFF00FF;
DRAWTEXT(CROSS(DIF0,DEA0) AND DEA0<0 AND COUNT(M0=2,21)=1,D0*0.7+【选股基准线】,
'二次X'),COLORFFFF00;
DRAWTEXT(FILTER(MACD>0 AND MACD>5*REF(MACD,1),2),D0*0.9+【选股基准线】,'启'),COLOR0044FF;