// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Chart");

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", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );

_SECTION_END();

_SECTION_BEGIN("Ichimoku");

prds = Param( "Standard Line Periods", 26, 5, 26, 1 );
turn = Param( "Turning Line Periods", 9, 3, 10, 1 );

span = Param( "Spans Periods", 52, 10, 52, 1 );

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


_SECTION_BEGIN("TL");
Plot(TL,"TL", ParamColor( "Color", colorCycle ), ParamStyle("Style"), ParamStyle("Style"));
_SECTION_END();
_SECTION_BEGIN("SL");
Plot(SL,"SL", ParamColor( "Color", colorCycle ), ParamStyle("Style"), ParamStyle("Style"));
 _SECTION_END();
 
 
 
_SECTION_BEGIN("DL");
 Plot(DL,"DL", ParamColor( "Color", colorCycle ), ParamStyle("Style"),Null,Null,-26);
 _SECTION_END();
 Plot(Span1,"",colorBrown,1,0,0,26); 
 Plot(Span2,"",colorLightOrange,1,0,0,26);

 _SECTION_BEGIN("Span1Span2"); 

Color = IIf( Span1 > Span2, ParamColor("Span1 Color", ColorRGB( 0, 255, 0 ) ) , ParamColor( "Span2 Color",ColorRGB(255,221,187) ) );
PlotOHLC ( Span1, Span1, Span2, Span2, "Cloud", Color, styleCloud | 4096,0,0,26);

 _SECTION_END();

Buy = TL>SL;     
Sell =TL<SL;

Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell, Buy);

PlotShapes(IIf(Buy,shapeUpTriangle,shapeNone),colorBlue,0,Low,Offset=-15);
PlotShapes(IIf(Sell,shapeDownTriangle,shapeNone),colorRed,0,High,Offset=-15);

_SECTION_END();