Fibanocci coding experts Please help.

#1
In the fib-R formula when i select in the parameters "style Area" it is plotting the fib.levels as area only low to high. but, when i select "style Line" it is plotting correctly low to high as well as high to low lines. I wish to have "area style" for both high to low and low to high levels. Please help me.

here is the code:

_SECTION_BEGIN("Fib-R");

Plot(C,"",colorWhite,styleCandle);



// Get values for fib-R

StartBar=SelectedValue(BarIndex());
FinishBar = EndValue( BarIndex() );
i = startbar;
period = FinishBar - StartBar;

Lo =LLV(L,period);
Hi = HHV(H,period);
Line0 = 0;
Line1 = 0;
Line2 = 0;
Line3 = 0;
Line4= 0;
Line5=0;
Line100 = 0;

for( i = startbar; i < finishbar; i++ )
{
if(EndValue(C)<SelectedValue(C))
{
Line0 = EndValue(Lo);
Line100 = EndValue(Hi);
Line1 = Line0 + abs(Line100-Line0)*0.236;
Line2 = Line0 + abs(Line100-Line0)*0.382;
Line3 = Line0 + abs(Line100-Line0)*0.5;
Line4 = Line0 + abs(Line100-Line0)*0.618;
Line5 = Line0 + abs(Line100-Line0)*0.768;
}
else
{
Line100 = EndValue(Lo);
Line0 = EndValue(Hi);
Line1 =Line0 - abs(Line100-Line0)*0.236;
Line2 = Line0 - abs(Line100-Line0)*0.382;
Line3 = Line0 - abs(Line100-Line0)*0.5;
Line4 = Line0 - abs(Line100-Line0)*0.618;
Line5 = Line0 - abs(Line100-Line0)*0.768;
}
}

// external fib lines begining fom selecetdbarindex()
fib0= LineArray(startbar, Line0, finishbar, Line0, 0, 1);
fib100 = LineArray(startbar, Line100, finishbar, Line100, 0, 1);

// depth of middle lines
n= round((finishbar-startbar)/2);

// middle lines
fib1= LineArray((finishbar-n), Line1, finishbar, Line1, 0, 1);
fib2= LineArray((finishbar-n), Line2, finishbar, Line2, 0, 1);
fib3= LineArray((finishbar-n), Line3, finishbar, Line3, 0, 1);
fib4= LineArray((finishbar-n), Line4, finishbar, Line4, 0, 1);
fib5= LineArray((finishbar-n), Line5, finishbar, Line5, 0, 1);

Plot(fib0,"", colorDarkRed,styleThick );
Plot(fib100,"",colorDarkRed,styleThick);
Plot(fib1,"23.6%",ParamColor("23.6% Color",colorTan),ParamStyle("23.6% Style",styleArea, maskAll ));

Plot(fib2,"38.2%", ParamColor("38.2% Color",colorGrey40),ParamStyle("38.2% Style",styleArea, maskAll ));
Plot(fib4,"61.8%", ParamColor("61.8% Color",colorAqua),ParamStyle("61.8% Style",styleArea, maskAll ));

Plot(fib5,"76.8%", ParamColor("76.8% Color",colorSeaGreen),ParamStyle("76.8% Style",styleArea, maskAll ));







Title = Name() + " O: " + Open + ",
H: " + High + ", L: " + Low + ", C: " + Close;

GraphXSpace=Param("GraphXSpace",20,-100,200,1);



_SECTION_BEGIN("Background");

SetChartBkColor(ParamColor("Outer panel",colorBlack)); // color of outer border
SetChartBkGradientFill( ParamColor("Inner panel upper",colorTan),ParamColor("Inner panel lower",colorTan));
 

mastermind007

Well-Known Member
#2
In the fib-R formula when i select in the parameters "style Area" it is plotting the fib.levels as area only low to high. but, when i select "style Line" it is plotting correctly low to high as well as high to low lines. I wish to have "area style" for both high to low and low to high levels. Please help me.

here is the code:

_SECTION_BEGIN("Fib-R");

Plot(C,"",colorWhite,styleCandle);



// Get values for fib-R

StartBar=SelectedValue(BarIndex());
FinishBar = EndValue( BarIndex() );
i = startbar;
period = FinishBar - StartBar;

Lo =LLV(L,period);
Hi = HHV(H,period);
Line0 = 0;
Line1 = 0;
Line2 = 0;
Line3 = 0;
Line4= 0;
Line5=0;
Line100 = 0;

for( i = startbar; i < finishbar; i++ )
{
if(EndValue(C)<SelectedValue(C))
{
Line0 = EndValue(Lo);
Line100 = EndValue(Hi);
Line1 = Line0 + abs(Line100-Line0)*0.236;
Line2 = Line0 + abs(Line100-Line0)*0.382;
Line3 = Line0 + abs(Line100-Line0)*0.5;
Line4 = Line0 + abs(Line100-Line0)*0.618;
Line5 = Line0 + abs(Line100-Line0)*0.768;
}
else
{
Line100 = EndValue(Lo);
Line0 = EndValue(Hi);
Line1 =Line0 - abs(Line100-Line0)*0.236;
Line2 = Line0 - abs(Line100-Line0)*0.382;
Line3 = Line0 - abs(Line100-Line0)*0.5;
Line4 = Line0 - abs(Line100-Line0)*0.618;
Line5 = Line0 - abs(Line100-Line0)*0.768;
}
}

