外汇交易辅助EA(编写)

阅读 :
外_汇_邦 WaiHuiBang.com

//=============== VARS external
extern int 第一目标点数 = 20;
extern int 第二目标与第一目标距离 = 20;
extern double 分批平仓手数 = 0.2;
//=======================================
extern bool 使用移动止损功能 = true;
extern int 第一次盈利点数 = 10;
extern int 第一次移止损距离开仓价点数 = 0;
extern int 第二次盈利点数 = 30;
extern int 第二次移止损距离开仓价点数 = 10;
//======================================
extern bool 使用最大允许亏损功能 = true;
extern int 最大亏损点数 = 20;
extern int Magic_Number=0;

//=============== VARS internal
int nextTP;
bool sl;
int range = 5;
int multiplier;
// OrderType == 1 is OP_SELL

 


//=============== FUNCTION init
int init()
  {
   sl=0;
   nextTP = 第一目标点数;
   getMaxLoss();
  }
//== end function


//=============== FUNCTION deinit
int deinit()
  {
//----
   sl=0;
   nextTP = 第一目标点数;
//----
   return(0);
  }
//== end function

//========== FUNCTION Start
int start()
  {
//----
   getOpenOrders();
   getSpread();
   //Comment(sl);
//----
   return(0);
  }
//== end function

//========== FUNCTION getPipValue
double type_order_profit(double order_openprice,int ordertype)
{
   double val;
   RefreshRates();
   if(ordertype == 1) val=(NormalizeDouble(order_openprice,Digits) - NormalizeDouble(Ask,Digits));
   else val=(NormalizeDouble(Bid,Digits) - NormalizeDouble(order_openprice,Digits));
   val = val/Point;
   return(val);  
}
//== end function

int getSpread()
{
   int spread=MarketInfo(Symbol(),MODE_SPREAD);
   return(spread);
}


int getMaxLoss()
{
   int calcMaxLoss;
   calcMaxLoss = 最大亏损点数;
   return(calcMaxLoss);
}
//========== FUNCTION getOpenOrders
void getOpenOrders()
{
   int nsl, nsd;
   string mngMagic;
   int totalorders = OrdersTotal();
   for(int j=0; j<totalorders;j++)
     { 
         OrderSelect(j, SELECT_BY_POS, MODE_TRADES);
         if((OrderType() == OP_BUY || OrderType() == OP_SELL) && OrderSymbol() == Symbol()&&(Magic_Number==0 || Magic_Number == OrderMagicNumber()))
         {

            double order_profit=type_order_profit(OrderOpenPrice(),OrderType());
            //int val = OrderProfit()/(OrderLots()*10);
            if(使用最大允许亏损功能 && 最大亏损点数 > 0) killTrade(order_profit,OrderTicket());
            if(使用移动止损功能) checkStops(order_profit,OrderTicket());
            Close_at_Profit(order_profit,OrderTicket());           
           
         }
        
         if(Magic_Number == 0)
         mngMagic = "All "+Symbol()+" trades.";
         else
         mngMagic = "Trades with magic number = "+Magic_Number;
        
        
         if(sl==0)
            {
               nsl = 第一次盈利点数;
               nsd = 第一次移止损距离开仓价点数;
            }
          else
            {
               nsl = 第二次盈利点数;
               nsd = 第二次移止损距离开仓价点数;
            }
         //RefreshRates();
         Comment("Order Open: ",OrderOpenPrice(),
         "/nPip Count: ", order_profit,
         "/nNext Stop Target: ",nsl,
         "/nNext Stop Differential: ", nsd,
         "/nNext TP: ", nextTP,
         "/nSL: ",sl,
         "/nMax Loss: ", getMaxLoss(),
         "/nManaging: ",mngMagic);
        

     } 
}

//========== FUNCTION takeProfit
void Close_at_Profit(int orderprofit, int orderticket)
{
   if(OrderSelect(orderticket, SELECT_BY_TICKET)==true)
   {

      if(orderprofit >= nextTP && orderprofit < (nextTP + 第二目标与第一目标距离))
      {
         if(OrderType()==1)
         {
            if(OrderClose(orderticket, 分批平仓手数, Ask, 3, YellowGreen))
            nextTP+=第二目标与第一目标距离;
            else
            Print("Error closing order : ",GetLastError());
         }
         else
         {
            if(OrderClose(orderticket, 分批平仓手数, Bid, 3, YellowGreen))
            nextTP+=第二目标与第一目标距离;
            else
            Print("Error closing order : ",GetLastError());
         }
             
      }

   }
}

