[ARCHIVE] Toute question de débutant, afin de ne pas encombrer le forum. Professionnels, ne passez pas à côté. Nulle part sans toi - 3. - MQL4 et MetaTrader 4 - Forum de programmation MQL4

Роман 2012.01.25 13:31 #5291

...et décidez - voici aussi pour vous une section de code d'un des ILANINS de la branche "Villagers" - calcul du prix moyen des ordres de marché et du prix cible du PriceTarget - c'est le b/w level + TP. Le TP est déjà à votre discrétion - adaptez-le également à vos besoins :

 total=CountTrades();
      AveragePrice = 0;
      double Count = 0;
      for(cnt=OrdersTotal()-1; cnt>=0; cnt--) 
        {
         OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
         if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=MagicNumber) continue;
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber) 
           {
            if(OrderType()==OP_BUY || OrderType()==OP_SELL) 
              {
               AveragePrice+=OrderOpenPrice()*OrderLots();
               Count+=OrderLots();
              }
           }
        }
      if(total>0) AveragePrice=NormalizeDouble(AveragePrice/Count,Digits);
      if(NewOrdersPlaced) 
        {
         for(cnt=OrdersTotal()-1; cnt>=0; cnt--) 
           {
            OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
            if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=MagicNumber) continue;
            if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber) 
              {
               if(OrderType()==OP_BUY) 
                 {
                  PriceTarget= AveragePrice + TakeProfit * Point;
                  BuyTarget=PriceTarget;
                  Stopper=AveragePrice-Stoploss*Point;
                  flag=TRUE;
                 }
              }
            if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber) 
              {
               if(OrderType()==OP_SELL) 
                 {
                  PriceTarget= AveragePrice - TakeProfit * Point;
                  SellTarget = PriceTarget;
                  Stopper=AveragePrice+Stoploss*Point;
                  flag=TRUE;
                 }
              }
           }
        }
      if(NewOrdersPlaced) 
        {
         if(flag == TRUE) 
           {
            for(cnt=OrdersTotal()-1; cnt>=0; cnt--) 
              {
               OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
               if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=MagicNumber) continue;
               if(OrderSymbol()== Symbol() && OrderMagicNumber() == MagicNumber) OrderModify(OrderTicket(),AveragePrice,OrderStopLoss(),PriceTarget,0,Yellow);
               NewOrdersPlaced = FALSE;
              }
           }
        }
     }
   return(0);
  }
//???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????

int CountTrades() 
  {
   int count=0;
   for(int trade=OrdersTotal()-1; trade>=0; trade--) 
     {
      OrderSelect(trade,SELECT_BY_POS,MODE_TRADES);
      if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=MagicNumber) continue;
      if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber)
         if(OrderType()==OP_SELL || OrderType()==OP_BUY) count++;
     }
   return(count);
  }

Au lieu de ce NewOrdersPlaced () et OrderModify()

vous aurez le niveau de dessiner (fixer) votre ligne b/u - toute la mosaïque est entre vos mains - éditer.

[Archive] Toute question de Auto-apprentissage du langage MQL5 [ARCHIVE !] Toute question

[Supprimé] 2012.01.25 13:32 #5292

Roman.:

Voici ma section de code - responsable de la comptabilisation de la perte totale des trades perdants consécutifs de cet EA particulier (selon le magicien). Je l'ai fait pour ma version du filet Avalanche - adaptez-le à vos besoins - le code est commenté...

Variables globales

Ce fragment de code est suivi d'une boucle à travers les ordres ouverts de ce même EA et calcule leur profit total. Ensuite, vous comparez cette valeur avec la variable

et prendre une décision.

Iteration' - variable non définie D:Programs/MetaTrader 4 - RoboForex/experts/NewCobWebPivot.mq4 (204, 3)
Iteration' - variable non définie D:\Programmes\MetaTrader 4 - RoboForex\experts\NewCobWebPivot.mq4 (234, 17)

Роман 2012.01.25 13:34 #5293

belck:
Iteration' - variable non définie D:Programs/MetaTrader 4 - RoboForex/experts/NewCobWebPivot.mq4 (204, 3)
Iteration' - variable non définie D:\Programmes\MetaTrader 4 - RoboForex\experts\NewCobWebPivot.mq4 (234, 17)

double  Level_new,  PointValue,
        lots;                       // вспомогательная переменная для расчета нового размера лота при очередной итерации
int Iteration, Counter_Loss, Ticket_at_history; // счетчик для подсчета последовательного убытка позиций колен лавины
//bool Flag_Counter_Loss = false;
double Current_Loss, Sum_Loss;     // текущий и суммарный убыток

Роман 2012.01.25 13:40 #5294

Regardez la méthode simple que vous propose Yuri Reshetov à la page précédente.

Si cela ne vous convient pas, assemblez alors une mosaïque des sections de code que vous avez suggérées.

Toujours sur le sujet, il pourrait être utile de désassembler complètement le code du hibou - d'après mon dernier post - le niveau b/w est ILANIN de la branche CELAN Double_Minus_1. Si vous le démontez os par os, la solution à votre problème sera plus claire, à mon avis. Si vous voulez dessiner une ligne, vous devez savoir comment travailler avec des objets. Ces choses-là, à mon avis, ne peuvent pas être résolues par un "programmeur de niveau moyen" en un clin d'œil et sans effort... :-)

