mixing codes

_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("Moving Average");

x=Param("EMA 1",20,1,200,1);
y=Param("EMA 2", 50,1,200,1);
z=Param("EMA 3",100,1,200,1);
zz=Param("EMA 4",200,1,200,1);
EMA20= EMA(C,x);
EMA50=EMA(C,y);
EMA100= EMA(C,z);
EMA200=EMA(C,zz);

Plot (EMA (C,x), "EMA 20", ParamColor("EMA20",colorRed), styleDots+styleThick+styleNoLine+styleNoLabel,maskAll);
Plot (EMA (C,y), "EMA 50", ParamColor("EMA50",colorBlue), styleDots+styleThick+styleNoLine+styleNoLabel,maskAll);
Plot (EMA (C,z), "EMA 100", ParamColor("EMA100",colorGold), styleDots+styleThick+styleNoLine+styleNoLabel,maskAll);
Plot (EMA (C,zz), "EMA 200", ParamColor("EMA200",colorDarkGrey), styleDots+styleThick+styleNoLine+styleNoLabel,maskAll);

SUT=EMA(C,5)>EMA20;
SDT=EMA20>EMA(C,5);
mut= EMA20>EMA50;
mdt=EMA20<EMA50;
_SECTION_END();
_SECTION_BEGIN("Mid Term Price Trend");


MPT = IIf( mut, colorGreen, IIf( mdt, colorRed, colorYellow));
Plot( 3, "", MPT, styleArea|styleOwnScale|styleNoLabel, 0, 100);

_SECTION_END();

_SECTION_BEGIN("Short Term Price Trend");

SPT = IIf( EMA(C,5)>EMA20, colorBrightGreen, IIf( EMA20>EMA(C,5), colorPink, colorYellow));
Plot( 6, "", SPT, styleArea|styleOwnScale|styleNoLabel, 0, 100);

_SECTION_END();