wlxBW5ZoneAlert - MetaTrader 5脚本

//+------------------------------------------------------------------+
//|购买信号功能                                              |
//+------------------------------------------------------------------+
空白买入信号(细绳信号先生姓名，      // 电子邮件和推送消息的指标名称文本              双倍的购买箭头(&B)[],        // 带有买入信号的指标缓冲区              常量 整数费率_总计，    // 当前柱数              常量 整数前_计算，// 前一个价格变动的柱数              常量 双倍的&关闭[],    // 收盘价              常量 整数＆传播[]）      // 传播  {你//---  静止的 单位计数器=0;
  如果(Rates_total!=Prev_calculated) 计数器=0;

  布尔值买入信号=错误的;
  布尔值系列测试=数组获取系列（购买箭头）；
  整数指数;
  如果（系列测试）索引=整数(条数);
  别的索引=Rates_total-整数(条数)-1;
  如果（规范化双精度(BuyArrow[索引],_数字) && BuyArrow[索引]!=空_VALUE) 购买信号=真的;
  如果(BuySignal && 计数器<=NumberofAlerts)
     {
      计数器++；
      Mql日期时间TM；
      构建时间（时间当前(),tm);
      细绳文字=字符串时间（时间当前(),TIME_DATE)+” “+细绳(tm.小时)+“：”+细绳(tm.分钟);
      系列测试=数组获取系列（关闭）；
      如果（系列测试）索引=整数(条数);
      别的索引=Rates_total-整数(条数)-1;
      双倍的 问=关闭[指数];
      双倍的 出价=关闭[指数];
      系列测试=数组获取系列（传播）;
      如果（系列测试）索引=整数(条数);
      别的索引=Rates_total-整数(条数)-1;
      出价+=传播[索引]；
      细绳问=双精度转字符串（问,_数字）；
      细绳出价=双精度转字符串（出价,_数字）；
      细绳sPeriod=GetStringTimeframe(图表周期());
      如果（声音打开）警报（"买入信号 \n 询问=",问,“\n 出价=”,出价,“\n 当前时间=”，文本，“\n 符号=”,象征(),“句号=”,s 期间);
      如果（电子邮件）发送邮件(信号先生姓名+“：买入信号提醒”,“在询问处买入信号=”+问+“，出价=”+出价+“，日期=”+文字+“符号=”+象征()+“句号=”+s句点）；
      如果（推开）发送通知(信号先生姓名+": 在 Ask=" 处买入信号+问+“，出价=”+出价+“，日期=”+文字+“符号=”+象征()+“句号=”+s句点）；
     }你//---  }//+------------------------------------------------------------------+
//|卖出信号函数                                            |
//+------------------------------------------------------------------+
空白卖出信号(细绳信号先生姓名，      // 电子邮件和推送消息的指标名称文本                双倍的销售箭头(&S)[],      // 带有卖出信号的指标缓冲区                常量 整数费率_总计，    // 当前柱数                常量 整数前_计算，// 前一个价格变动的柱数                常量 双倍的&关闭[],    // 收盘价                常量 整数＆传播[]）      // 传播  {你//---  静止的 单位计数器=0;
  如果(Rates_total!=Prev_calculated) 计数器=0;

  布尔值卖出信号=错误的;
  布尔值系列测试=数组获取系列（卖出箭头）；
  整数指数;
  如果（系列测试）索引=整数(条数);
  别的索引=Rates_total-整数(条数)-1;
  如果（规范化双精度(SellArrow[索引],_数字) && SellArrow[索引]!=空_VALUE) 卖出信号=真的;
  如果(SellSignal && 计数器<=NumberofAlerts)
     {
      计数器++；
      Mql日期时间TM；
      构建时间（时间当前(),tm);
      细绳文字=字符串时间（时间当前(),TIME_DATE)+” “+细绳(tm.小时)+“：”+细绳(tm.分钟);
      系列测试=数组获取系列（关闭）；
      如果（系列测试）索引=整数(条数);
      别的索引=Rates_total-整数(条数)-1;
      双倍的 问=关闭[指数];
      双倍的 出价=关闭[指数];
      系列测试=数组获取系列（传播）;
      如果（系列测试）索引=整数(条数);
      别的索引=Rates_total-整数(条数)-1;
      出价+=传播[索引]；
      细绳问=双精度转字符串（问,_数字）；
      细绳出价=双精度转字符串（出价,_数字）；
      细绳sPeriod=GetStringTimeframe(图表周期());
      如果（声音打开）警报（"卖出信号 \n 询问=",问,“\n 出价=”,出价,“\n 当前时间=”，文本，“\n 符号=”,象征(),“句号=”,s 期间);
      如果（电子邮件）发送邮件(信号先生姓名+“：卖出信号警报”,“卖出信号在询问=”+问+“，出价=”+出价+“，日期=”+文字+“符号=”+象征()+“句号=”+s句点）；
      如果（推开）发送通知(信号先生姓名+": 在 Ask=" 时卖出信号+问+“，出价=”+出价+“，日期=”+文字+“符号=”+象征()+“句号=”+s句点）；
     }你//---  }//+------------------------------------------------------------------+
//|  获取字符串形式的时间范围 |
//+------------------------------------------------------------------+
细绳获取字符串时间范围(ENUM_TIMEFRAMES大体时间）
  {//----  返回（字符串子串（枚举转字符串（大体时间），7,-1））；//----  }