[ARCHIVO] Cualquier pregunta de novato, para no saturar el foro. Profesionales, no pasen de largo. En ninguna parte sin ti - 3. - MQL4 - Foro de trading algorítmico MQL4

oper11 2011.09.09 20:02 #1641

¿Dónde se esconde aquí el fallo ')'? - los parámetros erróneos cuentan 4 veces? ¿Tal vez no sea esta la forma de escribirlo?

//-----------------------------------------------------------------------------+ 
//  Удаление объекта OBJ_HLINE горизонтальная линия  /Blue/Red          |  
//-----------------------------------------------------------------------------+   
 void DelHLine(color cl, string nm="", double p1=0, int st=0, int wd=1)  
  { 
     int    obj_total= ObjectsTotal(OBJ_HLINE); 
   
  for(int i=0;i<obj_total;i++) 
   {
     if(ObjectType(OBJ_HLINE)==true) 
     {
        if(ObjectGet(OBJPROP_COLOR)==Red)
         { 
           if(ObjectGet(OBJPROP_PRICE1)>Ask) ObjectDelete(FrDnNam);
         } 
     }
  }
    
    for(i=0;i<obj_total;i++) 
       {
         if(ObjectType(OBJ_HLINE)==true)
         {
          if(ObjectGet(OBJPROP_COLOR)==Blue) 
         { 
          if(ObjectGet(OBJPROP_PRICE1)<Bid) ObjectDelete(FrApNam); 
       }
       
    } 
   }

    return; 
  }

Alexander 2011.09.09 20:13 #1642

Compruebe ObjectGet(), debe haber dos parámetros.

Артур 2011.09.09 20:13 #1643

Roger:

Utilice la función NormalizeDouble(lot,2)

Gracias. Sospecho que eso es lo que estaba buscando.

splxgf:

Gracias por el debate. Su información también será muy útil.

Artyom Trishkin 2011.09.10 03:46 #1644

Operr:
¿Dónde se esconde aquí el fallo ')'? - los parámetros erróneos cuentan 4 veces? ¿Quizás no es así como debería escribirse?

A las funciones ObjectType() y ObjectGet() les faltan los nombres de los objetos

Евгений 2011.09.10 05:14 #1645

Operr:
¿Dónde se esconde aquí el fallo ')'? - los parámetros erróneos cuentan 4 veces? ¿Tal vez no sea esta la forma de escribirlo?

//------------------------------------------------------------+ 
//  Удаление объекта OBJ_HLINE горизонтальная линия  /Blue/Red|  
//------------------------------------------------------------+   
void DelHLine(string nm="")  
{int obj_total=ObjectsTotal();
  for(int i=0;i<obj_total;i++) 
  {if(nm==ObjectName(i)&&ObjectType(nm)==OBJ_HLINE)
   {color cl=ObjectGet(nm,OBJPROP_COLOR);double pr=ObjectGet(nm,OBJPROP_PRICE1);
    if((cl==Red&&pr>Ask)||(cl==Blue&&pr<Bid))ObjectDelete(nm);}}}

[Eliminado] 2011.09.10 07:26 #1646

¿Podríais aconsejarme, es posible forzar una actualización de la compilación en MT4? No se actualiza cuando reinicio el terminal.

[Eliminado] 2011.09.10 12:41 #1647

Señores profesionales, ¡necesito su ayuda de nuevo!

A continuación se muestra un fragmento de código encargado de cerrar las operaciones, pero la cuestión es que cuando no se ejecutan las órdenes pendientes no las borra, no consigo averiguar por qué. Pero cuando necesito cerrar una orden pendiente que ya ha sido ejecutada, todo va correctamente y si la orden no ha sido ejecutada entonces se queda colgada hasta que se ejecuta...

OrderSelect(0, SELECT_BY_POS, MODE_TRADES);
Magic = OrderMagicNumber();
orderticket = OrderTicket();

if (OrdersTotal() == 1 && Magic == 111 && OrderType( ) == 0)
{
if (H1_BUY_5 == 0 || H1_BUY_1 == 0)
{
OrderClose(orderticket, lots, Bid, 5, Yellow);
if (OrdersTotal() == 1) OrderDelete(orderticket, Brown);
}

}

