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

操盘手EA dealers_trade_v_7.74_macd



操盘手交易 v 7.51 MACD 是基于多手数剥头皮算法的 EA。该 EA 已经在实盘账户里反复测试过。
开仓方向的选择根据标准 MACD 指标。EA 持续开仓, 每次都是大于之前的 1.5 或 2 倍。在设置里选择参数。开仓间隔为点数, 可在 EA 参数里设置。当最后最大交易量的仓位达到正面结果 (以止盈或尾随停止平仓), 整体订单批量平仓, 无论以前的开仓盈利与否。(此段描述乃引用说明,未经实盘证实。)

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

//+------------------------------------------------------------------+
//|                                            dealers 7.49 MACD.mq4 |
//|                                          Copyright @2006, Alex_N |
//+------------------------------------------------------------------+
#property copyright "Copyright @2006, Alex_N"
#property link "http://www.125808047.com/"

extern int    MAGIC=12457814;
extern double TakeProfit = 300;         
extern double Lots = 0.1;             
extern double InitialStop = 900;        
extern double TrailingStop = 150;     

extern int MaxTrades=5;                
extern int Pips=4;                    
extern int SecureProfit=50;            
                                      
                                       
extern int AccountProtection=1;        
                                       
extern int OrderstoProtect=3;         
                                       
                                       
extern int ReverseCondition=0;         
                                      
                                      
extern int MACD_fast_ema_period=14;   
extern int MACD_slow_ema_period=26;   
extern int mm=0;                       
extern int slippage=2;                
extern int risk=2;                    
extern int MaxLots=5;                 
extern int AccountisNormal=0;         
extern double Doble=1.5;               
extern double USDCHFPipValue=10.5;     
extern double USDCADPipValue=10.4;     
extern double USDJPYPipValue=9.2;     
extern double EURJPYPipValue=9.8;      
extern double EURUSDPipValue=10.3;    
extern double GBPUSDPipValue=10;      
extern double AUDUSDPipValue=9.9;     
extern double NZDUSDPipValue=8.9;     

int  OpenOrders=0, cnt=0;
double sl=0, tp=0;
double BuyPrice=0, SellPrice=0;
double lotsi=0, mylotsi=0;
int mode=0, myOrderType=0;
bool ContinueOpening=True;
bool cg = false;
double LastPrice=0;
int  PreviousOpenOrders=0;
double Profit=0;
int LastTicket=0, LastType=0;
double LastClosePrice=0, LastLots=0;
double Pivot=0;
double PipValue=0;
string text="", text2="";

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//---- 
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
void deinit() {
   Comment("www.125808047.com");
}

