```
SetChartBkColor(colorLightGrey);
//SetChartBkGradientFill(colorLightGrey, colorDarkGrey);
_SECTION_BEGIN("MA");
Len = IIf(Interval() > 300, 30, 60);
Disp = WriteIf(Interval() > 300, "MA30", "MA60");
Av = MA(C, Len);
ColorShow = IIf(Av > Ref(Av,-1) AND C > Av, colorGreen, IIf(Av < Ref(Av,-1) AND C < Av, colorRed, colorBlue));
Plot(Av, Disp, ColorShow ,styleLine+styleDots,styleThick,styleDots);
_SECTION_END();
ToolTip = "High = " + H + "\nOpen = " + O + "\nRange = " + (High-Low) +"\nTRUERange = " + (C-O) +"\nMID ="+((High+Low)/2)+ "\nClose = " + C + "\nLow = " + L;
_SECTION_BEGIN("BW Fractal");
UpFractal= ValueWhen(
(Ref(H,-2) > Ref(H, -4)) AND
(Ref(H,-2) > Ref(H, -3)) AND
(Ref(H,-2) > Ref(H, -1)) AND
(Ref(H,-2) > H), Ref(H,-2));
DownFractal= ValueWhen(
(Ref(L,-2) <= Ref(L, -4)) AND
(Ref(L,-2) <= Ref(L, -3)) AND
(Ref(L,-2) <= Ref(L, -1)) AND
(Ref(L,-2) <= L), Ref(L,-2));
//== Added Crash crashandburn59 [at] hotmail.com solution
Plot(Ref(UpFractal,2), "Up Fractal", ParamColor("Up Fractal Color",colorRed),
ParamStyle("Up Fractal Style", styleDashed));
Plot(Ref(DownFractal,2), "Down Fractal",ParamColor("Down Fractal
Color",colorBlue), ParamStyle("Down Fractal Style", styleDashed));
//Plot(Max(HHV(H,3),Ref(UpFractal,2)), "Up Fractal", ParamColor("Up Fractal Color",colorRed), ParamStyle("Up Fractal Style", styleDashed));
//Plot(Max(HHV(H,3),Ref(UpFractal,2)), "Down Fractal",ParamColor("Down FractalColor",colorBlue), ParamStyle("Down Fractal Style", styleDashed));
_SECTION_END();
Plot(C,"",colorWhite,styleCandle);
Res =
(H>Ref(H,-1) AND H>Ref(H,-2) AND H>Ref(H,1) AND H>Ref(H,2)) OR
(H>Ref(H,-1) AND H>Ref(H,-2) AND H==Ref(H,1) AND H>Ref(H,2) AND H>Ref(H,3)) OR
(H>Ref(H,-1) AND H>Ref(H,-2) AND H>Ref(H,1) AND H==Ref(H,2) AND H>Ref(H,3)) OR
(H>Ref(H,-1) AND H>Ref(H,-2) AND H==Ref(H,1) AND H==Ref(H,2) AND H>Ref(H,3) AND H>Ref(H,4)) OR
(H>Ref(H,-1) AND H>Ref(H,-2) AND H==Ref(H,1) AND H>Ref(H,2) AND H==Ref(H,3) AND H>Ref(H,4)) OR
(H>Ref(H,-1) AND H>Ref(H,-2) AND H>Ref(H,1) AND H==Ref(H,2) AND H==Ref(H,3) AND H>Ref(H,4));
Resistance = ValueWhen(Res,H,1);
Sup =
(L<Ref(L,-1) AND L<Ref(L,-2) AND L<Ref(L,1) AND L<Ref(L,2)) OR
(L<Ref(L,-1) AND L<Ref(L,-2) AND L==Ref(L,1) AND L<Ref(L,2) AND L<Ref(L,3)) OR
(L<Ref(L,-1) AND L<Ref(L,-2) AND L<Ref(L,1) AND L==Ref(L,2) AND L<Ref(L,3)) OR
(L<Ref(L,-1) AND L<Ref(L,-2) AND L==Ref(L,1) AND L==Ref(L,2) AND L<Ref(L,3) AND L<Ref(L,4)) OR
(L<Ref(L,-1) AND L<Ref(L,-2) AND L==Ref(L,1) AND L<Ref(L,2) AND L==Ref(L,3) AND L<Ref(L,4)) OR
(L<Ref(L,-1) AND L<Ref(L,-2) AND L<Ref(L,1) AND L==Ref(L,2) AND L==Ref(L,3) AND L<Ref(L,4));
Support = ValueWhen(Sup,L,1);
AlligatorMode = ParamToggle("Alligator Anatomy 101", "Book and Course|Software",1);
smooth=(H+L)/2;
smooth5=MA(smooth,5);
smooth34=MA(smooth,34);
AlligatorNose=MA(C,5);
AlligatorLips=IIf(AlligatorMode,Ref(EMA(smooth,9),-3),Ref(MA(smooth,5),-3));
AlligatorTeeth=IIf(AlligatorMode,Ref(EMA(smooth,15 ),-5),Ref(MA(smooth,8),-5));
AlligatorJaw=IIf(AlligatorMode,Ref(EMA(smooth,25),-8),Ref(MA(smooth,13),-8));
AlligatorColor=IIf(AlligatorLips > AlligatorJaw, colorDarkGreen, colorDarkRed);
Plot(AlligatorLips, "Lips", colorGreen,styleThick);
Plot(AlligatorTeeth,"Teeth", colorRed,styleThick);
Plot(AlligatorJaw, "Jaw", colorBlue,styleThick);
_SECTION_BEGIN("Title");
Title = "";
HoD = TimeFrameGetPrice("H",inDaily);
LoD = TimeFrameGetPrice("L",inDaily);
Rng = HoD - LoD;
Mid = LoD + Rng/2;
//Draw the Panel Box
GfxSelectPen( colorBlack,1 );
GfxMoveTo(2,2);
GfxLineTo(2,30);
GfxLineTo(1044,30);
GfxLineTo(1044,2);
GfxLineTo(2,2);
GfxMoveTo(140,2);
GfxLineTo(140,30);
GfxMoveTo(430,2);
GfxLineTo(430,30);
GfxMoveTo(530,2);
GfxLineTo(530,30);
GfxSelectFont("Comic Sans MS Bold", 9, 800);
GfxSetTextColor(colorBlack);
GfxDrawText(Name(), 10, 3, 77, 20,0);
GfxDrawText(NumToStr(Interval()/60,2.0) + " Min", 82, 3, 140, 20,0);
GfxSelectFont("Comic Sans MS Bold", 7, 800);
GfxDrawText(Date(), 10, 18, 140, 30,0);
GfxSelectFont("Comic Sans MS Bold", 10, 800);
GfxSetTextColor(colorBlue);
GfxDrawText(" HoD:" + NumToStr(HoD,3.0), 148, 7, 240, 30,0);
GfxSetTextColor(colorRed);
GfxDrawText(" LoD:" + NumToStr(LoD,3.0), 242, 7, 340, 30,0);
GfxSetTextColor(colorBlack);
GfxDrawText(" Mid:" + NumToStr(Mid,3.0), 342, 7, 500, 30,0);
GfxDrawText(" Range:" + NumToStr(Rng,3.0), 437, 7, 620, 30,0);
GfxDrawText("Open: " + NumToStr(O,3.0), 537, 7, 740, 30,0);
GfxSetTextColor(colorBlue);
GfxDrawText("Hi: " + NumToStr(H,3.0), 647, 7, 740, 30,0);
GfxSetTextColor(colorRed);
GfxDrawText("Lo: " + NumToStr(L,3.0), 740, 7, 860, 30,0);
GfxSetTextColor(colorBlack);
GfxDrawText("Close: " + NumToStr(C,3.0), 840, 7, 980, 30,0);
GfxSetTextColor(colorBlack);
GfxDrawText("Volume: " + NumToStr(V,3.0), 940, 7, 1080, 30,0);
_SECTION_END();
GfxSetOverlayMode(1);
GfxSelectFont("Comic Sans MS Bold", Status("pxheight")/15 );
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( ColorRGB( 160, 160, 160 ) );
GfxSetTextColor( ColorHSB( 160, 0, 151 ) );
GfxSetBkMode(0); // transparent
GfxTextOut( "-DO ONLY WHAT THE SYSTEM SAYS-", Status("pxwidth")/2, Status("pxheight")/3 );
```