Escreverei um conselheiro sem custos

Maksim Sovenko 2018.10.19 13:23 #841

Evgenij Litvintsev:

Boa tarde! Talvez alguém estivesse interessado em automatizar a minha estratégia. Está a funcionar agora, mas no modo semi-automático, gostaria de o automatizar.

Posso ver os resultados comerciais?

Николай 2018.10.20 17:34 #842

Boa noite, poderia por favor aconselhar como obter uma encomenda de bilhetes, lote e lucro de uma função:

double OldTicketSell()// Encontrar a ordem de venda mais distante

{

duplo MaxDist=0,Oldprofit,lote;

int ticket=0;

double BID=MarketInfo(Symbol(),MODE_BID);

duplo ASK=MarketInfo(Symbol(),MODE_ASK);

for(int i=OrdensTotal()-1; i>=0; i--)

{

if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))

{

if(OrderType()==OP_SELLL && MaxDist<MathAbs(OrderOpenPrice()-ASK))

{

MaxDist=MathAbs(OrderOpenPrice()-ASK);

ticket=OrderTicket();

oldprofit = OrderProfit();

lote = OrderLots();

}

regresso(bilhete);

}

A função é clara, não é claro como obter os dados encontrados, ou é necessário copiá-los sob lote e lucrar.

I will write an Firebird v63G Ferramentas 'Fechar tudo'/'Abrir'.

Konstantin Nikitin 2018.10.20 17:53 #843

Николай:

Boa noite, poderia por favor dizer-me como obter encomendas de bilhetes, lote e lucro de uma função.

A função é compreensível, não é claro como extrair dele os dados encontrados, ou devo copiá-lo sob lote e lucrar.

Poderíamos fazê-lo desta forma

struct InfoOrder
{
     int ticket;
     double lot,
            profit,
            swap,
            commission,
            sl, tp;
     datetime timeOpen;
     string comment;
} infoOrder;

void OldSell(void)// Находим самый дальний ордер на продажу
{
   double MaxDist=0;
   double BID=MarketInfo(Symbol(),MODE_BID);
   double ASK=MarketInfo(Symbol(),MODE_ASK);
   for(int i=OrdersTotal()-1; i>=0; i--)
   {
   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
        if(OrderType()==OP_SELL && MaxDist<MathAbs(OrderOpenPrice()-ASK))
         {
             MaxDist=MathAbs(OrderOpenPrice()-ASK);
             infoOrder.ticket=OrderTicket();
             infoOrder.profit = OrderProfit();
             infoOrder.lot = OrderLots();
         }
      }
   }
   return; 
}

Николай 2018.10.20 18:58 #844

Konstantin Nikitin:

Pode ir assim

É tudo bom, mas eu sou um boneco, estou a tentar escrever uma EA na extensão do meu conhecimento (acabei de aprender um pouco), compreendo que a variável é uma estrutura, mas como tirar dados desta estrutura não é claro. Por exemplo, se encontramos a encomenda mais distante, então o lucro deve ser dividido por lotes e obtemos o número de pontos do preço actual para o lote. Depois obtemos o lucro de uma ordem oposta (sei como obtê-lo), dividimo-lo pelo número de pontos da ordem oposta calculados anteriormente, obtemos o número de lotes e utilizamos este número de lotes para fechar total ou parcialmente a ordem distante encontrada.

[Arquivo] Aprenda a ganhar Sistema ASCTrend Perguntas de Iniciantes MQL5

Николай 2018.10.20 19:02 #845

Konstantin Nikitin:

Poderíamos fazê-lo desta forma

Gostaria também de perguntar se é possível encontrar a encomenda mais distante do preço, comparando os preços de abertura das encomendas no ciclo, penso que seria ainda mais fácil?

Konstantin Nikitin 2018.10.20 19:16 #846

Николай:

Gostaria também de perguntar se é possível encontrar a encomenda mais distante do preço, comparando os preços de abertura das encomendas no ciclo, penso que seria ainda mais fácil?

É claro que sim. E se é mais fácil ou não depende do que precisa.
Aqui está um exemplo da sua pergunta acima.

struct InfoOrder
{
     int ticket;
     double lot,
            profit,
            swap,
            commission,
            sl, tp;
     datetime timeOpen;
     string comment;
} infoOrder;

void OnTick()
{
     OldSell();
     Print("Ticket: ", infoOrder.ticket);
     Print("Profit: ", infoOrder.profit);
     Print("Lot: ", infoOrder.lot);
     Print("-----=====-----");
     
     return;
}

