// Downloaded From https://www.WiseStockTrader.com
PriceFrom = Param("Price From:", 15, 1, 200, 1); 
PriceTo   = Param("Price To:",   45, 5, 200, 1); 
Vol= Param("Vol*10000",100,5,100,5);

Cond=Close>PriceFrom AND Close<PriceTo AND MA(Volume,125)>200*Vol;

Filter = 1 AND  Cond; 
SetSortColumns( -8 ); 

AddColumn( Close, "Close",1.2, colorDefault, colorDefault ,70);
//AddColumn( ROC(C,1), "%Ch",1.2, IIf (ROC(C,1)>0, colorGreen,colorRed), colorDefault ,50);

EPS =  Nz(GetFnData("EPS"));
PE = IIf(EPS != 0, (Close / GetFnData("EPS")),0);
AddColumn( PE, "PE",1.0, colorDefault, colorDefault ,35);
AddColumn( EPS, "EPS",1.2, colorDefault, colorDefault ,40);
EPSYield= (GetFnData("EPS") / C)  * 100;
AddColumn( EPSYield, "Yield%",1.2, colorDefault, colorDefault ,45);
DIV = GetFnData("DividendPerShare");
AddColumn( DIV, "DIV",1.2, colorDefault, colorDefault ,40);
DIVYield = (GetFnData("DividendPerShare") / C)  * 100;
AddColumn( DIVYield, "Yield%",1.2, colorDefault, colorDefault ,45);
AddColumn( GetFnData("ExDividendDate"), "ExDividendDate", formatDateTime,colorDefault, colorDefault,100); 
AddColumn( GetFnData("DividendPayDate"), "DividendPayDate",formatDateTime,colorDefault, colorDefault,100);