//Manual Fibonacci Level by Sosrodiningrat @2107

procedure Plotfib(Val1,Val2,Val3,Val4,Val5,Val6)
{
	if(HighestVisibleValue(H)>=Val1 AND LowestVisibleValue(L)<=Val1)
   {
		Plot(IIf(BarIndex()>=IIf(Val5>=Val6,Val5,Val6)-28,Val1,Null),"",Val2,styleLine,0,0,15);
    	PlotText(Val3+"%("+val4+"%) - "+NumToStr(Val1,1.0),BarCount+16,Val1,Val2,colorBlack);
   }
}

SetBarsRequired(sbrAll,-1);

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

top=Param("High",42425,0,1e6,1);
bot=Param("Low",37825,0,1e6,1);
topbar=Param("HighBars",2811,1,1e6,1);
botbar=Param("LowBars",2824,1,1e6,1);

rangehl=top-bot;

Plotfib(top+0.618*rangehl,colorCustom11,"-61.8","161.8",topbar,botbar);
Plotfib(top+0.236*rangehl,colorCustom11,"-23.6","123.6",topbar,botbar);
Plotfib(top,colorPink,"0","100",topbar,botbar);
Plotfib(top-0.236*rangehl,colorCustom11,"23.6","76.4",topbar,botbar);
Plotfib(top-0.382*rangehl,colorCustom11,"38.2","61.8",topbar,botbar);
Plotfib(top-0.500*rangehl,colorBrightGreen,"50","50",topbar,botbar);
Plotfib(top-0.618*rangehl,colorCustom11,"61.8","38.2",topbar,botbar);
Plotfib(top-0.764*rangehl,colorCustom11,"76.4","23.6",topbar,botbar);
Plotfib(bot,colorPink,"100","0",topbar,botbar);
Plotfib(bot-0.236*rangehl,colorCustom11,"123.6","-23.6",topbar,botbar);
Plotfib(bot-0.618*rangehl,colorCustom11,"161.8","-61.8",topbar,botbar);

printf("\nBarIndex= "+BarIndex());
printf("\nHigh= "+High);
printf("\nLow= "+Low);

//====================================