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

STAN WEINSTEIN'S STRATEGY - Halan Manoj Kumar

// THIS AFL INCORPORATES MOST OF THE CONCEPTS OF STAN WEINSTEINS TRADING METHODOLOGY. // USE ONLY WEEKLY CHART. // THIS AFL DOES NOT GUARANTEE ANY POSITIVE RETURNS. // USE THIS AFL AT YOUR OWN RISK // THIS AFL WAS DEVELOPED BY HALAN MANOJ KUMAR, MSC,CAIIB,FRM,PRM,CMA,ACMA. HOWEVER IN SOME CASES INDIVIDUAL CODE SNIPPETS ARE FROM DIFFERENT SOURCES AND I THANK THOSE DEVELOPERS. // ANY CONCEPTUAL QUERIES OR COMMENTS CAN BE MAILED TO scorpiomanoj73@gmail.com _SECTION_BEGIN("CHART"); SetChartOptions(0,chartShowArrows|chartShowDates); _N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%)", O, H, L, C, SelectedValue( ROC( C, 1 ) ) )); Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); _SECTION_END(); //RELATIVE STRENGTH // IF YOUR NIFTY TRADING SYMBOL IS DIFFERENT, PLEASE USE THAT INSTEAD OF ONE MENTIONED HERE. rsmaPeriod...

10K AFL FREE INTRADAY TRADING.afl

_SECTION_BEGIN("Price1"); SetChartOptions(0,chartShowArrows|chartShowDates); Plot( C, "Close", ParamColor("Color", colorRed ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); _SECTION_END(); //_SECTION_BEGIN("Pivot")     YH = TimeFrameGetPrice("H", inDaily, -1);        // yesterdays high     YL = TimeFrameGetPrice("L", inDaily, -1);        //                low     YC = TimeFrameGetPrice("C", inDaily, -1);        //                close     YO = TimeFrameGetPrice("O", inDaily);            // current day open     //Normal Pivot     PP = (YH + YL + YC) / 3;     R1 = (2 * PP) - YL;     R2 = PP + (YH - YL); ...

Wilders Most Succesful Intraday Intraday

PM1 = Param("MA1",7.5,1,1500,1); PM2 = Param("MA2",11,1,1500,1); M1 = Wilders(Close,PM1); M2 = Wilders(Close,PM2); A = Cross(M1,M2); B = Cross(M2,M1); Hor1=Param(" LEFT/RIGHT",1,1,1660,1); Ver1=Param(" UP DOWN",35,1,830,1); FS1=Param(" Font Size",15,11,100,1); GfxSelectFont("Tahoma", FS1, 200 ); GfxSetBkColor(colorBlack); GfxSetTextColor(colorGold); //GfxTextOut("EMA "+ PM1 + " "+ Prec(M1,2),Hor1,Ver1); GfxSetTextColor(colorGreen); //GfxTextOut("EMA "+ PM2 + " "+ Prec(M2,2),Hor1,Ver1+25); Plot(M1," EMA: "+pm1,ParamColor("FAST EMA COLOR",colorBrightGreen)); Plot(M2," EMA: "+pm2,ParamColor("SLOW EMA COLOR",colorRed)); PlotShapes(IIf(A,shapeUpArrow,shapeNone),colorBrightGreen,0,L,Offset= -30); PlotShapes(IIf(B,shapeDownArrow,shapeNone),colorRed,0,H,Offset = -30); Filter = (A == 1) OR (B == 1); AddColumn(A,"BUY/SELL",1,IIf(A,colorGreen,c...