通达信-高位吞没选股

ZF:=100*(C-REF(C,1))/REF(C,1);
A1:=C>O;
A2:=A1 AND NOT(REF(A1,1)) AND ZF>4 AND REF(ZF,1)<-2;
TJ:=(FINANCE(3)=4 OR (DATE>1200822 && FINANCE(3)=3));
ZTJ:=IF(TJ,ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));
EZT:=(HIGH>=ZTJ); { 出现过涨停 }
EZTO:FINANCE(42)>50 AND EXIST(EZT,10) AND A2 AND EXIST(TOPRANGE(H)>120,10);