// external fib lines begining fom selecetdbarindex()
fib0= LineArray(startbar, Line0, finishbar, Line0, 0, 1);
fib100 = LineArray(startbar, Line100, finishbar, Line100, 0, 1);

// depth of middle lines
n= round((finishbar-startbar)/2);

// middle lines
fib1= LineArray((finishbar-n), Line1, finishbar, Line1, 0, 1);
fib2= LineArray((finishbar-n), Line2, finishbar, Line2, 0, 1);
fib3= LineArray((finishbar-n), Line3, finishbar, Line3, 0, 1);
fib4= LineArray((finishbar-n), Line4, finishbar, Line4, 0, 1);
fib5= LineArray((finishbar-n), Line5, finishbar, Line5, 0, 1);

Plot(fib0,"", colorDarkRed,styleThick );
Plot(fib100,"",colorDarkRed,styleThick);
Plot(fib1,"23.6%",ParamColor("23.6% Color",colorTan),ParamStyle("23.6% Style",styleArea, maskAll ));

Plot(fib2,"38.2%", ParamColor("38.2% Color",colorGrey40),ParamStyle("38.2% Style",styleArea, maskAll ));
Plot(fib4,"61.8%", ParamColor("61.8% Color",colorAqua),ParamStyle("61.8% Style",styleArea, maskAll ));

Plot(fib5,"76.8%", ParamColor("76.8% Color",colorSeaGreen),ParamStyle("76.8% Style",styleArea, maskAll ));







Title = Name() + " O: " + Open + ",
H: " + High + ", L: " + Low + ", C: " + Close;

GraphXSpace=Param("GraphXSpace",20,-100,200,1);



_SECTION_BEGIN("Background");

SetChartBkColor(ParamColor("Outer panel",colorBlack)); // color of outer border
SetChartBkGradientFill( ParamColor("Inner panel upper",colorTan),ParamColor("Inner panel lower",colorTan));

_SECTION_BEGIN("Fib-R");

Plot(C,"",colorBlack,styleCandle);



// Get values for fib-R

StartBar=SelectedValue(BarIndex());
FinishBar = EndValue( BarIndex() );
i = startbar;
period = FinishBar - StartBar;

Lo =LLV(L,period);
Hi = HHV(H,period);
Line0 = 0;
Line1 = 0;
Line2 = 0;
Line3 = 0;
Line4= 0;
Line5=0;
Line100 = 0;

for( i = startbar; i < finishbar; i++ )
{
if(EndValue(C)<SelectedValue(C))
{
Line0 = EndValue(Lo);
Line100 = EndValue(Hi);
Line1 = Line0 + abs(Line100-Line0)*0.236;
Line2 = Line0 + abs(Line100-Line0)*0.382;
Line3 = Line0 + abs(Line100-Line0)*0.5;
Line4 = Line0 + abs(Line100-Line0)*0.618;
Line5 = Line0 + abs(Line100-Line0)*0.768;
}
else
{
Line100 = EndValue(Lo);
Line0 = EndValue(Hi);
Line1 =Line0 - abs(Line100-Line0)*0.236;
Line2 = Line0 - abs(Line100-Line0)*0.382;
Line3 = Line0 - abs(Line100-Line0)*0.5;
Line4 = Line0 - abs(Line100-Line0)*0.618;
Line5 = Line0 - abs(Line100-Line0)*0.768;
}
}

// external fib lines begining fom selecetdbarindex()
fib0= LineArray(startbar, Line0, finishbar, Line0, 0, 1);
fib100 = LineArray(startbar, Line100, finishbar, Line100, 0, 1);

// depth of middle lines
n= round((finishbar-startbar)/2);

// middle lines
fib1= LineArray((finishbar-n), Line1, finishbar, Line1, 3, 1);
fib2= LineArray((finishbar-n), Line2, finishbar, Line2, 3, 1);
fib3= LineArray((finishbar-n), Line3, finishbar, Line3, 3, 1);
fib4= LineArray((finishbar-n), Line4, finishbar, Line4, 3, 1);
fib5= LineArray((finishbar-n), Line5, finishbar, Line5, 3, 1);

Plot(fib5,"76.8%", ParamColor("76.8% Color",colorSeaGreen),styleArea);
Plot(fib4,"61.8%", ParamColor("61.8% Color",colorAqua),styleArea);
Plot(fib2,"38.2%", ParamColor("38.2% Color",colorGrey40),styleArea);
Plot(fib1,"23.6%",ParamColor("23.6% Color",colorTan),styleArea);

Plot(fib100,"",colorDarkRed,styleThick);
Plot(fib0,"", colorDarkRed,styleThick );



Title = Name() + " O: " + Open + ",
H: " + High + ", L: " + Low + ", C: " + Close;

//GraphXSpace=Param("GraphXSpace",20,-100,200,1);



_SECTION_BEGIN("Background");

//SetChartBkColor(ParamColor("Outer panel",colorBlack)); // color of outer border
//SetChartBkGradientFill( ParamColor("Inner panel upper",colorTan),ParamColor("Inner panel lower",colorTan));
 

Similar threads