Nifty technicals

//Developer: Vikas Verma(www.vikasverma.com)
//Name: Trading The Bars
//Date: 12/14/2009
/////////////////////////////////////////////////////////////////////////

_SECTION_BEGIN("Trading Bars");


//Print some basic stuff...

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



// Take some input parameters
lastBars = Param("Last n Bars",3,1,100,1,0);
showShort = ParamToggle("Short/Cover Arrows","false,true",False);


//Decide Buy/Sell signals
Buy =     Close > Ref( Close , -lastBars);
Sell =     Close < Ref( Close , -lastBars);
Short =     Close < Ref( Close , -lastBars);
Cover =     Close > Ref( Close , -lastBars);


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

Cover = ExRem(Cover,Short);
Short = ExRem(Short,Cover);


// -- OK, let's plot the signals using arrows

PlotShapes(IIf(Buy,shapeUpArrow,shapeNone), colorGreen, 0, Open, Offset=-15);
PlotShapes(IIf(Sell,shapeDownArrow,shapeNone),colorRed,0,Open,Offset=-15);
Plot(Ref(Close,-lastBars),"Stop Loss",colorRed);

WriteIf(Buy, "Buy","Sell");



if(showShort)
{
    PlotShapes(IIf(Cover,shapeHollowUpArrow,shapeNone), colorGreen, 0,
Open, Offset=-30);
    PlotShapes(IIf(Short,shapeHollowDownArrow,shapeNone),colorRed,0,Open,Offset=-30);
}



// -- Plotting of symbols done here


// EXPLORATION CODE STARTS HERE
backColor = IIf( Buy, colorGreen,colorRed);

Filter = Buy OR Sell;
SetOption("NoDefaultColumns", True );
AddTextColumn(Name(), "Scrip",1.2,colorWhite,backColor ,80);
AddColumn(DateTime(), "Date" ,formatDateTime,colorWhite,backColor ,120);
AddColumn(Close,"Close",1.2,colorWhite,backColor ,80);
AddColumn(Ref(Close,-lastBars),"SL / Reversal",1.2,colorWhite,backColor ,80);
AddColumn(IIf( Buy, 66, 83 ), "Signal", formatChar,colorWhite,backColor ,50);

// EXPLORATION CODE ENDS HERE
_SECTION_END();



_SECTION_BEGIN("Background Color");
SetChartBkColor(ParamColor("Outer panel color ",colorWhite)); // color of outer border
SetChartBkGradientFill( ParamColor("Inner panel color upper half",colorWhite),
ParamColor("Inner panel color lower half",colorWhite)//color of inner panel
,ParamColor("behind Text Color", colorYellow));

_SECTION_END();