请老师在副图出现紫色方块的地方做一个通达信的选股公式,先谢谢了.

A0:=(L+H+C*2)/4;
趋势:EMA(A0,25),LINETHICK,,COLOR0089FF;
工作:EMA(A0,14),LINETHICK1,COLORFFADFF;
A1X:=(工作-REF(工作,1))/REF(工作,1)*100;
A2X:=(趋势-REF(趋势,1))/REF(趋势,1)*100;
G:=BARSLAST(CROSS(A1X,0));
买入卖出:REF(A0,G),LINETHICK2,,COLORWHITE;
A2:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);
A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
财神:IF(A7,LLV(L,21),DRAWNULL),CROSSDOT,COLORRED;
DRAWICON(CROSS(A2,EMA(A2,5)) AND (A4-EMA(A2,5))>40 AND A7,L,1),;
STICKLINE(C>REF(C,1)*1.09,C,O,7,0),LINETHICK2,COLORMAGENTA;
STICKLINE(C<REF(C,1)*0.901,C,O,7,0),COLORYELLOW;
IF(A2X>=0,趋势,DRAWNULL),,LINETHICK2,COLOR0089FF;
IF(A1X>=0,买入卖出,DRAWNULL),LINETHICK2,COLORRED;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.1),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.1),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.2),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.2),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.3),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.3),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.4),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.4),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.5),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.5),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.6),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.6),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.7),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.7),DRAWNULL),POINTDOT,COLORGREEN;
IF((H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.8),(REF(A0,BARSLAST(CROSS(A1X,0)))*1.8),DRAWNULL),POINTDOT,COLORGREEN;