//+------------------------------------------------------------------+ //| AFL_WinnerV2_HTF.mq5 | //| Copyright © 2016, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2016, Nikolay Kositsin" #property link "farria@mail.redcom.ru" //---- номер версии индикатора #property version "1.00" #property description "AFL_WinnerV2 с возможностью изменения таймфрейма во входных параметрах" //---- отрисовка индикатора в отдельном окне #property indicator_separate_window //---- количество индикаторных буферов #property indicator_buffers 3 //---- использовано всего одно графическое построение #property indicator_plots 1 //--- нижнее и верхнее ограничения шкалы отдельного окна индикатора #property indicator_maximum +60 #property indicator_minimum -60 //+-------------------------------------+ //| объявление констант | //+-------------------------------------+ #define RESET 0 // Константа для возврата терминалу команды на пересчёт индикатора #define INDICATOR_NAME "AFL_WinnerV2" // Константа для имени индикатора #define SIZE 3 // Константа для количества вызовов функции CountIndicator //+-------------------------------------+ //| Параметры отрисовки индикатора 1 | //+-------------------------------------+ //---- отрисовка индикатора в виде многоцветной гистограммы #property indicator_type1 DRAW_COLOR_HISTOGRAM2 //---- в качестве цветов индикатора использованы #property indicator_color1 clrRed,clrViolet,clrPaleTurquoise,clrLime //---- линия индикатора - сплошная #property indicator_style1 STYLE_SOLID //---- толщина линии индикатора равна 4 #property indicator_width1 4 //---- отображение метки индикатора #property indicator_label1 INDICATOR_NAME //+-------------------------------------+ //| объявление перечислений | //+-------------------------------------+ enum Applied_price_ //Тип константы { PRICE_CLOSE_ = 1, //Close PRICE_OPEN_, //Open PRICE_HIGH_, //High PRICE_LOW_, //Low PRICE_MEDIAN_, //Median Price (HL/2) PRICE_TYPICAL_, //Typical Price (HLC/3) PRICE_WEIGHTED_, //Weighted Close (HLCC/4) PRICE_SIMPL_, //Simpl Price (OC/2) PRICE_QUARTER_, //Quarted Price (HLOC/4) PRICE_TRENDFOLLOW0_, //TrendFollow_1 Price PRICE_TRENDFOLLOW1_, //TrendFollow_2 Price PRICE_DEMARK_ //Demark Price }; //+-------------------------------------+ //| объявление перечислений | //+-------------------------------------+ enum Smooth_Method { MODE_SMA_, //SMA MODE_EMA_, //EMA MODE_SMMA_, //SMMA MODE_LWMA_, //LWMA MODE_JJMA, //JJMA MODE_JurX, //JurX MODE_ParMA, //ParMA MODE_T3, //T3 MODE_VIDYA, //VIDYA MODE_AMA, //AMA }; //+-------------------------------------+ //| ВХОДНЫЕ ПАРАМЕТРЫ ИНДИКАТОРА | //+-------------------------------------+ input ENUM_TIMEFRAMES TimeFrame=PERIOD_H4; // Период графика индикатора //+-------------------------------------+ //| ВХОДНЫЕ ПАРАМЕТРЫ ИНДИКАТОРА | //+-------------------------------------+ input uint iAverage=5; //Период для обработки входных данных input uint iPeriod=10; //Период поиска экстремумов input Smooth_Method iMA_Method=MODE_SMA_; //Метод усреднения первого сглаживания input uint iLength=5; //Глубина сглаживания input int iPhase=15; //Параметр сглаживания, //для JJMA изменяющийся в пределах -100 ... +100, влияет на качество переходного процесса; // Для VIDIA это период CMO, для AMA это период медленной скользящей input Applied_price_ IPC=PRICE_WEIGHTED_; // ценовая константа input ENUM_APPLIED_VOLUME VolumeType=VOLUME_TICK; //объём input int Shift=0; // Сдвиг индикатора по горизонтали в барах input int HighLevel=+40; // уровень перекупленности input int LowLevel=-40; // уровень перепроданности //+-------------------------------------+ //---- объявление динамических массивов, которые будут в // дальнейшем использованы в качестве индикаторных буферов double UpIndBuffer[],DnIndBuffer[],ColorIndBuffer[]; //---- Объявление стрингов string Symbol_,Word; //---- Объявление целых переменных начала отсчёта данных int min_rates_total; //---- Объявление целых переменных для хендлов индикаторов int Ind_Handle; //+------------------------------------------------------------------+ //| Получение таймфрейма в виде строки | //+------------------------------------------------------------------+ string GetStringTimeframe(ENUM_TIMEFRAMES timeframe) {return(StringSubstr(EnumToString(timeframe),7,-1));} //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int OnInit() { //---- проверка периодов графиков на корректность if(!TimeFramesCheck(INDICATOR_NAME,TimeFrame)) return(INIT_FAILED); //---- Инициализация переменных min_rates_total=2; Symbol_=Symbol(); Word=INDICATOR_NAME+" индикатор: "+Symbol_+StringSubstr(EnumToString(_Period),7,-1); //---- получение хендла индикатора AFL_WinnerV2 Ind_Handle=iCustom(Symbol(),TimeFrame,"AFL_WinnerV2",iAverage,iPeriod,iMA_Method,iLength,iPhase,IPC,VolumeType,0,HighLevel,LowLevel); if(Ind_Handle==INVALID_HANDLE) { Print(" Не удалось получить хендл индикатора AFL_WinnerV2"); return(INIT_FAILED); } //---- Инициализация индикаторного буферов IndInit(0,UpIndBuffer); IndInit(1,DnIndBuffer); IndInit(2,ColorIndBuffer); //---- осуществление сдвига индикатора 1 по горизонтали PlotIndexSetInteger(0,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE); //---- создание имени для отображения в отдельном подокне и во всплывающей подсказке string shortname; StringConcatenate(shortname,INDICATOR_NAME,"(",GetStringTimeframe(TimeFrame),")"); IndicatorSetString(INDICATOR_SHORTNAME,shortname); //---- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,0); //---- параметры отрисовки уровней индикатора IndicatorSetInteger(INDICATOR_LEVELS,5); //---- значения горизонтальных уровней индикатора IndicatorSetDouble(INDICATOR_LEVELVALUE,0,+50); IndicatorSetDouble(INDICATOR_LEVELVALUE,1,MathMin(+50,HighLevel)); IndicatorSetDouble(INDICATOR_LEVELVALUE,2,0.0); IndicatorSetDouble(INDICATOR_LEVELVALUE,3,MathMax(-50,LowLevel)); IndicatorSetDouble(INDICATOR_LEVELVALUE,4,-50); //---- в качестве цветов линий горизонтальных уровней использованы IndicatorSetInteger(INDICATOR_LEVELCOLOR,0,clrBlue); IndicatorSetInteger(INDICATOR_LEVELCOLOR,1,clrBlue); IndicatorSetInteger(INDICATOR_LEVELCOLOR,2,clrGray); IndicatorSetInteger(INDICATOR_LEVELCOLOR,3,clrRed); IndicatorSetInteger(INDICATOR_LEVELCOLOR,4,clrRed); //---- в линии горизонтального уровня использован короткий штрих-пунктир IndicatorSetInteger(INDICATOR_LEVELSTYLE,0,STYLE_DASHDOT); IndicatorSetInteger(INDICATOR_LEVELSTYLE,1,STYLE_DASHDOTDOT); IndicatorSetInteger(INDICATOR_LEVELSTYLE,2,STYLE_SOLID); IndicatorSetInteger(INDICATOR_LEVELSTYLE,3,STYLE_DASHDOTDOT); IndicatorSetInteger(INDICATOR_LEVELSTYLE,4,STYLE_DASHDOT); //---- завершение инициализации return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Custom 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)// проверка на первый старт расчёта индикатора { limit=Rates_Total-Min_Rates_Total-1; // стартовый номер для расчёта всех баров LastCountBar[Numb]=limit; } else limit=LastCountBar[Numb]+Rates_Total-Prev_Calculated; // стартовый номер для расчёта новых баров //---- основной цикл расчёта индикатора for(int bar=limit; bar>=0 && !IsStopped(); bar--) { //---- обнулим содержимое индикаторных буферов до расчёта IndBuf[bar]=0.0; //---- копируем вновь появившиеся данные в массив IndTime if(CopyTime(Symbol_,TFrame,iTime[bar],1,IndTime)<=0) return(RESET); if(iTime[bar]>=IndTime[0] && iTime[bar+1]