//+------------------------------------------------------------------+ //| IINWMARROWS.mq5 | //| Copyright © 2007, Iin Zulkarnain | //| | //+------------------------------------------------------------------+ #property copyright "Copyright © 2007, Iin Zulkarnainn" #property link "" #property description "" //---- номер версии индикатора #property version "1.00" //---- отрисовка индикатора в главном окне #property indicator_chart_window //---- для расчета и отрисовки индикатора использовано два буфера #property indicator_buffers 2 //---- использовано всего два графических построения #property indicator_plots 2 //+----------------------------------------------+ //| Параметры отрисовки медвежьего индикатора | //+----------------------------------------------+ //---- отрисовка индикатора 1 в виде символа #property indicator_type1 DRAW_ARROW //---- в качестве цвета медвежьей линии индикатора использован розовый цвет #property indicator_color1 clrMagenta //---- толщина линии индикатора 1 равна 4 #property indicator_width1 4 //---- отображение бычьей метки индикатора #property indicator_label1 "IINWMARROWS Sell" //+----------------------------------------------+ //| Параметры отрисовки бычьего индикатора | //+----------------------------------------------+ //---- отрисовка индикатора 2 в виде символа #property indicator_type2 DRAW_ARROW //---- в качестве цвета бычьей линии индикатора использован синий цвет #property indicator_color2 clrBlue //---- толщина линии индикатора 2 равна 4 #property indicator_width2 4 //---- отображение медвежьей метки индикатора #property indicator_label2 "IINWMARROWS Buy" //+----------------------------------------------+ //| объявление констант | //+----------------------------------------------+ #define RESET 0 // Константа для возврата терминалу команды на пересчёт индикатора //+----------------------------------------------+ //| Входные параметры индикатора | //+----------------------------------------------+ input uint FastMAPeriod=13; input ENUM_MA_METHOD FastMAType=MODE_EMA; input uint SlowMAPeriod=13; input ENUM_MA_METHOD SlowMAType=MODE_EMA; //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в // дальнейшем использованы в качестве индикаторных буферов double SellBuffer[]; double BuyBuffer[]; //---- объявление целых переменных начала отсчета данных int min_rates_total,AtrPeriod; //---- Объявление целых переменных для хендлов индикаторов int FsMA_Handle,SlMA_Handle; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //---- инициализация глобальных переменных AtrPeriod=10; min_rates_total=int(MathMax(MathMax(FastMAPeriod,SlowMAPeriod)+3,AtrPeriod)); //---- получение хендла индикатора iMA FsMA_Handle=iMA(NULL,0,FastMAPeriod,0,FastMAType,PRICE_CLOSE); if(FsMA_Handle==INVALID_HANDLE) Print(" Не удалось получить хендл индикатора iMA"); //---- получение хендла индикатора iMA SlMA_Handle=iMA(NULL,0,SlowMAPeriod,0,SlowMAType,PRICE_OPEN); if(SlMA_Handle==INVALID_HANDLE) Print(" Не удалось получить хендл индикатора iMA"); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(0,SellBuffer,INDICATOR_DATA); //---- осуществление сдвига начала отсчета отрисовки индикатора 1 PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //---- символ для индикатора PlotIndexSetInteger(0,PLOT_ARROW,234); //---- индексация элементов в буфере, как в таймсерии ArraySetAsSeries(SellBuffer,true); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(1,BuyBuffer,INDICATOR_DATA); //---- осуществление сдвига начала отсчета отрисовки индикатора 2 PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total); //---- символ для индикатора PlotIndexSetInteger(1,PLOT_ARROW,233); //---- индексация элементов в буфере, как в таймсерии ArraySetAsSeries(BuyBuffer,true); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,0); //---- Установка формата точности отображения индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //---- имя для окон данных и метка для подокон string short_name="IINWMARROWS"; IndicatorSetString(INDICATOR_SHORTNAME,short_name); //---- } //+------------------------------------------------------------------+ //| Custom indicator function | //+------------------------------------------------------------------+ double GetRange(int index,const double &High[],const double &Low[],uint Len) { //---- double AvgRange=0.0; for(int count=int(index+Len-1); count>=index; count--) AvgRange+=MathAbs(High[count]-Low[count]); //---- return(AvgRange/Len); } //+------------------------------------------------------------------+ //| 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(BarsCalculated(FsMA_Handle)rates_total || prev_calculated<=0)// проверка на первый старт расчета индикатора limit=rates_total-min_rates_total-1; // стартовый номер для расчета всех баров else limit=rates_total-prev_calculated; // стартовый номер для расчета новых баров //---- индексация элементов в массивах, как в таймсериях ArraySetAsSeries(FsMA,true); ArraySetAsSeries(SlMA,true); ArraySetAsSeries(high,true); ArraySetAsSeries(low,true); to_copy=limit+3; //---- копируем вновь появившиеся данные в массивы if(CopyBuffer(FsMA_Handle,0,0,to_copy,FsMA)<=0) return(RESET); if(CopyBuffer(SlMA_Handle,0,0,to_copy,SlMA)<=0) return(RESET); SellBuffer[0]=0.0; BuyBuffer[0]=0.0; //---- основной цикл расчета индикатора for(bar=limit; bar>=0 && !IsStopped(); bar--) { SellBuffer[bar]=0.0; BuyBuffer[bar]=0.0; fasterMAnow=FsMA[bar+1]; fasterMAprevious=FsMA[bar+2]; fasterMAafter=FsMA[bar]; //---- slowerMAnow=SlMA[bar+1]; slowerMAprevious=SlMA[bar+2]; slowerMAafter=SlMA[bar]; if(fasterMAnow>slowerMAnow && fasterMApreviousslowerMAafter) { BuyBuffer[bar]=low[bar]-GetRange(bar,high,low,AtrPeriod)*0.5; } if(fasterMAnowslowerMAprevious && fasterMAafter