Toute question des nouveaux arrivants sur MQL4 et MQL5, aide et discussion sur les algorithmes et les codes. - page 121

 
var58:
Bonjour. Veuillez me conseiller sur la façon de prescrire dans le code de l'EA MQL4 la règle d'ouverture d'un ordre : il doit y avoir un ordre avec un certain nombre magique dans le marché ; s'il n'y a pas un tel ordre, l'EA n'ouvre rien selon son algorithme principal.

C'est à peu près tout ce qu'il y a à faire :

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}
 

Comment faire en sorte qu'un utilisateur puisse remplir un tableau?

 
-Aleks-:

Comment faire en sorte qu'un utilisateur puisse remplir un tableau?

Qui d'autre que l'utilisateur peut le remplir ?
 

Salutations, il existe un indicateur qui dessine l'historique des commandes sur le graphique, code :

//+------------------------------------------------------------------+
//|                                                      history.mq4 |
//|                        Copyright 2017, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
#property indicator_chart_window

extern int        MagicNumber                = 1110;
extern datetime   HistoryOrdersFromDateTime  = 0;
extern color      SellColor                  = clrRed;
extern color      BuyColor                   = clrBlue;
extern color      ProfitColor                = clrWhite;
extern bool       DeleteHistoryOrders        = false;


//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {
//--- indicator buffers mapping
  
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+

void start()
{
   for(int i=OrdersHistoryTotal()-1; i>=0; i--)
   {
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) && OrderMagicNumber()==MagicNumber && OrderSymbol()==Symbol() && OrderType()<=1)
      {
         if(HistoryOrdersFromDateTime<OrderCloseTime())
         {
            if((TimeCurrent()-OrderCloseTime())>60)
               HistoryOrders();
         }
      }
   }
}

