有您的持续关注
我们会做得更好

根据均线设计的智能交易系统 TunnelMethod EA



TunnelMethod EA根据均线EMA12,EMA144,EMA169在一小时图表进行交易。带有止损和盈利。

本网收集整理智能交易EA仅为MQL4编程爱好者提供语法及相关编程技巧的学习研究之用,智能交易存在极高的风险测试请用模拟盘,请勿用于实盘。TunnelMethod EA源码:

//+------------------------------------------------------------------+
//|                                                  TunnelMethod.mq4|
//|                                   Copyright 2005, Chris Battles. |
//|                                              cbattles@neo.rr.com |
//+------------------------------------------------------------------+

#property copyright "Copyright 2005, Chris Battles."
#property link      "cbattles@neo.rr.com"

extern double TrailingStop = 350;
extern double TrailingStopTrigger = 200;
extern double StopLoss = 250;
extern double TakeProfit = 230;
extern double Lots = 0.1;

void deinit() {
  Comment("www.125808047.com");
}

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int start(){
   int cnt, ticket;
   if(Bars<100){
      Print("bars less than 100");
      return(0);
   }

   double ema1a=iMA(NULL,60,169,0,MODE_EMA,PRICE_CLOSE,0);
   double ema2a=iMA(NULL,60,144,0,MODE_EMA,PRICE_CLOSE,0);
   double ema3a=iMA(NULL,60,12,0,MODE_EMA,PRICE_CLOSE,0);
   double ema1b=iMA(NULL,60,169,0,MODE_EMA,PRICE_CLOSE,1);
   double ema2b=iMA(NULL,60,144,0,MODE_EMA,PRICE_CLOSE,1);
   double ema3b=iMA(NULL,60,12,0,MODE_EMA,PRICE_CLOSE,1);

   int total=OrdersTotal();
   if(total<1){
      if(AccountFreeMargin()<(1000*Lots)){
         Print("We have no money. Free Margin = ", AccountFreeMargin());
         return(0);
      }

      if (ema3b<ema1b && ema3a>ema1a){
         ticket=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,Ask-StopLoss*Point,Ask+TakeProfit*Point, NULL,16384,0,Green);
         if(ticket>0){
            if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("BUY order opened : ",OrderOpenPrice());
         }
         else Print("Error opening BUY order : ",GetLastError());
         return(0);
      }

      if (ema3b>ema2b && ema3a<ema2a){
         ticket=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,Bid+StopLoss*Point,Bid-TakeProfit*Point, NULL,16384,0,Red);
         if(ticket>0) {
            if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("SELL order opened : ",OrderOpenPrice());
         }
         else Print("Error opening SELL order : ",GetLastError());
         return(0);
      }
   }
   for(cnt=0;cnt<total;cnt++) {
      bool cg = OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if(OrderType()<=OP_SELL && OrderSymbol()==Symbol()) {
         if(OrderType()==OP_BUY){
            if(TrailingStop>0) {
               if(Bid-OrderOpenPrice()>Point*TrailingStopTrigger) {
                  if(OrderStopLoss()<Bid-Point*TrailingStop) {
                     cg = OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Point*TrailingStop,OrderTakeProfit(),0,Green);
                     return(0);
                  }
               }
            }
         }else{
            if(TrailingStop>0) {
               if((OrderOpenPrice()-Ask)>(Point*TrailingStopTrigger)) {
                  if((OrderStopLoss()>(Ask+Point*TrailingStop)) || (OrderStopLoss()==0)) {
                     cg = OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point*TrailingStop,OrderTakeProfit(),0,Red);
                     return(0);
                  }
               }
            }
         }
      }
   }
return(0);
}

如您喜欢此文章请点下面分享按钮↴峰汇在线 » 根据均线设计的智能交易系统 TunnelMethod EA
上一篇:
下一篇:
分享到:更多 ()