Skip to main content

Counter Trend Reversal System for Amibroker (AFL)

ABUSLIMAN06 over 14 years ago Amibroker (AFL)

  • Rating:
    2 / 5 (Votes 4)
  • Tags:
    trading system, amibroker

Here is a simple afl code which is the modified version of EMAavg afl code, which finds the near bottom most of time and can be trade for reversal with mimimal stop loss. Trading system suits EOD timeframe and delivery based buying. Exit signals are not yet coded as of now and currently the system suits only Buy Signals on EOD timeframe. One need to preplan his/her Exit manually. Code has its own advantages and Disadvantages, so try to interpret the signal manually before entering into any sort of trade.

Screenshots

Indicator / Formula

Copy & Paste Friendly
//Marketcalls - Counter Trend Reversal System
//www.marketcalls.in

_SECTION_BEGIN("Marketcalls - Counter Trend Reversal System");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));

z=(High+Low+(Close)*(2))/(4);
EMAavg=((34*EMA(z,2)+21*EMA(z,3))+(13*EMA(z,5))+(8*EMA(z,8))+(5*EMA(z,13))+(3*EMA(z,21))+(2*EMA(z,34)))/(87);
Plot(EMAavg,"EMAavg=",colorRed);



Buy =C>EMAavg AND C>EMA(C,5);
ex =C<EMAavg;



Buy = ExRem( Buy, ex );
ex = ExRem( ex, Buy ); 



Filter =  Buy;
/* Exploration Parameters */
AddTextColumn( FullName(), "Company Name" );
AddColumn( Buy, "Buy", 1 );
AddColumn( C, "Close", 1.3 );


PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorGreen, 0, L, Offset=-40);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorLime, 0,L, Offset=-50);                      
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset=-45); 
//PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorRed, 0, H, Offset=40);
//PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorOrange, 0,H, Offset=50);                      
//PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset=-45);

Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 

_SECTION_END();

1 comments

Leave Comment

Please login here to leave a comment.