iMACD

int  iMACD(

   string              symbol,              // 交易品种名称

   ENUM_TIMEFRAMES     period,              // 周期

   int                 fast_ema_period,     // 快速移动平均数周期

   int                 slow_ema_period,     // 慢速移动平均数周期

   int                 signal_period,       // 不同点的平均周期

   ENUM_APPLIED_PRICE  applied_price        // 价格或者处理器的类型

   );

//+------------------------------------------------------------------+

//|                                                   Demo_iMACD.mq5 |

//|                        Copyright 2011, MetaQuotes Software Corp. |

//|                                             https://www.mql5.com |

//+------------------------------------------------------------------+

#property copyright "Copyright 2011, MetaQuotes Software Corp."

#property link      "https://www.mql5.com"

#property version   "1.00"

#property description "The indicator demonstrates how to obtain data"

#property description "of indicator buffers for the iMACD technical indicator."

#property description "A symbol and timeframe used for calculation of the indicator,"

#property description "are set by the symbol and period parameters."

#property description "The method of creation of the handle is set through the 'type' parameter (function type)."

#property description "All other parameters like in the standard MACD."



#property indicator_separate_window

#property indicator_buffers 2

#property indicator_plots   2

//--- MACD 标图

#property indicator_label1  "MACD"

#property indicator_type1   DRAW_HISTOGRAM

#property indicator_color1  clrSilver

#property indicator_style1  STYLE_SOLID

#property indicator_width1  1

//--- 信号标图

#property indicator_label2  "Signal"

#property indicator_type2   DRAW_LINE

#property indicator_color2  clrRed

#property indicator_style2  STYLE_DOT

#property indicator_width2  1

//+------------------------------------------------------------------+

//| 枚举处理创建方法                                                   |

//+------------------------------------------------------------------+

enum Creation

  {

   Call_iMACD,             // 使用iMACD

   Call_IndicatorCreate    // 使用IndicatorCreate

  };

//--- 输入参数

input Creation             type=Call_iMACD;           // 函数类型

input int                  fast_ema_period=12;        // 快速ma周期

input int                  slow_ema_period=26;        // 慢速ma周期

input int                  signal_period=9;           // 平均差异周期

input ENUM_APPLIED_PRICE   applied_price=PRICE_CLOSE; // 价格类型 

input string               symbol=" ";                // 交易品种 

input ENUM_TIMEFRAMES      period=PERIOD_CURRENT;     // 时间帧

//--- 指标缓冲区

double         MACDBuffer[];

double         SignalBuffer[];

//--- 存储iMACD 指标处理程序的变量

int    handle;

//--- 存储变量

string name=symbol;

//--- 图表上的指标名称

string short_name;

//--- 我们将在移动平均聚/散指标中保持值的数量

int    bars_calculated=0;

//+------------------------------------------------------------------+

//| 自定义指标初始化函数                                                |

//+------------------------------------------------------------------+

int OnInit()

  {

//--- 分配指标缓冲区数组

   SetIndexBuffer(0,MACDBuffer,INDICATOR_DATA);

   SetIndexBuffer(1,SignalBuffer,INDICATOR_DATA);

//--- 定义绘制指标的交易品种

   name=symbol;

//--- 删除向左和向右的空格

   StringTrimRight(name);

   StringTrimLeft(name);

//--- 如果它返回 'name' 字符串的零长度

   if(StringLen(name)==0)

     {

      //--- 获得指标附属的图表交易品种

      name=_Symbol;

     }

//--- 创建指标处理程序

   if(type==Call_iMACD)

      handle=iMACD(name,period,fast_ema_period,slow_ema_period,signal_period,applied_price);

   else

     {

      //--- 以指标参数填充结构   

      MqlParam pars[4];

      //--- 快速ma周期

      pars[0].type=TYPE_INT;

      pars[0].integer_value=fast_ema_period;

      //--- 慢速ma周期

      pars[1].type=TYPE_INT;

      pars[1].integer_value=slow_ema_period;

      //--- 快速慢速移动平均差异的周期

      pars[2].type=TYPE_INT;

      pars[2].integer_value=signal_period;

      //--- 价格类型

      pars[3].type=TYPE_INT;

      pars[3].integer_value=applied_price;

      handle=IndicatorCreate(name,period,IND_MACD,4,pars);

     }

//--- 如果没有创建处理程序

   if(handle==INVALID_HANDLE)

     {

      //--- 叙述失败和输出错误代码

      PrintFormat("Failed to create handle of the iMACD indicator for the symbol %s/%s, error code %d",

                  name,

                  EnumToString(period),

                  GetLastError());

      //--- 指标提前停止

      return(INIT_FAILED);

     }

//--- 显示移动平均聚/散指标计算的交易品种/时间帧

   short_name=StringFormat("iMACD(%s/%s,%d,%d,%d,%s)",name,EnumToString(period),

                           fast_ema_period,slow_ema_period,signal_period,EnumToString(applied_price));

   IndicatorSetString(INDICATOR_SHORTNAME,short_name);

//--- 指标正常初始化  

   return(INIT_SUCCEEDED);

  }

