---Fml( "{VM} 6 4 Bullish")---
Buy:=Cross(C,Mov(Ref(H,-4),6,S)); 
Sell:=Cross(Mov(Ref(L,-4),6,S),C); 
State:=If(BarsSince(Buy)>BarsSince(Sell),1,0); 
State=0



---Fml( "{VM} Vidya Bullish")---
Length:=21; 
Smooth:=5;
AbsCMO:=(Abs(CMO(C,Length)))/100;
SC:=2/(Smooth+1);
VIDYA:=If(Cum(1)<=(Length+1),C,(SC*AbsCMO*CLOSE)+(1-(SC*AbsCMO))*PREV);
C>(Vidya*1.01)



---Fml( "{VM} PP+ TrendDirection")---
ExtFml("PowerPivots.TrendDirection",1,1)



---Filter---
Exploration notes		
		
Col A: Close	C	
Col B: Chaikin	CMF(21)	
Col C: MA Up	Mov(C,10,E)>Ref(Mov(C,10,E),-1)	
Col D: 64 Vidya	 Fml( "{VM} 6 4 Bullish") AND  Fml( "{VM} Vidya	
	Bullish") AND  Fml( "{VM} PP+ TrendDirection")	
Col E: V	a1:=Ref( Fml( "{VM} Vidya Bullish") ,-1);	
	a2:=Ref( Fml( "{VM} 6 4 Bullish") ,-1);	
	a1+a2	
Filter	C>10 AND Mov(V,20,S)>500 AND colB>.1 AND	
	colC=1 AND colD=1 AND colE<2 {AND  Fml( "_Date	
	Cutoff")=1}	
		
Filter enabled	Yes	
Periodicity	Daily	
Records required	1000