Я делал здесь заказ для Anatoly74 там нужно было тоже стопы на крайние ордера навесить. Но не найду никак где именно топик. Помню у меня это тоже не сразу получилось.

так я под стопы переделывал. получился бред

extern double Lot1=0.1;
extern double Lot2=0.1;
extern string Symbol1=«EURUSD»;
extern string Symbol2=«GBPUSD»;
extern int TP=20;
extern int StopLoss=20;
extern int ProfitClose=10;
extern int MaxOrders=3;
extern int Magic=777;
/////////////////////////////////////////////////////////////////////////
int D,i,y,i1,i2;
string Name;
double Ask1,Bid1,Ask2,Bid2, sls, slb;
int Nom[];
int Pairs;
int Ticket1,Ticket2;
int TypeOrder;
double LotOrder;
string SymbolOrder;
int init()
{
D=1;
if (Digits==5 || Digits==3)D=10;
Name=WindowExpertName();
ArrayResize(Nom,100);
return(0);
}
/////////////////////////////////////////////////////////////////////////
int start()
{
Ask1=NormalizeDouble(MarketInfo(Symbol1,MODE_ASK),MarketInfo(Symbol1,MODE_DIGITS));
Bid1=NormalizeDouble(MarketInfo(Symbol1,MODE_BID),MarketInfo(Symbol1,MODE_DIGITS));
Ask2=NormalizeDouble(MarketInfo(Symbol2,MODE_ASK),MarketInfo(Symbol2,MODE_DIGITS));
Bid2=NormalizeDouble(MarketInfo(Symbol2,MODE_BID),MarketInfo(Symbol2,MODE_DIGITS));
/////////////////////////////////////////////////////////////////////////
int OB1,OS1,OB2,OS2,N;
int Ticket;
double ProfitAll;
Pairs=0;
ArrayInitialize(Nom,0);
for (i=0; i<OrdersTotal(); i++)
{
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if (OrderSymbol()==Symbol1 && OrderMagicNumber()==Magic)
{
if (OrderType()==0)
{
OB1++;
}
if (OrderType()==1)
{
OS1++;
}
ProfitAll+=OrderProfit();
}
if (OrderSymbol()==Symbol2 && OrderMagicNumber()==Magic)
{
if (OrderType()==0)
{
OB2++;
}
if (OrderType()==1)
{
OS2++;
}
ProfitAll+=OrderProfit();
}
for (int y=0; y<Pairs; y++)
{
if (Nom[y]==StrToInteger(OrderComment()))break;
}
if (y==Pairs){Nom[y]=StrToInteger(OrderComment());Pairs++;}
}
/////////////////////////////////////////////////////////////////////////
/*Comment (ProfPar(1),
"\n",ProfPar(2),
"\n",ProfPar(3),
"\n",ProfPar(4),
"\n",Pairs);*/
if (ProfitAll>=ProfitClose)
{
CloseMarket();
return(0);
}
/////////////////////////////////////////////////////////////////////////
if (OB1+OS1+OB2+OS2==0)
{
Ticket=OpenOrder(Symbol1,OP_BUY,Lot1,Ask1,Ask-StopLoss*_Point,0,«1»,Magic);
Ticket=OpenOrder(Symbol1,OP_SELL,Lot1,Bid1,Bid+StopLoss*_Point,0,«2»,Magic);
Ticket=OpenOrder(Symbol2,OP_BUY,Lot2,Ask2,Ask-StopLoss*_Point,0,«2»,Magic);
Ticket=OpenOrder(Symbol2,OP_SELL,Lot2,Bid2,Bid+StopLoss*_Point,0,«1»,Magic);
}
/////////////////////////////////////////////////////////////////////////
if (Pairs>0)
{
for( y=0;y<Pairs; y++)
{
if (ProfPar(Nom[y])>=TP)
{
FindTicket(Nom[y]);
Print (Ticket1," ",Ticket2);
OrderSelect(Ticket1,SELECT_BY_TICKET,MODE_TRADES);
TypeOrder=OrderType();LotOrder=OrderLots();SymbolOrder=OrderSymbol();
CloseOrder(Ticket1,LotOrder);
if (TypeOrder==0)
{
OB1--;
sls = Bid + StopLoss* Point;
slb = Ask — StopLoss* Point;
if (OS1<=MaxOrders)Ticket=OpenOrder(SymbolOrder,0,LotOrder,0,sls,0,Nom[y],Magic);
if (OB1<=MaxOrders)Ticket=OpenOrder(SymbolOrder,1,LotOrder,0,slb,0,NewNom(),Magic);
}
else
{
OS1--;
if (OB1<=MaxOrders)Ticket=OpenOrder(SymbolOrder,1,LotOrder,0,slb,0,Nom[y],Magic);
if (OS1<=MaxOrders)Ticket=OpenOrder(SymbolOrder,0,LotOrder,0,sls,0,NewNom(),Magic);
}
/////////////////////////////////////////////////
OrderSelect(Ticket2,SELECT_BY_TICKET,MODE_TRADES);
TypeOrder=OrderType();LotOrder=OrderLots();SymbolOrder=OrderSymbol();
CloseOrder(Ticket2,LotOrder);
if (TypeOrder==0)
{
OB2--;
if (OS2<=MaxOrders)Ticket=OpenOrder(SymbolOrder,0,LotOrder,0,0,0,Nom[y],Magic);
if (OB2<=MaxOrders)Ticket=OpenOrder(SymbolOrder,1,LotOrder,0,0,0,NewNom(),Magic);
}
else
{
OS2--;
if (OB2<=MaxOrders)Ticket=OpenOrder(SymbolOrder,1,LotOrder,0,0,0,Nom[y],Magic);
if (OS2<=MaxOrders)Ticket=OpenOrder(SymbolOrder,0,LotOrder,0,0,0,NewNom(),Magic);
}
}
}
}
/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////
return(0);
}
/////////////////////////////////////////////////////////////////////////
int CloseMarket()
{
for (int j=0; j<OrdersTotal(); j++)
{
OrderSelect(j,SELECT_BY_POS,MODE_TRADES);
if (OrderSymbol()==Symbol() && OrderMagicNumber()==Magic )
{
CloseOrder(OrderTicket(),OrderTicket());
j--;
}
}
return(0);
}
////////////////////////////////////////////////////////////////////////
double ProfPar(int nom)
{
double prof;
for (i=0; i<OrdersTotal(); i++)
{
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if (OrderMagicNumber()==Magic && StrToInteger(OrderComment())==nom)
{
if (OrderType()==0)prof=prof+(MarketInfo(OrderSymbol(),MODE_BID)-OrderOpenPrice())/MarketInfo(OrderSymbol(),MODE_POINT);
if (OrderType()==1)prof=prof+(OrderOpenPrice()-MarketInfo(OrderSymbol(),MODE_ASK))/MarketInfo(OrderSymbol(),MODE_POINT);
}
}
return (prof/D);
}
/////////////////////////////////////////////////////////////////////////////
int FindTicket(int nom)
{
Ticket1=0;Ticket2=0;
for (i=0; i<OrdersTotal(); i++)
{
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if (OrderMagicNumber()==Magic && StrToInteger(OrderComment())==nom)
{
if (Ticket1==0) {Ticket1=OrderTicket();continue;}
if (Ticket1>0) {Ticket2=OrderTicket();break;}
}
}
}
/////////////////////////////////////////////////////////////////////////////
int NewNom()
{
for (i1=1; i1<100; i1++)
{
for (i2=0; i2<Pairs;i2++)
{
if (Nom[i2]==i1) break;
}
if (i2==Pairs)return (i1);
}
}
/////////////////////////////////////////////////////////////////////////////
int OpenOrder(string symbol,int cmd,double volume,double price,double stoploss,double takeprofit,string comment,int magic)
{
int err,i,ticket;
while(i<10)
{
RefreshRates ();
if(cmd==0) price=NormalizeDouble(MarketInfo(symbol,MODE_ASK),MarketInfo(symbol,MODE_DIGITS));
if(cmd==1) price=NormalizeDouble(MarketInfo(symbol,MODE_BID),MarketInfo(symbol,MODE_DIGITS));
ticket=OrderSend(symbol,cmd,volume,price,3*D,stoploss,takeprofit,comment,magic);
err = GetLastError();
if (err == 0) break;
Print(Name,Symbol(),Error(err)," при открытии ордера");
Print (price);
Sleep(1000);
i++;
}
return(ticket);
}
/////////////////////////////////////////////////////////////////////////////
int CloseOrder(int ticket, double lots)
{
int err,i1,cmd;
string symbol;
double price;
OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES);
cmd=OrderType();
symbol=OrderSymbol();
if (lots<MarketInfo(Symbol(),MODE_MINLOT))lots=MarketInfo(Symbol(),MODE_MINLOT);
while(i1<10)
{
RefreshRates();
if(cmd==0) price=NormalizeDouble(MarketInfo(symbol,MODE_BID),MarketInfo(symbol,MODE_DIGITS));
if(cmd==1) price=NormalizeDouble(MarketInfo(symbol,MODE_ASK),MarketInfo(symbol,MODE_DIGITS));
if (OrderType()>1){OrderDelete(ticket);return(0);}
OrderClose(ticket,lots,price,3*D,CLR_NONE);
err = GetLastError();
if (err == 0) break;
Print(Name,Symbol(),Error(err)," при закрытии ордера");
Sleep(1000);
i1++;
}
return(0);
}
//////////////////////////////////////////////////////////////////////////////
int ModifyOrder(int ticket,double price,double stoploss,double takeprofit)
{
int err,i;
while(i<10)
{
RefreshRates();
OrderModify(ticket,NormalizeDouble(price,Digits),NormalizeDouble(stoploss,Digits),NormalizeDouble(takeprofit,Digits),0,CLR_NONE);
err = GetLastError();
if (err == 0) break;
Print(Name,Symbol(),Error(err)," при модификации ордера");
Sleep(1000);
i++;
}
return(0);
}

