Исходный код · ID 4048

Candles Tabajara

candlestabajara.mq5

Похожие материалы по тегам

#__slope direction line.mq5MQL5 / MetaTrader 5 · 1 общих тегов range breakout @meowforex1.pineTradingView · 1 общих тегов #1.mtf_collider_h4_close_13_v18bar.mq4MQL4 / MetaTrader 4 · 1 общих тегов !mth_fasttmaline_edit3.mq4MQL4 / MetaTrader 4 · 1 общих тегов !mth_fasttmaline_edit2.mq4MQL4 / MetaTrader 4 · 1 общих тегов !mth_fasttmaline_edit.mq4MQL4 / MetaTrader 4 · 1 общих тегов

Вы автор или правообладатель?

Сообщите нам, если считаете, что материал размещён без разрешения.

Краткий обзор

О программе

Candles Tabajara — это пользовательский индикатор для MetaTrader 5, который визуализирует свечной анализ на основе сравнения цен с движущимися средними. Индикатор рисует свечи трёх цветов (зелёные, красные, жёлтые), отражая направление тренда и состояние боковика относительно рассчитанных скользящих средних.

В основе работы лежат несколько семейств скользящих средних: MA20 (в вариантах flat, long, short) и MA200, рассчитываемые для шести временных горизонтов (от 1M до 6M). Каждый горизонт использует агрегированные данные за несколько баров для формирования усреднённых значений.

Индикатор использует 25 буферов для отрисовки в отдельном окне: цветные гистограммы свечей и линии скользящих средних. Параметр periods задаёт глубину расчёта. Индикатор не содержит торговой логики и работает исключительно как аналитический инструмент визуализации.

Настройки программы

Настройка	Описание
periods	Количество баров, используемых для расчёта скользящих средних и определения диапазона анализа индикатора.

Получить полный код

#property description "Candles Tabajara"
#property indicator_separate_window
#property indicator_buffers 25

color bg;

double         GREEN_HIGH[];
double         GREEN_OPEN[];
double         GREEN_CLOSE[];
double         GREEN_LOW[];
double         RED_HIGH[];
double         RED_OPEN[];
double         RED_CLOSE[];
double         RED_LOW[];
double         YELLOW_HIGH[];
double         YELLOW_OPEN[];
double         YELLOW_CLOSE[];
double         YELLOW_LOW[];

double         GREENc_HIGH[];
double         GREENc_OPEN[];
double         GREENc_CLOSE[];
double         GREENc_LOW[];
double         REDc_HIGH[];
double         REDc_OPEN[];
double         REDc_CLOSE[];
double         REDc_LOW[];

double ma20flat[];
double ma20long[];
double ma20short[];

double ma200[];

double ma[];

static string PatternText[200];

extern int periods = 40;

int OnInit()
  {
      // код доступен только после оплаты
   }

int deinit() {
   ObjectsDeleteAll(0, OBJ_TEXT);
   return(0);
}

int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
  {
      // код доступен только после оплаты
   }
   double OPEN,HIGH,LOW,CLOSE,CLOSEANT;

   for(int i=Bars-1;i>=0;i--) 
   {
      GREEN_OPEN[i]=GREEN_HIGH[i]=GREEN_LOW[i]=GREEN_CLOSE[i]=EMPTY_VALUE;
      RED_OPEN[i]=RED_HIGH[i]=RED_LOW[i]=RED_CLOSE[i]=EMPTY_VALUE;
      YELLOW_OPEN[i]=YELLOW_HIGH[i]=YELLOW_LOW[i]=YELLOW_CLOSE[i]=EMPTY_VALUE;
      GREENc_OPEN[i]=GREENc_HIGH[i]=GREENc_LOW[i]=GREENc_CLOSE[i]=EMPTY_VALUE;
      REDc_OPEN[i]=REDc_HIGH[i]=REDc_LOW[i]=REDc_CLOSE[i]=EMPTY_VALUE;
      ma20flat[i]=EMPTY_VALUE;
      ma20short[i]=EMPTY_VALUE;
      ma20long[i]=EMPTY_VALUE;
      ma200[i]=EMPTY_VALUE;
      ma[i]=EMPTY_VALUE;
   }

