ST:=IF(NAMELIKE('S'),0,1) AND IF(NAMELIKE('*'),0,1); TP:=DYNAINFO(4)>0;
 VOLUME:=VOL;
 MAVOL1:=MA(VOLUME,5);
 MAVOL2:=MA(VOLUME,60);
 MA5:=MA(C,5);
 MA10:=MA(C,10);
 MA20:=MA(C,20);
 MA30:=MA(C,30);
 A:=LAST(VOL<MAVOL2,4,1) AND
 VOL>MAVOL1  AND VOL>MAVOL2 AND
 C>MA5 AND C>MA10 AND C>MA20 AND C>MA30; 

 B:= REF(VOL,2)<REF(MAVOL2,2) AND
 REF(VOL,3)<REF(MAVOL2,3) AND
 REF(VOL,4)<REF(MAVOL2,4) AND
 REF(VOL>MAVOL1,1) AND REF(VOL>MAVOL2,1) AND
 C>MA5 AND C>MA10 AND C>MA20 AND C>MA30  AND ST AND TP AND C/REF(C,1)<1.05
 AND C>REF(C,1);
 ENTERLONG:A OR B;