а однагрупник скоро с ним с ума сойдет 

Вот это код. Только у меня там в БУ кроет а вам нужно стопы выставить:

//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
//---
   if(OrdersTotal()<1){PutBuyLimitCountOrders();}
   if(CountTrades()==10 && BuOrdersProfit()>0) {CloseBuOrders();}
   Comment("\nBu Orders Profit: ",BuOrdersProfit(),
           "\nOpen Position: ",CountTrades());
  }      
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
void PutBuyLimitCountOrders()
  {
     for(int i=1;i<=10;i++)
      {           
       int ticket=OrderSend(Symbol(),OP_BUYLIMIT,0.2,Ask-(i*100*Point),3,
                                                     Ask-(i*100*Point)-2000*Point,
                                                     Ask-(i*100*Point)+2000*Point,"",111,0,Blue);
      }       
  }
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
double BuOrdersProfit()
  {
   double all=0;
   for(int i=OrdersTotal()-1;i>=7;i--)
    {
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
       if(OrderSymbol()==Symbol() && OrderMagicNumber()==111)
        {
         if(OrderType()==OP_BUY)
          {
           all+=OrderProfit();
          }
        }
      }
    }   
   all=NormalizeDouble(all,Digits);
   return(all);
  } 
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
double CloseBuOrders()
  {
   double all=0;
   bool cl;
   for(int i=OrdersTotal()-1;i>=7;i--)
    {
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
       if(OrderSymbol()==Symbol() && OrderMagicNumber()==111)
        {
         if(OrderType()==OP_BUY)
          {
           cl=OrderClose(OrderTicket(),OrderLots(),Bid,3,White);
          }  
        }
      }
    }   
   all=NormalizeDouble(all,Digits);
   return(all);
  } 
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
int CountTrades()
  {
   int count=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
    {
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
       if(OrderSymbol()==Symbol() && OrderMagicNumber()==111)
        {
         if(OrderType()==OP_BUY || OrderType()==OP_SELL)
          count++;
        }
      }
    }
    return(count);
  }
