//+------------------------------------------------------------------+ //| trend_arrows.mq5 | //| Copyright © 2012, Vladimir Mametov | //| | //+------------------------------------------------------------------+ #property copyright "Copyright © 2012, Vladimir Mametov" #property link "" //---- номер версии индикатора #property version "1.00" //---- отрисовка индикатора в основном окне #property indicator_chart_window //---- количество индикаторных буферов 4 #property indicator_buffers 4 //---- использовано всего четыре графических построения #property indicator_plots 4 //+----------------------------------------------+ //| Параметры отрисовки индикатора | //+----------------------------------------------+ //---- отрисовка индикатора в виде значка #property indicator_type1 DRAW_ARROW //---- в качестве окраски индикатора использован #property indicator_color1 clrBlue //---- линия индикатора - сплошная #property indicator_style1 STYLE_SOLID //---- толщина линии индикатора равна 2 #property indicator_width1 2 //---- отображение метки сигнальной линии #property indicator_label1 "trend_arrows Up" //+----------------------------------------------+ //| Параметры отрисовки индикатора | //+----------------------------------------------+ //---- отрисовка индикатора в виде значка #property indicator_type2 DRAW_ARROW //---- в качестве окраски индикатора использован #property indicator_color2 clrRed //---- линия индикатора - сплошная #property indicator_style2 STYLE_SOLID //---- толщина линии индикатора равна 2 #property indicator_width2 2 //---- отображение метки сигнальной линии #property indicator_label2 "trend_arrows Down" //+----------------------------------------------+ //| Параметры отрисовки бычьего индикатора | //+----------------------------------------------+ //---- отрисовка индикатора 3 в виде значка #property indicator_type3 DRAW_ARROW //---- в качестве цвета бычей линии индикатора использован цвет DodgerBlue #property indicator_color3 clrDodgerBlue //---- линия индикатора 3 - непрерывная кривая #property indicator_style3 STYLE_SOLID //---- толщина линии индикатора 3 равна 2 #property indicator_width3 2 //---- отображение бычьей метки индикатора #property indicator_label3 "Buy trend_arrows signal" //+----------------------------------------------+ //| Параметры отрисовки медвежьего индикатора | //+----------------------------------------------+ //---- отрисовка индикатора 4 в виде значка #property indicator_type4 DRAW_ARROW //---- в качестве цвета медвежьей линии индикатора использован цвет DarkOrange #property indicator_color4 clrDarkOrange //---- линия индикатора 2 - непрерывная кривая #property indicator_style4 STYLE_SOLID //---- толщина линии индикатора 2 равна 2 #property indicator_width4 2 //---- отображение медвежьей метки индикатора #property indicator_label4 "Sell trend_arrows signal" //+----------------------------------------------+ //| Входные параметры индикатора | //+----------------------------------------------+ input uint iPeriod=15; // Период индикатора input uint iFullPeriods=1; input int Shift=0; // Сдвиг индикатора по горизонтали в барах //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в //---- дальнейшем использованы в качестве индикаторных буферов double TrendUp[],TrendDown[]; double SignUp[],SignDown[]; //---- объявление целочисленных переменных начала отсчета данных int min_rates_total; int arr[]; bool boolp1; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //---- инициализация переменных начала отсчета данных min_rates_total=int(iPeriod+iFullPeriods); //---- распределение памяти под массивы переменных ArrayResize(arr,min_rates_total); //---- инициализации переменной для короткого имени индикатора string shortname; StringConcatenate(shortname,"trend_arrows(",string(iPeriod),", ",string(iFullPeriods),", ",string(Shift),")"); //---- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,shortname); //---- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(0,TrendUp,INDICATOR_DATA); //---- осуществление сдвига индикатора по горизонтали на Shift PlotIndexSetInteger(0,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //---- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0.0); //---- индексация элементов в буферах, как в таймсериях ArraySetAsSeries(TrendUp,true); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(1,TrendDown,INDICATOR_DATA); //---- осуществление сдвига индикатора по горизонтали на Shift PlotIndexSetInteger(1,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total); //---- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,0.0); //---- индексация элементов в буферах, как в таймсериях ArraySetAsSeries(TrendDown,true); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(2,SignUp,INDICATOR_DATA); //---- осуществление сдвига индикатора 1 по горизонтали на Shift PlotIndexSetInteger(2,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора 1 PlotIndexSetInteger(2,PLOT_DRAW_BEGIN,min_rates_total); //---- индексация элементов в буферах, как в таймсериях ArraySetAsSeries(SignUp,true); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,0.0); //---- символ для индикатора PlotIndexSetInteger(2,PLOT_ARROW,108); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(3,SignDown,INDICATOR_DATA); //---- осуществление сдвига индикатора 2 по горизонтали на Shift PlotIndexSetInteger(3,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора 2 PlotIndexSetInteger(3,PLOT_DRAW_BEGIN,min_rates_total); //---- индексация элементов в буферах, как в таймсериях ArraySetAsSeries(SignDown,true); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(3,PLOT_EMPTY_VALUE,0.0); //---- символ для индикатора PlotIndexSetInteger(3,PLOT_ARROW,108); //---- } //+------------------------------------------------------------------+ //| 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) // проверка на первый старт расчета индикатора { limit=rates_total-min_rates_total-1; // стартовый номер для расчета всех баров int tms1=rates_total-2-min_rates_total; while(!isDelimeter(Period(),time,tms1)) tms1--; boolp1=tms1; tms1--; for(int rrr=0; rrr=0 && !IsStopped(); bar--) { TrendUp[bar]=0.0; TrendDown[bar]=0.0; SignUp[bar]=0.0; SignDown[bar]=0.0; double HH=AverageHigh(high,time,bar); double LL=AverageLow(low,time,bar); if(close[bar]>HH) TrendUp[bar]=LL; else { if(close[bar]0; count--) { hhv=High[ArrayMaximum(High,arr[count-1]+1,arr[count]-arr[count-1])]; ret+=hhv; } if(iFullPeriods==1) { hhv=High[ArrayMaximum(High,arr[iPeriod-1]+1,arr[iPeriod]-arr[iPeriod-1])]; ret += hhv; ret /= NormalizeDouble(iPeriod, 0); } else { hhv=High[ArrayMaximum(High,index,arr[0]-index)]; ret += hhv; ret /= NormalizeDouble(iPeriod, 0); } //---- return (ret); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ double AverageLow(const double &Low[],const datetime &Time[],int index) { //---- double llv; double ret= 0.0; int nbars = index; int max=int(iPeriod+iFullPeriods); boolp1=false; for(int iii=0; iii0; count--) { llv=Low[ArrayMinimum(Low,arr[count-1]+1,arr[count]-arr[count-1])]; ret+=llv; } if(iFullPeriods==1) { llv=Low[ArrayMinimum(Low,arr[iPeriod-1]+1,arr[iPeriod]-arr[iPeriod-1])]; ret += llv; ret /= NormalizeDouble(iPeriod, 0); } else { llv=Low[ArrayMinimum(Low,index,arr[0]-index)]; ret += llv; ret /= NormalizeDouble(iPeriod, 0); } //---- return (ret); } //+------------------------------------------------------------------+ //| isDelimeter() | //+------------------------------------------------------------------+ bool isDelimeter(ENUM_TIMEFRAMES TimFrame,const datetime &Time[],int index) { //---- MqlDateTime tm; TimeToStruct(Time[index],tm); bool blper=false; switch(TimFrame) { case PERIOD_M1: blper=tm.min==0; break; case PERIOD_M2: blper=tm.min==0; break; case PERIOD_M3: blper=tm.min==0; break; case PERIOD_M4: blper=tm.min==0; break; case PERIOD_M5: blper=tm.min==0; break; case PERIOD_M6: blper=tm.min==0; break; case PERIOD_M10: blper=tm.min==0; break; case PERIOD_M12: blper=tm.min==0; break; case PERIOD_M15: blper=tm.min==0; break; case PERIOD_M20: blper=tm.min==0; break; case PERIOD_M30: blper=tm.min==0 && MathMod(tm.hour,4.0)==0.0; break; case PERIOD_H1: blper=tm.min==0 && MathMod(tm.hour,4.0)==0.0; break; case PERIOD_H2: blper=tm.min==0 && MathMod(tm.hour,4.0)==0.0; break; case PERIOD_H3: blper=tm.min==0 && MathMod(tm.hour,4.0)==0.0; break; case PERIOD_H4: blper=tm.min==0 && tm.hour==0; break; case PERIOD_H6: blper=tm.min==0 && tm.hour==0; break; case PERIOD_H8: blper=tm.min==0 && tm.hour==0; break; case PERIOD_H12: blper=tm.min==0 && tm.hour==0; break; case PERIOD_D1: blper=tm.day_of_week==1 && tm.hour==0; break; case PERIOD_W1: { MqlDateTime tm2; TimeToStruct(Time[index+1],tm2); blper=tm.day==1 || (tm.day==2 && tm2.day!=1) || (tm.day==3 && tm2.day!=2); break; } case PERIOD_MN1: { MqlDateTime tm2; TimeToStruct(Time[index+1],tm2); blper=tm.day==1 || (tm.day==2 && tm2.day!=1) || (tm.day==3 && tm2.day!=2); break; } } //---- return (blper); } //+------------------------------------------------------------------+