Hi intool,
Hope this will help.
TC
//*************************************************************
_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, RSI(9),SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
_SECTION_BEGIN("Short MA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 5, 2, 200, 1, 10 );
Plot( MA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorYellow ), ParamStyle("Style", styleThick | styleDashed|styleDots) );
_SECTION_END();
_SECTION_BEGIN("Long MA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 25, 2, 200, 1, 10 );
Plot( MA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorTeal ), ParamStyle("Style", styleThick | styleDashed|styleDots) );
_SECTION_END();
Buy=Cross(MA( Close,5 ),MA( Close,25 )) AND RSI(9)>50;
Sell=Cross(MA( Close,25 ),MA( Close,5 )) AND RSI(9)<50;
PlotShapes(shapeUpArrow * Buy, ParamColor("Buy Arrow", colorBrightGreen),0,Low, - 20);
PlotShapes(shapeDownArrow * Sell, ParamColor("Sell Arrow", colorRed),0,High, - 20);
_SECTION_BEGIN("RSI");
periods = Param( "Periods", 9, 1, 200, 1 );
Plot( RSI( periods), _DEFAULT_NAME(), ParamColor( "Color", colorWhite ), ParamStyle("Style",styleLine|Stylehidden,maskAll) );
_SECTION_END();