手机版

外汇交易辅助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编程学习
本文地址:https://www.waihuibang.com/fxschool/autotrading/mql4/40650.html

相关文章

  • EA(原码)学习

    //+------------------------------------------------------------------+ #property copyright "2009" #property link " " int MagicNumber = 0; string EAname ="顺势"; int MAGICMA = 2000; //定义资金管理--...

    MQL4编程学习
  • 外汇EA:MT4.0编程函数库

    MT4.0和3.x相比,编程语言迥然不同,基本上是C语言的翻版,所以有一些C语言基础是很容易学会MT编程的。MT4.0可以编写的程序有好几类,主要是自动交易程序和指标,估计大家都是为了给自己的投资策略,由于我的精力有限,所以接下...

    MQL4编程学习
  • 暴利回报的商业EA能用吗?
    暴利回报的商业EA能用吗?

    EA就是智能交易系统,也就是能够自动下单交易的软件。最近被炒得非常火热,特别是在国外更是沸沸扬扬。各个EA开发商纷纷提供交易记录,各个几乎都是暴利,还有年盈利几十倍的。其中不乏几千美金一套的。据统计目前全世界...

    MQL4编程学习
  • Armada EA:有稳定回报的敏感系统
    Armada EA:有稳定回报的敏感系统

    今天,我们将探讨一下Armada专家顾问(EA),是在 MetaTrader 4(MT4)平台工作的自动交易系统,旨在当你进行交易时提供一些利润给你。虽然交易系统被检查出很节俭,但迄今显示不俗的表现。 在我们的评论中,我们将使用链接到Myfxbo...

    MQL4编程学习
  • 外汇MT4平台操作帮助

      在使用mt4平台进行操作的时候,每个人都会遇到各种不同的问题,今天我们就来对一些常见的问题做一些解释。   1.聊天软件导致自动成交。有人习惯在做单的时候,同时使用聊天软件聊天。但是如果如果在MT4软件的界面...

    MQL4编程学习
你可能感兴趣