changes need for this AFL code

[bluesquare123]

Dear Coders .. given code in candle format ., i dont want basic candle stick so pls remove it and add HEIKENASHI candle for breakout trade and also pls make selecting number of candles in parameter ... each n every time i have to edit this code to give input to select which number of candle i need ...,, so pls code me accordingly so that i can select number of candle in parameter ELSE ADD TIME OF CANDLE SO THAT I CAN CHOOSE CANDLE BY ITS TIME IN PARAMETER ...


CODE :-


_SECTION_BEGIN("Price");
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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();




x=BarsSince(Day()!=Ref(Day(),-1))+1;
y=ValueWhen(x==9,H);

( THIS CANDLE NUMBER SELECTION Y & Z SHOULD BE IN PARAMETER SO THAT I CAN SELECT 9 th HA CANDLE OR 6th WHICH EVER I NEED IN PARAMETER SECTION
ELSE ADD TIME OF CANDLE SO THAT I CAN CHOOSE CANDLE BY ITS TIME IN PARAMETER ...)

z=ValueWhen(x==9,L);
Buy=x>9 AND Cross(H,y);
Short=x>9 AND Cross(z,L);


PlotOHLC ( O, H, L, C, "", IIf(C>O,colorBrightGreen,colorRed), styleCandle);
Plot( y, "", colorRed, styleLine | styleThick );
Plot( z, "", colorGreen, styleLine | styleThick );
il=L-0.05;
ih=H+0.05;

PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorBlue, 0, iL, Offset=-40);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorBlue, 0,iL, Offset=-50);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorLightBlue, 0,iL, Offset=-45);
PlotShapes(IIf(Short , shapeSquare, shapeNone),colorRed, 0, iH, Offset=40);
PlotShapes(IIf(Short , shapeSquare, shapeNone),colorRed, 0,iH, Offset=50);
PlotShapes(IIf(Short , shapeDownArrow, shapeNone),colorDarkRed, 0,iH, Offset=-45);

 

[bluesquare123]

ANY BODY PLS DO HELP ME ..

 

[rvlv]

hi bluesquare
i can remove normal candlesticks and add heikin ashi
for the other conditions you need help from experts
check it on 5 min chart
see the image on banknifty futures

===================================================


//https://www.traderji.com/community/threads/changes-need-for-this-afl-code.111245/
_SECTION_BEGIN("Price");
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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
//===========================================
HaClose = (O + H + L + C)/4;
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( H, Max( HaClose, HaOpen ) );
HaLow = Min( L, Min( HaClose, HaOpen ) );
xDiff = (HaHigh - Halow) * 10000;
barcolor = IIf(HaClose >= HaOpen,colorBRIGHTgreen,colorRed);
PlotOHLC( HaOpen, HaHigh, HaLow, HaClose, "", barcolor, styleCandle );



x=BarsSince(Day()!=Ref(Day(),-1))+1;
y=ValueWhen(x==9,H);

//( THIS CANDLE NUMBER SELECTION Y & Z SHOULD BE IN PARAMETER SO THAT I CAN SELECT 9 th HA CANDLE OR 6th WHICH EVER I NEED IN PARAMETER SECTION
//ELSE ADD TIME OF CANDLE SO THAT I CAN CHOOSE CANDLE BY ITS TIME IN PARAMETER ...)

z=ValueWhen(x==9,L);
Buy=x>9 AND Cross(H,y);
Short=x>9 AND Cross(z,L);


//PlotOHLC ( O, H, L, C, "", IIf(C>O,colorBrightGreen,colorRed), styleCandle);
Plot( y, "", colorRed, styleLine | styleThick );
Plot( z, "", colorGreen, styleLine | styleThick );
il=L-0.05;
ih=H+0.05;

PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorBlue, 0, iL, Offset=-40);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorBlue, 0,iL, Offset=-50);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorLightBlue, 0,iL, Offset=-45);
PlotShapes(IIf(Short , shapeSquare, shapeNone),colorRed, 0, iH, Offset=40);
PlotShapes(IIf(Short , shapeSquare, shapeNone),colorRed, 0,iH, Offset=50);
PlotShapes(IIf(Short , shapeDownArrow, shapeNone),colorDarkRed, 0,iH, Offset=-45);

 

[bluesquare123]

hi bluesquare
i can remove normal candlesticks and add heikin ashi
for the other conditions you need help from experts
check it on 5 min chart
see the image on banknifty futures
View attachment 47675
===================================================


