双均线EA

//+-----------------------------------------------------------------------------+
//|                                                                 Moving Average.mq4 |
//|                    Copyright 2005-2014, MetaQuotes Software Corp. |
//|                                                                http://www.mql4.com |
//+-----------------------------------------------------------------------------+
#property copyright   "2005-2014, MetaQuotes Software Corp."
#property link             "http://www.mql4.com"
#property description "Moving Average sample expert advisor"

#define MAGICMA 20131111

// 宏定义命令#define用法，定义本EA操作的订单的唯一标识号码，由此可以实现在同一账户上多系统操作，各操作EA的订单标识码不同，就不会互相误操作。凡是EA皆不可缺少，非常非常重要！

//--- Inputs
input double Lots                 =0.1;    // 每单的交易量
input double MaximumRisk   =0.02; // 本系统最大风险系数，即可以动用总资金的2%
input double DecreaseFactor=3;     // 下跌因子
input int       MovingPeriod   =12;   // 均线的计算周期=12，为MA必须的参数之一
input int       MovingShift      =6;    // 均线转移量=6，为MA必须的参数之一

// input 确定从外部程序输入的变量， 会直接显现输入数据窗口。数列本身不能作为外部变量。

注意：iMA中的MovingShift（均线偏移量）是指均线指标在图上绘制时向左、右移动的K线个数，主要为了使图中结果更好看，并不会对MA的计算数值产生变化。其中，该参数为正时，代表向右移动；为负值，则代表向左移动。

//+------------------------------------------------------------------+
//|                                               Calculate open positions |
//|        自定义函数（返回-整数型数据） 仓单查询与统计 |
//+------------------------------------------------------------------+

int CalculateCurrentOrders(string symbol)   // 函数作用：计算当前持仓单的数量
  {
   int buys=0,sells=0;
// 定义两个局部变量，整数型，buys——多单数，sells——空单数，用于订单的统计
//----
   for(int i=0;i<OrdersTotal();i++)   // 计次循环（i=0至订单数目，i=i+1）- 循环检测当前的订单队列
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;   // 如果 没有本系统交易的仓单类型，则跳出循环
      if(OrderSymbol()==Symbol() && OrderMagicNumber()==MAGICMA)   //如果持仓单货币对是当前货币对 且持仓单编号是本系统编号时判断这个订单是不是当前EA操作的，避免EA误操作其他程序控制的持仓单。
       {
        if(OrderType()==OP_BUY) buys++;   // 如果 仓单类型=多单，则：在多单数上加1；
        if(OrderType()==OP_SELL) sells++;   // 如果 仓单类型=空单，则，在空单数上加1。
       }
     }
// ---- return orders volume-返回订单数目
   if(buys>0) return(buys);             // 如果 多单>0，则返回（多单数）
   else            return(-sells);             // 否则，返回（-空单数）
// 本函数返回查询计算结束时的持仓单的个数，这种模式返回是假设不存在锁单的。
  }

//+------------------------------------------------------------------+
//|  Calculate optimal lot size                                              |
//|  自定义函数（返回-小数型数据） 资金管理                 |
//+------------------------------------------------------------------+

double LotsOptimized()   //开仓量计算函数（根据要求计算出订单交易量，小数型）
   {
    double lot=Lots;   // 定义局部变量los 小数型
    int orders=HistoryTotal();   // history orders total 历史平仓单数（已平仓）
    int losses=0;                      // number of losses orders without a break-亏损单

//---- select lot size
    lot=NormalizeDouble(AccountFreeMargin()*MaximumRisk/1000.0,1);
//计算 开仓下单量=帐户可用资金*最大风险系数（=2%）/1000.0，并将结果保留小数点1位
（通过风险系数的计算获得当前入场单应该采用的交易量，除以1000是因为大多货币对汇价都在这个附近。）

//---- calcuulate number of losses orders without a break-计算亏损单数目
    if(DecreaseFactor>0)    // 如果 下跌因子（=3）>0
     {
      for(int i=orders-1;i>=0;i--)    // 计次循环(i=历史平仓单数-1,到i=0, 递减1)
        {
         if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==false)
          {
            Print("Error in history!");
            break;
           }
// 如果 没有本系统交易记录，输出“无交易历史！”

         if(OrderSymbol()!=Symbol() || OrderType()>OP_SELL) continue;   // 如果 订单的货币对不是当前货币对，或者 订单类型为挂单时，继续运行
// 订单类型为整数型，0-BUY，1-SELL，2-BUYLIMT，3-BUYSTOP，4-SELLLIMT，5-SELLSTOP，其中“>OP_SELL”代表挂单
         if(OrderProfit()>0) break;        // 如果 盈利单数目>0，跳出循环
         if(OrderProfit()<0) losses++;  // 如果 盈利单数目<0，则在：亏损单数上加1
      }
    if(losses>1)
      lot=NormalizeDouble(lot-lot*losses/DecreaseFactor,1);
// 如果 亏损单数>1时，则重新计算下单量，并保留小数点后1位，其计算公式为：下单量=（lot-lot*losses/DecreaseFactor（=3））。
    }
