//+------------------------------------------------------------------+ //| Laguerre.mq5 | //| Copyright © 2010, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2010, Nikolay Kositsin" #property link "farria@mail.redcom.ru" //--- номер версии индикатора #property version "1.00" //--- отрисовка индикатора в отдельном окне #property indicator_separate_window //--- для расчета и отрисовки индикатора использован один буфер #property indicator_buffers 1 //--- использовано всего одно графическое построение #property indicator_plots 1 //--- отрисовка индикатора в виде линии #property indicator_type1 DRAW_LINE //--- в качестве цвета линии индикатора использован Magenta цвет #property indicator_color1 Magenta //--- значения горизонтальных уровней индикатора #property indicator_level2 0.75 #property indicator_level3 0.45 #property indicator_level4 0.15 //--- в качестве цвета линии горизонтального уровня использован синий цвет #property indicator_levelcolor Blue //--- в линии горизонтального уровня использован короткий штрих-пунктир #property indicator_levelstyle STYLE_DASHDOTDOT //--- входные параметры индикатора input double gamma=0.7; //--- объявление динамического массива, который в дальнейшем //--- будет использован в качестве индикаторного буфера double ExtLineBuffer[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //--- превращение динамического массива ExtLineBuffer в индикаторный буфер SetIndexBuffer(0,ExtLineBuffer,INDICATOR_DATA); //--- инициализации переменной для короткого имени индикатора string shortname; StringConcatenate(shortname,"Laguerre(",gamma,")"); //--- создание метки для отображения в Окне данных PlotIndexSetString(0,PLOT_LABEL,shortname); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits+1); //--- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE); //--- } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ int OnCalculate(const int rates_total, // количество истории в барах на текущем тике const int prev_calculated, // количество истории в барах на предыдущем тике const int begin, // номер начала достоверного отсчета баров const double &price[]) // ценовой массив для расчета индикатора { //--- проверка количества баров на достаточность для расчета if(rates_totalrates_total || prev_calculated<=0) // проверка на первый старт расчета индикатора { first=begin; // стартовый номер для расчета всех баров //--- стартовая инициализация расчетных коэффициентов L0_ = price[first]; L1_ = price[first]; L2_ = price[first]; L3_ = price[first]; L0A_ = price[first]; L1A_ = price[first]; L2A_ = price[first]; L3A_ = price[first]; } else first=prev_calculated-1; // стартовый номер для расчета новых баров //--- восстанавливаем значения переменных L0 = L0_; L1 = L1_; L2 = L2_; L3 = L3_; L0A = L0A_; L1A = L1A_; L2A = L2A_; L3A = L3A_; //--- основной цикл расчета индикатора for(bar=first; bar= L1) CU = L0 - L1; else CD = L1 - L0; if(L1 >= L2) CU += L1 - L2; else CD += L2 - L1; if(L2 >= L3) CU += L2 - L3; else CD += L3 - L2; //--- if(CU+CD!=0) LRSI=CU/(CU+CD); //--- инициализация ячейки индикаторного буфера полученным значением LRSI ExtLineBuffer[bar]=LRSI; } //--- return(rates_total); } //+------------------------------------------------------------------+