// Downloaded From https://www.WiseStockTrader.com
//------------------------------------------------------------------------------
//	Formula Name:   DhaN System
//  	Author/Uploader:Dharmin Naik 
//  	E-mail:		Dham4naik@yahoo.com
//------------------------------------------------------------------------------

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() ); 


MAp	=	Param( "MAp", 9, 1, 100 );
MAp2	=	Param( "MAp2", 60, 1, 100 );

DMIp	=	Param( "DMIp", 19, 1, 100 );
RSIp	=	Param( "RSIp", 9, 1, 100 );
CCIp	=	Param( "CCIp", 43, 1, 100 );


Buy1	=	C> MA(C,MAp) 
		AND C> EMA(C,MAp2)
		AND	PDI(DMIp) > MDI(DMIp) 
		AND	RSI(RSIp) > 50 
		AND	CCI(CCIp) > 0;

Sell1	=	C< MA(C,MAp) 
		AND C< EMA(C,MAp2)
		AND PDI(DMIp) < MDI(DMIp) 
		AND	 RSI(RSIp) < 50 
		AND	 CCI(CCIp) < 0;


Buy	=  Cross( Buy1, Sell1 );
Sell	=  Cross( Sell1, Buy1 ) ;




PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorBlue, 0,L, Offset=-20); 
PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorBrown, 0,H, Offset=-20);