¿Cómo codificar? Herramientas 'Cerrar todo'/'Abrir' [ARCHIVE] Any rookie question,

--- 2011.09.10 13:13 #1648

Xaoss1990:

A continuación se muestra un fragmento de código encargado de cerrar las operaciones, pero la cuestión es que cuando no se ejecutan las órdenes pendientes no las borra, no entiendo por qué.

if (OrdersTotal() == 1 && Magic == 111 && OrderType( ) == 0)

esto interfiere

[Eliminado] 2011.09.10 16:15 #1649

Puse una función en mi EA para cerrar 1/3 del lote abierto cuando el stoploss se activa en el punto de equilibrio, pero por alguna razón no funciona.

¿Puede decirme qué pasa?

//=======================================================================================     
void BuyCloseOneThird(string sy="", int op=-1, int mn=-1) {
  double pr=0;
  int    i, k=OrdersTotal(), np=-1;

  if (sy=="0") sy=Symbol();
  for (i=k-1; i>=0; i--) {
    if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
      if ((OrderSymbol()==sy || sy=="") && OrderType()==OP_BUY) {
        if (mn<0 || OrderMagicNumber()==mn) {
          if (Bid>OrderOpenPrice() && Bid==OrderStopLoss()) {
    if (OrderSelect(np, SELECT_BY_POS, MODE_TRADES)) {
      ClosePosBySelect();}
    }
  }
}
}
}
}
//=======================================================================================     
void SellCloseOneThird(string sy="", int op=-1, int mn=-1) {
  double pr=0;
  int    i, k=OrdersTotal(), np=-1;

  if (sy=="0") sy=Symbol();
  for (i=k-1; i>=0; i--) {
    if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
      if ((OrderSymbol()==sy || sy=="") && OrderType()==OP_BUY) {
        if (mn<0 || OrderMagicNumber()==mn) {
          if (Ask<OrderOpenPrice() && Ask==OrderStopLoss()) {
    if (OrderSelect(np, SELECT_BY_POS, MODE_TRADES)) {
      ClosePosBySelect();}
    }
  }
}
}
}
}

//+------------------------------------------------------------------+
void ClosePosBySelect() {
  bool   fc;
  color  clClose;
  double pa, pb, pp;
  int    err, it;
double ll = MathCeil(OrderLots() / 3.0 * 10.0) / 10.0;

  if (OrderType()==OP_BUY || OrderType()==OP_SELL) {
    for (it=1; it<=5; it++) {
      if (!IsTesting() && (!IsExpertEnabled() || IsStopped())) break;
      while (!IsTradeAllowed()) Sleep(5000);
      RefreshRates();
      pa=MarketInfo(OrderSymbol(), MODE_ASK);
      pb=MarketInfo(OrderSymbol(), MODE_BID);
      if (OrderType()==OP_BUY) {
        pp=pb; clClose=Red;
      } else {
        pp=pa; clClose=Blue;
      }
      ll=OrderLots();
      fc=OrderClose(OrderTicket(), ll, pp, Slippage, clClose);
      if (fc) {
        PlaySound("wave"); break;
      } else {
        err=GetLastError();
        if (err==146) while (IsTradeContextBusy()) Sleep(1000*11);
        Print(OrderTicket(),"  Ask=",pa,"  Bid=",pb,"  pp=",pp);
        Print("sy=",OrderSymbol(),"  ll=",ll,"  sl=",OrderStopLoss(),
              "  tp=",OrderTakeProfit(),"  mn=",OrderMagicNumber());
        Sleep(1000*5);
      }
    }
  } 
}

FOREX - Tendencias, previsiones Cualquier pregunta de los Cualquier pregunta de novato,

Alexander 2011.09.10 16:29 #1650

Sancho77:

Puse una función en mi EA para cerrar 1/3 del lote abierto cuando el stoploss se activa en el punto de equilibrio, pero por alguna razón no funciona.

¿Puede decirme qué pasa?

Probablemente porque primero se calcula el lote y luego

ll=OrderLots();
fc=OrderClose(OrderTicket(), ll, pp, Slippage, clClose);

[ARCHIVO] Cualquier pregunta de novato, para no saturar el foro. Profesionales, no pasen de largo. En ninguna parte sin ti - 3. - página 165