通达信副图指标「发现洗盘对倒」，预判庄家...

通达信副图指标「发现洗盘对倒」，预判庄家出货，吃涨停。附源码！

轴:=(CONST(HHV(H,120))+CONST(LLV(L,120)))/2; {120日的(最高+最低)/2，定为轴}
零轴:IF(CONST(C)<轴,轴*1.07,轴*0.93); {补偿7个点}

DAIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DAEA:=EMA(DAIF,9);
MACDZ:=(DAIF-DAEA),COLORSTICK;
系数:=CONST(HHV(ABS(MACDZ),120));

自由度:=MACDZ*零轴/系数*0.08;
STICKLINE((零轴+自由度)>零轴 AND (零轴+自由度)<=REF(零轴+自由度,1),零轴,零轴+自由度,2,1),COLORYELLOW;
STICKLINE((零轴+自由度)>零轴 AND (零轴+自由度)>REF(零轴+自由度,1),零轴,零轴+自由度,2,1),COLORRED;
STICKLINE((零轴+自由度)<=零轴 AND (零轴+自由度)<=REF(零轴+自由度,1),零轴,零轴+自由度,1.6,0),COLORCYAN;
STICKLINE((零轴+自由度)<=零轴 AND (零轴+自由度)>REF(零轴+自由度,1),零轴,零轴+自由度,2,1),COLORLICYAN;
DRAWTEXT(ISLASTBAR,零轴,'---MACD'),COLORGREEN;
DRAWKLINE(H,O,L,C);
XG:CROSS(C,零轴) NODRAW;