void OldSell(void)// Находим самый дальний ордер на продажу
{
   double MaxDist=0;
   double BID=MarketInfo(Symbol(),MODE_BID);
   double ASK=MarketInfo(Symbol(),MODE_ASK);
   for(int i=OrdersTotal()-1; i>=0; i--)
   {
   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
        if(OrderType()==OP_SELL && MaxDist<MathAbs(OrderOpenPrice()-ASK))
         {
             MaxDist=MathAbs(OrderOpenPrice()-ASK);
             infoOrder.ticket=OrderTicket();
             infoOrder.profit = OrderProfit();
             infoOrder.lot = OrderLots();
         }
      }
   }
   return; 
}

Николай 2018.10.20 20:04 #847

Konstantin Nikitin:

Claro que pode. Se é mais fácil ou não, depende do que precisa.
E um exemplo para a sua pergunta acima.

Olhando para tudo isto, apercebo-me da dica que sou. Assim, oresultado dafunçãovoid OldSell(void)é escrito na estruturaInfoOrder,infoOrder.ticket,infoOrder.profit,infoOrder.lot variables.

//-Структура для нахождения самого дальнего ордера на продажу
struct InfoOrder
{
     int ticket;
     double lot,
            profit,
            swap,
            commission,
            sl, tp;
     datetime timeOpen;
     string comment;
} infoOrder;

void OnTick()
{
     OldSell();
     Print("Ticketbuy: ", infoOrder.ticket);
     Print("Profitbuy: ", infoOrder.profit);
     Print("Lotbuy: ", infoOrder.lot);
     Print("Ticketsell: ", infoOrder.ticket);
     Print("Profitsell: ", infoOrder.profit);
     Print("Lotsell: ", infoOrder.lot);
     Print("-----=====-----");
     
     return;
}

void OldSell(void)// Находим самый дальний ордер на продажу
{
   double MaxDist=0;
   double BID=MarketInfo(Symbol(),MODE_BID);
   double ASK=MarketInfo(Symbol(),MODE_ASK);
   for(int i=OrdersTotal()-1; i>=0; i--)
   {
   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
         if(OrderType()==OP_BUY && MaxDist<MathAbs(OrderOpenPrice()-BID))
          {
             MaxDist=MathAbs(OrderOpenPrice()-BID);
             infoOrder.ticketbuy=OrderTicket();
             infoOrder.profitbuy = OrderProfit();
             infoOrder.lotbuy = OrderLots();
           }  
             
        if(OrderType()==OP_SELL && MaxDist<MathAbs(OrderOpenPrice()-ASK))
          {
             MaxDist=MathAbs(OrderOpenPrice()-ASK);
             infoOrder.ticketsell=OrderTicket();
             infoOrder.profitsell = OrderProfit();
             infoOrder.lotsell = OrderLots();
          }
      }
   }
   return; 
}

Николай 2018.10.20 20:06 #848

Konstantin Nikitin:

Claro que pode. Se é mais fácil ou não, depende do que precisa.
E um exemplo para a sua pergunta acima.

Esqueci-me de alterar as variáveis de impressão

Konstantin Nikitin 2018.10.20 20:29 #849

Николай:
Olhando para tudo isto, apercebo-me de como sou um boneco. Então, oresultado dafunçãovoid OldSell(void)é escrito na estruturaInfoOrder e depois podemos usar infoOrder.ticket,infoOrder.profit,infoOrder.lot.generalizei um pouco a função, foi correcto ou não?

//-Структура для нахождения самого дальнего ордера на продажу
struct InfoOrder
{
     int ticket;
     double lot,
            profit,
            swap,
            commission,
            sl, tp,
            MaxDist;
     datetime timeOpen;
     string comment;
} infoOrder;

void OnTick()
{
     if( OldOrder(OP_BUY) )
     {
        Print("Ticketbuy: ", infoOrder.ticket);
        Print("Profitbuy: ", infoOrder.profit);
        Print("Lotbuy: ", infoOrder.lot);
        Print("MaxDistbuy: ", infoOrder.MaxDist);
        Print("-----=====-----");
     }
     if( OldOrder(OP_SELL) )
     {
        Print("Ticketsell: ", infoOrder.ticket);
        Print("Profitsell: ", infoOrder.profit);
        Print("Lotsell: ", infoOrder.lot);
        Print("MaxDistsell: ", infoOrder.MaxDist);
        Print("-----=====-----");
     }
     
     return;
}

