//------------------------------------------------------------------------------ // // Formula Name: ATR Volatility System // Author/Uploader: Marcelin // E-mail: marcelint@xnet.ro // Developed By : Tudor Marcelin - Art Invest // Edited By : Rajandran R // Website : www.marketcalls.in // Level: medium // Flags: system // // //------------------------------------------------------------------------------ // // ATR trading system for short terms tradings. You can use it with Absolute // Strength Index for confirmation of signals. // //------------------------------------------------------------------------------ _SECTION_BEGIN("ATR Volatility Revised Edition"); SetBarsRequired(100000,0); GraphXSpace = 15; SetChartOptions(0,chartShowArrows|chartShowDates); SetChartBkColor(ParamColor("bkcolor",ColorRGB(0,0, 0))); GfxSetBkMode(0); GfxSetOverlayMode(1); SetBarFillColor(IIf(C>O,ParamColor("Candle UP Color", colorGreen),IIf(C<=O,ParamColor("Candle Down Color", colorRed),colorLightGrey))); Plot(C,"\nPrice",IIf(C>O,ParamColor("Wick UP Color", colorDarkGreen),IIf(C<=O,ParamColor("Wick Down Color", colorDarkRed),colorLightGrey)),64,0,0,0,0); SetTradeDelays(1,1,1,1); SetPositionSize(100,spsShares); n=Param( "period", 14, 5 , 20, 1 ); k=Param( "factor", 1.4, 0.5 , 2.5, 0.1 ); f=ATR(n); /*R Resistance */ R[0] = C[0]; /*S Support */ S[0] = C[0]; for( i = n+1; i < BarCount; i++ ) { R[i]=R[i-1]; S[i]=S[i-1]; if (( S[i-1]<=C[i-1]) AND (C[i-1] <=R[i-1] ) AND (C[i-1]+k*f[i-1])<=RV) R[i] = C[i-1]+k*f[i-1]; if (( S[i-1]<=C[i-1]) AND (C[i-1]<=R[i-1] ) AND (C[i-1]-k*f[i-1])>=SV) S[i]= C[i-1]-k*f[i-1]; if ( C[i-1] >R[i-1] ) { R[i] = C[i-1]+k*f[i-1]; S[i]= C[i-1]-k*f[i-1]; RV=R[i]; SV=S[i]; } if ( C[i-1] R; Sell=CloseR,1,0); Vanz=IIf(Close