//+---------------------------------------------------------------------+ //| ColorJFatl_StDev.mq5 | //| иCopyright © 2015, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+---------------------------------------------------------------------+ //| Для работы индикатора следует положить файл SmoothAlgorithms.mqh | //| в папку (директорию): каталог_данных_терминала\\MQL5\Include | //+---------------------------------------------------------------------+ #property copyright "2015, Nikolay Kositsin" #property link "farria@mail.redcom.ru" #property version "1.01" //--- отрисовка индикатора в основном окне #property indicator_chart_window //--- для расчета и отрисовки индикатора использовано шесть буферов #property indicator_buffers 6 //--- использовано всего пять графических построений #property indicator_plots 5 //--- отрисовка индикатора в виде линии #property indicator_type1 DRAW_COLOR_LINE //--- в качестве цветов трехцветной линии использованы #property indicator_color1 clrMagenta,clrGray,clrGold //--- линия индикатора - непрерывная кривая #property indicator_style1 STYLE_SOLID //--- толщина линии индикатора равна 2 #property indicator_width1 2 //--- отображение метки индикатора #property indicator_label1 "JFATL" //+----------------------------------------------+ //| Параметры отрисовки медвежьего индикатора | //+----------------------------------------------+ //--- отрисовка индикатора 2 в виде символа #property indicator_type2 DRAW_ARROW //--- в качестве цвета медвежьего индикатора использован красный цвет #property indicator_color2 clrRed //--- толщина линии индикатора 2 равна 2 #property indicator_width2 2 //--- отображение медвежьей метки индикатора #property indicator_label2 "Dn_Signal 1" //+----------------------------------------------+ //| Параметры отрисовки бычьго индикатора | //+----------------------------------------------+ //--- отрисовка индикатора 3 в виде символа #property indicator_type3 DRAW_ARROW //--- в качестве цвета бычьего индикатора использован аквамариновый цвет #property indicator_color3 clrAqua //--- толщина линии индикатора 3 равна 2 #property indicator_width3 2 //--- отображение бычей метки индикатора #property indicator_label3 "Up_Signal 1" //+----------------------------------------------+ //| Параметры отрисовки медвежьего индикатора | //+----------------------------------------------+ //--- отрисовка индикатора 4 в виде символа #property indicator_type4 DRAW_ARROW //--- в качестве цвета медвежьего индикатора использован красный цвет #property indicator_color4 clrRed //--- толщина линии индикатора 4 равна 4 #property indicator_width4 4 //--- отображение медвежьей метки индикатора #property indicator_label4 "Dn_Signal 2" //+----------------------------------------------+ //| Параметры отрисовки бычьго индикатора | //+----------------------------------------------+ //--- отрисовка индикатора 5 в виде символа #property indicator_type5 DRAW_ARROW //--- в качестве цвета бычьего индикатора использован аквамариновый цвет #property indicator_color5 clrAqua //--- толщина линии индикатора 5 равна 4 #property indicator_width5 4 //--- отображение бычей метки индикатора #property indicator_label5 "Up_Signal 2" //+-----------------------------------+ //| объявление перечислений | //+-----------------------------------+ enum Applied_price_ //Тип константы { PRICE_CLOSE_ = 1, //PRICE_CLOSE PRICE_OPEN_, //PRICE_OPEN PRICE_HIGH_, //PRICE_HIGH PRICE_LOW_, //PRICE_LOW PRICE_MEDIAN_, //PRICE_MEDIAN PRICE_TYPICAL_, //PRICE_TYPICAL PRICE_WEIGHTED_, //PRICE_WEIGHTED PRICE_SIMPL_, //PRICE_SIMPL_ PRICE_QUARTER_, //PRICE_QUARTER_ PRICE_TRENDFOLLOW0_, //TrendFollow_1 Price PRICE_TRENDFOLLOW1_, //TrendFollow_2 Price PRICE_DEMARK_ //Demark Price }; //+-----------------------------------+ //| Входные параметры индикатора | //+-----------------------------------+ input int JLength=5; // Глубина JMA сглаживания input int JPhase=-100; // Параметр JMA сглаживания, //--- JPhase: изменяется в пределах -100 ... +100, влияет на качество переходного процесса; input Applied_price_ IPC=PRICE_CLOSE_; // Ценовая константа input int FATLShift=0; // Сдвиг FATLа по горизонтали в барах input int PriceShift=0; // Сдвиг FATL по вертикали в пунктах input double dK1=1.5; // Коэффициент 1 для квадратичного фильтра input double dK2=2.5; // Коэффициент 2 для квадратичного фильтра input uint std_period=9; // Период квадратичного фильтра input int Shift=0; // Сдвиг индикатора по горизонтали в барах //+-----------------------------------+ //--- объявление и инициализация переменной для хранения количества расчетных баров int FATLPeriod=39; //--- объявление динамических массивов, которые в дальнейшем //--- будут использованы в качестве индикаторных буферов double ExtLineBuffer[],ColorExtLineBuffer[]; double BearsBuffer1[],BullsBuffer1[]; double BearsBuffer2[],BullsBuffer2[]; int start,fstart,FATLSize; double dPriceShift,dXFatl[];; //+------------------------------------------------+ //| Инициализация коэффициентов цифрового фильтра | //+------------------------------------------------+ double dFATLTable[]= { +0.4360409450, +0.3658689069, +0.2460452079, +0.1104506886, -0.0054034585, -0.0760367731, -0.0933058722, -0.0670110374, -0.0190795053, +0.0259609206, +0.0502044896, +0.0477818607, +0.0249252327, -0.0047706151, -0.0272432537, -0.0338917071, -0.0244141482, -0.0055774838, +0.0128149838, +0.0226522218, +0.0208778257, +0.0100299086, -0.0036771622, -0.0136744850, -0.0160483392, -0.0108597376, -0.0016060704, +0.0069480557, +0.0110573605, +0.0095711419, +0.0040444064, -0.0023824623, -0.0067093714, -0.0072003400, -0.0047717710, +0.0005541115, +0.0007860160, +0.0130129076, +0.0040364019 }; //+------------------------------------------------------------------+ //| Описание функции iPriceSeries() | //| Описание функции iPriceSeriesAlert() | //| Описание класса CJJMA | //+------------------------------------------------------------------+ #include //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int OnInit() { //--- проверка входных переменных индикатора на корректность if(dK1>=dK2) { Print(" Некрректные значения входных параметров для коэффициентов 1 и 2 для квадратичного фильтра!"); return(INIT_FAILED); } //--- инициализация переменных FATLSize=ArraySize(dFATLTable); start=FATLSize+30+int(std_period); //--- распределение памяти под массивы переменных ArrayResize(dXFatl,std_period); //--- инициализации переменной для короткого имени индикатора string shortname; StringConcatenate(shortname,"JFATL(",JLength," ,",JPhase,")"); //--- превращение динамического массива ExtLineBuffer в индикаторный буфер SetIndexBuffer(0,ExtLineBuffer,INDICATOR_DATA); //--- осуществление сдвига индикатора по горизонтали на FATLShift PlotIndexSetInteger(0,PLOT_SHIFT,FATLShift); //--- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,start); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits+1); //--- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE); //--- осуществление сдвига индикатора 2 по горизонтали PlotIndexSetInteger(0,PLOT_SHIFT,Shift); //--- превращение динамического массива в цветовой, индексный буфер SetIndexBuffer(1,ColorExtLineBuffer,INDICATOR_COLOR_INDEX); //--- превращение динамического массива BearsBuffer в индикаторный буфер SetIndexBuffer(2,BearsBuffer1,INDICATOR_DATA); //--- осуществление сдвига индикатора 2 по горизонтали PlotIndexSetInteger(1,PLOT_SHIFT,Shift); //--- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,start); //--- выбор символа для отрисовки PlotIndexSetInteger(1,PLOT_ARROW,159); //--- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,EMPTY_VALUE); //--- превращение динамического массива BullsBuffer в индикаторный буфер SetIndexBuffer(3,BullsBuffer1,INDICATOR_DATA); //--- осуществление сдвига индикатора 3 по горизонтали PlotIndexSetInteger(2,PLOT_SHIFT,Shift); //--- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(2,PLOT_DRAW_BEGIN,start); //--- выбор символа для отрисовки PlotIndexSetInteger(2,PLOT_ARROW,159); //--- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,EMPTY_VALUE); //--- превращение динамического массива BearsBuffer в индикаторный буфер SetIndexBuffer(4,BearsBuffer2,INDICATOR_DATA); //--- осуществление сдвига индикатора 2 по горизонтали PlotIndexSetInteger(3,PLOT_SHIFT,Shift); //--- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(3,PLOT_DRAW_BEGIN,start); //--- выбор символа для отрисовки PlotIndexSetInteger(3,PLOT_ARROW,159); //--- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(3,PLOT_EMPTY_VALUE,EMPTY_VALUE); //--- превращение динамического массива BullsBuffer в индикаторный буфер SetIndexBuffer(5,BullsBuffer2,INDICATOR_DATA); //--- осуществление сдвига индикатора 3 по горизонтали PlotIndexSetInteger(4,PLOT_SHIFT,Shift); //--- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(4,PLOT_DRAW_BEGIN,start); //--- выбор символа для отрисовки PlotIndexSetInteger(4,PLOT_ARROW,159); //--- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(4,PLOT_EMPTY_VALUE,EMPTY_VALUE); //--- инициализация сдвига по вертикали dPriceShift=_Point*PriceShift; //--- объявление переменной класса CJJMA из файла JJMASeries_Cls.mqh CJJMA JMA; //--- установка алертов на недопустимые значения внешних переменных JMA.JJMALengthCheck("JLength", JLength); JMA.JJMAPhaseCheck("JPhase", JPhase); //--- завершение инициализации return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ 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[]) { //--- проверка количества баров на достаточность для расчета if(rates_totalrates_total || prev_calculated<=0) // проверка на первый старт расчета индикатора { first=FATLPeriod-1; // стартовый номер для расчета всех баров fstart=first; } else first=prev_calculated-1; // стартовый номер для расчета новых баров //--- объявление переменной класса CJJMA из файла JJMASeries_Cls.mqh static CJJMA JMA; //--- основной цикл расчета индикатора for(bar=first; barrates_total || prev_calculated<=0) // проверка на первый старт расчета индикатора first++; //--- основной цикл раскраски сигнальной линии for(bar=first; barExtLineBuffer[bar]) clr=0; ColorExtLineBuffer[bar]=clr; } //--- пересчет стартового номера first для цикла пересчета баров if(prev_calculated>rates_total || prev_calculated<=0) // проверка на первый старт расчета индикатора first=start; //--- основной цикл расчета индикатора стандартных отклонений for(bar=first; bar=-Filter2) BEARS1=jfatl; //есть нисходящий тренд if(dstd<-Filter2) BEARS2=jfatl; //есть нисходящий тренд if(dstd>+Filter1 && dstd<=+Filter2) BULLS1=jfatl; //есть восходящий тренд if(dstd>+Filter2) BULLS2=jfatl; //есть восходящий тренд //--- инициализация ячеек индикаторных буферов полученными значениями BullsBuffer1[bar]=BULLS1; BearsBuffer1[bar]=BEARS1; BullsBuffer2[bar]=BULLS2; BearsBuffer2[bar]=BEARS2; } //--- return(rates_total); } //+------------------------------------------------------------------+