通达信指标公式源码极品MACD副图指标.docVIP

DIF:EMA(CLOSE,12)-EMA(CLOSE,26);DEA:EMA(DIF,9);MACD:MACD.MACD,NODRAW;W1:STICKLINE(MACD0,MACD,0,3,1),COLORRED;W2:STICKLINE(MACD0,MACD,0,3,1),COLORCYAN;VA1:=HHVBARS(MACD,BARSLAST(MACD0)+1);VA2:=CROSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5);QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD0),REF(VA1,1)+2),0.5);前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORMAGENTA;VA3:=LLVBARS(MACD,BARSLAST(MACD0)+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(MACD0,FILTERX(MACD=LLV(MACD,BARSLAST(MACD0)),BARSCOUNT(C)),DRAWNULL);TSBDTJ:=BARSLAST(BDTJ);BDZH:=FILTERX(MACDCONST(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 MACD0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ=0;终点:=IF(ISLASTBAR AND MACD0 AND MACD=HHV(MACD,BARSLAST(MACD0)),1,IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL));UU:=(终点=1 OR 终点=2) AND MACD0;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(MACD0,天数),DRAWNULL),COLORWHITE,NODRAW;横线起始价:REF(C,天数),NODRAW;空间评估:(横线起始价-C)/C*100,NODRAW;TT:=BARSLAST(ZZ);WQG:=CROSS(COUNT(CROSS(MACD本高/2 AND MACD0,0.5),ZZ)=1,0.5) AND ZZ=0;STICKLINE(MACD前高 AND 本高前高 AND BARSLAST(CROSS(MACD本高/2,0.5))0 ANDMACD(前高+本高)/2,MACD,前高,1,0),COLORYELLOW; 前高本高二分位:IF(MACD0 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