快速线:EMA(CLOSE,12) – EMA(CLOSE,26),COLOR33FF33,LINETHICK1;
慢速线:EMA(快速线,9),COLORYELLOW,LINETHICK1;
MACD1:=2*(快速线-慢速线),STICK;
MACD2:=EMA(MACD1,3);
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,COLORRED,0);
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,COLORGREEN,0);
STICKLINE(MACD1<MACD2,0,MACD1,COLORCBCBC0,0);
STICKLINE1(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
MACDX:MACD1,NODRAW,COLORMAGENTA;
DRAWICON(CROSS(快速线,慢速线),慢速线,4);
DRAWICON(CROSS(慢速线,快速线),慢速线,5);
//强:
PARTLINE(快速线>=慢速线,快速线,COLORRED),LINETHICK1;
//弱:
PARTLINE(慢速线>=快速线,慢速线,COLORFF9900),LINETHICK1;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
马线:=MA(牛线,6);
A:=MAX(MA(C,60),MA(C,120));
B:=MIN(MA(C,60),MA(C,120));
E:=MAX(MA(C,45),MA(C,90));
F:=MIN(MA(C,45),MA(C,90));
J:=MAX(MA(C,30),MA(C,60));
K:=MIN(MA(C,30),MA(C,60));
A1:=C>=A;
A2:=C>牛线;
A3:=C>E;
A4:=C>J;
Y:=(HIGH+LOW)/2;
//{MACD佛手}
DIF1:EMA(CLOSE,6)-EMA(CLOSE,19),NODRAW;
DEA1:EMA(DIF1,9),NODRAW;
MACD3:2*(DIF1-DEA1),NODRAW;
STICKLINE1(MACD3>0,MACD3,0,1,0),COLORRED;
STICKLINE1(MACD3<0,MACD3,0,1,0),COLORGREEN;
STICKLINE1(MACD3>0 AND MACD3<REF(MACD3,1),MACD3,0,1,0),COLORWHITE;
STICKLINE1(MACD3<0 AND MACD3>REF(MACD3,1),MACD3,0,1,0),COLORFF00FF;
FH1:=REF(MACD3,1)<REF(MACD3,2) AND REF(MACD3,2)<REF(MACD3,3) AND REF(MACD3,3)<REF(MACD3,4);
FH2:=MACD3>=0 AND COUNT(MACD3>REF(MACD3,1),1)=1;
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
FH4:=FH1 AND FH2 AND ABS((DIF1-DEA1)/C)<0.018;
FH5:=FH1 AND FH2 AND MACD3<0.10;
VV:=CLOSE>OPEN AND MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30)
AND DIF1>DEA1 AND MACD3>REF(MACD3,1) AND DIF1>0 AND DEA1>0 AND
MA(VOL,5)>MA(VOL,34) AND MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
佛手:IF(VV,1,0),NODRAW;
{二次起动}
X0:=BARSLAST((CROSS(MACD3,REF(MACD3,1)) AND MACD3>0) OR CROSS(MACD3,0));
X1A:=BARSLAST(CROSS(0.5,COUNT(MACD3>REF(MACD3,1),X0+1)=X0+1));
{回}
X2A:=COUNT(MACD3<REF(MACD3,1),X1A+1)=X1A+1 AND COUNT(MACD3<0,X1A+1)<=2;
X3A:=REF(X2A,1) AND MACD3>REF(MACD3,1) AND C>O AND C>REF(C,1);
STICKLINE(X1A=0 AND MACD3>0,MACD3,0,2,0),COLOR00DCDC;
//{MACD缩头}
STICKLINE1(X3A,MACD3,0,2,0),COLORFF5408;
