通达信分时财富主图公式源码

一个分时主图，于之前发的分时副图配套，想不赚都难！
分时主图的特点：一是有现价于历史价的恒量线，能准确把握价格运行趋势；二是上、下突破有动态追踪线，上突果断出、下突果断买入；三是有红、绿操盘线指引一目了然。
{分时财富}
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0;
突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL);
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL);
STICKLINE(A1X>=0,多方,突破,0,0),COLOR0000DD;
STICKLINE(A1X<0,空方,突破,0,0),COLOR00CC66;
XG:HHV(H,480),DOTLINE,COLORYELLOW;
T:=BARSCOUNT(C);
HHV(H,T),DOTLINE,COLOR00FFFF;
TP:= FILTER( C>=HHV(H,T) AND V>MA(V,0)*2 AND DYNAINFO(17)>1 AND TIME>39600,240) ;
DRAWTEXT(TP,L,'★突破'),COLORRED;
STICKLINE(FILTER(CROSS(C,REF(XG,1)),10),C,HHV(O,T)*0.99,10,0),COLORYELLOW;
DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10),HHV(O,T)*0.99,'上突 '),COLORYELLOW;
DRAWTEXT(ISLASTBAR=1,HHV(O,T)*0.9995,'上突必卖, 不破前高—买'),COLORYELLOW;
LLV(H,T),DOTLINE,COLORWHITE;
XG1:LLV(H,480),DOTLINE,COLORWHITE;
TP1:= FILTER(C>=LLV(H,T) AND V>MA(V,0)*2 AND DYNAINFO(17)>1 AND TIME>39600,240);
DRAWTEXT(TP,L,'★下破'),COLORRED;
STICKLINE(FILTER(CROSS(C,REF(XG1,1)),10),C*0.99,LLV(O,T),10,0),COLORWHITE;
DRAWTEXT(FILTER(CROSS(C,REF(XG1,1)),10),LLV(O,T)*0.992,'下破,'),COLORWHITE;
DRAWTEXT(ISLASTBAR=1,LLV(O,T),'下破, 不破前低—买'),COLORWHITE;
均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWNUMBER(ISLASTBAR,C,C),COLORFFFFFF;
XJ:CONST(C),COLORFFFFFF,LINETHICK1;