//+------------------------------------------------------------------+

в каком смысле кроет? непешите мне на вы пожалуйста. я простой деревенский парень младше вас на 17 лет

Просто нужно будет заменить функция закрытия по БУ на выставление стопов.

Скажем у тебя открыто 10 ордеров по евре и 10 по фунту. С какого количества ордеров, например с 5 по каждой паре нужно стопить крайние скажем 3?

тоесть неполучится к профиту цепануть стапы.   да?

Что конкретно нужно сделать?
1. Трал по эквити
2. Тейк по эквити
3. Тейк по профиту в валюте
4. Трал по по профиту в валюте

воот смотрите дапустим цена идет вверх открывается ордер на бай. и патом цепляет ордер на сэл и идет опять вверх. ордера на бай у нас последовательно закрываются по тейк профиту. и выручка берется на счет а ордер на сел уходит в минус. значит нужен на нее стоп. и так же на другой ордер. тоесть дохад в + а убытак минимизируем.
Редактирован: 14 мая 2015, 19:50

я уже месяц вожусь над тем чтобы на том что я вам скидывал изначально. ну назавем исходник у которого цена фиксируется при тейк профите. и идет в отрицательную сторону на другой ордер на бай. сэл чтоб закрывался. при небольшем убытке по последнему TP с каждого ордера будь то бай либо сэл
Редактирован: 14 мая 2015, 20:15