// Downloaded From https://www.WiseStockTrader.com
MYPERIOD=Param("MYPERIOD",5,5,10,1);
MYO=EMA(O,MYPERIOD);
MYH=EMA(H,MYPERIOD);
MYL=EMA(L,MYPERIOD);
MYC=EMA(C,MYPERIOD)*OBV()/Ref(OBV(),-1);
MYCC=EMA(C,MYPERIOD);
MYV=EMA(V,MYPERIOD);
MYAVG=(MYO+MYH+MYL+MYC)/4;
MYPIVOT=(MYH+MYL+MYC)/3;


PlotOHLC(MYO,MYH,MYL,MYCC,"SARVANI.V6 ",IIf((V>Ref(MYV,-1) AND MYC>MYO),colorGreen,IIf(MYC<MYO,colorRed,colorTeal)),styleCandle);
PlotPR=Param("plotperiod",6,5,10,1);
Plot(EMA(MYH,PlotPR),"",colorGreen,styleLine,0,0);
Plot(EMA(MYL,PlotPR),"",colorRed,styleLine,0,0);
RESIS=Param("MAJOR RESISTANCE",60,30,80,1);
Plot(EMA(MYC,RESIS),"",colorBlack,styleLine,0,0);

Buy=Ref( ADX(),-1)>20 AND PDI()>MDI() AND MYC>2*Ref(MYPIVOT,-1)-Ref(MYL,-1);
Sell=Cross(MDI(),PDI());
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);




PlotShapes(Buy*shapeUpArrow,colorGreen,Layer=0,yposition=MYL,Offset=-50);
PlotShapes(Sell*shapeDownArrow,colorRed,Layer=0,yposition=MYH,Offset=-30);


IND=Cross(MACD(),Signal());
PlotShapes(IND*shapeSmallSquare,colorBlack,0,yposition=L,Offset=-30);
IND1=Cross(Signal(),MACD());
PlotShapes(IND1*shapeSmallSquare,colorOrange,0,Yposition=H,Offset=60);



Title = Name() + " " + Date()+" " + EncodeColor( colorBlue ) +"**SARVANI.V6***" +EncodeColor( colorRed )
+ " OPEN.... " + O + "... HIGH... " + H + "... LOW... " + L + " ...CLOSE.... "+ Close + "...VOLUME INC. %..." + ((V-EMA(V,3))/EMA(V,3))*100 + "\n";