Dead
Try This AFL, Change Time interval as you want from Intraday to daily / Weekly / Monthly View.
_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", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
_SECTION_BEGIN("pivots");
Titledisplay= ParamToggle("Display pivot stats","No|Yes",1);
//---- pivot points
DayH = TimeFrameGetPrice("H", inDaily, -1);// yesterdays high
DayL = TimeFrameGetPrice("L", inDaily, -1);//low
DayC = TimeFrameGetPrice("C", inDaily, -1);//close
DayO = TimeFrameGetPrice("O", inDaily);// current day open
HiDay = TimeFrameGetPrice("H", inDaily);
LoDay = TimeFrameGetPrice("L", inDaily);
PP = ( DayH+ DayL + DayC )/3;
R1 = (2*PP)-DayL;
S1 = (2*PP)-DayH;
R2 = PP + DayH - DayL;
S2 = PP - DayH + DayL;
R3 = DayH +(2*(PP-DayL));
S3 = DayL - (2*(DayH-PP));
style = styleLine | styleThick + styleNoRescale;
rcolor = colorGreen;
scolor = colorRed;
pcolor = colorWhite;
RangeTitle = EncodeColor(colorWhite) + "Range= " + EncodeColor(colorWhite) + StrToNum(NumToStr(round((HiDay - LoDay)), 4.4));
// High/Low of the Day plotting.
Hodcolorsheme=colorYellow;
LodColorscheme=colorOrange;
tempnum = TimeNum();
temphi[0] = H[0];
temphiColor[0] = Hodcolorsheme;
templo[0] = L[0];
temploColor[0] = LodColorscheme;
for( i = 1; i < BarCount; i++ )
{
if(tempnum - tempnum[i-1] > Interval())
{
if(H > temphi[i-1])
{
temphi = H;
temphiColor = Hodcolorsheme;
}
else
{
temphi = temphi[i-1];
temphiColor = Hodcolorsheme;
}
if(L < templo[i-1])
{
templo = L;
temploColor = LodColorscheme;