//---- return lot size-返回下单量
    if(lot<0.1) lot=0.1;   // 如果 算出的交易量小于0.1手，则 取交易量为0.1手
    return(lot);              // 返回（下单量）
   }

//+------------------------------------------------------------------+
//|   Check for open order conditions                                |
//|   自定义函数（无返回值） 开仓策略                            |
//+------------------------------------------------------------------+

void CheckForOpen()   // 开仓检查（判断开仓条件及其处理）
   {
    double ma;    // 定义局部变量ma为小数型
    int        res;    // 定义局部变量res为整数型
//---- go trading only for first tiks of new bar   ---- 只有在新K线的首次报价时执行
    if(Volume[0]>1) return;
// 如果当前K线的成交价次数大于1时，返回
（不是K线的开盘时间点，即当前k线还没收盘确定，则直接返回；否则，如果是K线第一个成交价，则向下继续运行）
// ---- get Moving Average – 获取均线数值
    ma=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,0);
// 获取当前以收盘价为基准计算出的均线数值
    iMA(NULL,0,12,6,MOD_SMA,PRICE_CLOSE,0)
// ---- sell conditions-卖出条件
    if(Open[1]>ma && Close[1]<ma)   // 如果前1根K线下穿均线（即K线的开盘价大于均线值、收盘价小于均线值）
    {
     res=OrderSend(Symbol(),OP_SELL,LotsOptimized(),Bid,3,0,0,"",MAGICMA,0,Red);
// 发送仓单（当前货币对，卖出方向，开仓量计算（），买价，滑点=3，无止损，无止赢，订单编号，标上红色箭头）
     return;    // 返回
    }
// ---- buy conditions - 买入条件
    if(Open[1]<ma && Close[1]>ma)   // 如果前1根K线上穿均线（即K线的开盘价小于均线值、收盘价大于均线值）
     {
      res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,0,"",MAGICMA,0,Blue);
// 发送仓单（当前货币对，买入方向，开仓量计算（），卖价，滑点=3，无止损，无止赢，订单编号，标上蓝色箭头）
      return;   // 返回
     }
//----
   }

//+------------------------------------------------------------------+
//|    Check for close order conditions                               |
//|    自定义函数（无返回值） 平仓策略                           |
//+------------------------------------------------------------------+

void CheckForClose()   // 平仓检查（判断平仓条件及其处理）
   {
    double ma;   // 定义局部变量ma小数型
//---- 只在一个k收盘另一个新出现时交易
    if(Volume[0]>1) return;   // 如果当前K线的成交价次数>1时，则返回
//---- get Moving Average    // 获取均线数值
    ma=iMA(NULL,0,MovingPeriod,MovingShift,MODE_SMA,PRICE_CLOSE,0);
// 获取当前以收盘价为基准计算出的均线数值
    for(int i=0;i<OrdersTotal();i++)    // 计次循环（变量i=1至定单总数，每次递增1）
      {
       if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;   // 如果 没有本系统所交易的仓单时，跳出循环
       if(OrderMagicNumber()!=MAGICMA || OrderSymbol()!=Symbol()) continue;   
// 如果 仓单编号不是本系统编号，或者 仓单货币对不是当前货币对时，继续选择
       if(OrderType()==OP_BUY)   // 如果是多单
        {
         if(Open[1]>ma && Close[1]<ma)
          {
           if(!OrderClose(OrderTicket(),OrderLots(),Bid,3,White));
// 如果第1根K线开盘价下穿均线（即开盘价高于均价而收盘价低于均价），则进行多头平仓（仓单编号，持仓数量，买价，滑点=3，用白色箭头显示）
               Print("OrderClose error ",GetLastError());
          }
        break;   // 跳出循环
      }
      
       if(OrderType()==OP_SELL)   // 如果是空单
        {
         if(Open[1]<ma && Close[1]>ma)
          {
            if(!OrderClose(OrderTicket(),OrderLots(),Ask,3,White))
// 如果第1根K线开盘价上穿均线（即开盘价低于均价而收盘价高于均价），则进行空头平仓（仓单编号，持仓数量，卖价，滑点=3，用白色箭头显示）
               Print("OrderClose error ",GetLastError());
          }
        break;   // 跳出循环
        }
      }
//----
   }

//+------------------------------------------------------------------+
//|  OnTick function                                                          |
//+------------------------------------------------------------------+
void OnTick()   //主程序—-每次成交价所驱动的运算过程
   {
//--- check for history and trading   对交易历史进行检查
    if(Bars<100 || IsTradeAllowed()==false)
       return;
// 如果K线数少于100根，或者如果允许智能交易交易=假时，返回
//--- calculate open orders by current symbol   计算当前货币对的开仓订单
    if(CalculateCurrentOrders(Symbol())==0) CheckForOpen();   // 如果 计算出当前货币对开仓订单数=0 （即没有仓单），则进行开仓检查。
    else                                                           CheckForClose();   // 否则（即当前已经有仓单时），则进行平仓检查。
//---
   }
//+------------------------------------------------------------------+

看看。。学习下。。。。

谢谢分享

感谢分享

谢谢分享

路过路过

路过。。看看先。

路过看看

带源码的，点赞