简单而神奇的EA，值得深入探讨

一周前，开始学习EA，看的第一个贴就是论坛里置顶的520FX ? 【MT4编程交流】 ? ea简明教程收集以及修改贴（delmo 2009-8-10 00:07发表）
  贴子里引了牛版的一个EA为例，我就原样抄入了MT4，代码如下：

• //+-----------------------------------------------------------------+
  
• //|                           Designed by bull, China               |
  
• //|                              Copyright 2007, bull               |
  
• //|                                     bbs.520fx.com               |
  
• //+-----------------------------------------------------------------+
  
• #property  copyright \"Copyright 2007 , bull, China.\"
  
• #property  link      \"bbs.520fx.com\"
  
• #define MAGICMA 2007
  
• 
  
• extern int whichmethod = 1;   //1~4 种下单方式  1 仅开仓, 2 有止损无止赢, 3 有止赢无止损, 4 有止赢也有止损
  
• extern double TakeProfit = 100;   //止赢点数
  
• extern   double StopLoss = 20;    //止损点数
  
• extern double MaximumRisk = 0.3; //资金控制,控制下单量
  
• extern double TrailingStop = 25;     //跟踪止赢点数设置
  
• extern   int maxOpen = 3;   //最多开仓次数限制
  
• extern   int maxLots = 5;   //最多单仓持仓量限制
  
• extern int bb = 0;       //非零就允许跟踪止赢
  
• extern double MATrendPeriod = 26;//使用26均线 开仓条件参数
  
• 
  
• int i, p2, xxx, p1, res;
  
• double Lots;
  
• datetime lasttime;       //时间控制, 仅当一个时间周期完成才检查条件
  
• 
  
• int init()   //初始化
  
• {
  
• Lots = 1;
  
• lasttime = NULL;
  
• return(0);
  
• }
  
• 
  
• int deinit() { return(0); } //反初始化
  
• 
  
• //主程序
  
• int start()
  
• {
  
• CheckForOpen();    //开仓 平仓 条件检查 和操作
  
• if (bb>0)   CTP();   //跟踪止赢
  
• return(0);
  
• }
  
• 
  
• //+------下面是各子程序--------------------------------------------+
  
• double LotsOptimized()   //确定下单量，开仓调用 资金控制
  
• {
  
• double lot=Lots;
  
• int   orders=HistoryTotal();   // history orders total
  
• int   losses=0;             // number of losses orders without a break
  
• 
  
• lot=NormalizeDouble(MaximumRisk * AccountBalance()/AccountLeverage(),1);     //开仓量计算
  
• if(lotmaxLots) lot=maxLots;
  
• return(lot);
  
• }
  
•   
  
• //平仓持有的买单
  
• void CloseBuy()
  
• {
  
• //int OrdersTotal( ) 返回挂单总数
  
• if (OrdersTotal( ) > 0 )   
  
• {
  
•   for(i=OrdersTotal()-1;i>=0;i--)
  
•   {
  
•   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false)     break;
  
•   if(OrderType()==OP_BUY)
  
•   {  
  
•     OrderClose(OrderTicket(),OrderLots(),Bid,3,White);
  
•     Sleep(5000);
  
•   }
  
•   }
  
• }
  
• }
  
• 
  
• //平仓持有的卖单
  
• void CloseSell()
  
• {
  
• if (OrdersTotal( ) > 0 )   
  
• {
  
•   for(i=OrdersTotal()-1;i>=0;i--)
  
•   {
  
•   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false)     break;
  
•   if(OrderType()==OP_SELL)
  
•     {
  
•     OrderClose(OrderTicket(),OrderLots(),Ask,3,White);
  
•     Sleep(5000);
  
•     }
  
•   }
  
• }
  
• }
  
• 
  
• //判断是否买或卖或平仓
  
• int buyorsell()   //在这个函数计算设置你的交易信号  这里使用MACD 和MA 做例子
  
• {
  
•   double MacdCurrent, MacdPrevious, SignalCurrent;
  
•   double SignalPrevious, MaCurrent, MaPrevious;
  
• 
  
•   MacdCurrent=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,0);
  
•   MacdPrevious=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
  
•   SignalCurrent=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,0);
  
•   SignalPrevious=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
  
•   
  
•   MaCurrent=iMA(NULL,0,MATrendPeriod,0,MODE_EMA,PRICE_CLOSE,0);
  
•   MaPrevious=iMA(NULL,0,MATrendPeriod,0,MODE_EMA,PRICE_CLOSE,1);
  
•   
  
• if(MacdCurrentSignalCurrent && MacdPreviousMaPrevious)
  
•   return (1); // 买 Ma在上升，Macd在0线上，并且两线上交叉
  
• 
  
• if(MacdCurrent>0 && MacdCurrentSignalPrevious && MaCurrent 19 ) return; //周五晚11点后不做
  
•   }
  
• 
  
• if (OrdersTotal( ) >= maxOpen) return ;   
  
• //如果已持有开仓次数达到最大，不做
  
• if (nowbuyorsell==0) return;   //不交易
  
• TradeOK();   //去下单交易
  
• }
  
• 
  
• void TradeOK()   //去下单交易
  
• {
  
• int error ;
  
• if (nowbuyorsell == 1) //买
  
•   {
  
•     switch (whichmethod)
  
•     {
  
•     case 1:   res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,0,\"\",MAGICMA,0,Blue);break;
  
•     case 2:   res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,Ask-StopLoss*Point,0,\"\",MAGICMA,0,Blue); break;
  
•     case 3:   res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,Ask+TakeProfit*Point,\"\",MAGICMA,0,Blue);break;
  
•     case 4:   res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,Ask-StopLoss*Point,Ask+TakeProfit*Point,\"\",MAGICMA,0,Blue);break;
  
•     default : res=OrderSend(Symbol(),OP_BUY,LotsOptimized(),Ask,3,0,0,\"\",MAGICMA,0,Blue);break;
  
•     }
  
•     if (res  (TrailingStop * MarketInfo(OrderSymbol(), MODE_POINT)))  //开仓价格 当前止损和当前价格比较判断是否要修改跟踪止赢设置
  
• 
  
•     {
  
•     if ((OrderStopLoss()) > (Ask + TrailingStop * MarketInfo(OrderSymbol(), MODE_POINT)))
  
•     {     
  
•       bs = OrderModify(OrderTicket(), OrderOpenPrice(),
  
•         Ask + TrailingStop * MarketInfo(OrderSymbol(), MODE_POINT), OrderTakeProfit(),0, Tan);
  
•     }
  
•     }
  
•   }
  
• }
  
• }
  

复制代码

看看现在变相卖EA的。。。越来越多！

天啊.  

一楼的位置好啊..  

唉，悲催的外汇。。  

朕要休息了..............  

我有个群，大家一起来讨论EA.  

加油啊！！！！顶哦!!!!!  

经过你的指点 我还是没找到在哪 ~~~  

谢谢分享！！！！！