at a time 3 price candle change

_SECTION_BEGIN("Chart Settings");
	SetChartOptions(0,chartShowArrows|chartShowDates);
	SetChartBkColor(ParamColor("Outer Panel",colorPaleBlue));
	SetChartBkGradientFill(ParamColor("Upper Chart",colorDarkGrey),ParamColor("Lower Chart",colorDarkGrey));
	GraphXSpace=Param("GraphXSpace",10,0,100,1);
	dec = (Param("Decimals",2,0,7,1)/10)+1;
	bi = BarIndex();
	Lbi = LastValue(BarIndex());
	sbi = SelectedValue(bi);
	x1= BarCount-1;
	Title = EncodeColor(55)+ Title = Name() + " " + EncodeColor(32) + Date() +
	" " + EncodeColor(5) + "{{INTERVAL}} " +
	EncodeColor(55)+ " Open = "+ EncodeColor(52)+ WriteVal(O,dec) +
	EncodeColor(55)+ " High = "+ EncodeColor(5) + WriteVal(H,dec) +
	EncodeColor(55)+ " Low = "+ EncodeColor(32)+ WriteVal(L,dec) +
	EncodeColor(55)+ " Close = "+ EncodeColor(52)+ WriteVal(C,dec)+
	EncodeColor(55)+ " Volume = "+ EncodeColor(52)+ WriteVal(V,1);


	SetChartOptions(2,chartShowArrows|chartShowDates|chartWrapTitle);
	SetChartOptions(0,chartShowArrows|chartShowDates);


	//GfxGradientRect( 180, 30, 1759, 735, ColorRGB(40,40,40), ColorRGB(0,0,40) );
	GfxSetOverlayMode(1);
	//GfxSelectPen( ColorRGB(150,0,0), 1 );
	GfxSelectSolidBrush( ColorRGB(0,0,40) );
	//GfxRectangle=( 0,750, 1807, 35 );

	//GfxSelectPen( ColorRGB(150,0,0), 2 );
	GfxSelectSolidBrush( ColorRGB(65,65,65) );
	//GfxPolygon(250,200,200,250,250,20,200,50);

	//GfxSelectPen( ColorRGB(125,0,0), 1 );
	//GfxSelectSolidBrush( ColorRGB(0,0,40) );
	//GfxRectangle( 10,100, 190, 160 );

	//GfxSelectPen=( ColorRGB(0,0,0) ,1 );
	GfxSelectSolidBrush( ColorRGB(0,0,0) );
	//GfxSetTextAlign( 250 );// center alignment

	GfxSetOverlayMode(1);
	//GfxSelectFont=("Times New Roman", 30, 400, True );
	GfxSetTextColor( ColorRGB( 105, 105, 105 ) );
	GfxSetBkMode(0); // transparent
	//GfxTextOut=("Pathfinder", 15 , 35 );

_SECTION_END();
_SECTION_BEGIN("Flower");
	si=Param("Zoom/In Out",5,-50,100,1);
	GraphXSpace=si;

	r1 = Param( "ColorFast avg", 5, 2, 200, 1 );
	r2 = Param( "ColorSlow avg", 10, 2, 200, 1 );
	r3 = Param( "ColorSignal avg", 5, 2, 200, 1 );

	m1=MACD(r1,r2);
	s1=Signal(r1,r2,r3);
	mycolor=IIf(m1<0 AND m1>s1, ColorRGB(155,155,155),IIf(m1>0 AND m1>s1,ColorRGB(0,125,0),IIf(m1>0 AND m1<s1,ColorRGB(180,30,160),ColorRGB(100,0,0))));

	Prd1=Param("ATR Period",4,1,20,1);
	Prd2=Param("Look Back",7,1,20,1);
	green = HHV(LLV(L,Prd1)+ATR(Prd1),Prd2);
	red = LLV(HHV(H,Prd1)-ATR(Prd1),Prd2);
	flowerClose = EMA((Open+High+Low+Close)/4,3) ;
	flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);
	Temp = Max(High, flowerOpen);
	flowerHigh = EMA(Max(Temp, flowerClose),3);
	Temp = Min(Low,flowerOpen);
	flowerLow = EMA(Min(Temp, flowerClose),3);
	barColor=IIf(Close>Open,ColorRGB(0,245,0),ColorRGB(255,0,0));

	Ctmpl = E_TSKPCOLORTMPL(Open,High,Low,Close,Volume);
	total = 0;
	total = total + IIf(tskp_colortmplcnd0 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd1 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd2 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd3 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd4 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd5 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd6 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd7 > 0, 1, -1);
	total = total + IIf(tskp_colortmplcnd8 > 0, 1, -1);


	HaOpen =IIf(flowerOpen<flowerClose, flowerOpen, flowerClose) ;
	HaClose =  IIf(flowerOpen<flowerClose, flowerClose, flowerOpen);
	HaHigh = flowerHigh;
	HaLow = flowerLow ;

	for( i = 0; i < BarCount; i++ )
	{

	if( total[i] >= 5 )
	Color[i] = colorLime;
	else if( total[i] <= -5 )
	Color[i] = colorRed;
	else
	Color[i] = colorWhite;
	}

	Candle=ParamList("Candle","Modified Candlestick,Modified Heikin Ashi,Normal Candlestick",1);
	if(Candle=="Modified Candlestick")
	{
	ColorHighliter = myColor;
	SetBarFillColor( ColorHighliter );
	Plot (Close,"- Modified Candlestick", Color,ParamStyle( "Style", styleCandle|styleLine | styleThick, maskAll));
	}
	if(Candle=="Modified Heikin Ashi")
	{
	ColorHighliter = myColor;
	SetBarFillColor( ColorHighliter );

	PlotOHLC( HaOpen,HaHigh,HaLow,HaClose, "Modified Heikin Ashi", Color, styleCandle|styleLine);
	}
	if(Candle=="Normal Candlestick")
	{
	//ColorHighliter = myColor;
	//SetBarFillColor( ColorHighliter );
	PlotOHLC(O,H,L,C,"Normal Candlestick",barcolor,styleCandle|styleLine);
	}


_SECTION_END();
_SECTION_BEGIN("CMP");
GfxSelectFont("arial", 13, 700 ); GfxSetBkMode( colorWhite );
GfxSetTextColor( ParamColor("Color",colorWhite) );
Hor=Param("Horizontal Position",120,10,1200,1);
Ver=Param("Vertical Position",185,100,50,50);
GfxTextOut(""+C,Hor , Ver );


_SECTION_END();

/*
   Bill William's Trading Chaos: Second Edition, Alligator.
   Written by EStromholt   September 26, 2010
*/

//This is an accurate Alligator indicator based on the Mid price and smoothed as Bill Williams specifies.
//This Alligator is also projected into the future as Williams prefers.



_SECTION_BEGIN("bwGator");

MedianPrice = (H+L)/2;

Jaw     = Wilders(MedianPrice,13);
Teeth   = Wilders(MedianPrice, 8);
Lips    = Wilders(MedianPrice, 5);

Plot(Jaw,  "Jaw", colorBlue, styleThick, Null, Null, 8);
Plot(Teeth,"Teeth", colorRed, styleThick, Null, Null, 5);
Plot(Lips, "Lips", colorGreen, styleThick, Null, Null, 3);