{HA“反转”选股}
X0:=IF(NAMELIKE('ST') OR NAMELIKE('*ST'),0,1) AND IF(CODELIKE('688'),0,1);
X1:=WMA(MAX(C-REF(C,1),0),7)/WMA(ABS(C-REF(C,1)),7)*100;
X2:=((3*WMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5)-2*WMA(WMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5),3)-50)+50);
X3:=(X1+X2)/2;
X5:=WMA(C+(X3/50-1)*(MA(C,30)/20)*1,3);
A1:=EMA(MAX(C-REF(C,1),0),6)/EMA(ABS(C-REF(C,1)),6)*100;
A2:=EMA(MAX(C-REF(C,1),0),12)/EMA(ABS(C-REF(C,1)),12)*100;
A3:=EMA(MAX(C-REF(C,1),0),24)/EMA(ABS(C-REF(C,1)),24)*100;
{A4:=IF(CROSS(A1,A3),LOW,REF(LOW,BARSSINCE(CROSS(A1,A3))));}
{A5:=IF(CROSS(A3,A1),HIGH,REF(HIGH,BARSSINCE(CROSS(A3,A1))));}
A6:=IF(C>=MA(C,20),80,50);
A7:=IF(C>=MA(C,20),50,20);
A8:=IF(A1<A6 AND REF(A1,1)>=A6,HHV(REF(HIGH,1),BARSLAST(A1>=A6 AND REF(A1,1)<A6)-1), REF(HHV(REF(HIGH,1),BARSLAST(A1>=A6 AND REF(A1,1)<A6)+1), BARSLAST(A1<A6 AND REF(A1,1))));
A9:=IF(HIGH>A8,LOW,REF(LOW,BARSLAST(HIGH>A8)));
A10:=IF(HIGH>A8,A1,REF(A1,BARSLAST(HIGH>A8)));
A11:=IF(HIGH>A9 AND A1<A10 AND A1<A3,HIGH,REF(HIGH,BARSLAST(HIGH>A9 AND A1<A10 AND A1<A3)));
A12:=IF(A1>A7 AND REF(A1,1)<=A7,LLV(REF(LOW,1),BARSLAST(A1<=A7 AND REF(A1,1)>A7)+1), REF(LLV(REF(LOW,1),BARSLAST(A1<=A7 AND REF(A1,1)>A7)+1),BARSLAST(A1>A7 AND REF(A1,1))));
A13:=IF(LOW<A12,HIGH,REF(HIGH,BARSLAST(LOW<A12)));
A14:=IF(LOW<A12,A1,REF(A1,BARSLAST(LOW<A12)));
A15:=IF(LOW<A13 AND A1>A14 AND A1>A3,LOW,REF(LOW,BARSLAST(LOW<A13 AND A1>A14 AND A1>A3)));
PRES:=A15,COLORYELLOW;
SUP:=A11,COLORC6C600;
XG1:=CROSS(X5,PRES);
H1:=IF(H<REF(H,1) AND REF(H,1)<REF(H,2),REF(H,2),0);
H2:=VALUEWHEN(H1>0,H1);
L1:=IF(L>REF(L,1) AND REF(L,1)>REF(L,2),REF(L,2),0);
L2:=VALUEWHEN(L1>0,L1);
K1:=IF(C>H2,-1,IF(C<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
XG2:=K2=-1;
反转:=FILTER(XG1 AND XG2,5) AND X0;
XG:反转;