for(i = 0; i<periods; i++)
{
ma[i]=(iClose(NULL,0,i)+iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19))/20;
ma[i+1]=(iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19)+iClose(NULL,0,i+20))/20;
if(ma[i]>ma[i+1] && iClose(NULL,0,i)>ma[i])
{ma20long[i]=(iClose(NULL,0,i)+iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19))/20;
ma20long[i+1]=(iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19)+iClose(NULL,0,i+20))/20;}
else if(ma[i]<ma[i+1] && iClose(NULL,0,i)<ma[i])
{ma20short[i]=(iClose(NULL,0,i)+iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19))/20;
ma20short[i+1]=(iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19)+iClose(NULL,0,i+20))/20;}
else
{ma20flat[i]=(iClose(NULL,0,i)+iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19))/20;
ma20flat[i+1]=(iClose(NULL,0,i+1)+iClose(NULL,0,i+2)+iClose(NULL,0,i+3)+iClose(NULL,0,i+4)+iClose(NULL,0,i+5)+iClose(NULL,0,i+6)+iClose(NULL,0,i+7)+iClose(NULL,0,i+8)+iClose(NULL,0,i+9)+iClose(NULL,0,i+10)+iClose(NULL,0,i+11)+iClose(NULL,0,i+12)+iClose(NULL,0,i+13)+iClose(NULL,0,i+14)+iClose(NULL,0,i+15)+iClose(NULL,0,i+16)+iClose(NULL,0,i+17)+iClose(NULL,0,i+18)+iClose(NULL,0,i+19)+iClose(NULL,0,i+20))/20;}
}

for(i = 0; i<periods; i++)
{
ma[i+1*(periods+12)]=(iClose(NULL,0,2*i)+iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19)))/20;
ma[i+1*(periods+12)+1]=(iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19))+iClose(NULL,0,2*(i+20)))/20;
if(ma[i+1*(periods+12)]>ma[i+1*(periods+12)+1] && iClose(NULL,0,2*i)>ma[i+1*(periods+12)])
{ma20long[i+1*(periods+12)]=(iClose(NULL,0,2*i)+iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19)))/20;
ma20long[i+1*(periods+12)+1]=(iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19))+iClose(NULL,0,2*(i+20)))/20;}
else if(ma[i+1*(periods+12)]<ma[i+1*(periods+12)+1] && iClose(NULL,0,2*i)<ma[i+1*(periods+12)])
{ma20short[i+1*(periods+12)]=(iClose(NULL,0,2*i)+iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19)))/20;
ma20short[i+1*(periods+12)+1]=(iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19))+iClose(NULL,0,2*(i+20)))/20;}
else
{ma20flat[i+1*(periods+12)]=(iClose(NULL,0,2*i)+iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19)))/20;
ma20flat[i+1*(periods+12)+1]=(iClose(NULL,0,2*(i+1))+iClose(NULL,0,2*(i+2))+iClose(NULL,0,2*(i+3))+iClose(NULL,0,2*(i+4))+iClose(NULL,0,2*(i+5))+iClose(NULL,0,2*(i+6))+iClose(NULL,0,2*(i+7))+iClose(NULL,0,2*(i+8))+iClose(NULL,0,2*(i+9))+iClose(NULL,0,2*(i+10))+iClose(NULL,0,2*(i+11))+iClose(NULL,0,2*(i+12))+iClose(NULL,0,2*(i+13))+iClose(NULL,0,2*(i+14))+iClose(NULL,0,2*(i+15))+iClose(NULL,0,2*(i+16))+iClose(NULL,0,2*(i+17))+iClose(NULL,0,2*(i+18))+iClose(NULL,0,2*(i+19))+iClose(NULL,0,2*(i+20)))/20;}
}

