Amibroker DSE Fundamental Explore

_SECTION_BEGIN("DSE fundamental explore");
//|-----------------------------------------------------------------------------------------
//|Custom formula for DSE fundamental data explore
//|Copyright ©, stockinsides.com
//|http://www.stockinsides.com
//|e-mail: stockinsides@gmail.com
//|whatsapp: 01678132377
//|-----------------------------------------------------------------------------------------

Filter = 1;
AddColumn( Prec(GetFnData("SharesOut")/1000000,2), "PaidUp", 0);
AddColumn( C, "C", 0, IIf( C > Ref( C, -1 ), colorLime, IIf( C < Ref( C, -1 ), colorRed, colorLightGrey) ) );
AddColumn( ROC( C, 1 ), "D", 0);
AddColumn( V, "V", 1.0, IIf( V > Ref( V, -1 ), colorLime, IIf( V < Ref( V, -1 ), colorRed, colorLightGrey) ) );
//Audited PE Ratio
AEPS = IIf(GetFnData("EPS")!=0,GetFnData("EPS"),Null);
APE = Prec(Close /AEPS,2);
AddColumn( AEPS , "AEPS",1.2 );
AddColumn( APE , "APE",1.2 );
//Current PE Ratio
period =GetFnData( "Alias" );
AddTextColumn( period, "Int",0,IIf(period=="A",colorLime,IIf(period=="Q3",colorRed,IIf(period=="Q2",colorBlue,colorBlack))));
ForwardEPS = IIf(GetFnData("ForwardEPS")!=0,GetFnData("ForwardEPS"),Null);
PE = Prec(Close / ForwardEPS,2);
AddColumn( ForwardEPS , "ForwardEPS",1.2 );
AddColumn( PE , "PE",1.2 );
Growth = GetFnData( "QtrlyEarningsGrowth" );
AddColumn( Growth , "QtrEPSgrowth",1.2,IIf(Growth > 0,colorLime,colorRed) );
ExpectedNextQ = GetFnData( "EPSEstNextQuarter");
AddColumn( ExpectedNextQ  , "EPSEstNextQuarter",1.2 );
BookValue = IIf(GetFnData("BookValuePerShare")!=0,GetFnData("BookValuePerShare"),Null);
PB = Prec(Close /BookValue,2);
AddColumn( BookValue , "NAV",1.2 );
AddColumn( PB , "P/B",1.2 );
//Return on Equity
if(BookValue>0 OR BookValue!=Null){
ROE = ((ForwardEPS)/(BookValue))*100;
}else{
ROE = 0;
}
AddColumn( ROE, "ROE",1.2 );
AddColumn( GetFnData( "InsiderHoldPercent" ), "D%",1.2 );
AddColumn( GetFnData( "InstitutionHoldPercent" ), "I%",1.2 );
AddColumn( GetFnData("SharesShortPrevMonth"),"change Inst%",1.2);
AddColumn( GetFnData( "SharesFloat" ), "P%",1.2 );
_SECTION_END();
WhatsApp