//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//---- 
   if (AccountisNormal==1)
   {
      if (mm!=0) { lotsi=MathCeil(AccountBalance()*risk/10000); }
        else { lotsi=Lots; }
   } else {  // then is mini
    if (mm!=0) { lotsi=MathCeil(AccountBalance()*risk/10000)/10; }
        else { lotsi=Lots; }
   }

   if (lotsi>MaxLots){ lotsi=MaxLots; }
   
   OpenOrders=0;
   for(cnt=0;cnt<OrdersTotal();cnt++)   
   {
     cg = OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol()==Symbol() && OrderMagicNumber()==MAGIC)
      {                
            OpenOrders++;
      }
   }     
   
   if (OpenOrders<1) 
   if (Symbol()=="USDCHF") { PipValue=USDCHFPipValue; }
   if (Symbol()=="USDCAD") { PipValue=USDCADPipValue; }
   if (Symbol()=="USDJPY") { PipValue=USDJPYPipValue; }
   if (Symbol()=="EURJPY") { PipValue=EURJPYPipValue; }
   if (Symbol()=="EURUSD") { PipValue=EURUSDPipValue; }
   if (Symbol()=="GBPUSD") { PipValue=GBPUSDPipValue; }
   if (Symbol()=="AUDUSD") { PipValue=AUDUSDPipValue; }
   if (Symbol()=="NZDUSD") { PipValue=NZDUSDPipValue; }
   if (PipValue==0) { PipValue=5; }
   
   if (PreviousOpenOrders>OpenOrders) 
   {      
      for(cnt=OrdersTotal();cnt>=0;cnt--)
      {
         cg = OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
          if (OrderSymbol()==Symbol() && OrderMagicNumber()==MAGIC) 
          {
             mode=OrderType();
            if (mode==OP_BUY) { cg = OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),slippage,Blue); }
            if (mode==OP_SELL) { cg = OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),slippage,Red); }
            return(0);
         }
      }
   }

   PreviousOpenOrders=OpenOrders;
   if (OpenOrders>=MaxTrades) 
   {
      ContinueOpening=False;
   } else {
      ContinueOpening=True;
   }

   if (LastPrice==0) 
   {
      for(cnt=0;cnt<OrdersTotal();cnt++)
      {    
        cg = OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
         if (OrderSymbol()==Symbol() && OrderMagicNumber()==MAGIC) 
         {
           mode=OrderType();    
            LastPrice=OrderOpenPrice();
            if (mode==OP_BUY) { myOrderType=2; }
            if (mode==OP_SELL) { myOrderType=1;    }
         }
      }
   }

   if (OpenOrders<1) 
   {
      myOrderType=3;
      if (iMACD(NULL,0,MACD_fast_ema_period,MACD_slow_ema_period,1,PRICE_CLOSE,MODE_MAIN,0)>iMACD
      (NULL,0,MACD_fast_ema_period,MACD_slow_ema_period,1,PRICE_CLOSE,MODE_MAIN,1)) { myOrderType=2; }
      if (iMACD(NULL,0,MACD_fast_ema_period,MACD_slow_ema_period,1,PRICE_CLOSE,MODE_MAIN,0)
      <iMACD(NULL,0,MACD_fast_ema_period,MACD_slow_ema_period,1,PRICE_CLOSE,MODE_MAIN,1)) { myOrderType=1; }
      if (ReverseCondition==1)
      {
            if (myOrderType==1) { myOrderType=2; }
          else { if (myOrderType==2) { myOrderType=1; } }
      }
   }

   // if we have opened positions we take care of them
   for(cnt=OrdersTotal();cnt>=0;cnt--)
   {
     cg = OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol() == Symbol() && OrderMagicNumber()==MAGIC) 
      {
            if (OrderType()==OP_SELL) 
            {
                  if (TrailingStop>0) 
              {
                  if (OrderOpenPrice()-Ask>=(TrailingStop+Pips)*Point) 
                  {
                     if (OrderStopLoss()>(Ask+Point*TrailingStop))
                     {
                        cg = OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point*TrailingStop,
                        OrderClosePrice()-TakeProfit*Point-TrailingStop*Point,800,Purple);
                           return(0);                          
                       }
                    }
              }
            }
   
            if (OrderType()==OP_BUY)
            {
               if (TrailingStop>0) 
               {
               if (Bid-OrderOpenPrice()>=(TrailingStop+Pips)*Point) 
                {
                    if (OrderStopLoss()<(Bid-Point*TrailingStop)) 
                    {
                       cg = OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Point*TrailingStop,
                       OrderClosePrice()+TakeProfit*Point+TrailingStop*Point,800,Yellow);
                  return(0);
                    }
                  }
             }
            }
       }
   }
   
   Profit=0;
   LastTicket=0;
   LastType=0;
    LastClosePrice=0;
    LastLots=0;    
    for(cnt=0;cnt<OrdersTotal();cnt++)
    {
      cg = OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol()==Symbol() && OrderMagicNumber()==MAGIC) 
      {
             LastTicket=OrderTicket();
            if (OrderType()==OP_BUY) { LastType=OP_BUY; }
            if (OrderType()==OP_SELL) { LastType=OP_SELL; }
            LastClosePrice=OrderClosePrice();
            LastLots=OrderLots();
            if (LastType==OP_BUY) 
            {
                //Profit=Profit+(Ord(cnt,VAL_CLOSEPRICE)-Ord(cnt,VAL_OPENPRICE))*PipValue*Ord(cnt,VAL_LOTS);                
                if (OrderClosePrice()<OrderOpenPrice())
                    { Profit=Profit-(OrderOpenPrice()-OrderClosePrice())*OrderLots()/Point; }
                if (OrderClosePrice()>OrderOpenPrice())
                    { Profit=Profit+(OrderClosePrice()-OrderOpenPrice())*OrderLots()/Point; }
            }
            if (LastType==OP_SELL) 
            {
                //Profit=Profit+(Ord(cnt,VAL_OPENPRICE)-Ord(cnt,VAL_CLOSEPRICE))*PipValue*Ord(cnt,VAL_LOTS);
                if (OrderClosePrice()>OrderOpenPrice()) 
                    { Profit=Profit-(OrderClosePrice()-OrderOpenPrice())*OrderLots()/Point; }
                if (OrderClosePrice()<OrderOpenPrice()) 
                    { Profit=Profit+(OrderOpenPrice()-OrderClosePrice())*OrderLots()/Point; }
            }
            //Print(Symbol,":",Profit,",",LastLots);
      }
   }
    
    Profit=Profit*PipValue;
    text2="Profit: $"+DoubleToStr(Profit,2)+" +/-";
   if (OpenOrders>=(MaxTrades-OrderstoProtect) && AccountProtection==1) 
   {        
         //Print(Symbol,":",Profit);
         if (Profit>=SecureProfit) 
         {
            cg = OrderClose(LastTicket,LastLots,LastClosePrice,slippage,Yellow);         
            ContinueOpening=False;
            return(0);
         }
   }

      if (!IsTesting()) 
      {
         if (myOrderType==3) { text="No conditions to open trades"; }
         else { text="                         "; }
         Comment("LastPrice=",LastPrice," Previous open orders=",PreviousOpenOrders,
         "\nContinue opening=",ContinueOpening," OrderType=",myOrderType,"\n",text2,"\nLots=",lotsi,"\n",text);
      }

      if (myOrderType==1 && ContinueOpening) 
      {    
         if ((Bid-LastPrice)>=Pips*Point || OpenOrders<1) 
         {        
            SellPrice=Bid;                
            LastPrice=0;
            if (TakeProfit==0) { tp=0; }
            else { tp=SellPrice-TakeProfit*Point; }    
            if (InitialStop==0) { sl=0; }
            else { sl=SellPrice+InitialStop*Point;  }
            if (OpenOrders!=0) 
            {
                  mylotsi=lotsi;            
                  for(cnt=1;cnt<=OpenOrders;cnt++)
                  {
                     if (MaxTrades>MaxTrades) { mylotsi=NormalizeDouble(mylotsi*Doble,1); }
                     else { mylotsi=NormalizeDouble(mylotsi*Doble,1); }
                  }
            } else { mylotsi=lotsi; }
            if (mylotsi>MaxLots) { mylotsi=MaxLots; }
            cg = OrderSend(Symbol(),OP_SELL,mylotsi,SellPrice,slippage,sl,tp,NULL,MAGIC,0,Red);                        
            return(0);
         }
      }
      
      if (myOrderType==2 && ContinueOpening) 
      {
         if ((LastPrice-Ask)>=Pips*Point || OpenOrders<1) 
         {        
            BuyPrice=Ask;
            LastPrice=0;
            if (TakeProfit==0) { tp=0; }
            else { tp=BuyPrice+TakeProfit*Point; }    
            if (InitialStop==0)  { sl=0; }
            else { sl=BuyPrice-InitialStop*Point; }
            if (OpenOrders!=0) {
               mylotsi=lotsi;            
               for(cnt=1;cnt<=OpenOrders;cnt++)
               {
                  if (MaxTrades>MaxTrades) { mylotsi=NormalizeDouble(mylotsi*Doble,1); }
                  else { mylotsi=NormalizeDouble(mylotsi*Doble,1); }
               }
            } else { mylotsi=lotsi; }
            if (mylotsi>MaxLots) { mylotsi=MaxLots; }
            cg = OrderSend(Symbol(),OP_BUY,mylotsi,BuyPrice,slippage,sl,tp,NULL,MAGIC,0,Blue);            
            return(0);
         }
      }   

//----
   return(0);
  }
//+------------------------------------------------------------------+

如您喜欢此文章请点下面分享按钮↴峰汇在线 » 操盘手EA dealers_trade_v_7.74_macd
上一篇:
下一篇:
分享到:更多 ()