bool OldOrder(const int type)// Находим самый дальний ордер на продажу
{
   bool res = false;
   double MaxDist=0;
   double BID=MarketInfo(Symbol(),MODE_BID);
   double ASK=MarketInfo(Symbol(),MODE_ASK);
   for(int i=OrdersTotal()-1; i>=0; i--)
   {
   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
      {
         switch(type)
           {
            case OP_BUY:
               if(OrderType()!=OP_BUY) break;
               if(MaxDist<=MathAbs(OrderOpenPrice()-BID)) break;
               infoOrder.MaxDist=MathAbs(OrderOpenPrice()-BID);
               infoOrder.ticket=OrderTicket();
               infoOrder.profit = OrderProfit();
               infoOrder.lot = OrderLots();
               res = true;
               break;
             
           case OP_SELL:
               if(OrderType()!=OP_SELL) break;
               if(MaxDist>=MathAbs(OrderOpenPrice()-ASK)) break;
               infoOrder.MaxDist=MathAbs(OrderOpenPrice()-ASK);
               infoOrder.ticket=OrderTicket();
               infoOrder.profit = OrderProfit();
               infoOrder.lot = OrderLots();
               res = true;
               break;
        }
      }
   }
   return res; 
}

Algo parecido com isto.

Николай 2018.10.20 20:49 #850

encontrou esta estrutura na EA, pode dizer-me o que ela define

struct TMartinData
{
   int    BUY_Positions;
   double BUY_LastPrice;
   double BUY_StopPrice;
   double BUY_Lots;
   datetime BUY_LastTime;
   bool   BUY_AllWD;
   int    SELL_Positions;
   double SELL_LastPrice;
   double SELL_StopPrice;
   double SELL_Lots;
   datetime SELL_LastTime;
   bool   SELL_AllWD;
} MartinData;

void OnTick()

void FillMartinData()
{
   datetime bfirst = TimeCurrent()+1;
   datetime blast = 0;
   datetime sfirst = TimeCurrent()+1;
   datetime slast = 0;
   MartinData.BUY_Positions = 0;
   MartinData.SELL_Positions = 0;
   MartinData.BUY_Lots = 0;
   MartinData.SELL_Lots = 0;
   MartinData.BUY_LastPrice = -1;
   MartinData.SELL_LastPrice = -1;
   MartinData.BUY_StopPrice = -1;
   MartinData.SELL_StopPrice = -1;
   MartinData.BUY_LastTime = 0;
   MartinData.SELL_LastTime = 0;
   MartinData.BUY_AllWD = true;
   MartinData.SELL_AllWD = true;
   for(int i=0;i<OrdersTotal();i++)
   {
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
     if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNum)
     {
        if (OrderType()==OP_BUY)
        {
           MartinData.BUY_Positions++;
           if (OrderOpenTime()<bfirst)
           {
              MartinData.BUY_Lots = OrderLots();
              MartinData.BUY_StopPrice = OrderStopLoss();
              bfirst = OrderOpenTime();
           }
           if (OrderOpenTime()>blast)
           {
              MartinData.BUY_LastPrice = OrderOpenPrice();
              blast = OrderOpenTime();
           }
           if (OrderStopLoss()<OrderOpenPrice())
              MartinData.BUY_AllWD = false;
        }
        else if (OrderType()==OP_SELL)
        {
           MartinData.SELL_Positions++;
           if (OrderOpenTime()<sfirst)
           {
              MartinData.SELL_Lots = OrderLots();
              MartinData.SELL_StopPrice = OrderStopLoss();
              sfirst = OrderOpenTime();
           }
           if (OrderOpenTime()>slast)
           {
              MartinData.SELL_LastPrice = OrderOpenPrice();
              slast = OrderOpenTime();
           }
           if ((OrderStopLoss()==0) || (OrderStopLoss()>OrderOpenPrice()))
              MartinData.SELL_AllWD = false;
        }
     }
   }
   MartinData.BUY_LastTime = blast;
   MartinData.SELL_LastTime = slast;
   if (MartinData.BUY_Positions==0) MartinData.BUY_AllWD = false;
   if (MartinData.SELL_Positions==0) MartinData.SELL_AllWD = false;
}

Escreverei um conselheiro sem custos - página 85