SG
First my thanks.
I have gone through the whole thread now.
Though there are entry plans are there, exit plans are two as of now
1)based on initial and trailing SL
2)Price action based on exhaust candle
If I miss something, please summarize.
Now for AFL
_SECTION_BEGIN("Price");
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 ) ) ));
Plot( C, "Close", IIf(C>O,colorGreen,colorRed), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
_SECTION_BEGIN("Wilders");
P = ParamField("Price field",-1);
Periods = Param("Periods", 5, 2, 300, 1);
Plot( Wilders( P, Periods ), _DEFAULT_NAME(), colorGreen, ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("Wilders1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 8, 2, 300, 1);
Plot( Wilders( P, Periods ), _DEFAULT_NAME(), colorBlue, ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("Wilders2");
P = ParamField("Price field",-1);
Periods = Param("Periods", 13, 2, 300, 1);
Plot( Wilders( P, Periods ), _DEFAULT_NAME(), colorRed, ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("EMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 50, 2, 300, 1 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), IIf(EMA( P, Periods )> Ref(EMA( P, Periods ),-1),colorAqua,colorOrange), ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("Ribbon");
C1= EMA( C, 50 )> Ref(EMA( C,50 ),-1);
C2 = Wilders( C,5)>Wilders( C,8) AND Wilders( C,8) >Wilders( C,13);
C3 = Wilders( C,5)<Wilders( C,8) AND Wilders( C,8) <Wilders( C,13);
C4 = EMA( C, 50 )< Ref(EMA( C,50 ),-1);
Acolor = IIf(C1 AND C2 ,colorDarkGreen,IIf( C3 AND C4,colorRed,colorBlack ));
Plot(2, "ribbon",Acolor, styleOwnScale|styleArea|styleNoLabel|styleNoTitle,-0.5,100);
_SECTION_END();
adjust line breaks.
It gives all wilders MA and EMA and also a ribbon at bottom for long and short points.