for(i = 0; i<periods; i++)
{
ma[i+2*(periods+12)]=(iClose(NULL,0,3*i)+iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19)))/20;
ma[i+2*(periods+12)+1]=(iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19))+iClose(NULL,0,3*(i+20)))/20;
if(ma[i+2*(periods+12)]>ma[i+2*(periods+12)+1] && iClose(NULL,0,3*i)>ma[i+2*(periods+12)])
{ma20long[i+2*(periods+12)]=(iClose(NULL,0,3*i)+iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19)))/20;
ma20long[i+2*(periods+12)+1]=(iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19))+iClose(NULL,0,3*(i+20)))/20;}
else if(ma[i+2*(periods+12)]<ma[i+2*(periods+12)+1] && iClose(NULL,0,3*i)<ma[i+2*(periods+12)])
{ma20short[i+2*(periods+12)]=(iClose(NULL,0,3*i)+iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19)))/20;
ma20short[i+2*(periods+12)+1]=(iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19))+iClose(NULL,0,3*(i+20)))/20;}
else
{ma20flat[i+2*(periods+12)]=(iClose(NULL,0,3*i)+iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19)))/20;
ma20flat[i+2*(periods+12)+1]=(iClose(NULL,0,3*(i+1))+iClose(NULL,0,3*(i+2))+iClose(NULL,0,3*(i+3))+iClose(NULL,0,3*(i+4))+iClose(NULL,0,3*(i+5))+iClose(NULL,0,3*(i+6))+iClose(NULL,0,3*(i+7))+iClose(NULL,0,3*(i+8))+iClose(NULL,0,3*(i+9))+iClose(NULL,0,3*(i+10))+iClose(NULL,0,3*(i+11))+iClose(NULL,0,3*(i+12))+iClose(NULL,0,3*(i+13))+iClose(NULL,0,3*(i+14))+iClose(NULL,0,3*(i+15))+iClose(NULL,0,3*(i+16))+iClose(NULL,0,3*(i+17))+iClose(NULL,0,3*(i+18))+iClose(NULL,0,3*(i+19))+iClose(NULL,0,3*(i+20)))/20;}
}

for(i = 0; i<periods; i++)
{
ma[i+3*(periods+12)]=(iClose(NULL,0,4*i)+iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19)))/20;
ma[i+3*(periods+12)+1]=(iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19))+iClose(NULL,0,4*(i+20)))/20;
if(ma[i+3*(periods+12)]>ma[i+3*(periods+12)+1] && iClose(NULL,0,4*i)>ma[i+3*(periods+12)])
{ma20long[i+3*(periods+12)]=(iClose(NULL,0,4*i)+iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19)))/20;
ma20long[i+3*(periods+12)+1]=(iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19))+iClose(NULL,0,4*(i+20)))/20;}
else if(ma[i+3*(periods+12)]<ma[i+3*(periods+12)+1] && iClose(NULL,0,4*i)<ma[i+3*(periods+12)])
{ma20short[i+3*(periods+12)]=(iClose(NULL,0,4*i)+iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19)))/20;
ma20short[i+3*(periods+12)+1]=(iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19))+iClose(NULL,0,4*(i+20)))/20;}
else
{ma20flat[i+3*(periods+12)]=(iClose(NULL,0,4*i)+iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19)))/20;
ma20flat[i+3*(periods+12)+1]=(iClose(NULL,0,4*(i+1))+iClose(NULL,0,4*(i+2))+iClose(NULL,0,4*(i+3))+iClose(NULL,0,4*(i+4))+iClose(NULL,0,4*(i+5))+iClose(NULL,0,4*(i+6))+iClose(NULL,0,4*(i+7))+iClose(NULL,0,4*(i+8))+iClose(NULL,0,4*(i+9))+iClose(NULL,0,4*(i+10))+iClose(NULL,0,4*(i+11))+iClose(NULL,0,4*(i+12))+iClose(NULL,0,4*(i+13))+iClose(NULL,0,4*(i+14))+iClose(NULL,0,4*(i+15))+iClose(NULL,0,4*(i+16))+iClose(NULL,0,4*(i+17))+iClose(NULL,0,4*(i+18))+iClose(NULL,0,4*(i+19))+iClose(NULL,0,4*(i+20)))/20;}
}