//== end function

 

//========== FUNCTION moveStops
void checkStops(int Orderprofit,int ticket)
{
   if(sl==0 && Orderprofit < 第二次盈利点数)
   {
      if(Orderprofit >= 第一次盈利点数 && Orderprofit < (第二次盈利点数))
      {
         moveStops(ticket, 第一次移止损距离开仓价点数);
      }
   }
   else if(sl==1 || Orderprofit >= 第二次盈利点数)
   {
      if(Orderprofit >= 第二次盈利点数)
      {
         moveStops(ticket,第二次移止损距离开仓价点数);
      }
   }


}

//== end function

//========== FUNCTION moveStops
void moveStops(int orderticket,int TrainingStop)
{
   if(OrderSelect(orderticket, SELECT_BY_TICKET)==true)
   {
      Print("moveStops called ",orderticket, " ",TrainingStop);
      if(OrderType()==1)
      {
      OrderModify(orderticket,OrderOpenPrice(),OrderOpenPrice()-TrainingStop*Point, OrderTakeProfit(),0,Plum);
      sl=1;
      }
      else
      {
      OrderModify(orderticket,OrderOpenPrice(),OrderOpenPrice()+TrainingStop*Point, OrderTakeProfit(),0,Plum);
      sl=1;
      }
   }
  

  
}

//== end function

//========== FUNCTION killTrades
void killTrade(int pips, int ticket)
{
   if(OrderSelect(ticket, SELECT_BY_TICKET)==true)
   {
      if(pips <= -1*getMaxLoss())
      {
         if(OrderType()==1) OrderClose(ticket,OrderLots(),Ask,3,Red);    
         else OrderClose(ticket,OrderLots(),Bid,3,Red);
      }     
   }
}

 

外_汇_邦 WaiHuiBang.com
本文标题:外汇交易辅助EA(编写) - MT4平台MQL4编程学习
本文地址:http://www.waihuibang.com/fxschool/autotrading/mql4/40650.html

相关文章

  • Flex智能交易系统:这就是摇滚
    Flex智能交易系统:这就是摇滚

    今天,我们了解一款盈利非常高的智能交易系统——Flex智能交易系统,该系统使用风险非常高的赌博方式实现收益。这款智能交易系统的名称来自其设置的灵活性,开发人员声称,该系统能够以任何方式运行,从剥头皮到...

    MQL4编程学习
  • 外汇VPS 之 外汇EA租用阿里云ECS云服务器注意事项

    在外汇市场,投资者对行情及订单的最新状况的掌控至关重要,但是任何人都不可能一天24小时坐在电脑屏幕前。想象一下,即使你睡着了,电脑关机了,你的订单仍能够持续交易,并不会出现什么丢失。就跟你坐在电脑前一样,一切表现正常...

    MQL4编程学习
  • MT4编程初级手册(9):MT4自定义指标的结构
    MT4编程初级手册(9):MT4自定义指标的结构

    MT4自定义指标一般由四个部分所组成: (1)文件头部; (2)参数、变量和数组的定义; (3)初始化函数init(); (4)主函数start()。 一、文件头部,也称为预处理程序 预处理程序以“#”开头,行尾无语句结束符“;”。 常用的预处...

    MQL4编程学习
  • 外汇EA编程入门【第九课】: 阴阳太极-自定义02

    1.人真的麻烦,多事是人的天性,你又发现。。。为什么没有《自定义》takeprofit...

    MQL4编程学习
  • MQL4数据类型转换函数

    本组函数提供从一种格式到另一种格式的数据转换功能。特别要注意 NormalizeDouble() 函数,它确保了表示价格所需的准确性。在交易过程中,MT4不可能使用非标准价格,即使价格的小数位数多出一位,超出了交易服务...

    MQL4编程学习
你可能感兴趣