DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
STICKLINE(MACD>0,0,MACD,3,1),COLORMAGENTA;
STICKLINE(MACD<0,0,MACD,3,1),COLORFFFFFF;
X_2:=BARSLAST(REF(MACD,1)<0 AND MACD>0);
X_3:=LLVBARS(MACD,X_2+20);
X_4:=IF(X_3>X_2,REF(MACD,X_3),0);
X_5:=MACD<0 AND MACD>X_4 AND LOW=LLV(LOW,X_2+20) AND X_4<0;
X_6:=REF(X_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,X_3)<0 AND MACD<0;
低背:DRAWLINE(X_4=X_3,MACD,X_6,MACD,0),COLORRED,LINETHICK2;
DRAWICON(X_6,MACD*1.2,7);
X_7:=HHVBARS(MACD,X_2+20);
X_8:=IF(X_7>X_2,REF(MACD,X_7),0);
X_9:=MACD>0 AND MACD<X_8 AND HIGH=HHV(HIGH,X_2+20) AND X_8>0;
X_10:=REF(X_9,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,X_7)>0;
顶背:DRAWLINE(X_8=X_7,MACD,X_10,MACD,0),COLORGREEN,LINETHICK2;
DRAWICON(X_10,MACD*1.2,8);
VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);
VA2JL:=BARSLAST(VA2);
VA2J:=IF(VA2JL=0,MACD,REF(MACD,VA2JL));
前高Q:DRAWLINE(VA2,MACD,ISLASTBAR,REF(MACD,BARSLAST(VA2)),0),COLORMAGENTA,LINETHICK1;
STICKLINE(MACD>VA2J,MACD,VA2J,3,0),COLORYELLOW;
高点:=IF(VA2JL=0,HIGH,REF(HIGH,VA2JL));
A前高:=CROSS(MACD,VA2J) AND MACD>VA2J;
STICKLINE(A前高,-0.0001,MACD,3,0),COLORWHITE;
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5);
VA4JL:=BARSLAST(VA4);
前低:=IF(VA4JL=0,MACD,REF(MACD,VA4JL));
低点:=IF(VA4JL=0,LOW,REF(LOW,VA4JL));
前低Q:DRAWLINE(VA4,MACD,ISLASTBAR,REF(MACD,BARSLAST(VA4)),0),COLOR0000FF,LINETHICK1;
A前低:=CROSS(前低,MACD) AND MACD<前低;
P前低:=CLOSE<低点 AND CROSS(前低,MACD);
STICKLINE(MACD<前低,MACD,前低,3,0),COLORBLUE;
STICKLINE(A前低,-0.0001,MACD,3,0),COLORMAGENTA;
DRAWICON(P前低,MACD*1.2,12);
DONCROSS:=IF(CROSS(DIF,DEA) AND DEA>0,1,0);
DUNDERCROSS:=IF(CROSS(DIF,DEA) AND DIF<0,1,0);
KONCROSS:=IF(CROSS(DEA,DIF) AND DIF>0,1,0);
KUNDERCROSS:=IF(CROSS(DEA,DIF) AND DEA<0,1,0);
A7:=VAR2STR(COUNT(DUNDERCROSS,BARSLAST(DIF>0)+1),0);
DRAWTEXT(DONCROSS,DEA,VAR2STR(COUNT(DONCROSS,BARSLAST(DIF<0)+1),0)),COLORRED;
DRAWTEXT(DUNDERCROSS,DEA,A7),COLORYELLOW;
DRAWTEXT(KONCROSS,DIF,VAR2STR(COUNT(KONCROSS,BARSLAST(DIF<0)+1),0)),COLORCYAN;
DRAWTEXT(KUNDERCROSS,DIF,VAR2STR(COUNT(KUNDERCROSS,BARSLAST(DIF>0)+1),0)),COLORGREEN;
Ｍ周▲:DRAWTEXT(CROSS("MACD.DIF#WEEK","MACD.DEA#WEEK"),0,'▲M周'),COLORRED;
Ｍ月个:DRAWTEXT(CROSS("MACD.DIF#MONTH","MACD.DEA#MONTH"),0,'▲M月'),COLORMAGENTA;
X_3A:=DIF;
X_4A:=DEA;
X_5A:=MACD;
X_8A:=HHVBARS(X_3A,BARSLAST(X_5A<0)+1);
X_9A:=CROSS(BACKSET(CROSS(0,X_5A),REF(X_8A,1)+2),0.5);
X_10A:=X_9A;
X_11A:=BACKSET(ISLASTBAR,BARSLAST(X_10A)+1);
X_12A:=X_11A>REF(X_11A,1);
X_13A:=REF(X_3A,BARSLAST(X_12A));
DRAWICON(CROSS(X_3A,X_13A),X_3A,41);
X_14A:=CONST(IF(CURRBARSCOUNT<=81,HHV(MAX(X_5A,MAX(X_3A,X_4A)),BARSLAST(CURRBARSCOUNT=81)),0));
X_15A:=CONST(IF(CURRBARSCOUNT<=81,LLV(MIN(X_5A,MIN(X_3A,X_4A)),BARSLAST(CURRBARSCOUNT=81)),0));
X_16A:=FILTER(CROSS(X_3A,X_4A),BARSSINCE(CLOSE));
X_17A:=SUM(CROSS(X_3A,X_4A),BARSSINCE(CLOSE));
X_18A:=CROSS(REF(X_17A,BARSNEXT(X_16A))=X_17A+1,0.5);
STICKLINE(BARSLAST(X_18A)>=0 AND CROSS(X_3A,X_4A),X_14A,X_15A,0,-1),COLORGREEN;
STICKLINE(BARSLAST(X_18A)>=0 AND CROSS(X_3A,X_4A) AND X_3A>=0,X_14A,X_15A,0,-1),COLORRED;
X_23:=LLVBARS(X_5A,BARSLAST(X_5A>0)+1);
X_24:=CROSS(BACKSET(CROSS(X_5A,0),REF(X_23,1)+2),0.5);
X_25:=BARSLAST(FILTER(CROSS(0,X_5A),BARSCOUNT(CLOSE)));
X_26:=DRAWLINE(X_24,X_5A,REF(X_24,1),REF(X_5A,1),1);
X_76:=BARSLAST(REF(CROSS(X_3A,X_4A),1));
X_77:=CROSS(X_3A,X_4A) AND X_3A>REF(X_3A,X_76+1) AND X_76<100 AND X_3A>0 AND LOW>REF(LOW,X_76+1);
X_78:=BARSLASTCOUNT(X_3A>X_4A);
DRAWNUMBER(ISLASTBAR,X_26,X_78),COLORGREEN,LINETHICK9;
DRAWICON(CROSS(X_3A,X_13A),X_3A,41);
