Join our facebook group for Amibroker afl code discussion https://www.facebook.com/groups/603980776889348

Ichimoku Cloud With Chiku Span


How to use Ichimoku Cloud With Chiku Span Amibroker afl?

Ichimoku Cloud With Chiku Span afl is one of the perfect trading system. If you use Ichimoku Cloud With Chiku Span afl, you do not have to use any additional indicator. Buy when price is above cloud, TS and KS. Chiku span should be above price. Ichimoku Cloud With Chiku Span afl gives you very accurate signals. Ichimoku Cloud With Chiku Span afl can be used with any time frame. If required, use MACD to filter out false signals.

Ichimoku Cloud With Chiku Span
Ichimoku Cloud With Chiku Span

//www.aflcode.com
_SECTION_BEGIN("Ichimoku");
turn = Param( "Tenkan-Sen Line", 9, 1, 100 );
prds = Param( "Kijun-Sen Line", 26, 1, 26, 1 );
span = Param( "Spans Period", 52, 1, 52, 1 );
SetChartOptions(0,chartShowArrows|chartShowDates);

SL = ( HHV( H, turn ) + LLV( L, turn ) ) / 2;
TL = ( HHV( H, prds ) + LLV( L, prds ) ) / 2;
DL = C;
Sp1 = ( SL + TL ) / 2;
Sp2 = ( HHV( H, span ) + LLV( L, span ) ) / 2;

_N( Title = StrFormat( "{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " + WriteVal( V, 1.0 ) + " {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ) );

Plot( C, "Close", colorBlack, styleNoTitle | GetPriceStyle() );
Plot( SL, "SL", colorRed, styleThick | styleNoLabel );
Plot( TL, "TL", colorBlue, styleThick | styleNoLabel );
Plot( DL, "CS", colorYellow, styleThick | styleNoLabel, Null, Null, -prds, -2 );

color = IIf( Sp1 > Sp2, ParamColor( "Span A Color", ColorRGB( 0, 255, 0 ) ), ParamColor( "Span B Color", ColorRGB( 255, 104, 32 ) ) );
PlotOHLC ( Sp1, Sp1, Sp2, Sp2, "Cloud", Color, styleCloud | styleNoLabel, Null, Null, prds, -2 );
MyPort = 25000;
MyATR=ATR(7);//Enter ATR Average or use the 14 Day Moving Average of ATR
PL = Ref(C,-26);

Title = Name() + " (" + StrLeft(FullName(), 10) +
") ATR: " + NumToStr(ATR(1), 4.2) + " ( " +
NumToStr((C - Ref(C, -1)), 4.2) + " / " +
NumToStr((((C - Ref(C, -1)) / Ref(C, -1)) * 100), 2.1) + "% ) " +
WriteVal( SelectedValue( DateTime() ), formatDateTime) +
"\nTL: " + WriteVal(SL, 2.2) +
"\nKL: " + WriteVal(TL, 2.2) +
"\nSpan A: " + WriteVal(Sp1, 2.2) +
"\nSpan B: " + WriteVal(Sp2, 2.2) +
"\nSpan Diff: " + WriteVal(Sp1 - Sp2, 2.2) +
"\nChikou Span Today: " + WriteVal(C, 2.2) +
"\nChikou Span 26 Days Ago: " + WriteVal(PL, 2.2) +
"\nPrice Limit: " + WriteVal((TL+ATR(14)*1.5), 2.2) +
"\nSL Pt :" + WriteVal (MyATR*3,format=1.2 )+
"\nSL Value: " + WriteVal ( Close - (MyATR*3),(format=1.2)) +
"\nRisk: " + WriteVal ( (MyATR*3/Close)*100,format=1.2 ) + "%" +
"\nShare Limit: " + WriteVal ((MyPort*0.01)/(MyATR*3),(format=1.2))+
"\n"+ "P"+WriteVal(C*((MyPort*0.02)/(MyATR*3)),(format=1.0))+ " of" +" "+ WriteVal ((MyPort)/1000,format=1.0)+"T";
_SECTION_END();

Previous
Next Post »