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;

此主題相關圖片如下1_131120173223_1.png：

 下載信息  [文件大小：   下載次數： ]點擊瀏覽該文件:1-1311201i159.rar