Skip to main content

SaravanI V5 EOD




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;

PlotOHLC(MYO,MYH,MYL,MYCC,"SARVANI.V5 ",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=V>Ref(MYV,-1) AND MYC>MYO AND Ref(MYC,-1)>Ref(MYO,-1) AND MYC>Ref(MYC,-1) AND MYL>Ref(MYL,-1) AND C>O AND EMA(MYC,2)>EMA(MYC,4);
Sell=MYL<Ref(LLV(MYL,4),-1);
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.V5***" +EncodeColor( colorRed )
+ " OPEN.... " + O + "... HIGH... " + H + "... LOW... " + L + " ...CLOSE.... "+ Close + "...VOLUME INC. %..." + ((V-EMA(V,3))/EMA(V,3))*100 + "\n";

/*
 *D
 * D Thank you.
*/
/*f*/

Comments

Popular posts from this blog

ST GAP BUY SELL

 _SECTION_BEGIN("st gap buy sell"); Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); SetBarsRequired(sbrAll,sbrAll); xx=BarIndex();x=xx;Lx=LastValue(x); rightStrength=Optimize("R_S",Param("R_S",3,1,50,1) ,1,50,1); leftStrength=Optimize("L_S",Param("L_S",3,1,50,1), 1,50,1); function pkID(rightStrength,leftStrength) { pk=H>Ref(HHV(H,leftStrength),-1) AND H>=Ref(HHV(H,rightStrength),rightStrength); return pk; } function trID(rightStrength,leftStrength) { tr=L<Ref(LLV(L,leftStrength),-1) AND L<=Ref(LLV(L,rightStrength),rightStrength); return tr; } pk=pkID(rightStrength,leftStrength); tr=trID(rightStrength,leftStrength); SetChartBkColor(ColorRGB(0,0,0));SetChartOptions(0 ,chartShowDates); SetBarFillColor(IIf(C>O,colorGreen,IIf(C<=O,colorRed,colorLightGrey))); pkHigh1=Ref(ValueWhen(pk,H,1),-(rightStreng...

TB 100.1.1 tsf tema linear

_SECTION_BEGIN("Magnified Market Price"); //by Vidyasagar, vkunisetty@yahoo.com// SetChartOptions(0,chartShowArrows|chartShowDates); FS=Param("Font Size",30,11,100,1); GfxSelectFont("Times New Roman", FS, 700, True ); GfxSetBkMode( colorWhite ); GfxSetTextColor( ParamColor("Color",colorWhite) ); Hor=Param("Horizontal Position",750,1,1200,1); Ver=Param("Vertical Position",7,1,830,1); GfxTextOut(""+C , Hor , Ver ); YC=TimeFrameGetPrice("C",inDaily,-1); DD=Prec(C-YC,2); xx=Prec((DD/YC)*100,2); GfxSelectFont("Times New Roman", 11, 700, True ); GfxSetBkMode( colorWhite ); GfxSetTextColor(ParamColor("Color",colorWhite) ); //GfxTextOut("Open - "+O+" High - "+H+" Low - "+L+" Close - "+C, Horr , Verr-14 ); //GraphXSpace = Param("Graph Space",500,-10,500,1); _SECTION_END(); _SECTION_BEGIN("Trend Blaster V1.2"); SetChartBkColor(...

QQE LINE

function QQELine( indiValue, deltaRSIValue, smoothPeriod ) { local prevVal, prevIndi, qqeValue, indi_sum; local indi_diff, higherCond, lowerCond, result; prevVal = prevIndi = 0; qqeValue = Null; indi_sum = indiValue + deltaRSIValue; indi_diff = indiValue - deltaRSIValue; for ( i = 1; i < BarCount; i++ ) { prevVal = qqeValue[i - 1]; prevIndi = indiValue[i - 1]; higherCond = prevIndi > prevVal AND indiValue[i] > prevVal; lowerCond = prevIndi < prevVal AND indiValue[i] < prevVal; qqeValue[i] = Iif( indiValue[i] == prevVal, prevVal, Iif( lowerCond, Min( prevVal, indi_sum[i] ), Iif( higherCond, Max( prevVal, indi_diff[i] ), Iif( indiValue[i] > prevVal, indi_diff[i], indi_sum[i] ) ) ) ); } result = EMA( qqeValue, smoothPeriod );// EL XAverage is EMA return result; } // Modified Exponential Moving Average function MEMA( Price, Period ) { local smoothing, result; smoothing = 1 / Max( 1, Period ); result = AMA( Pric...