ICHIMOKU CROSSOVER SCAN for Amibroker (AFL)

//ICHIMOKU CROSSOVER SCAN

SetChartOptions(0,chartShowArrows|chartShowDates);
_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", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
if( ParamToggle("Tooltip shows", "All Values|Only Prices" ) )
{
ToolTip=StrFormat("Open: %g\nHigh: %g\nLow: %g\nClose: %g (%.1f%%)\nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));
}

TL = ( HHV( H, 9 ) + LLV( L, 9 ) )/2;
SL = ( HHV( H, 26 ) + LLV( L, 26) )/2;

Plot(TL,"TL",colorPink,styleDashed); // turning, conversion, or tenkan-sen line
Plot(SL,"SL",colorLightBlue,styleDashed); // standard, base, or kijun-sen line


Buy = Cross(TL,SL) AND (MA(Close,50)) > (MA(Close,100)) AND (MA(Close,100)) > (MA(Close,200));
//Buy = Cross(TL,SL);
Sell = Cross(SL,TL);

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