下载MetaTrader 5

EA: 抛硬币

要添加评论,请登录注册
Automated-Trading
管理员
106199
Automated-Trading  

抛硬币:

使用马丁格尔策略开单, 并带有虚拟尾随停止。

作者: Vladimir Gribachev

Caven
18
Caven  
我的也是这种策略的EA,但如何做到总体盈利后一键平单?求请教
marvelone
6
marvelone  
Caven:
我的也是这种策略的EA,但如何做到总体盈利后一键平单?求请教

//+------------------------------------------------------------------+

//|                                               CloseAllOrders.mq4 |

//|                       Copyright ?2008, PRMQuotes Software Corp. |

//|                                           Jedimedic77@gmail.com  |

//+------------------------------------------------------------------+

#property copyright "Copyright ?2008, PRMQuotes Software Corp."

#property link      ""

//+------------------------------------------------------------------+

//| EX4 imports                                                      |

//+------------------------------------------------------------------+

#include <stdlib.mqh>

//+------------------------------------------------------------------+

//| global variables to program:                                     |

//+------------------------------------------------------------------+

double Price[2];

int    giSlippage;

bool   CloseOpenOrders=true;

//+------------------------------------------------------------------+

//| script program start function                                    |

//+------------------------------------------------------------------+

void start()

  {

   int iOrders=OrdersTotal()-1,i;


   if(CloseOpenOrders)

     {

      for(i=iOrders; i>=0; i--)

        {

         if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES) && OrderSymbol()==Symbol() && (OrderType()<=OP_SELL) && GetMarketInfo() && !OrderClose(OrderTicket(),OrderLots(),Price[1-OrderType()],giSlippage)) Print(OrderError());

         else Print("ok");


        }

     }

     }

//+------------------------------------------------------------------+

//| Function..: OrderError                                           |

//+------------------------------------------------------------------+

   string OrderError()

     {

      int iError=GetLastError();

      return(StringConcatenate("Order:",OrderTicket()," GetLastError()=",iError," ",ErrorDescription(iError)));

     }

//+------------------------------------------------------------------+

//| Function..: GetMarketInfo                                        |

//+------------------------------------------------------------------+

   bool GetMarketInfo()

     {


      RefreshRates();

      Price[0]=MarketInfo(OrderSymbol(),MODE_ASK);

      Price[1]=MarketInfo(OrderSymbol(),MODE_BID);

      double dPoint=MarketInfo(OrderSymbol(),MODE_POINT);

      //if(dPoint==0) return(false);

      giSlippage=(Price[0]-Price[1])/dPoint;

      giSlippage=3;

      return(Price[0]>0.0 && Price[1]>0.0);

     }

//+------------------------------------------------------------------+


marvelone
6
marvelone  
Caven:
我的也是这种策略的EA,但如何做到总体盈利后一键平单?求请教

拿走不谢

附加的文件:
要添加评论,请登录注册