for(i = 0; i<periods; i++)
{
ma[i+4*(periods+12)]=(iClose(NULL,0,5*i)+iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19)))/20;
ma[i+4*(periods+12)+1]=(iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19))+iClose(NULL,0,5*(i+20)))/20;
if(ma[i+4*(periods+12)]>ma[i+4*(periods+12)+1] && iClose(NULL,0,5*i)>ma[i+4*(periods+12)])
{ma20long[i+4*(periods+12)]=(iClose(NULL,0,5*i)+iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19)))/20;
ma20long[i+4*(periods+12)+1]=(iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19))+iClose(NULL,0,5*(i+20)))/20;}
else if(ma[i+4*(periods+12)]<ma[i+4*(periods+12)+1] && iClose(NULL,0,5*i)<ma[i+4*(periods+12)])
{ma20short[i+4*(periods+12)]=(iClose(NULL,0,5*i)+iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19)))/20;
ma20short[i+4*(periods+12)+1]=(iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19))+iClose(NULL,0,5*(i+20)))/20;}
else
{ma20flat[i+4*(periods+12)]=(iClose(NULL,0,5*i)+iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19)))/20;
ma20flat[i+4*(periods+12)+1]=(iClose(NULL,0,5*(i+1))+iClose(NULL,0,5*(i+2))+iClose(NULL,0,5*(i+3))+iClose(NULL,0,5*(i+4))+iClose(NULL,0,5*(i+5))+iClose(NULL,0,5*(i+6))+iClose(NULL,0,5*(i+7))+iClose(NULL,0,5*(i+8))+iClose(NULL,0,5*(i+9))+iClose(NULL,0,5*(i+10))+iClose(NULL,0,5*(i+11))+iClose(NULL,0,5*(i+12))+iClose(NULL,0,5*(i+13))+iClose(NULL,0,5*(i+14))+iClose(NULL,0,5*(i+15))+iClose(NULL,0,5*(i+16))+iClose(NULL,0,5*(i+17))+iClose(NULL,0,5*(i+18))+iClose(NULL,0,5*(i+19))+iClose(NULL,0,5*(i+20)))/20;}
}

for(i = 0; i<periods; i++)
{
ma[i+5*(periods+12)]=(iClose(NULL,0,6*i)+iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19)))/20;
ma[i+5*(periods+12)+1]=(iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19))+iClose(NULL,0,6*(i+20)))/20;
if(ma[i+5*(periods+12)]>ma[i+5*(periods+12)+1] && iClose(NULL,0,6*i)>ma[i+5*(periods+12)])
{ma20long[i+5*(periods+12)]=(iClose(NULL,0,6*i)+iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19)))/20;
ma20long[i+5*(periods+12)+1]=(iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19))+iClose(NULL,0,6*(i+20)))/20;}
else if(ma[i+5*(periods+12)]<ma[i+5*(periods+12)+1] && iClose(NULL,0,6*i)<ma[i+5*(periods+12)])
{ma20short[i+5*(periods+12)]=(iClose(NULL,0,6*i)+iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19)))/20;
ma20short[i+5*(periods+12)+1]=(iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19))+iClose(NULL,0,6*(i+20)))/20;}
else
{ma20flat[i+5*(periods+12)]=(iClose(NULL,0,6*i)+iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19)))/20;
ma20flat[i+5*(periods+12)+1]=(iClose(NULL,0,6*(i+1))+iClose(NULL,0,6*(i+2))+iClose(NULL,0,6*(i+3))+iClose(NULL,0,6*(i+4))+iClose(NULL,0,6*(i+5))+iClose(NULL,0,6*(i+6))+iClose(NULL,0,6*(i+7))+iClose(NULL,0,6*(i+8))+iClose(NULL,0,6*(i+9))+iClose(NULL,0,6*(i+10))+iClose(NULL,0,6*(i+11))+iClose(NULL,0,6*(i+12))+iClose(NULL,0,6*(i+13))+iClose(NULL,0,6*(i+14))+iClose(NULL,0,6*(i+15))+iClose(NULL,0,6*(i+16))+iClose(NULL,0,6*(i+17))+iClose(NULL,0,6*(i+18))+iClose(NULL,0,6*(i+19))+iClose(NULL,0,6*(i+20)))/20;}
}