//https://www.traderji.com/community/threads/changes-need-for-this-afl-code.111245/
_SECTION_BEGIN("Price");
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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
//===========================================
HaClose = (O + H + L + C)/4;
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( H, Max( HaClose, HaOpen ) );
HaLow = Min( L, Min( HaClose, HaOpen ) );
xDiff = (HaHigh - Halow) * 10000;
barcolor = IIf(HaClose >= HaOpen,colorBRIGHTgreen,colorRed);
PlotOHLC( HaOpen, HaHigh, HaLow, HaClose, "", barcolor, styleCandle );



x=BarsSince(Day()!=Ref(Day(),-1))+1;
y=ValueWhen(x==9,H);

//( THIS CANDLE NUMBER SELECTION Y & Z SHOULD BE IN PARAMETER SO THAT I CAN SELECT 9 th HA CANDLE OR 6th WHICH EVER I NEED IN PARAMETER SECTION
//ELSE ADD TIME OF CANDLE SO THAT I CAN CHOOSE CANDLE BY ITS TIME IN PARAMETER ...)

z=ValueWhen(x==9,L);
Buy=x>9 AND Cross(H,y);
Short=x>9 AND Cross(z,L);


//PlotOHLC ( O, H, L, C, "", IIf(C>O,colorBrightGreen,colorRed), styleCandle);
Plot( y, "", colorRed, styleLine | styleThick );
Plot( z, "", colorGreen, styleLine | styleThick );
il=L-0.05;
ih=H+0.05;

PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorBlue, 0, iL, Offset=-40);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorBlue, 0,iL, Offset=-50);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorLightBlue, 0,iL, Offset=-45);
PlotShapes(IIf(Short , shapeSquare, shapeNone),colorRed, 0, iH, Offset=40);
PlotShapes(IIf(Short , shapeSquare, shapeNone),colorRed, 0,iH, Offset=50);
PlotShapes(IIf(Short , shapeDownArrow, shapeNone),colorDarkRed, 0,iH, Offset=-45);

thanks a lot for ur kind help .... appreciate ur help sir ... thnx

 

[arjungill]

Dear Coders,

plz help in this volume oscillator afl.both lines are same colour.can the change of colour of the crossover line?one blue & the other one is red.

/* Volume Oscillator */
/* Indicator, system, and exploration */

PlusDM= IIf(High>Ref(High,-1) AND Low>=Ref(Low,-1), High-Ref(High,-1),
IIf(High>Ref(High,-1) AND Low<Ref(Low,-1)
AND High-Ref(High,-1)>Ref(Low,-1)-Low,
High-Ref(High,-1),0));

Vm=log(EMA(V,3));

Buy= (C-L)*Vm+ (H-O)*Vm +
IIf(C>O,(C-O)*Vm,0) + PlusDM*Vm +
IIf(Ref(C,-1)<O,(O-Ref(C,-1))*Vm,0);

MinDM = IIf(Low<Ref(Low,-1) AND High<=Ref(High,-1), Ref(Low,-1)-Low,
IIf(High>Ref(High,-1) AND Low<Ref(Low,-1)
AND High-Ref(High,-1)<Ref(Low,-1)-Low, Ref(Low,-1)-Low, 0));

Sell= (H-C)*Vm + (O-L)*Vm +
IIf(C<O,(O-C)*Vm,0) + MinDM*Vm +
IIf(Ref(C,-1)>O,(Ref(C,-1)-O)*Vm,0);

Wm=Wilders(Wilders(Buy,3)-Wilders(Sell,3),3);

Buy=Cross(Wm,0);
Sell=Cross(0,Wm);


Graph1=Wm;
/*Graph2=Wilders(Wm,30);*/
Graph2=MA(Wm,8);

Graph0=0;
Graph0Style=Graph1Style=Graph2Style=5;
Graph2Color=6;


Filter= (Buy==1) ;
NumColumns = 6;
Column0 =Ref(C+0.065,-1);
Column0Format = 1.2;
Column0Name = "Trigger Price";WriteVal(C+0.065);
Column1 = C;
Column1Name = "Close ";WriteVal(C);
Column1Format = 1.2;
Column2 = MA(V,17);
Column2Name = "17 Ma Vol ";WriteVal(MA(V,17) );
Column2Format = 1.0;
Column3 = MA(C,17)/MA(C,50);
Column3Name = "% 17/50 ";WriteVal( MA(C,17)/MA(C,50) );
Column3Format = 1.2;
Column3Format = 1.2;
Column4= MA(C,17);
Column4Name="17 C ma"; WriteVal( MA(C,17) );
Column4Format = 1.2;
Column4= MA(C,50);
Column4Name="50 C ma"; WriteVal( MA(C,50) );
Column4Format = 1.2;
Column5=Wm;
Column5Name="Vol Osc"; WriteVal(Wm);
Column5Format=1.2;

/* End of Exploration Code. */