Code hibou sur la moyenne et b/w + TP dans la remorque.

Dossiers :

doubleminus_1.mq4 23 kb

Comment extraire uniquement les [ARCHIVE !] Toute question Toute question des nouveaux

[Supprimé] 2012.01.25 13:41 #5295

Roman.:

Vous pouvez me contacter sur Skype : avto-personal-plus

TK15954 2012.01.25 13:48 #5296

Reshetov:
Il ne s'agit pas d'une erreur. Les erreurs dans le journal de bord sont signalées par des icônes rouges et non jaunes.

Pourquoi ça ne marche pas alors ?

Роман 2012.01.25 13:49 #5297

Je n'ai pas Skype ici.

Essayez la version simplifiée, voyez comment Yuri Reshetov vous a recommandé sur la première page - entrez son code juste après le mien.

Voir le code complet reçu avec les commentaires :

double  Level_new,  PointValue,
        lots;                       // вспомогательная переменная для расчета нового размера лота при очередной итерации
int Iteration, Counter_Loss, Ticket_at_history; // счетчик для подсчета последовательного убытка позиций колен лавины
//bool Flag_Counter_Loss = false;
double Current_Loss, Sum_Loss;     // текущий и суммарный убыток


int start()    // -----------------------СТАРТ ЭКСПЕРТА--------------- 
{
//---------------------расчет по истории ордеров номера очередной итерации----------------------------------------------- 
  Iteration = 0; // зануляем инерации перед их учетом в цикле по истории
  Sum_Loss = 0;  // суммарный убыток по этим итерациям

datetime 
Time_at_History_Current = 0,
Time_at_History_Previos = 0;     
 
 if(OrdersHistoryTotal() != 0)
   {
    for(int counter = OrdersHistoryTotal()-1; counter >= 0; counter--)
      {
       OrderSelect(counter, SELECT_BY_POS, MODE_HISTORY);
       if(OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumber)
         {
          if(OrderType() == OP_BUY || OrderType() == OP_SELL)
            {
             if(OrderProfit() < 0) // если убыток по выбранному ордеру, то считаем суммарный и записываем время закрытия ордера
                                   // для последующего его анализа при подсчете количества итераций
                {
                 double lastLoss = OrderProfit();
                 Sum_Loss=Sum_Loss+lastLoss;  // считаем общий убыток по закрытым подряд убыточным ордерам
                 Time_at_History_Current = OrderCloseTime();
                } 
             
             //Print(" Time_at_History_Current_в цикле = ", TimeToStr(Time_at_History_Current, TIME_DATE|TIME_SECONDS));
             //Print(" Time_at_History_Previos_в цикле = ", TimeToStr(Time_at_History_Previos, TIME_DATE|TIME_SECONDS));
             
             if(Time_at_History_Current != Time_at_History_Previos) // если они не равны, то считаем итерации и делаем их равными
               {
                Time_at_History_Previos = Time_at_History_Current ;
                Iteration++;
                //Print("Iteration at History в условии сравнения  = ",  Iteration);
               }   
             else // они равны, то проверяем, дополнительно, наличие профита по выбранному следующему ордеру и выходим из цикла
               {
                if(OrderProfit() >= 0)
                  break;
               }
            }
         }
      }
   }

if (Sum_Loss < 0.0) { // Имеем убыток по закрытым позам
  if ((AccountEquity + Sum_Loss) >= AccountBalance) { // Достигли безубытка
    // Здесь какой-то код, который необходимо выполнить при достижении безубытка
  }
}


}// Конец старт

[Toute question de débutant, [ARCHIVE]Toute question de débutant, [Archive] Toute question de

[Supprimé] 2012.01.25 13:52 #5298

Roman.:

Je n'ai pas Skype.

Essayez la version simplifiée, comme le recommande Yuri Reshetov à la page précédente - entrez son code juste après le mien.

Voir le code complet reçu avec les commentaires :

TotalCloseProfit' - variable non définie D:\Programs\MetaTrader 4 - RoboForex\experts\NewCobWebPivot.mq4 (251, 24)

Роман 2012.01.25 13:53 #5299

belck:
TotalCloseProfit' - variable non définie D:\Programs\MetaTrader 4 - RoboForex\experts\NewCobWebPivot.mq4 (251, 24)

Je l'ai déjà réparé - essayez à nouveau.

Роман 2012.01.25 13:55 #5300

Surtout, n'oubliez pas d'entrer VOTRE code d'action lorsque vous dépassez le niveau b/w ici :

if (Sum_Loss < 0.0) { // Имеем убыток по закрытым позам
  if ((AccountEquity + Sum_Loss) >= AccountBalance) 
  { 

    // Достигли безубытка
    // Здесь какой-то код, который необходимо выполнить при достижении безубытка


  }
}

[ARCHIVE] Toute question de débutant, afin de ne pas encombrer le forum. Professionnels, ne passez pas à côté. Nulle part sans toi - 3. - page 530