for(i = 0; i<periods; i++)
{
ma200[i]=(
iClose(NULL,0,i)+
iClose(NULL,0,i+1)+
iClose(NULL,0,i+2)+
iClose(NULL,0,i+3)+
iClose(NULL,0,i+4)+
iClose(NULL,0,i+5)+
iClose(NULL,0,i+6)+
iClose(NULL,0,i+7)+
iClose(NULL,0,i+8)+
iClose(NULL,0,i+9)+
iClose(NULL,0,i+10)+
iClose(NULL,0,i+11)+
iClose(NULL,0,i+12)+
iClose(NULL,0,i+13)+
iClose(NULL,0,i+14)+
iClose(NULL,0,i+15)+
iClose(NULL,0,i+16)+
iClose(NULL,0,i+17)+
iClose(NULL,0,i+18)+
iClose(NULL,0,i+19)+
iClose(NULL,0,i+20)+
iClose(NULL,0,i+21)+
iClose(NULL,0,i+22)+
iClose(NULL,0,i+23)+
iClose(NULL,0,i+24)+
iClose(NULL,0,i+25)+
iClose(NULL,0,i+26)+
iClose(NULL,0,i+27)+
iClose(NULL,0,i+28)+
iClose(NULL,0,i+29)+
iClose(NULL,0,i+30)+
iClose(NULL,0,i+31)+
iClose(NULL,0,i+32)+
iClose(NULL,0,i+33)+
iClose(NULL,0,i+34)+
iClose(NULL,0,i+35)+
iClose(NULL,0,i+36)+
iClose(NULL,0,i+37)+
iClose(NULL,0,i+38)+
iClose(NULL,0,i+39)+
iClose(NULL,0,i+40)+
iClose(NULL,0,i+41)+
iClose(NULL,0,i+42)+
iClose(NULL,0,i+43)+
iClose(NULL,0,i+44)+
iClose(NULL,0,i+45)+
iClose(NULL,0,i+46)+
iClose(NULL,0,i+47)+
iClose(NULL,0,i+48)+
iClose(NULL,0,i+49)+
iClose(NULL,0,i+50)+
iClose(NULL,0,i+51)+
iClose(NULL,0,i+52)+
iClose(NULL,0,i+53)+
iClose(NULL,0,i+54)+
iClose(NULL,0,i+55)+
iClose(NULL,0,i+56)+
iClose(NULL,0,i+57)+
iClose(NULL,0,i+58)+
iClose(NULL,0,i+59)+
iClose(NULL,0,i+60)+
iClose(NULL,0,i+61)+
iClose(NULL,0,i+62)+
iClose(NULL,0,i+63)+
iClose(NULL,0,i+64)+
iClose(NULL,0,i+65)+
iClose(NULL,0,i+66)+
iClose(NULL,0,i+67)+
iClose(NULL,0,i+68)+
iClose(NULL,0,i+69)+
iClose(NULL,0,i+70)+
iClose(NULL,0,i+71)+
iClose(NULL,0,i+72)+
iClose(NULL,0,i+73)+
iClose(NULL,0,i+74)+
iClose(NULL,0,i+75)+
iClose(NULL,0,i+76)+
iClose(NULL,0,i+77)+
iClose(NULL,0,i+78)+
iClose(NULL,0,i+79)+
iClose(NULL,0,i+80)+
iClose(NULL,0,i+81)+
iClose(NULL,0,i+82)+
iClose(NULL,0,i+83)+
iClose(NULL,0,i+84)+
iClose(NULL,0,i+85)+
iClose(NULL,0,i+86)+
iClose(NULL,0,i+87)+
iClose(NULL,0,i+88)+
iClose(NULL,0,i+89)+
iClose(NULL,0,i+90)+
iClose(NULL,0,i+91)+
iClose(NULL,0,i+92)+
iClose(NULL,0,i+93)+
iClose(NULL,0,i+94)+
iClose(NULL,0,i+95)+
iClose(NULL,0,i+96)+
iClose(NULL,0,i+97)+
iClose(NULL,0,i+98)+
iClose(NULL,0,i+99)+
iClose(NULL,0,i+100)+
iClose(NULL,0,i+101)+
iClose(NULL,0,i+102)+
iClose(NULL,0,i+103)+
iClose(NULL,0,i+104)+
iClose(NULL,0,i+105)+
iClose(NULL,0,i+106)+
iClose(NULL,0,i+107)+
iClose(NULL,0,i+108)+
iClose(NULL,0,i+109)+
iClose(NULL,0,i+110)+
iClose(NULL,0,i+111)+
iClose(NULL,0,i+112)+
iClose(NULL,0,i+113)+
iClose(NULL,0,i+114)+
iClose(NULL,0,i+115)+
iClose(NULL,0,i+116)+
iClose(NULL,0,i+117)+
iClose(NULL,0,i+118)+
iClose(NULL,0,i+119)+
iClose(NULL,0,i+120)+
iClose(NULL,0,i+121)+
iClose(NULL,0,i+122)+
iClose(NULL,0,i+123)+
iClose(NULL,0,i+124)+
iClose(NULL,0,i+125)+
iClose(NULL,0,i+126)+
iClose(NULL,0,i+127)+
iClose(NULL,0,i+128)+
iClose(NULL,0,i+129)+
iClose(NULL,0,i+130)+
iClose(NULL,0,i+131)+
iClose(NULL,0,i+132)+
iClose(NULL,0,i+133)+
iClose(NULL,0,i+134)+
iClose(NULL,0,i+135)+
iClose(NULL,0,i+136)+
iClose(NULL,0,i+137)+
iClose(NULL,0,i+138)+
iClose(NULL,0,i+139)+
iClose(NULL,0,i+140)+
iClose(NULL,0,i+141)+
iClose(NULL,0,i+142)+
iClose(NULL,0,i+143)+
iClose(NULL,0,i+144)+
iClose(NULL,0,i+145)+
iClose(NULL,0,i+146)+
iClose(NULL,0,i+147)+
iClose(NULL,0,i+148)+
iClose(NULL,0,i+149)+
iClose(NULL,0,i+150)+
iClose(NULL,0,i+151)+
iClose(NULL,0,i+152)+
iClose(NULL,0,i+153)+
iClose(NULL,0,i+154)+
iClose(NULL,0,i+155)+
iClose(NULL,0,i+156)+
iClose(NULL,0,i+157)+
iClose(NULL,0,i+158)+
iClose(NULL,0,i+159)+
iClose(NULL,0,i+160)+
iClose(NULL,0,i+161)+
iClose(NULL,0,i+162)+
iClose(NULL,0,i+163)+
iClose(NULL,0,i+164)+
iClose(NULL,0,i+165)+
iClose(NULL,0,i+166)+
iClose(NULL,0,i+167)+
iClose(NULL,0,i+168)+
iClose(NULL,0,i+169)+
iClose(NULL,0,i+170)+
iClose(NULL,0,i+171)+
iClose(NULL,0,i+172)+
iClose(NULL,0,i+173)+
iClose(NULL,0,i+174)+
iClose(NULL,0,i+175)+
iClose(NULL,0,i+176)+
iClose(NULL,0,i+177)+
iClose(NULL,0,i+178)+
iClose(NULL,0,i+179)+
iClose(NULL,0,i+180)+
iClose(NULL,0,i+181)+
iClose(NULL,0,i+182)+
iClose(NULL,0,i+183)+
iClose(NULL,0,i+184)+
iClose(NULL,0,i+185)+
iClose(NULL,0,i+186)+
iClose(NULL,0,i+187)+
iClose(NULL,0,i+188)+
iClose(NULL,0,i+189)+
iClose(NULL,0,i+190)+
iClose(NULL,0,i+191)+
iClose(NULL,0,i+192)+
iClose(NULL,0,i+193)+
iClose(NULL,0,i+194)+
iClose(NULL,0,i+195)+
iClose(NULL,0,i+196)+
iClose(NULL,0,i+197)+
iClose(NULL,0,i+198)+
iClose(NULL,0,i+199))/200;
}

