EaCode小胖李 发表于 2022-12-26 21:19:52

CloseEarliestAndProfitOrderByFirstLosePoint()首单亏损点数达到设定值后盈利单带走亏损单

函数名称
void CloseEarliestAndProfitOrderByFirstLosePoint(string SymbolX,int OrderTypeX,int MagicX,int FirstLosePoint,int LossNumX,double ExitProfitX)
函数介绍

CloseEarliestAndProfitOrderByFirstLosePoint()可以实时监控首单(开仓最早的那一单)的亏损点数,当亏损点数达到设定值后。再用盈利单带走部分亏损单,盈利单带走亏损单的规则是:盈利单加上带走的亏损单盈利金额需要大于设定值。

//举例:当多单首单的亏损点数大于2000点后,多单盈利单+最少3个开仓最早的亏损单盈利金额>10,则平掉该部分订单。
CloseEarliestAndProfitOrderByFirstLosePoint(Symbol(),OP_BUY,MAGIC,2000,3,10);

参数介绍

SymbolX:订单筛选的交易品种,一般设置当前品种即可,也就是Symbol();“-1”代表不筛选交易品种。
OrderTypeX:订单筛选的订单类型,0代表多单,1代表空单。OP_BUY是常量0,OP_SELL是常量1。-1代表不筛选订单类型。
MagicX:订单的魔术码,你的EA的魔术码是多少,这里填上即可。
FirstLosePoint:首单(开仓最早的那一单)的亏损点数大于此值后,启动该功能。
LossNumX:最低带走的亏损订单数量,亏损订单以亏损金额为基准,优先带走亏损金额最大的订单。
ExitProfitX:平仓的盈利金额,盈利单加上需要带走的亏损单金额需要大于此值。

函数定义

注意:本人发布的函数均为实战开发所用,低价或免费发布并不赚钱,仅限懂编程的朋友使用,不提供指导,因为人工成本巨贵,感谢朋友们海涵。void CloseEarliestAndProfitOrderByFirstLosePoint(string SymbolX,int OrderTypeX,int MagicX,int FirstLosePoint,int LossNumX,double ExitProfitX)
{
   int cnt=0;
   bool Flag=false;
   double ExitProfit=0;
   if(FNProfitPoint(SymbolX,OrderTypeX,MagicX,"F")<FirstLosePoint*-1 && FirstLosePoint>0)
      for(int i=0; i<OrdersTotal(); i++)
         if(OrderSelect(i,SELECT_BY_POS))
            if((OrderSymbol()==SymbolX ||SymbolX=="-1")&& (OrderMagicNumber()==MagicX || MagicX==-1)&&(OrderType()==OrderTypeX || OrderTypeX==-1))
            {
               cnt++;
               if(cnt<=LossNumX || OrderProfit()+OrderSwap()+OrderCommission()>0)
                  ExitProfit=ExitProfit+OrderProfit()+OrderSwap()+OrderCommission();
            }
   cnt=0;
   if(ExitProfit>ExitProfitX && ExitProfitX>0)
      for(int i=0; i<OrdersTotal(); i++)
         if(OrderSelect(i,SELECT_BY_POS))
            if((OrderSymbol()==SymbolX ||SymbolX=="-1")&& (OrderMagicNumber()==MagicX || MagicX==-1)&&(OrderType()==OrderTypeX || OrderTypeX==-1))
            {
               cnt++;
               if(cnt<=LossNumX || OrderProfit()+OrderSwap()+OrderCommission()>0)
                  if(!OrderClose(OrderTicket(), OrderLots(), OrderClosePrice(), 0,Yellow))
                     Print(GetLastError());
            }
}
int FNProfitPoint(string SymbolX,int OrderTypeX,int MagicX,string FN)
{
   datetime OpenTime=D'1970.01.01 00:00';
   double OpenPrice=0;
   int ProfitPoint=0;
   for(int i=OrdersTotal()-1; i>=0; i--)
   {
      if(OrderSelect(i,SELECT_BY_POS))
         if((OrderSymbol()==SymbolX ||SymbolX=="-1")&& (OrderMagicNumber()==MagicX || MagicX==-1)&&(OrderType()==OrderTypeX || OrderTypeX==-1))
            if(((OpenTime==D'1970.01.01 00:00'||OpenTime>OrderOpenTime()) && FN=="F")
               ||((OpenTime==D'1970.01.01 00:00'||OpenTime<OrderOpenTime()) && FN=="N"))
            {
               OpenTime=OrderOpenTime();
               OpenPrice=OrderOpenPrice();
            }
   }
   if(OpenPrice>0)
   {
      if(OrderTypeX==OP_BUY)
         ProfitPoint=(MarketInfo(SymbolX,MODE_BID)-OpenPrice)/MarketInfo(SymbolX,MODE_POINT);

      if(OrderTypeX==OP_SELL)
         ProfitPoint=(OpenPrice-MarketInfo(SymbolX,MODE_BID))/MarketInfo(SymbolX,MODE_POINT);
   }

   return(ProfitPoint);
}






ssbienhild 发表于 2022-12-27 15:42:05

不错的思路

ken138888 发表于 2023-3-9 13:59:28

马丁吗?

qwe11 发表于 2023-3-9 19:15:56

好的想法

shllwk 发表于 2023-10-19 12:21:07

不错的思路好的想法
页: [1]
查看完整版本: CloseEarliestAndProfitOrderByFirstLosePoint()首单亏损点数达到设定值后盈利单带走亏损单