Вопрос по MetaEditor :Нужна помощь по цифровому инд-ру KGBP переделать для МТ4

[Forex Trader]

          /*[[
Name :=KGBP0
Author := Goodman&Keny
Link := [e-mail] [e-mail]
Separate Window := No
First Color := Blue
First Draw Type := Line
First Symbol := 217
Use Second Data := No
Second Color := Red
Second Draw Type := Line
Second Symbol := 218
]]*/
//Цифровой полосовой пропускающий фильтр от Kenny и Goodman
//Параметры:
//Период: от 24 до 36
//Период отсечки переходного процесса: 13
//Биения в полосе пропускания: 0.075
//Затухание в полосе задержки: -40
//Задержка: 0
Variables : shift(0),j(0),digf(0),AccountedBars(0),FirstTime(True);
Inputs: CountBars(300);

SetLoopCount(0);
If FirstTime Then Begin
	AccountedBars=CountBars;
	FirstTime=False;
End;
For  shift = AccountedBars DownTo 0 Begin
digf=
0.188602963189906*close[shift+0]
+0.184691686168592*close[shift+1]
+0.171272761625253*close[shift+2]
+0.151650019168793*close[shift+3]
+0.125559327279287*close[shift+4]
+0.0973776269706606*close[shift+5]
+0.0674471809192548*close[shift+6]
+0.0401846614534144*close[shift+7]
+0.0155302566652461*close[shift+8]
-0.00300293371773087*close[shift+9]
-0.0166744428467212*close[shift+10]
-0.0232930092230732*close[shift+11]
-0.0254172664514428*close[shift+12]
-0.022017866189895*close[shift+13]
-0.0164668815438118*close[shift+14]
-0.00821834021499362*close[shift+15]
-0.000680986996945436*close[shift+16]
+0.00694634113270807*close[shift+17]
+0.0118384128422366*close[shift+18]
+0.0154913678975648*close[shift+19]
+0.0159091587882043*close[shift+20]
+0.0152562183883687*close[shift+21]
+0.0121500144942292*close[shift+22]
+0.0090754060984454*close[shift+23]
+0.00482838219889845*close[shift+24]
+0.00178579837560632*close[shift+25]
-0.00143592061745608*close[shift+26]
-0.00284343876052252*close[shift+27]
-0.00413492219376702*close[shift+28]
-0.00371007603053478*close[shift+29]
-0.0077014988697736*close[shift+30];

SetIndexValue(shift, digf);
If shift>0 Then AccountedBars=AccountedBars-1;
End;

[Forex Trader]

//+------------------------------------------------------------------+
//|                                                        KGBP0.mq4 |
//|                             Goodman&Keny ( thanks to komposter ) |
//|        [e-mail] [e-mail] [e-mail] |
//+------------------------------------------------------------------+
#property copyright "Goodman&Keny ( thanks to komposter )"
#property link      "[e-mail] [e-mail] [e-mail]"
//Цифровой полосовой пропускающий фильтр от Kenny и Goodman
//Параметры:
//Период: от 24 до 36
//Период отсечки переходного процесса: 13
//Биения в полосе пропускания: 0.075
//Затухание в полосе задержки: -40
//Задержка: 0
#property indicator_chart_window
#property indicator_buffers 1
#property indicator_color1 Blue


extern int CountBars = 300;

double buf1[];

int init()
{
	IndicatorShortName( "KGBP0 (" + CountBars + ")   -   " );
	SetIndexBuffer( 0 , buf1 );
	SetIndexStyle ( 0 , DRAW_LINE );
	SetIndexLabel( 0 , "KGBP0" );
	SetIndexEmptyValue( 0, 0 );
return(0);
}
int deinit()
{
return(0);
}
int start()
{
   if ( Bars <= CountBars ) { return(0); }
	int counted_bars = IndicatorCounted();
	if ( counted_bars < 0 ) return(-1);
	if ( counted_bars > 0 ) counted_bars -- ;

   int limit = CountBars;
   if ( counted_bars > 0 ) { limit = CountBars - counted_bars - 1; }

	for ( int i = limit; i >= 0; i -- )
	{
		buf1[i] =
		0.188602963189906*Close[i+0]
		+0.184691686168592*Close[i+1]
		+0.171272761625253*Close[i+2]
		+0.151650019168793*Close[i+3]
		+0.125559327279287*Close[i+4]
		+0.0973776269706606*Close[i+5]
		+0.0674471809192548*Close[i+6]
		+0.0401846614534144*Close[i+7]
		+0.0155302566652461*Close[i+8]
		-0.00300293371773087*Close[i+9]
		-0.0166744428467212*Close[i+10]
		-0.0232930092230732*Close[i+11]
		-0.0254172664514428*Close[i+12]
		-0.022017866189895*Close[i+13]
		-0.0164668815438118*Close[i+14]
		-0.00821834021499362*Close[i+15]
		-0.000680986996945436*Close[i+16]
		+0.00694634113270807*Close[i+17]
		+0.0118384128422366*Close[i+18]
		+0.0154913678975648*Close[i+19]
		+0.0159091587882043*Close[i+20]
		+0.0152562183883687*Close[i+21]
		+0.0121500144942292*Close[i+22]
		+0.0090754060984454*Close[i+23]
		+0.00482838219889845*Close[i+24]
		+0.00178579837560632*Close[i+25]
		-0.00143592061745608*Close[i+26]
		-0.00284343876052252*Close[i+27]
		-0.00413492219376702*Close[i+28]
		-0.00371007603053478*Close[i+29]
		-0.0077014988697736*Close[i+30];

	}
return(0);
}