for(i = 0; i<periods; i++)
{
ma200[i+periods+12]=(
iClose(NULL,0,2*(i))+
iClose(NULL,0,2*(i+1))+
iClose(NULL,0,2*(i+2))+
iClose(NULL,0,2*(i+3))+
iClose(NULL,0,2*(i+4))+
iClose(NULL,0,2*(i+5))+
iClose(NULL,0,2*(i+6))+
iClose(NULL,0,2*(i+7))+
iClose(NULL,0,2*(i+8))+
iClose(NULL,0,2*(i+9))+
iClose(NULL,0,2*(i+10))+
iClose(NULL,0,2*(i+11))+
iClose(NULL,0,2*(i+12))+
iClose(NULL,0,2*(i+13))+
iClose(NULL,0,2*(i+14))+
iClose(NULL,0,2*(i+15))+
iClose(NULL,0,2*(i+16))+
iClose(NULL,0,2*(i+17))+
iClose(NULL,0,2*(i+18))+
iClose(NULL,0,2*(i+19))+
iClose(NULL,0,2*(i+20))+
iClose(NULL,0,2*(i+21))+
iClose(NULL,0,2*(i+22))+
iClose(NULL,0,2*(i+23))+
iClose(NULL,0,2*(i+24))+
iClose(NULL,0,2*(i+25))+
iClose(NULL,0,2*(i+26))+
iClose(NULL,0,2*(i+27))+
iClose(NULL,0,2*(i+28))+
iClose(NULL,0,2*(i+29))+
iClose(NULL,0,2*(i+30))+
iClose(NULL,0,2*(i+31))+
iClose(NULL,0,2*(i+32))+
iClose(NULL,0,2*(i+33))+
iClose(NULL,0,2*(i+34))+
iClose(NULL,0,2*(i+35))+
iClose(NULL,0,2*(i+36))+
iClose(NULL,0,2*(i+37))+
iClose(NULL,0,2*(i+38))+
iClose(NULL,0,2*(i+39))+
iClose(NULL,0,2*(i+40))+
iClose(NULL,0,2*(i+41))+
iClose(NULL,0,2*(i+42))+
iClose(NULL,0,2*(i+43))+
iClose(NULL,0,2*(i+44))+
iClose(NULL,0,2*(i+45))+
iClose(NULL,0,2*(i+46))+
iClose(NULL,0,2*(i+47))+
iClose(NULL,0,2*(i+48))+
iClose(NULL,0,2*(i+49))+
iClose(NULL,0,2*(i+50))+
iClose(NULL,0,2*(i+51))+
iClose(NULL,0,2*(i+52))+
iClose(NULL,0,2*(i+53))+
iClose(NULL,0,2*(i+54))+
iClose(NULL,0,2*(i+55))+
iClose(NULL,0,2*(i+56))+
iClose(NULL,0,2*(i+57))+
iClose(NULL,0,2*(i+58))+
iClose(NULL,0,2*(i+59))+
iClose(NULL,0,2*(i+60))+
iClose(NULL,0,2*(i+61))+
iClose(NULL,0,2*(i+62))+
iClose(NULL,0,2*(i+63))+
iClose(NULL,0,2*(i+64))+
iClose(NULL,0,2*(i+65))+
iClose(NULL,0,2*(i+66))+
iClose(NULL,0,2*(i+67))+
iClose(NULL,0,2*(i+68))+
iClose(NULL,0,2*(i+69))+
iClose(NULL,0,2*(i+70))+
iClose(NULL,0,2*(i+71))+
iClose(NULL,0,2*(i+72))+
iClose(NULL,0,2*(i+73))+
iClose(NULL,0,2*(i+74))+
iClose(NULL,0,2*(i+75))+
iClose(NULL,0,2*(i+76))+
iClose(NULL,0,2*(i+77))+
iClose(NULL,0,2*(i+78))+
iClose(NULL,0,2*(i+79))+
iClose(NULL,0,2*(i+80))+
iClose(NULL,0,2*(i+81))+
iClose(NULL,0,2*(i+82))+
iClose(NULL,0,2*(i+83))+
iClose(NULL,0,2*(i+84))+
iClose(NULL,0,2*(i+85))+
iClose(NULL,0,2*(i+86))+
iClose(NULL,0,2*(i+87))+
iClose(NULL,0,2*(i+88))+
iClose(NULL,0,2*(i+89))+
iClose(NULL,0,2*(i+90))+
iClose(NULL,0,2*(i+91))+
iClose(NULL,0,2*(i+92))+
iClose(NULL,0,2*(i+93))+
iClose(NULL,0,2*(i+94))+
iClose(NULL,0,2*(i+95))+
iClose(NULL,0,2*(i+96))+
iClose(NULL,0,2*(i+97))+
iClose(NULL,0,2*(i+98))+
iClose(NULL,0,2*(i+99))+
iClose(NULL,0,2*(i+100))+
iClose(NULL,0,2*(i+101))+
iClose(NULL,0,2*(i+102))+
iClose(NULL,0,2*(i+103))+
iClose(NULL,0,2*(i+104))+
i

Показано первые 50% кода (символов: 64914)

Открыть по тарифу

Купите тариф с пакетом открытий или войдите, если тариф уже есть. Открытый файл останется в вашем кабинете навсегда.

Выбрать тариф Войти и открыть по тарифу

Разовая покупка файла

На этой странице откроется полный исходный код файла вместо ознакомительного фрагмента.

Зачем нужен email? После подтверждения оплаты файл сохранится в кабинете на этот email. Если аккаунта ещё нет, мы создадим его и пришлём ссылку для задания пароля. Если аккаунт уже есть, покупка добавится в него. Укажите адрес, к которому у вас есть доступ.

Чтобы оформить заказ, введите email и перейдите к оплате.

Стоимость полного кода

6 491,40₽ ≈ $79.35