{MACD有狼心}
DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26),COLOR00FF00,LINETHICK1;
 DEA1:=EMA(DIF1,9),COLOR00FF00,LINETHICK1;
 DRAWICON(CROSS(DIF1,DEA1),DEA1,1);
 DRAWICON(CROSS(DEA1,DIF1),DEA1,2);
 {主升浪消失出局}
DI:=EMA(CLOSE,4)-EMA(CLOSE,13),COLORMAGENTA,LINETHICK2;
 D1:=EMA(DI,5),COLORGRAY;
 D2:=EMA(DI,10),COLORGRAY;
 D3:=EMA(DI,20),COLORGRAY;
 D4:=EMA(DI,30),COLORGRAY;
 D5:=EMA(DI,60),COLORGRAY;
 D6:=EMA(DI,90),COLORGRAY;
 D7:=EMA(DI,120),COLORGRAY;
 D8:=EMA(DI,250),COLORGRAY;
 AA:=STICKLINE(DI>=REF(DI,1) AND D1>=REF(D1,1) AND D2>=REF(D2,1) AND D3>=REF(D3,1) AND
 D4>=REF(D4,1) AND D5>=REF(D5,1) AND D6>=REF(D6,1) AND D7>=REF(D7,1) AND
 D8>=REF(D8,1) AND C>EMA(C,11) AND DI>-0.8,DI,0,2,0),COLORRED;
 STICKLINE(AA,DIF1,DEA1,3,0),COLORE6E8FA;
 {柱状线}
MACD1:=(DIF1-DEA1)*2;
 STICKLINE(MACD1>REF(MACD1,1),0,MACD1,3.2,0),COLOR0000FF;
 STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2.7,0),,COLOR0000FF;
 STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2.1,0),COLOR0000FF;
 STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.5,0),COLOR0000FF;
 STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.9,0),COLOR0000FF;
 STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.3,0),COLORCC66FF;
 STICKLINE(MACD1  STICKLINE(MACD1  STICKLINE(MACD1  STICKLINE(MACD1  STICKLINE(MACD1  STICKLINE(MACD1  STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
 {买点提示}
A1:=BARSLAST(REF(CROSS(DIF1,DEA1),1));
 BL:=REF(CLOSE,A1+1)>CLOSE AND DIF1>REF(DIF1,A1+1) AND CROSS(DIF1,DEA1);
 {STICKLINE(BL,0,1,2,0),COLOR00FF00;}
 DRAWICON(BL,DEA1,23);
 A2:=BARSLAST(REF(CROSS(DEA1,DIF1),1));
 DBL:=REF(CLOSE,A2+1)DIF1 AND CROSS(DEA1,DIF1);
 DRAWICON(DBL,DEA1,12);
低位金叉:=CROSS(DIF1,DEA1) AND DIF1<-0.1;
 DRAWTEXT(低位金叉,DIF1,' 低位金叉');
JCCOUNT:=COUNT(CROSS(DIF1,DEA1),BARSLAST(DEA1>=0));
二次金叉:=CROSS(DIF1,DEA1) AND DEA1<0 AND COUNT(JCCOUNT=2,21)=1;
 DRAWICON(二次金叉,DEA1*1.04,13) ;
 DRAWTEXT(二次金叉,-0.1,' 二次金叉'),COLORFF00FF;
 A10:=BARSLAST(REF(CROSS(DIF1,DEA1),1));
底背离:=REF(CLOSE,A10+1)>CLOSE AND DIF1>REF(DIF1,A10+1) AND CROSS(DIF1,DEA1);
 DRAWLINE(A10=0,DEA1,底背离,DEA1,0),COLORRED,LINETHICK2;
 DRAWTEXT(底背离,-0.50,' 底背离'),COLOR00FF00;
 A20:=BARSLAST(REF(CROSS(DEA1,DIF1),1));
顶背离:=REF(CLOSE,A20+1)DIF1 AND CROSS(DEA1,DIF1);
 DRAWLINE(A20=0,DEA1,顶背离,DEA1,0),COLORWHITE,LINETHICK2;
 {趋势柱状线}
WY1001:=(2*CLOSE+HIGH+LOW)/4;
 WY