//+------------------------------------------------------------------+

//| 自定义指标迭代函数                                                 |

//+------------------------------------------------------------------+

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[])

  {

//--- 从 iMACD 指标复制的值数

   int values_to_copy;

//--- 确定指标计算的数量值

   int calculated=BarsCalculated(handle);

   if(calculated<=0)

     {

      PrintFormat("BarsCalculated() returned %d, error code %d",calculated,GetLastError());

      return(0);

     }

//--- 如果它是指标计算的最初起点或如果 iMACD 指标数量值更改

//--- 或如果需要计算两个或多个柱形的指标（这意味着价格历史中有些内容会发生变化）

   if(prev_calculated==0 || calculated!=bars_calculated || rates_total>prev_calculated+1)

     {

      //--- 如果 MACDBuffer数组大于交易品种/周期iMACD指标的数量值，那么我们不会复制任何内容

      //--- 否则，我们复制小于指标缓冲区的大小

      if(calculated>rates_total) values_to_copy=rates_total;

      else                       values_to_copy=calculated;

     }

   else

     {

      //--- 它意味着这不是初次指标计算，因为 OnCalculate())最近调用

      //--- 为了计算，添加不超过一柱

      values_to_copy=(rates_total-prev_calculated)+1;

     }

//--- 以iMACD指标的值填充数组

//--- 如果FillArraysFromBuffer返回false，它表示信息还未准备，退出操作

   if(!FillArraysFromBuffers(MACDBuffer,SignalBuffer,handle,values_to_copy)) return(0);

//--- 形成信息

   string comm=StringFormat("%s ==>  Updated value in the indicator %s: %d",

                            TimeToString(TimeCurrent(),TIME_DATE|TIME_SECONDS),

                            short_name,

                            values_to_copy);

//--- 在图表上展示服务信息

   Comment(comm);

//--- 记住移动平均聚/散指标的数量值

   bars_calculated=calculated;

//--- 返回prev_calculated值以便下次调用

   return(rates_total);

  }

//+------------------------------------------------------------------+

//| 填充iMACD 指标的指标缓冲区                                          |

//+------------------------------------------------------------------+

bool FillArraysFromBuffers(double &macd_buffer[],    // MACD值的指标缓冲区

                           double &signal_buffer[],  // MACD 信号线的指标缓冲区

                           int ind_handle,           // iMACD 指标的处理程序

                           int amount                // 复制值的数量

                           )

  {

//--- 重置错误代码

   ResetLastError();

//--- 以0标引指标缓冲区的值填充部分iMACDBuffer 数组

   if(CopyBuffer(ind_handle,0,0,amount,macd_buffer)<0)

     {

      //--- 如果复制失败，显示错误代码

      PrintFormat("Failed to copy data from the iMACD indicator, error code %d",GetLastError());

      //--- 退出零结果 - 它表示被认为是不计算的指标

      return(false);

     }



//--- 以1标引指标缓冲区的值填充部分SignalBuffer数组

   if(CopyBuffer(ind_handle,1,0,amount,signal_buffer)<0)

     {

      //--- 如果复制失败，显示错误代码

      PrintFormat("Failed to copy data from the iMACD indicator, error code %d",GetLastError());

      //--- 退出零结果 - 它表示被认为是不计算的指标

      return(false);

     }

//--- 一切顺利

   return(true);

  }

//+------------------------------------------------------------------+

//| 指标去初始化函数                                                   |

//+------------------------------------------------------------------+

void OnDeinit(const int reason)

  {

   if(handle!=INVALID_HANDLE)

      IndicatorRelease(handle);

//--- 删除指标后清空图表

   Comment("");

  }