void HistoryOrders()
{
   int CountOrders=0;
   double b=OrderOpenPrice(), d=OrderClosePrice(), lots=OrderLots(), Profit=0;
   datetime a=OrderOpenTime(), c=OrderCloseTime(), close_time;
   string Ticket=(string)OrderTicket(), type="Sell", symbol=OrderSymbol(), comment=OrderComment(), Background;
   color col=SellColor;
   if(OrderType()==0) {col=BuyColor; type="Buy";}

   //Расчет профита
   for(int i=OrdersHistoryTotal()-1; i>=0; i--)
   {
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) && OrderMagicNumber()==MagicNumber && OrderSymbol()==Symbol() && OrderType()<=1)
      {
         close_time=OrderCloseTime();
         if(c<=close_time+60 && c>=close_time-60)
         {
            Profit+=OrderProfit()+OrderCommission()+OrderSwap();
            Ticket=(string)OrderTicket();
         }  
      }      
   }
  
   //Размер фона  
   for(int i=2; i<StringLen(DoubleToString(Profit,2)); i++)
      StringAdd(Background,"g");

   if(DeleteHistoryOrders==false)
   {
      //Начальная точка
      ObjectCreate("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+"\n"+comment,OBJ_ARROW,0,a,b);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+"\n"+comment,OBJPROP_COLOR,col);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+"\n"+comment,OBJPROP_ARROWCODE,1);
      
      //Линия  
      ObjectCreate("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJ_TREND,0,a,b,c,d);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_COLOR,col);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_WIDTH,1);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_STYLE,STYLE_DOT);
      ObjectSet("#"+Ticket+" "+DoubleToString(b,Digits)+" -> "+DoubleToString(d,Digits),OBJPROP_RAY,0);
  
      //Конечная точка
      ObjectCreate("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+" close at "+DoubleToString(d,Digits),OBJ_ARROW,0,c,d);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+" close at "+DoubleToString(d,Digits),OBJPROP_COLOR,col);
      ObjectSet("#"+Ticket+" "+type+" "+DoubleToString(lots,2)+" "+symbol+" at "+DoubleToString(b,Digits)+" close at "+DoubleToString(d,Digits),OBJPROP_ARROWCODE,3);

      //Фон профита
      ObjectCreate("#"+Ticket+" Background",OBJ_TEXT,0,c,d);
      ObjectSet("#"+Ticket+" Background",OBJPROP_ANCHOR,ANCHOR_LOWER);
      ObjectSetText("#"+Ticket+" Background",Background,10,"Webdings",col);
      ObjectSet("#"+Ticket+" Background",OBJPROP_PRICE1,d);
      ObjectSet("#"+Ticket+" Background",OBJPROP_TIME1,c+Period());

      //Профит
      ObjectCreate("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJ_TEXT,0,c,d);
      ObjectSet("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJPROP_ANCHOR,ANCHOR_LOWER);
      ObjectSetText("#"+Ticket+" Profit: "+DoubleToString(Profit,2),DoubleToString(Profit,2),10,"Arial",ProfitColor);
      ObjectSet("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJPROP_PRICE1,d);
      ObjectSet("#"+Ticket+" Profit: "+DoubleToString(Profit,2),OBJPROP_TIME1,c+Period());
   } else ObjectsDeleteAll(0, "#"+Ticket+" ");  
}

void OnDeinit(const int reason)
{
   for(int i=0; i<OrdersHistoryTotal(); i++)
   {
      DeleteHistoryOrders=true;
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) && OrderMagicNumber()==MagicNumber && OrderSymbol()==Symbol())
         HistoryOrders();
   }
}

L'indicateur dessine correctement les transactions individuelles (ligne>arrière-plan>profit), mais dans l'affichage des ensembles d'ordres fermés il y a un petit "bug" (capture d'écran jointe), les lignes sont superposées sur l'arrière-plan et le profit (ligne(1)>arrière-plan>profit>ligne(2)>ligne(3)>ligne(4) . . . . ).

Il devrait se présenter comme suit : (ligne(1)>ligne(2)>ligne(3)>ligne(4) . . . . >fon>profit). Les diverses manipulations n'ont pas abouti, aidez-moi à les réparer.

Dossiers :
 
Vitaly Muzichenko:
Qui d'autre que l'utilisateur peut le remplir ?

Je veux dire comment le remplir via les paramètres. Disons à travers une chaîne de caractères, et puis mettre sa valeur dans un tableau ...

 
-Aleks-:

Je veux dire comment le remplir via les paramètres. Disons à travers une chaîne de caractères, et puis mettre sa valeur dans un tableau ...

Comme ceci
StringToCharArray - Преобразование данных - Справочник MQL4
StringToCharArray - Преобразование данных - Справочник MQL4
  • docs.mql4.com
StringToCharArray - Преобразование данных - Справочник MQL4
 
Vitaly Muzichenko:

C'est à peu près tout ce qu'il y a à faire :

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}
ORDER_TYPE_BUY_STOP est mis en évidence dans l'éditeur MQL4, pas dans l'aide MQL4. Question : Est-ce que cela fonctionne dans MQL4, est-ce que cela correspond au type OP_BUYSTOP ? Je n'ai pas encore eu le temps de le vérifier.
 
Vitaly Muzichenko:

C'est à peu près tout ce qu'il y a à faire :

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}

Vitaly Muzichenko:

Примерно так можно:

void OnTick()
{
  Comment( IsCount(ORDER_TYPE_BUY_STOP, 5) ); // type - тип, mg - magic
}

//------- Вернёт количество
int IsCount(int type, int mg) {
int p=0;
  for(int i=0; i<OrdersTotal(); i++) {
   if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
    if(OrderSymbol()==Symbol() && OrderMagicNumber()==mg) {
     if(OrderType()==type) {
      p++;
  }}}}
  return(p);
}

Спасибо большое, попробую. 

 
Vitaly Muzichenko:
C'est un peu comme ça.

Merci !

 
Artyom Trishkin:
ORDER_TYPE_BUY_STOP est mis en évidence dans l'éditeur MQL4, mais pas dans l'aide MQL4. Question : cela fonctionne-t-il dans MQL4, cela correspond au type OP_BUYSTOP ? Je n'ai pas encore eu le temps de le vérifier.

Oui, ça marche à 100%, c'est la seule façon dont j'écris maintenant. Maintenant, beaucoup de choses ont migré de cinq à quatre.

Même celui-ci fonctionne, bien que le compilateur jurait qu'il s'agissait d'une ligne de tendance.

    ObjectSetInteger(chart_ID,nm,OBJPROP_TIME,t1);
    ObjectSetDouble(chart_ID,nm,OBJPROP_PRICE,p1);
    ObjectSetInteger(chart_ID,nm,OBJPROP_TIME,1,t2);
    ObjectSetDouble(chart_ID,nm,OBJPROP_PRICE,1,p2);