本人自用MACD

以下是本人自用MACD

DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
 DEA:EMA(DIF,9);
 MACD:”MACD.MACD”,NODRAW;
 W1:STICKLINE(MACD>0,MACD,0,3,1),COLORRED;
 W2:STICKLINE(MACD<0,MACD,0,3,1),COLORCYAN;
 VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
 VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);
 QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORMAGENTA;
 VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
 VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5);
 BD:=BARSLAST(FILTERX(CROSS(0,MACD),BARSCOUNT(C)));
前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1);
 BDTJ:=IF(MACD<0,FILTERX(MACD=LLV(MACD,BARSLAST(MACD>0)),
 BARSCOUNT(C)),DRAWNULL);
 TSBDTJ:=BARSLAST(BDTJ);
 BDZH:=FILTERX(MACD<CONST(LLV(MACD,BD+1)),BARSCOUNT(C));
 BDTS:=BARSLAST(BDZH);
本低:IF(BD+1>=1,CONST(LLV(MACD,BD+1)),DRAWNULL);
 BDCL:=CROSS(COUNT(CROSS(MACD>本低/2 AND MACD<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0;
终点:=IF(ISLASTBAR AND MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)),1,
 IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL));
 UU:=(终点=1 OR 终点=2) AND MACD>0;
 ZZ:=FILTERX(UU,BARSCOUNT(C));
本高:DRAWLINE(ZZ,MACD,REF(ZZ,1),REF(MACD,1),1),COLORWHITE;
横线:=CONST(REF(MACD,BARSLAST(ZZ)));
 WW:=MACD>横线;
起始点:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(C));
天数:BARSLAST(起始点),COLORYELLOW,NODRAW;
上横线:DRAWLINE(起始点,横线,ZZ,横线,0),COLORGREEN,DOTLINE;
下横线:DRAWLINE(BDZH,CONST(LLV(MACD,BD+1)),BDTJ=1,MACD,0),COLOR8080FF,DOTLINE;
 DRAWNUMBER(BDTJ,CONST(LLV(MACD,BD+1))*0.9,BDTS);
 DRAWNUMBER(ZZ,上横线*1.1,天数);
TJ:=IF(起始点,BARSNEXT(ZZ),DRAWNULL);
红柱数量:IF(天数>0 AND 天数<=REF(TJ,天数),SUM(MACD>0,天数),DRAWNULL),COLORWHITE,NODRAW;
横线起始价:REF(C,天数),NODRAW;
 **评估:(横线起始价-C)/C*100,NODRAW;
 TT:=BARSLAST(ZZ);
 WQG:=CROSS(COUNT(CROSS(MACD<本高/2 AND MACD>0,0.5),ZZ)=1,0.5) AND ZZ>=0;
 STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(CROSS(MACD<本高/2,0.5))>0 AND
 MACD>(前高+本高)/2,MACD,前高,1,0),COLORYELLOW;

前高本高二分位:IF(MACD>0 AND 本高!=前高,DRAWLINE(WQG,(前高+本高)/2,REF(WQG,1),REF((前高+本高)/2,1),1)
 ,DRAWNULL),COLORC0C000,DOTLINE;
 AA:=STRCAT(STRCAT(STRCAT(‘〖’,’上升**’),’〗’),CON2STR(IF(**评估,**评估,
DRAWNULL),2));

 DRAWTEXT(WQG,MACD*1.1,’本高成立’),COLORWHITE;
 DRAWTEXT(BDCL,MACD*1.1,’本低成立’),COLORWHITE;
 STICKLINE(MACD>前高,MACD,前高,1,0),COLORYELLOW;
 STICKLINE(WQG,MACD,0,1,0),COLORGREEN;
 STICKLINE(MACD<0 AND MACD<前低 AND 前低<0,MACD,前低,1,0),COLORBLUE;
 B1:=IF(CROSS(MACD<0,0.5),BARSNEXT(BDTJ),DRAWNULL);
 TSB1:=BARSLAST(MACD>0)-1;
 STICKLINE(BARSLAST(BDCL)>=0 AND MACD<前低 AND MACD<0,MACD,前低,1,0),COLORGREEN;
 STICKLINE(BDCL,MACD,0,1,0),COLORWHITE;
 STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(WQG)>0,
 MACD,前高,1,0),COLORRED;
 DRAWTEXT(VA2 AND VA2!=UU,(MACD/10)*9,’前’);
DRAWTEXT(VA2 AND VA2!=UU,MACD/10,’高’);
DRAWTEXT(ZZ,(MACD/10)*9,’本’),COLORWHITE;
 DRAWTEXT(ZZ,MACD/10,’高’),COLORWHITE;
 DRAWTEXT(BDTJ,(MACD/10)*9,’低’),COLORRED;
 DRAWTEXT(BDTJ,MACD/10,’本’),COLORRED;
 IF(BARSLAST(BDCL)>=0,本低/2,DRAWNULL),COLORRED,DOTLINE;

DRAWTEXT_FIX(1,0.05,0.04,0,’【黑马拉升由两个阶段构成：同步上涨阶段（黄芯柱）
 和惯性上涨阶段（背离阶段、红芯柱）】’),COLORFFFF00;

 A1:=C>REF(C,4);
 NT:=BARSLASTCOUNT(A1);
 TJ11:=NT=9;
 TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
 AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
 DRAWTEXT(AY>0,MACD*1.02,VAR2STR(AY,0)),COLORLIRED;
 DRAWTEXT(NT=9,MACD*1.02,’9′),COLORGREEN;

B11:=C<REF(C,4);
 NT0:=BARSLASTCOUNT(B11);
 TJ21:=NT0=9 ;
 TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
 AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
 DRAWTEXT(AY1>0,MACD*0.98,VAR2STR(AY1,0)),COLORGREEN;
 DRAWTEXT(NT0=9,MACD*0.98,’9′),COLORRED;