Biblioteca para o desenvolvimento fácil e rápido de programas para a MetaTrader (parte IV): eventos de negociação
MetaTrader 5
—
Exemplos
| 30 maio 2019, 10:23
2 978
0
Conteúdo
- Passagem de eventos de negociação para o programa
- Teste do processamento dos eventos de negociação
- Qual é o próximo?
Passagem de eventos de negociação para o programa
Se nós voltarmos para o EA de teste criado no final do terceiro artigo, nós podemos ver que a biblioteca é capaz de definir os eventos de negociação que acontecem na conta. No entanto, nós devemos dividir com precisão todos os eventos que ocorrem pelo seu tipo e enviá-los para o programa usando utilizando a biblioteca.
Para fazer isso, nós devemos escrever o método que define os eventos e o que define os tipos de eventos.
Vamos pensar sobre quais eventos de negociação nós precisamos identificar:
- uma ordem pendente pode ser colocada,
- uma ordem pendente pode ser removida,
- uma ordem pendente pode ser executada gerando uma posição,
- uma ordem pendente pode ser parcialmente executada gerando uma posição,
- uma posição pode ser aberta,
- uma posição pode ser encerrada,
- uma posição pode ser aberta parcialmente,
- uma posição pode ser encerrada parcialmente,
- uma posição pode ser encerrada por uma outra posição oposta,
- uma posição pode ser encerrada parcialmente por uma outra posição oposta,
- uma conta pode ser recarregada,
- fundos podem ser retirados de uma conta,
- operações de saldo podem ocorrer na conta
eventos que ainda não foram monitorados: - uma ordem pendente pode ser modificada (alterando o preço de ativação, adição/remoção/alteração dos níveis de StopLoss e TakeProfit)
- uma posição pode ser modificada (adição/remoção/alteração dos níveis StopLoss e TakeProfit)
Com base no que foi descrito acima, você precisa decidir como identificar um evento sem ambiguidade. É melhor dividir imediatamente a solução de acordo com os tipos de conta:
Hedging:
- aumento do número de ordens pendentes - significa adicionar uma ordem pendente (evento no ambiente de mercado)
- Houve redução do número de ordens pendentes:
- aumento do número de posições - significa a execução de uma ordem pendente (evento no ambiente de mercado e do histórico)
- o número de posições não aumentou - significa a remoção de uma ordem pendente (evento no ambiente de mercado)
- Não houve redução do número de ordens pendentes:
- aumento do número de posições - significa abrir uma nova posição (evento no ambiente de mercado e histórico)
- redução do número de posições - significa encerrar uma posição (evento no mercado e ambiente histórico)
- o número de posições permaneceu inalterado, mas acompanhou a redução do volume - significa o encerramento parcial de uma posição (evento no ambiente histórico)
Netting:
- aumento do número de ordens pendentes - significa adicionar uma ordem pendente
- Houve redução do número de ordens pendentes:
- aumento do número de posições - significa a execução de uma ordem pendente
- o número de posições permaneceu inalterado, mas foi acompanhado da alteração do horário de modificação da posição e volume inalterado - significa a execução de uma ordem pendente e o aumento do volume da posição
- redução do número de posições - significa encerrar uma posição
- Não houve redução do número de ordens pendentes:
- aumento do número de posições - significa abrir uma nova posição
- redução do número de posições - significa encerrar uma posição
- o número de posições permaneceu inalterado, mas foi acompanhado da alteração do horário de modificação da posição e aumento do volume - significa adicionar volume à posição
- o número de posições permaneceu inalterado, mas foi acompanhado da alteração do horário de modificação da posição e a redução do volume - significa o encerramento parcial da posição
Para identificar os eventos de negociação, nós precisamos saber a conta que o programa está em execução. Adicione a flag do tipo de conta hedge para a seção privada da classe CEngine, defina o tipo de conta no construtor de classe e escreva o resultado para essa variável de flag:
//+------------------------------------------------------------------+ //| Classe base da Biblioteca | //+------------------------------------------------------------------+ class CEngine : public CObject { private: CHistoryCollection m_history; // Coleção do histórico de ordens e negócios CMarketCollection m_market; // Coleção de ordens à mercado e negócios CArrayObj m_list_counters; // Lista dos contadores do timer bool m_first_start; // Flag da primeira execução bool m_is_hedge; // Flag da conta Hedge //--- Retorna o índice do contador por id int CounterIndex(const int id) const; //--- Retorna a flag da primeira execução bool IsFirstStart(void); public: //--- Cria o contador do timer void CreateCounter(const int id,const ulong frequency,const ulong pause); //--- Timer void OnTimer(void); CEngine(); ~CEngine(); }; //+------------------------------------------------------------------+ //| Construtor CEngine | //+------------------------------------------------------------------+ CEngine::CEngine() : m_first_start(true) { ::EventSetMillisecondTimer(TIMER_FREQUENCY); this.m_list_counters.Sort(); this.CreateCounter(COLLECTION_COUNTER_ID,COLLECTION_COUNTER_STEP,COLLECTION_PAUSE); this.m_is_hedge=bool(::AccountInfoInteger(ACCOUNT_MARGIN_MODE)==ACCOUNT_MARGIN_MODE_RETAIL_HEDGING); } //+------------------------------------------------------------------+
Durante a primeira execução, ao construir o objeto de classe, o tipo de conta em que o programa é iniciado é definido em seu construtor. Consequentemente, os métodos de definição de eventos de negociação são imediatamente atribuídos a uma conta hedge ou netting.
Depois de definir um evento de negociação, nós precisamos armazenar o seu código. É para permanecer constante até o próximo evento. Assim, o programa sempre pode definir o último evento em uma conta. Um código de evento consistirá em um conjunto de flags. Cada flag irá descrever um evento específico. Por exemplo, um evento de encerramento de posição pode ser dividido em determinados subconjuntos, caracterizando-o com mais precisão:
- encerrado totalmente
- encerrado parcialmente
- encerrado por uma posição oposta
- encerrado pelo stop loss
- encerrado pelo take profit
- etc.
Todos esses atributos são inerentes ao evento "encerramento de posição", o que significa que um código de evento deve conter todos esses dados. Para construir um evento usando as flags, vamos criar duas novas enumerações no arquivo Defines.mqh da pasta raiz da biblioteca (flag de eventos de negociação e possíveis eventos de negociação) na conta que vamos monitorar:
//+------------------------------------------------------------------+ //| Lista de flags de eventos de negociação na conta | //+------------------------------------------------------------------+ enum ENUM_TRADE_EVENT_FLAGS { TRADE_EVENT_FLAG_NO_EVENT = 0, // Nenhum evento TRADE_EVENT_FLAG_ORDER_PLASED = 1, // Ordem pendente colocada TRADE_EVENT_FLAG_ORDER_REMOVED = 2, // Ordem pendente removida TRADE_EVENT_FLAG_ORDER_ACTIVATED = 4, // Ordem pendente ativada pelo preço TRADE_EVENT_FLAG_POSITION_OPENED = 8, // Posição aberta TRADE_EVENT_FLAG_POSITION_CLOSED = 16, // Posição encerrada TRADE_EVENT_FLAG_ACCOUNT_BALANCE = 32, // Operação de saldo (classificado como um tipo de negócio) TRADE_EVENT_FLAG_PARTIAL = 64, // Execução parcial TRADE_EVENT_FLAG_BY_POS = 128, // Executado pela posição oposta TRADE_EVENT_FLAG_SL = 256, // Executado pelo StopLoss TRADE_EVENT_FLAG_TP = 512 // Executado pelo TakeProfit }; //+------------------------------------------------------------------+ //| Lista de eventos de negociação possíveis na conta | //+------------------------------------------------------------------+ enum ENUM_TRADE_EVENT { TRADE_EVENT_NO_EVENT, // Nenhum evento de negociação TRADE_EVENT_PENDING_ORDER_PLASED, // Ordem pendente colocada TRADE_EVENT_PENDING_ORDER_REMOVED, // Ordem pendente removida //--- membros da enumeração que correspondem aos membros da enumeração ENUM_DEAL_TYPE TRADE_EVENT_ACCOUNT_CREDIT, // Crédito TRADE_EVENT_ACCOUNT_CHARGE, // Cobrança adicional TRADE_EVENT_ACCOUNT_CORRECTION, // Correção de entrada TRADE_EVENT_ACCOUNT_BONUS, // Bônus TRADE_EVENT_ACCOUNT_COMISSION, // Comissões adicionais TRADE_EVENT_ACCOUNT_COMISSION_DAILY, // Comissão cobrada no fim do dia TRADE_EVENT_ACCOUNT_COMISSION_MONTHLY, // Comissão cobrada no fim do mês TRADE_EVENT_ACCOUNT_COMISSION_AGENT_DAILY, // Comissão do agente cobrada no fim da negociação do dia TRADE_EVENT_ACCOUNT_COMISSION_AGENT_MONTHLY, // Comissão do agente cobrada no fim da negociação do mês TRADE_EVENT_ACCOUNT_INTEREST, // Taxa de juros dobre o saldo livre TRADE_EVENT_BUY_CANCELLED, // Negócio de compra cancelado TRADE_EVENT_SELL_CANCELLED, // Negócio de venda cancelado TRADE_EVENT_DIVIDENT, // Acréscimo de dividendos TRADE_EVENT_DIVIDENT_FRANKED, // Acréscimo de dividendos não tributáveis TRADE_EVENT_TAX, // Cálculo do imposto //--- membros da enumeração relacionados ao tipo de negócio DEAL_TYPE_BALANCE da enumeração ENUM_DEAL_TYPE TRADE_EVENT_ACCOUNT_BALANCE_REFILL, // Recarga do saldo da conta TRADE_EVENT_ACCOUNT_BALANCE_WITHDRAWAL, // Saque de fundos da conta //--- TRADE_EVENT_PENDING_ORDER_ACTIVATED, // Ordem pendente executada pelo preço TRADE_EVENT_PENDING_ORDER_ACTIVATED_PARTIAL, // Ordem pendente executada parcialmente pelo preço TRADE_EVENT_POSITION_OPENED, // Posição aberta TRADE_EVENT_POSITION_OPENED_PARTIAL, // Posição aberta parcialmente TRADE_EVENT_POSITION_CLOSED, // Posição encerrada TRADE_EVENT_POSITION_CLOSED_PARTIAL, // Posição parcialmente encerrada TRADE_EVENT_POSITION_CLOSED_BY_POS, // Posição encerrada por uma posição oposta TRADE_EVENT_POSITION_CLOSED_PARTIAL_BY_POS, // Posição parcialmente encerrada por uma posição oposta TRADE_EVENT_POSITION_CLOSED_BY_SL, // Posição encerrada pelo StopLoss TRADE_EVENT_POSITION_CLOSED_BY_TP, // Posição encerrada pelo TakeProfit TRADE_EVENT_POSITION_CLOSED_PARTIAL_BY_SL, // Posição parcialmente encerrada pelo StopLoss TRADE_EVENT_POSITION_CLOSED_PARTIAL_BY_TP, // Posição parcialmente encerrada pelo TakeProfit TRADE_EVENT_POSITION_REVERSED, // Reversão da posição (netting) TRADE_EVENT_POSITION_VOLUME_ADD // Aumento do volume da posição (netting) }; //+------------------------------------------------------------------+
Aqui, nós devemos fazer alguns esclarecimentos sobre a enumeração ENUM_TRADE_EVENT.
Já que alguns eventos de negociação não requerem nenhum programa ou intervenção humana (cobrança de comissões, taxas, bônus, etc.), nós pegaremos esses dados do tipo negócio (a enumeraçãoENUM_DEAL_TYPE) na MQL5. Para simplificar o monitoramento do evento mais tarde, nós precisamos fazer com que nossos eventos correspondam ao valor da enumeração ENUM_DEAL_TYPE.
Nós vamos dividir a operação de saldo em dois eventos: recarregamento de saldo da conta e retirada de fundos. Outros eventos da enumeração do tipo negócio, a partir de DEAL_TYPE_CREDIT, tem os mesmos valores que na enumeração ENUM_DEAL_TYPE, exceto para compra e venda (DEAL_TYPE_BUY e DEAL_TYPE_SELL) que não estão relacionados às operações de saldo.
Vamos melhorar a classe de coleções de ordens e posições de mercado.
Nós vamos adicionar uma ordem de modelo para a seção privada da classe CMarketCollection para executar uma busca pelas propriedades da ordem especificada, enquanto a seção pública da classe receberá os métodos para obter a lista completa de ordens e posições, a lista de ordens e posições, que foram selecionadas por um intervalo de tempo especificado e a lista de ordens e posições retornadas, que foram selecionadas por um critério especificado de propriedades inteiras, reais e de string de uma ordem ou uma posição. Isso nos permitirá receber as listas necessárias de ordens e posições de mercado da coleção (como foi feito para a coleção de ordens históricas e negócios na parte 2 e parte 3 da descrição da biblioteca).
//+------------------------------------------------------------------+ //| Coleção de ordens e posições | //+------------------------------------------------------------------+ class CMarketCollection { private: struct MqlDataCollection { long hash_sum_acc; // Soma hash de todos as ordens e posições na conta int total_pending; // Número de ordens pendentes na conta int total_positions; // Número de posições na conta double total_volumes; // Volume total de ordens e posições na conta }; MqlDataCollection m_struct_curr_market; // Dados atuais sobre as ordens e posições de mercado na conta MqlDataCollection m_struct_prev_market; // Dados anteriores sobre ordens e posições de mercado na conta CArrayObj m_list_all_orders; // Lista de ordens pendentes e posições na conta COrder m_order_instance; // Objeto ordem para buscar pela propriedade bool m_is_trade_event; // Flag do evento de negociação bool m_is_change_volume; // Flag de alteração do volume total double m_change_volume_value; // Valor alterado do volume total int m_new_positions; // Número de novas posições int m_new_pendings; // Número de novas ordens pendentes //--- Salva os valores atuais do estado dos dados da conta como sendo o anterior void SavePrevValues(void) { this.m_struct_prev_market=this.m_struct_curr_market; } public: //--- Retorna a lista de todos as ordens pendentes e posições abertas CArrayObj* GetList(void) { return &m_list_all_orders; } //--- Retorna a lista de ordens e posições com um horário de abertura de begin_time até end_time CArrayObj* GetListByTime(const datetime begin_time=0,const datetime end_time=0); //--- Retorna a lista de ordens e posições pela propriedade selecionada (1) double, (2) inteiro e (3) string ajustando uma condição comparada CArrayObj* GetList(ENUM_ORDER_PROP_DOUBLE property,double value,ENUM_COMPARER_TYPE mode=EQUAL) { return CSelect::ByOrderProperty(this.GetList(),property,value,mode); } CArrayObj* GetList(ENUM_ORDER_PROP_INTEGER property,long value,ENUM_COMPARER_TYPE mode=EQUAL) { return CSelect::ByOrderProperty(this.GetList(),property,value,mode); } CArrayObj* GetList(ENUM_ORDER_PROP_STRING property,string value,ENUM_COMPARER_TYPE mode=EQUAL) { return CSelect::ByOrderProperty(this.GetList(),property,value,mode); } //--- Retorna o número de (1) novas ordens pendentes, (2) novas posições, (3) ocorrências da flag de evento de negociação, (4) o volume alterado int NewOrders(void) const { return this.m_new_pendings; } int NewPosition(void) const { return this.m_new_positions; } bool IsTradeEvent(void) const { return this.m_is_trade_event; } double ChangedVolumeValue(void) const { return this.m_change_volume_value; } //--- Construtor CMarketCollection(void); //--- Atualiza a lista de ordens pendentes e posições void Refresh(void); }; //+------------------------------------------------------------------+
Implementa o método para selecionar as ordens e posições pelo horário além do corpo da classe:
//+------------------------------------------------------------------------+ //| Seleciona as ordens ou posições de mercado da coleção com o horário | //| entre o intervalo de begin_time até end_time | //+------------------------------------------------------------------------+ CArrayObj* CMarketCollection::GetListByTime(const datetime begin_time=0,const datetime end_time=0) { CArrayObj* list=new CArrayObj(); if(list==NULL) { ::Print(DFUN,TextByLanguage("Ошибка создания временного списка","Error creating temporary list")); return NULL; } datetime begin=begin_time,end=(end_time==0 ? END_TIME : end_time); list.FreeMode(false); ListStorage.Add(list); m_order_instance.SetProperty(ORDER_PROP_TIME_OPEN,begin); int index_begin=m_list_all_orders.SearchGreatOrEqual(&m_order_instance); if(index_begin==WRONG_VALUE) return list; m_order_instance.SetProperty(ORDER_PROP_TIME_OPEN,end); int index_end=m_list_all_orders.SearchLessOrEqual(&m_order_instance); if(index_end==WRONG_VALUE) return list; for(int i=index_begin; i<=index_end; i++) list.Add(m_list_all_orders.At(i)); return list; } //+------------------------------------------------------------------+
O método é quase idêntico àquele que seleciona o histórico de ordens e negócios pelo horário que descrevemos na Parte 3. Releia a descrição na seção apropriada do terceiro artigo, se necessário. A diferença entre este método e aquele da classe de coleção do histórico é que nós não selecionamos o horário que as ordens são selecionadas. As ordens e posições de mercado possuem apenas o horário de abertura.
Além disso, altere o construtor da classe de coleção do histórico de ordens e negócios. O sistema de ordens em MQL5 não possui um conceito de horário de encerramento — todas as ordens e negócios são organizados em listas de acordo com o seu horário de colocação (ou horário de abertura de acordo com o sistema de ordens em MQL4). Para fazer isso, altere a linha que define a classificação de direção na lista de coleções do histórico de ordens e negócios no construtor da classe CHistoryCollection:
//+------------------------------------------------------------------+ //| Construtor | //+------------------------------------------------------------------+ CHistoryCollection::CHistoryCollection(void) : m_index_deal(0),m_delta_deal(0),m_index_order(0),m_delta_order(0),m_is_trade_event(false) { this.m_list_all_orders.Sort(#ifdef __MQL5__ SORT_BY_ORDER_TIME_OPEN #else SORT_BY_ORDER_TIME_CLOSE #endif ); this.m_list_all_orders.Clear(); } //+------------------------------------------------------------------+
Já em MQL5, todas as ordens e negócios na coleção do histórico de ordens e negócios serão ordenados pelo horário de colocação por padrão, enquanto em MQL4, eles serão ordenados pelo horário de encerramento definido nas propriedades da ordem.
Agora vamos passar para outro recurso do sistema de ordens em MQL5. Ao encerrar uma posição por uma posição oposta, uma ordem de encerramento especial do tipo ORDER_TYPE_CLOSE_BY é colocada, já para o encerramento de uma posição por uma ordem de stop, é colocado em seu lugar uma ordem à mercado para encerrar a posição.
A fim de considerar as ordens à mercado, nós tivemos que adicionar mais uma propriedade aos métodos de receber e retornar as propriedades inteiras da classe base order (usando o recebimento e retorno do número mágico da ordem como exemplo):
//+------------------------------------------------------------------+ //| Retorna o número mágico | //+------------------------------------------------------------------+ long COrder::OrderMagicNumber() const { #ifdef __MQL4__ return ::OrderMagicNumber(); #else long res=0; switch((ENUM_ORDER_STATUS)this.GetProperty(ORDER_PROP_STATUS)) { case ORDER_STATUS_MARKET_POSITION : res=::PositionGetInteger(POSITION_MAGIC); break; case ORDER_STATUS_MARKET_ORDER : case ORDER_STATUS_MARKET_PENDING : res=::OrderGetInteger(ORDER_MAGIC); break; case ORDER_STATUS_DEAL : res=::HistoryDealGetInteger(m_ticket,DEAL_MAGIC); break; case ORDER_STATUS_HISTORY_PENDING : case ORDER_STATUS_HISTORY_ORDER : res=::HistoryOrderGetInteger(m_ticket,ORDER_MAGIC); break; default : res=0; break; } return res; #endif } //+------------------------------------------------------------------+
Eu fiz tais alterações (ou as que correspondem logicamente ao método) em todos os métodos de recebimento e retorno das propriedades inteiras da classe base order onde esse estado realmente precisa ser levado em consideração. Como esse estado existe, crie uma nova classe da ordem à mercado CMarketOrder na pasta Objects da biblioteca para armazenar esses tipos de ordens. A classe é completamente idêntica ao restante dos objetos do histórico de ordens e negócios criados anteriormente, assim, eu fornecerei abaixo apenas a sua inclusão:
//+------------------------------------------------------------------+ //| MarketOrder.mqh | //| Copyright 2018, MetaQuotes Software Corp. | //| https://mql5.com/en/users/artmedia70 | //+------------------------------------------------------------------+ #property copyright "Copyright 2018, MetaQuotes Software Corp." #property link "https://mql5.com/en/users/artmedia70" #property version "1.00" //+------------------------------------------------------------------+ //| Arquivos de inclusão | //+------------------------------------------------------------------+ #include "Order.mqh" //+------------------------------------------------------------------+ //| Ordem à mercado | //+------------------------------------------------------------------+ class CMarketOrder : public COrder { public: //--- Construtor CMarketOrder(const ulong ticket=0) : COrder(ORDER_STATUS_MARKET_ORDER,ticket) {} //--- Propriedades das ordens suportadas do tipo (1) real, (2) inteiro virtual bool SupportProperty(ENUM_ORDER_PROP_DOUBLE property); virtual bool SupportProperty(ENUM_ORDER_PROP_INTEGER property); }; //+------------------------------------------------------------------+ //| Retorna 'true' se a ordem suportar a propriedade | //| inteiro passada, caso contrário, retorna 'false' | //+------------------------------------------------------------------+ bool CMarketOrder::SupportProperty(ENUM_ORDER_PROP_INTEGER property) { if(property==ORDER_PROP_TIME_EXP || property==ORDER_PROP_DEAL_ENTRY || property==ORDER_PROP_TIME_UPDATE || property==ORDER_PROP_TIME_UPDATE_MSC || property==ORDER_PROP_PROFIT_PT || property==ORDER_PROP_TIME_CLOSE || property==ORDER_PROP_TIME_CLOSE_MSC || property==ORDER_PROP_TICKET_FROM || property==ORDER_PROP_TICKET_TO ) return false; return true; } //+------------------------------------------------------------------+ //| Retorna 'true' se a ordem suportar a propriedade | //| real passada, caso contrário, retorna 'false' | //+------------------------------------------------------------------+ bool CMarketOrder::SupportProperty(ENUM_ORDER_PROP_DOUBLE property) { if(property==ORDER_PROP_PROFIT || property==ORDER_PROP_PROFIT_FULL || property==ORDER_PROP_SWAP || property==ORDER_PROP_COMMISSION || property==ORDER_PROP_PRICE_CLOSE || property==ORDER_PROP_SL || property==ORDER_PROP_TP || property==ORDER_PROP_PRICE_STOP_LIMIT ) return false; return true; } //+------------------------------------------------------------------+
No arquivo Defines.mqh da biblioteca, nós vamos escrever o estado da ordem à mercado:
//+------------------------------------------------------------------+ //| Abstração do tipo de ordem (estado) | //+------------------------------------------------------------------+ enum ENUM_ORDER_STATUS { ORDER_STATUS_MARKET_PENDING, // ordem pendente ORDER_STATUS_MARKET_ORDER, // ordem à mercado ORDER_STATUS_MARKET_POSITION, // posição de mercado ORDER_STATUS_HISTORY_ORDER, // Histórico de ordens de mercado ORDER_STATUS_HISTORY_PENDING, // Ordem pendente removida ORDER_STATUS_BALANCE, // Operação Saldo ORDER_STATUS_CREDIT, // Operação Crédito ORDER_STATUS_DEAL, // Negócio ORDER_STATUS_UNKNOWN // Estado desconhecido }; //+------------------------------------------------------------------+
Agora, no bloco para adicionar as ordens à lista (método Refresh() da classe CMarketCollection para atualizar a lista de ordens e posições de mercado), você deve implementar a verificação do tipo da ordem. Dependendo do tipo, adicione um objeto de ordem à mercado ou um objeto de ordem pendente para a lista de coleções:
//+------------------------------------------------------------------+ //| Atualiza a lista order | //+------------------------------------------------------------------+ void CMarketCollection::Refresh(void) { ::ZeroMemory(this.m_struct_curr_market); this.m_is_trade_event=false; this.m_is_change_volume=false; this.m_new_pendings=0; this.m_new_positions=0; this.m_change_volume_value=0; m_list_all_orders.Clear(); #ifdef __MQL4__ int total=::OrdersTotal(); for(int i=0; i<total; i++) { if(!::OrderSelect(i,SELECT_BY_POS)) continue; long ticket=::OrderTicket(); ENUM_ORDER_TYPE type=(ENUM_ORDER_TYPE)::OrderType(); if(type==ORDER_TYPE_BUY || type==ORDER_TYPE_SELL) { CMarketPosition *position=new CMarketPosition(ticket); if(position==NULL) continue; if(this.m_list_all_orders.InsertSort(position)) { this.m_struct_market.hash_sum_acc+=ticket; this.m_struct_market.total_volumes+=::OrderLots(); this.m_struct_market.total_positions++; } else { ::Print(DFUN,TextByLanguage("Не удалось добавить позицию в список","Failed to add position to list")); delete position; } } else { CMarketPending *order=new CMarketPending(ticket); if(order==NULL) continue; if(this.m_list_all_orders.InsertSort(order)) { this.m_struct_market.hash_sum_acc+=ticket; this.m_struct_market.total_volumes+=::OrderLots(); this.m_struct_market.total_pending++; } else { ::Print(DFUN,TextByLanguage("Не удалось добавить ордер в список","Failed to add order to list")); delete order; } } } //--- MQ5 #else //--- Posições int total_positions=::PositionsTotal(); for(int i=0; i<total_positions; i++) { ulong ticket=::PositionGetTicket(i); if(ticket==0) continue; CMarketPosition *position=new CMarketPosition(ticket); if(position==NULL) continue; if(this.m_list_all_orders.InsertSort(position)) { this.m_struct_curr_market.hash_sum_acc+=(long)::PositionGetInteger(POSITION_TIME_UPDATE_MSC); this.m_struct_curr_market.total_volumes+=::PositionGetDouble(POSITION_VOLUME); this.m_struct_curr_market.total_positions++; } else { ::Print(DFUN,TextByLanguage("Не удалось добавить позицию в список","Failed to add position to list")); delete position; } } //--- Ordens int total_orders=::OrdersTotal(); for(int i=0; i<total_orders; i++) { ulong ticket=::OrderGetTicket(i); if(ticket==0) continue; ENUM_ORDER_TYPE type=(ENUM_ORDER_TYPE)::OrderGetInteger(ORDER_TYPE); if(type==ORDER_TYPE_BUY || type==ORDER_TYPE_SELL) { CMarketOrder *order=new CMarketOrder(ticket); if(order==NULL) continue; if(this.m_list_all_orders.InsertSort(order)) { this.m_struct_curr_market.hash_sum_acc+=(long)ticket; this.m_struct_curr_market.total_market++; } else { ::Print(DFUN,TextByLanguage("Не удалось добавить маркет-ордер в список","Failed to add market order to list")); delete order; } } else { CMarketPending *order=new CMarketPending(ticket); if(order==NULL) continue; if(this.m_list_all_orders.InsertSort(order)) { this.m_struct_curr_market.hash_sum_acc+=(long)ticket; this.m_struct_curr_market.total_volumes+=::OrderGetDouble(ORDER_VOLUME_INITIAL); this.m_struct_curr_market.total_pending++; } else { ::Print(DFUN,TextByLanguage("Не удалось добавить отложенный ордер в список","Failed to add pending order to list")); delete order; } } } #endif //--- Primeiro lançamento if(this.m_struct_prev_market.hash_sum_acc==WRONG_VALUE) { this.SavePrevValues(); } //--- Se a soma hash de todas as ordens e posições mudou if(this.m_struct_curr_market.hash_sum_acc!=this.m_struct_prev_market.hash_sum_acc) { this.m_new_market=this.m_struct_curr_market.total_market-this.m_struct_prev_market.total_market; this.m_new_pendings=this.m_struct_curr_market.total_pending-this.m_struct_prev_market.total_pending; this.m_new_positions=this.m_struct_curr_market.total_positions-this.m_struct_prev_market.total_positions; this.m_change_volume_value=::NormalizeDouble(this.m_struct_curr_market.total_volumes-this.m_struct_prev_market.total_volumes,4); this.m_is_change_volume=(this.m_change_volume_value!=0 ? true : false); this.m_is_trade_event=true; this.SavePrevValues(); } } //+------------------------------------------------------------------+
Para poder considerar as ordens de encerramento do tipo ORDER_TYPE_CLOSE_BY, adicione este tipo de ordem ao bloco que define o tipo de ordem no método Refresh() de atualização da lista do histórico ordens e negócios da classe CHistoryCollection para que essas ordens sejam incluídas na coleção. Sem isso, o objeto base da biblioteca CEngine não consegue definir que uma posição foi encerrada por uma outra oposta:
//+------------------------------------------------------------------+ //| Atualiza a lista de ordens e negócios | //+------------------------------------------------------------------+ void CHistoryCollection::Refresh(void) { #ifdef __MQL4__ int total=::OrdersHistoryTotal(),i=m_index_order; for(; i<total; i++) { if(!::OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)) continue; ENUM_ORDER_TYPE order_type=(ENUM_ORDER_TYPE)::OrderType(); //--- Posições fechadas e operações de saldo/crédito if(order_type<ORDER_TYPE_BUY_LIMIT || order_type>ORDER_TYPE_SELL_STOP) { CHistoryOrder *order=new CHistoryOrder(::OrderTicket()); if(order==NULL) continue; if(!this.m_list_all_orders.InsertSort(order)) { ::Print(DFUN,TextByLanguage("Не удалось добавить ордер в список","Failed to add order to list")); delete order; } } else { //--- Ordens pendentes removidas CHistoryPending *order=new CHistoryPending(::OrderTicket()); if(order==NULL) continue; if(!this.m_list_all_orders.InsertSort(order)) { ::Print(DFUN,TextByLanguage("Не удалось добавить ордер в список","Failed to add order to list")); delete order; } } } //--- int delta_order=i-m_index_order; this.m_index_order=i; this.m_delta_order=delta_order; this.m_is_trade_event=(this.m_delta_order!=0 ? true : false); //--- __MQL5__ #else if(!::HistorySelect(0,END_TIME)) return; //--- Ordens int total_orders=::HistoryOrdersTotal(),i=m_index_order; for(; i<total_orders; i++) { ulong order_ticket=::HistoryOrderGetTicket(i); if(order_ticket==0) continue; ENUM_ORDER_TYPE type=(ENUM_ORDER_TYPE)::HistoryOrderGetInteger(order_ticket,ORDER_TYPE); if(type==ORDER_TYPE_BUY || type==ORDER_TYPE_SELL || type==ORDER_TYPE_CLOSE_BY) { CHistoryOrder *order=new CHistoryOrder(order_ticket); if(order==NULL) continue; if(!this.m_list_all_orders.InsertSort(order)) { ::Print(DFUN,TextByLanguage("Не удалось добавить ордер в список","Failed to add order to list")); delete order; } } else { CHistoryPending *order=new CHistoryPending(order_ticket); if(order==NULL) continue; if(!this.m_list_all_orders.InsertSort(order)) { ::Print(DFUN,TextByLanguage("Не удалось добавить ордер в список","Failed to add order to list")); delete order; } } } //--- salva o índice da última ordem adicionada e a diferença em comparação com a verificação anterior int delta_order=i-this.m_index_order; this.m_index_order=i; this.m_delta_order=delta_order; //--- Negócios int total_deals=::HistoryDealsTotal(),j=m_index_deal; for(; j<total_deals; j++) { ulong deal_ticket=::HistoryDealGetTicket(j); if(deal_ticket==0) continue; CHistoryDeal *deal=new CHistoryDeal(deal_ticket); if(deal==NULL) continue; this.m_list_all_orders.InsertSort(deal); } //--- salva o índice do último negócio adicionado e a diferença em comparação com a verificação anterior int delta_deal=j-this.m_index_deal; this.m_index_deal=j; this.m_delta_deal=delta_deal; //--- Define a nova flag de evento no histórico this.m_is_trade_event=(this.m_delta_order+this.m_delta_deal); #endif } //+------------------------------------------------------------------+
Ao testar a classe CEngine para definir os eventos que ocorrem na conta, eu detectei e corrigi algumas pequenas falhas nos métodos de serviço. Não há sentido em descrevê-las aqui, uma vez que elas não afetam o desempenho, enquanto sua descrição desvia a atenção do desenvolvimento de uma importante funcionalidade da biblioteca. Todas as alterações já foram feitas nas listagens das classes. Você pode vê-los nos arquivos da biblioteca anexados abaixo.
Vamos continuar nosso trabalho na definição de eventos.
Após a depuração da definição dos eventos de negociação, todos os eventos ocorridos serão compactados em uma única variável membro da classe feita como um conjunto de flags. O método de leitura de dados da variável para decompor o seu valor em componentes que caracterizam um evento específico será criado posteriormente.
Adicione a variável membro da classe para armazenar o código do evento de negociação, os métodos de verificação de um evento de negociação para as contas hedge e netting e os métodos que retornam os objetos order necessários para a seção privada da classe CEngine.
Na seção pública, declare os métodos retornando as listas de posições e ordens pendentes, histórico de ordens e negócios, o método retornando um código do evento de negociação da variável m_trade_event_code e o método retornando a flag da conta hedge.
//+------------------------------------------------------------------+ //| Classe base da Biblioteca | //+------------------------------------------------------------------+ class CEngine : public CObject { private: CHistoryCollection m_history; // Coleção do histórico de ordens e negócios CMarketCollection m_market; // Coleção de ordens à mercado e negócios CArrayObj m_list_counters; // Lista dos contadores do timer bool m_first_start; // Flag da primeira execução bool m_is_hedge; // Flag da conta hedge bool m_is_market_trade_event; // Flag do evento de negociação da conta bool m_is_history_trade_event; // Flag do evento do histórico de negociação int m_trade_event_code; // Código de estado do evento de negociação da conta //--- Retorna o índice do contador por id int CounterIndex(const int id) const; //--- Retorna a flag da primeira execução bool IsFirstStart(void); //--- Trabalhando com coleções (1) hedging e (2) netting void WorkWithHedgeCollections(void); void WorkWithNettoCollections(void); //--- Retorna a última (1) ordem pendente, (2) ordem à mercado, (3) última posição, (4) posição pelo ticket COrder* GetLastMarketPending(void); COrder* GetLastMarketOrder(void); COrder* GetLastPosition(void); COrder* GetPosition(const ulong ticket); //--- Retorna a última (1) ordem pendente removida, (2) ordem do histórico, (3) ordem do histórico pelo seu ticket COrder* GetLastHistoryPending(void); COrder* GetLastHistoryOrder(void); COrder* GetHistoryOrder(const ulong ticket); //--- Retorna a (1) primeira e a (2) última ordem do histórico da lista de todos as ordens de posição, (3) o último negócio COrder* GetFirstOrderPosition(const ulong position_id); COrder* GetLastOrderPosition(const ulong position_id); COrder* GetLastDeal(void); public: //--- Retorna a lista de (1) posições, (2) ordens pendentes e (3) ordens à mercado CArrayObj* GetListMarketPosition(void); CArrayObj* GetListMarketPendings(void); CArrayObj* GetListMarketOrders(void); //--- Retorna a lista do histórico de (1) ordens, (2) ordens pendentes removidas, (3) negócios, (4) todas as ordens pelo id da posição CArrayObj* GetListHistoryOrders(void); CArrayObj* GetListHistoryPendings(void); CArrayObj* GetListHistoryDeals(void); CArrayObj* GetListAllOrdersByPosID(const ulong position_id); //--- Retorna o (1) código do evento de negociação e (2) a flag da conta hedge int TradeEventCode(void) const { return this.m_trade_event_code; } bool IsHedge(void) const { return this.m_is_hedge; } //--- Cria o timer da conta void CreateCounter(const int id,const ulong frequency,const ulong pause); //--- Timer void OnTimer(void); //--- Construtor/destrutor CEngine(); ~CEngine(); }; //+------------------------------------------------------------------+
Inicializa o código do evento de negociação na lista de inicialização do construtor da classe.
//+------------------------------------------------------------------+ //| Construtor CEngine | //+------------------------------------------------------------------+ CEngine::CEngine() : m_first_start(true),m_trade_event_code(TRADE_EVENT_FLAG_NO_EVENT) { ::EventSetMillisecondTimer(TIMER_FREQUENCY); this.m_list_counters.Sort(); this.CreateCounter(COLLECTION_COUNTER_ID,COLLECTION_COUNTER_STEP,COLLECTION_PAUSE); this.m_is_hedge=bool(::AccountInfoInteger(ACCOUNT_MARGIN_MODE)==ACCOUNT_MARGIN_MODE_RETAIL_HEDGING); } //+------------------------------------------------------------------+
Implementa os métodos declarados fora do corpo da classe:
//+------------------------------------------------------------------+ //| Retorna a lista de posições | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListMarketPosition(void) { CArrayObj* list=this.m_market.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_MARKET_POSITION,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a lista de ordens pendentes | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListMarketPendings(void) { CArrayObj* list=this.m_market.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_MARKET_PENDING,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a lista de ordens à mercado | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListMarketOrders(void) { CArrayObj* list=this.m_market.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_MARKET_ORDER,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a lista de ordens do histórico | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListHistoryOrders(void) { CArrayObj* list=this.m_history.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_HISTORY_ORDER,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a lista de ordens pendentes removidas | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListHistoryPendings(void) { CArrayObj* list=this.m_history.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_HISTORY_PENDING,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a lista de negócios | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListHistoryDeals(void) { CArrayObj* list=this.m_history.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_DEAL,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a lista de todas as ordens da posição | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListAllOrdersByPosID(const ulong position_id) { CArrayObj* list=this.GetListHistoryOrders(); list=CSelect::ByOrderProperty(list,ORDER_PROP_POSITION_ID,position_id,EQUAL); return list; } //+------------------------------------------------------------------+ //| Retorna a última posição | //+------------------------------------------------------------------+ COrder* CEngine::GetLastPosition(void) { CArrayObj* list=this.GetListMarketPosition(); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN_MSC); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a posição pelo ticket | //+------------------------------------------------------------------+ COrder* CEngine::GetPosition(const ulong ticket) { CArrayObj* list=this.GetListMarketPosition(); list=CSelect::ByOrderProperty(list,ORDER_PROP_TICKET,ticket,EQUAL); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TICKET); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna o último negócio | //+------------------------------------------------------------------+ COrder* CEngine::GetLastDeal(void) { CArrayObj* list=this.GetListHistoryDeals(); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN_MSC); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a última ordem pendente | //+------------------------------------------------------------------+ COrder* CEngine::GetLastMarketPending(void) { CArrayObj* list=this.GetListMarketPendings(); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN_MSC); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a última ordem pendente do histórico | //+------------------------------------------------------------------+ COrder* CEngine::GetLastHistoryPending(void) { CArrayObj* list=this.GetListHistoryPendings(); if(list==NULL) return NULL; list.Sort(#ifdef __MQL5__ SORT_BY_ORDER_TIME_OPEN_MSC #else SORT_BY_ORDER_TIME_CLOSE_MSC #endif); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a última ordem à mercado | //+------------------------------------------------------------------+ COrder* CEngine::GetLastMarketOrder(void) { CArrayObj* list=this.GetListMarketOrders(); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN_MSC); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a última ordem à mercado do histórico | //+------------------------------------------------------------------+ COrder* CEngine::GetLastHistoryOrder(void) { CArrayObj* list=this.GetListHistoryOrders(); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN_MSC); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a ordem à mercado do histórico pelo seu ticket | //+------------------------------------------------------------------+ COrder* CEngine::GetHistoryOrder(const ulong ticket) { CArrayObj* list=this.GetListHistoryOrders(); list=CSelect::ByOrderProperty(list,ORDER_PROP_TICKET,(long)ticket,EQUAL); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TICKET); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a primeira ordem à mercado do histórico | //| da lista de todas as ordens da posição | //+------------------------------------------------------------------+ COrder* CEngine::GetFirstOrderPosition(const ulong position_id) { CArrayObj* list=this.GetListAllOrdersByPosID(position_id); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN); COrder* order=list.At(0); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+ //| Retorna a última ordem à mercado do histórico | //| da lista de todas as ordens da posição | //+------------------------------------------------------------------+ COrder* CEngine::GetLastOrderPosition(const ulong position_id) { CArrayObj* list=this.GetListAllOrdersByPosID(position_id); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+
Vamos ver como as listas são obtidas usando o seguinte exemplo:
//+------------------------------------------------------------------+ //| Retorna a lista de posições | //+------------------------------------------------------------------+ CArrayObj* CEngine::GetListMarketPosition(void) { CArrayObj* list=this.m_market.GetList(); list=CSelect::ByOrderProperty(list,ORDER_PROP_STATUS,ORDER_STATUS_MARKET_POSITION,EQUAL); return list; } //+------------------------------------------------------------------+
Tudo é bem simples e conveniente: recebemos a lista completa das posições da coleção de ordens e posições de mercado usando o método da coleção GetList(). Após isso, selecione uma ordem com o estado "position" dele usando o método de seleção de ordens por uma propriedade especificada da classe CSelect. O método foi descrito no terceiro artigo da descrição da biblioteca. Retorna a lista obtida.
A lista pode estar vazia (NULL), portanto, o resultado retornado por este método deve ser verificado no programa que o chamou.
Vamos ver como receber a ordem desejada usando o seguinte exemplo:
//+------------------------------------------------------------------+ //| Retorna a última posição | //+------------------------------------------------------------------+ COrder* CEngine::GetLastPosition(void) { CArrayObj* list=this.GetListMarketPosition(); if(list==NULL) return NULL; list.Sort(SORT_BY_ORDER_TIME_OPEN_MSC); COrder* order=list.At(list.Total()-1); return(order!=NULL ? order : NULL); } //+------------------------------------------------------------------+
Primeiro, recebemos a lista de posições usando o método GetListMarketPosition() descrito acima. Se a lista estiver vazia, é retornado NULL. Em seguida, a lista por horário de abertura em milissegundos é ordenada (uma vez que vamos receber a última posição em aberto, a lista deve ser ordenada por horário) e então, selecionado a última ordem. Como resultado, nós retornamos a ordem obtida da lista para o programa que fez a chamada.
O resultado da busca de uma ordem retornada pelo método pode ser vazio (a ordem não foi encontrada) e ser igual a NULL. Portanto, verifique o resultado obtido para NULL antes de acessá-lo.
Como você pode ver, tudo é rápido e fácil. Nós podemos construir qualquer método para receber os dados de qualquer lista de coleções existente, bem como os que nós criaremos no futuro. Isso nos proporciona maior flexibilidade no uso de tais listas.
Os métodos para receber as listas são colocados na seção da classe pública, permitindo-nos receber quaisquer dados das listas em programas personalizados, como foi feito com os métodos considerados acima.
Os métodos para receber as ordens desejadas estão ocultos na seção privada. Eles são necessários apenas na classe CEngine para as necessidades internas — em particular, para a obtenção dos dados sobre as últimas ordens, negócios e posições. Em programas personalizados, nós podemos desenvolver as funções personalizadas para receber as ordens específicas pelas propriedades especificadas (os exemplos são exibidos acima).
Para obter facilmente quaisquer dados das coleções, nós criaremos, eventualmente, uma ampla gama de funções para os usuários finais.
Isso será feito nos artigos finais dedicados ao trabalho com as coleções de ordens.
Agora vamos implementar o método para verificar os eventos de negociação.
Atualmente, ele funciona apenas em contas hedging para a MQL5. Após isso, eu vou desenvolver os métodos para verificar os eventos de negociação para as contas netting para MQL5 e MQL4. Para testar a operação do método, ele apresenta a exibição da verificação e dos resultados do evento. Essa funcionalidade deve ser removida posteriormente, pois essa função deve ser preenchida por outro método que será criado após a depuração do método de verificação de eventos de negociação na conta.
//+------------------------------------------------------------------+ //| Verificação dos eventos de negociação (hedging) | //+------------------------------------------------------------------+ void CEngine::WorkWithHedgeCollections(void) { //--- Inicialização do código de flags e eventos de negociação this.m_trade_event_code=TRADE_EVENT_FLAG_NO_EVENT; this.m_is_market_trade_event=false; this.m_is_history_trade_event=false; //--- Atualiza as listas this.m_market.Refresh(); this.m_history.Refresh(); //--- Ações durante a primeira execução if(this.IsFirstStart()) { this.m_acc_trade_event=TRADE_EVENT_NO_EVENT; return; } //--- Verifica a dinâmica do estado de mercado e o histórico da conta this.m_is_market_trade_event=this.m_market.IsTradeEvent(); this.m_is_history_trade_event=this.m_history.IsTradeEvent(); //--- #ifdef __MQL4__ #else // MQL5 //--- Se um evento é apenas em ordens e posições de mercado if(this.m_is_market_trade_event && !this.m_is_history_trade_event) { Print(DFUN,TextByLanguage("Новое торговое событие на счёте","New trading event on account")); //--- Se o número de ordens pendentes aumentou if(this.m_market.NewPendingOrders()>0) { //--- Adiciona a flag para instalar uma ordem pendente this.m_trade_event_code+=TRADE_EVENT_FLAG_ORDER_PLASED; string text=TextByLanguage("Установлен отложенный ордер: ","Pending order placed: "); //--- Pega a última ordem pendente COrder* order=this.GetLastMarketPending(); if(order!=NULL) { //--- adiciona o ticket da ordem à mensagem text+=order.TypeDescription()+" #"+(string)order.Ticket(); } //--- Adiciona a mensagem ao diário Print(DFUN,text); } //--- Se o número de ordens à mercado aumentou if(this.m_market.NewMarketOrders()>0) { //--- não adiciona a flag de evento //--- ... string text=TextByLanguage("Выставлен маркет-ордер: ","Market order placed: "); //--- Pega a última ordem à mercado COrder* order=this.GetLastMarketOrder(); if(order!=NULL) { //--- adiciona o ticket da ordem à mensagem text+=order.TypeDescription()+" #"+(string)order.Ticket(); } //--- Adiciona a mensagem ao diário Print(DFUN,text); } } //--- Se um evento é apenas no histórico de ordens e negócios else if(this.m_is_history_trade_event && !this.m_is_market_trade_event) { Print(DFUN,TextByLanguage("Новое торговое событие в истории счёта","New trading event in account history")); //--- Se um novo negócio aparecer if(this.m_history.NewDeals()>0) { //--- Adiciona a flag de evento do saldo da conta this.m_trade_event_code+=TRADE_EVENT_FLAG_ACCOUNT_BALANCE; string text=TextByLanguage("Новая сделка: ","New deal: "); //--- Pega o último negócio COrder* deal=this.GetLastDeal(); if(deal!=NULL) { //--- adiciona sua descrição ao texto text+=deal.TypeDescription(); //--- se o negócio é uma operação de saldo if((ENUM_DEAL_TYPE)deal.GetProperty(ORDER_PROP_TYPE)==DEAL_TYPE_BALANCE) { //--- verifica o lucro do negócio e adiciona o evento (adicionando ou retirando fundos) à mensagem text+=(deal.Profit()>0 ? TextByLanguage(": Пополнение счёта: ",": Account Recharge: ") : TextByLanguage(": Вывод средств: ",": Withdrawal: "))+::DoubleToString(deal.Profit(),(int)::AccountInfoInteger(ACCOUNT_CURRENCY_DIGITS)); } } //--- Exibe a mensagem no diário Print(DFUN,text); } } //--- Se os eventos estiverem no histórico de ordens à mercado e posições else if(this.m_is_market_trade_event && this.m_is_history_trade_event) { Print(DFUN,TextByLanguage("Новые торговые события на счёте и в истории счёта","New trading events on account and in account history")); //--- Se o número de ordens pendentes diminuiu e nenhum novo negócio apareceu if(this.m_market.NewPendingOrders()<0 && this.m_history.NewDeals()==0) { //--- Adiciona o sinalizador para remover uma ordem pendente this.m_trade_event_code+=TRADE_EVENT_FLAG_ORDER_REMOVED; string text=TextByLanguage("Удалён отложенный ордер: ","Removed pending order: "); //--- Pega a última ordem pendente do histórico COrder* order=this.GetLastHistoryPending(); if(order!=NULL) { //--- adiciona o ticket à mensagem apropriada text+=order.TypeDescription()+" #"+(string)order.Ticket(); } //--- Exibe a mensagem no diário Print(DFUN,text); } //--- Se houver um novo negócio e uma nova ordem no histórico if(this.m_history.NewDeals()>0 && this.m_history.NewOrders()>0) { //--- Pega o último negócio COrder* deal=this.GetLastDeal(); if(deal!=NULL) { //--- No caso de um negócio de entrada à mercado if(deal.GetProperty(ORDER_PROP_DEAL_ENTRY)==DEAL_ENTRY_IN) { //--- Adiciona o flag de abertura de posição this.m_trade_event_code+=TRADE_EVENT_FLAG_POSITION_OPENED; string text=TextByLanguage("Открыта позиция: ","Position opened: "); //--- Se o número de ordens pendentes diminuiu if(this.m_market.NewPendingOrders()<0) { //--- Adiciona a flag de ativação da ordem pendente this.m_trade_event_code+=TRADE_EVENT_FLAG_ORDER_ACTIVATED; text=TextByLanguage("Сработал отложенный ордер: ","Pending order activated: "); } //--- Pega o ticket da ordem na ordem ulong order_ticket=deal.GetProperty(ORDER_PROP_DEAL_ORDER); COrder* order=this.GetHistoryOrder(order_ticket); if(order!=NULL) { //--- Se o volume atual da ordem exceder zero if(order.VolumeCurrent()>0) { //--- Adiciona a flag de execução parcial this.m_trade_event_code+=TRADE_EVENT_FLAG_PARTIAL; text=TextByLanguage("Частично открыта позиция: ","Position partially open: "); } //--- adiciona a direção da ordem à mensagem text+=order.DirectionDescription(); } //--- adiciona o ticket da posição do negócio à mensagem e exibe a mensagem no diário text+=" #"+(string)deal.PositionID(); Print(DFUN,text); } //--- No caso de um negócio de saída à mercado if(deal.GetProperty(ORDER_PROP_DEAL_ENTRY)==DEAL_ENTRY_OUT) { //--- Adiciona a flag de encerramento de posição this.m_trade_event_code+=TRADE_EVENT_FLAG_POSITION_CLOSED; string text=TextByLanguage("Закрыта позиция: ","Position closed: "); //--- Pega o ticket da ordem do negócio ulong order_ticket=deal.GetProperty(ORDER_PROP_DEAL_ORDER); COrder* order=this.GetHistoryOrder(order_ticket); if(order!=NULL) { //--- Se a posição do negócio ainda estiver ativa no mercado COrder* pos=this.GetPosition(deal.PositionID()); if(pos!=NULL) { //--- Adiciona a flag de execução parcial this.m_trade_event_code+=TRADE_EVENT_FLAG_PARTIAL; text=TextByLanguage("Частично закрыта позиция: ","Partially closed position: "); } //--- Caso contrário, se a posição estiver totalmente encerrada else { //--- Se a ordem tiver a flag de encerramento por StopLoss if(order.IsCloseByStopLoss()) { //--- Adicione a flag para encerrar por StopLoss this.m_trade_event_code+=TRADE_EVENT_FLAG_SL; text=TextByLanguage("Позиция закрыта по StopLoss: ","Position closed by StopLoss: "); } //--- Se a ordem tiver a flag de encerramento por TakeProfit if(order.IsCloseByTakeProfit()) { //--- Adiciona o sinalizador para encerrar por TakeProfit this.m_trade_event_code+=TRADE_EVENT_FLAG_TP; text=TextByLanguage("Позиция закрыта по TakeProfit: ","Position closed by TakeProfit: "); } } //--- adiciona a direção da ordem inversa à mensagem: //--- encerra a ordem de Compra para a posição vendida e encerra a ordem de venda para a posição de compra, //--- portanto, inverte a direção da ordem para a descrição correta de uma posição fechada text+=(order.DirectionDescription()=="Sell" ? "Buy " : "Sell "); } //--- adiciona o ticket da posição do negócio e exibe a mensagem no diário text+="#"+(string)deal.PositionID(); Print(DFUN,text); } //--- Ao encerrar por uma posição oposta if(deal.GetProperty(ORDER_PROP_DEAL_ENTRY)==DEAL_ENTRY_OUT_BY) { //--- Adiciona a flag de encerramento de posição this.m_trade_event_code+=TRADE_EVENT_FLAG_POSITION_CLOSED; //--- Adiciona a flag para encerrar por uma posição oposta this.m_trade_event_code+=TRADE_EVENT_FLAG_BY_POS; string text=TextByLanguage("Позиция закрыта встречной: ","Position closed by opposite position: "); //--- Pega a ordem do negócio ulong ticket_from=deal.GetProperty(ORDER_PROP_DEAL_ORDER); COrder* order=this.GetHistoryOrder(ticket_from); if(order!=NULL) { //--- adiciona a direção da ordem inversa à mensagem: //--- encerra a ordem de Compra para a posição vendida e encerra a ordem de venda para a posição de compra, //--- portanto, inverte a direção da ordem para a descrição correta de uma posição fechada text+=(order.DirectionDescription()=="Sell" ? "Buy" : "Sell"); text+=" #"+(string)order.PositionID()+TextByLanguage(" закрыта позицией #"," closed by position #")+(string)order.PositionByID(); //--- Se a posição da ordem ainda estiver presente no mercado COrder* pos=this.GetPosition(order.PositionID()); if(pos!=NULL) { //--- Adiciona a flag de execução parcial this.m_trade_event_code+=TRADE_EVENT_FLAG_PARTIAL; text+=TextByLanguage(" частично"," partially"); } } //--- Exibe a mensagem no diário Print(DFUN,text); } //--- fim do último bloco de processamento do negócio } } } #endif } //+------------------------------------------------------------------+
O método é simples, mas bem amplo. Portanto, o código apresenta todas as verificações e ações correspondentes, permitindo-nos ver o que acontece dentro do método de forma mais conveniente. Por enquanto, o método implementa a verificação da conta hedge em MQL5. Na verdade, tudo se resume a verificar o número de novas ordens e negócios do histórico da conta ou no mercado. Para a exibição no diário, os dados são retirados da última posição, do último negócio, da última ordem ou da última ordem do negócio — tudo isso é feito para exibir os dados no diário para verificar a execução do código. Esta funcionalidade será posteriormente removida do código e substituída por um único método a ser usado nos programas que trabalham com a biblioteca.
Teste do processamento dos eventos de negociação
Vamos criar um EA de teste para verificar o método que define os eventos de negociação na conta.
Vamos implementar o conjunto de botões para gerenciar os novos eventos.
O conjunto de ações necessárias e os botões correspondentes são os seguintes:
- Abrir uma posição de Compra
- Colocar uma ordem pendente BuyLimit
- Colocar uma ordem pendente BuyStop
- Colocar uma ordem pendente BuyStopLimit
- Encerrar uma posição de Compra
- Encerrar metade da posição de Compra
- Encerrar uma posição de Compra por uma posição oposta de Venda
- Abrir uma posição de Venda
- Colocar uma ordem pendente SellLimit
- Colocar uma ordem pendente SellStop
- Colocar uma ordem pendente SellStopLimit
- Encerrar uma posição de Venda
- Encerrar metade da posição de Venda
- Encerrar uma posição de Venda por uma posição oposta de Compra
- Encerrar todas as posições
- Retirar fundos da conta
O conjunto de entradas é o seguinte:
- Magic number - número mágico
- Lots - volume das posições em aberto
- StopLoss in points
- TakeProfit in points
- Pending orders distance (points)
- StopLimit orders distance (points)
Uma ordem StopLimit é colocada como uma ordem de stop a uma distância do preço definido pelo valor da Pending orders distance.
Assim que o preço atinge a ordem especificada e o ativa, esse nível de preço é usado para colocar uma ordem limitada à distância do preço definido pelo valor da StopLimit orders distance. - Slippage in points
- Withdrawal funds (in tester)) - retirada de fundos da conta no testador
Nós vamos precisar das funções para calcular os valores corretos para definir os preços para a colocação das ordens em relação ao StopLevel, volume das ordens de stop e posição. Neste estágio, vamos adicionar as funções à biblioteca de funções de serviço no arquivo DELIB.mqh, desde que ainda não tenha classes de negociação e classes de símbolos:
//+------------------------------------------------------------------+ //| Retorna o lote mínimo de símbolos | //+------------------------------------------------------------------+ double MinimumLots(const string symbol_name) { return SymbolInfoDouble(symbol_name,SYMBOL_VOLUME_MIN); } //+------------------------------------------------------------------+ //| Retorna o lote máximo de símbolos | //+------------------------------------------------------------------+ double MaximumLots(const string symbol_name) { return SymbolInfoDouble(symbol_name,SYMBOL_VOLUME_MAX); } //+------------------------------------------------------------------+ //| Retorna o passo de alteração do lote de símbolo | //+------------------------------------------------------------------+ double StepLots(const string symbol_name) { return SymbolInfoDouble(symbol_name,SYMBOL_VOLUME_STEP); } //+------------------------------------------------------------------+ //| Retorna o lote normalizado | //+------------------------------------------------------------------+ double NormalizeLot(const string symbol_name, double order_lots) { double ml=SymbolInfoDouble(symbol_name,SYMBOL_VOLUME_MIN); double mx=SymbolInfoDouble(symbol_name,SYMBOL_VOLUME_MAX); double ln=NormalizeDouble(order_lots,int(ceil(fabs(log(ml)/log(10))))); return(ln<ml ? ml : ln>mx ? mx : ln); } //+------------------------------------------------------------------+ //| Retorna o StopLoss correto em relação ao StopLevel | //+------------------------------------------------------------------+ double CorrectStopLoss(const string symbol_name,const ENUM_ORDER_TYPE order_type,const double price_set,const double stop_loss,const int spread_multiplier=2) { if(stop_loss==0) return 0; int lv=StopLevel(symbol_name,spread_multiplier), dg=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS); double pt=SymbolInfoDouble(symbol_name,SYMBOL_POINT); double price=(order_type==ORDER_TYPE_BUY ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : order_type==ORDER_TYPE_SELL ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price_set); return (order_type==ORDER_TYPE_BUY || order_type==ORDER_TYPE_BUY_LIMIT || order_type==ORDER_TYPE_BUY_STOP #ifdef __MQL5__ || order_type==ORDER_TYPE_BUY_STOP_LIMIT #endif ? NormalizeDouble(fmin(price-lv*pt,stop_loss),dg) : NormalizeDouble(fmax(price+lv*pt,stop_loss),dg) ); } //+------------------------------------------------------------------+ //| Retorna o StopLoss correto em relação ao StopLevel | //+------------------------------------------------------------------+ double CorrectStopLoss(const string symbol_name,const ENUM_ORDER_TYPE order_type,const double price_set,const int stop_loss,const int spread_multiplier=2) { if(stop_loss==0) return 0; int lv=StopLevel(symbol_name,spread_multiplier), dg=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS); double pt=SymbolInfoDouble(symbol_name,SYMBOL_POINT); double price=(order_type==ORDER_TYPE_BUY ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : order_type==ORDER_TYPE_SELL ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price_set); return (order_type==ORDER_TYPE_BUY || order_type==ORDER_TYPE_BUY_LIMIT || order_type==ORDER_TYPE_BUY_STOP #ifdef __MQL5__ || order_type==ORDER_TYPE_BUY_STOP_LIMIT #endif ? NormalizeDouble(fmin(price-lv*pt,price-stop_loss*pt),dg) : NormalizeDouble(fmax(price+lv*pt,price+stop_loss*pt),dg) ); } //+------------------------------------------------------------------+ //| Retorna o TakeProfit correto em relação ao StopLevel | //+------------------------------------------------------------------+ double CorrectTakeProfit(const string symbol_name,const ENUM_ORDER_TYPE order_type,const double price_set,const double take_profit,const int spread_multiplier=2) { if(take_profit==0) return 0; int lv=StopLevel(symbol_name,spread_multiplier), dg=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS); double pt=SymbolInfoDouble(symbol_name,SYMBOL_POINT); double price=(order_type==ORDER_TYPE_BUY ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : order_type==ORDER_TYPE_SELL ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price_set); return (order_type==ORDER_TYPE_BUY || order_type==ORDER_TYPE_BUY_LIMIT || order_type==ORDER_TYPE_BUY_STOP #ifdef __MQL5__ || order_type==ORDER_TYPE_BUY_STOP_LIMIT #endif ? NormalizeDouble(fmax(price+lv*pt,take_profit),dg) : NormalizeDouble(fmin(price-lv*pt,take_profit),dg) ); } //+------------------------------------------------------------------+ //| Retorna o TakeProfit correto em relação ao StopLevel | //+------------------------------------------------------------------+ double CorrectTakeProfit(const string symbol_name,const ENUM_ORDER_TYPE order_type,const double price_set,const int take_profit,const int spread_multiplier=2) { if(take_profit==0) return 0; int lv=StopLevel(symbol_name,spread_multiplier), dg=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS); double pt=SymbolInfoDouble(symbol_name,SYMBOL_POINT); double price=(order_type==ORDER_TYPE_BUY ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : order_type==ORDER_TYPE_SELL ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price_set); return (order_type==ORDER_TYPE_BUY || order_type==ORDER_TYPE_BUY_LIMIT || order_type==ORDER_TYPE_BUY_STOP #ifdef __MQL5__ || order_type==ORDER_TYPE_BUY_STOP_LIMIT #endif ? ::NormalizeDouble(::fmax(price+lv*pt,price+take_profit*pt),dg) : ::NormalizeDouble(::fmin(price-lv*pt,price-take_profit*pt),dg) ); } //+------------------------------------------------------------------+ //| Retorna o preço para a colocação correta da ordem | //| relativo ao StopLevel | //+------------------------------------------------------------------+ double CorrectPricePending(const string symbol_name,const ENUM_ORDER_TYPE order_type,const double price_set,const double price=0,const int spread_multiplier=2) { double pt=SymbolInfoDouble(symbol_name,SYMBOL_POINT),pp=0; int lv=StopLevel(symbol_name,spread_multiplier), dg=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS); switch(order_type) { case ORDER_TYPE_BUY_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price); return NormalizeDouble(fmin(pp-lv*pt,price_set),dg); case ORDER_TYPE_BUY_STOP : case ORDER_TYPE_BUY_STOP_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price); return NormalizeDouble(fmax(pp+lv*pt,price_set),dg); case ORDER_TYPE_SELL_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : price); return NormalizeDouble(fmax(pp+lv*pt,price_set),dg); case ORDER_TYPE_SELL_STOP : case ORDER_TYPE_SELL_STOP_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : price); return NormalizeDouble(fmin(pp-lv*pt,price_set),dg); default : Print(DFUN,TextByLanguage("Не правильный тип ордера: ","Invalid order type: "),EnumToString(order_type)); return 0; } } //+------------------------------------------------------------------+ //| Retorna o preço para a colocação correta da ordem | //| relativo ao StopLevel | //+------------------------------------------------------------------+ double CorrectPricePending(const string symbol_name,const ENUM_ORDER_TYPE order_type,const int distance_set,const double price=0,const int spread_multiplier=2) { double pt=SymbolInfoDouble(symbol_name,SYMBOL_POINT),pp=0; int lv=StopLevel(symbol_name,spread_multiplier), dg=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS); switch(order_type) { case ORDER_TYPE_BUY_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price); return NormalizeDouble(fmin(pp-lv*pt,pp-distance_set*pt),dg); case ORDER_TYPE_BUY_STOP : case ORDER_TYPE_BUY_STOP_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_ASK) : price); return NormalizeDouble(fmax(pp+lv*pt,pp+distance_set*pt),dg); case ORDER_TYPE_SELL_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : price); return NormalizeDouble(fmax(pp+lv*pt,pp+distance_set*pt),dg); case ORDER_TYPE_SELL_STOP : case ORDER_TYPE_SELL_STOP_LIMIT : pp=(price==0 ? SymbolInfoDouble(symbol_name,SYMBOL_BID) : price); return NormalizeDouble(fmin(pp-lv*pt,pp-distance_set*pt),dg); default : Print(DFUN,TextByLanguage("Не правильный тип ордера: ","Invalid order type: "),EnumToString(order_type)); return 0; } } //+------------------------------------------------------------------+ //| Verifica o nível de stop em pontos em relação ao StopLevel | //+------------------------------------------------------------------+ bool CheckStopLevel(const string symbol_name,const int stop_in_points,const int spread_multiplier) { return(stop_in_points>=StopLevel(symbol_name,spread_multiplier)); } //+------------------------------------------------------------------+ //| Retorna o StopLevel em pontos | //+------------------------------------------------------------------+ int StopLevel(const string symbol_name,const int spread_multiplier) { int spread=(int)SymbolInfoInteger(symbol_name,SYMBOL_SPREAD); int stop_level=(int)SymbolInfoInteger(symbol_name,SYMBOL_TRADE_STOPS_LEVEL); return(stop_level==0 ? spread*spread_multiplier : stop_level); } //+------------------------------------------------------------------+
As funções simplesmente calculam os valores corretos para que eles não violem as limitações definidas no servidor. Além do símbolo, a função de cálculo do StopLevel também recebe o multiplicador de spread. Isso é feito porque se o StopLevel no servidor estiver definido como zero, isso significa um nível flutuante e, para calcular o StopLevel, nós devemos usar um valor de spread multiplicado por um determinado número (geralmente 2, mas 3 também é possível). Esse multiplicador é passado para a função, permitindo-nos codificá-lo nas configurações do EA ou calculá-lo.
Por uma questões de economia de nosso tempo, nós não iremos escrever as funções de negociação personalizadas. Em vez disso, nós vamos usar a classes de negociação da biblioteca padrão, ou seja, a classe CTrade para executar as operações de negociação.
Para criar os botões do gráfico de trabalho, nós vamos implementar uma enumeração com os seus membros para definição dos nomes, rótulos e valores dos botões para verificar um determinado botão que foi pressionado.
Na pasta MQL5\Experts\TestDoEasy\Part04\, crie o novo EA chamado TestDoEasy04.mqh (verifique os manipuladores de eventos OnTimer e OnChartEvent no Assistente MQL ao criar o EA):
Após a criação do modelo do EA pelo Assistente MQL, inclua a biblioteca customizada e a biblioteca padrão da classe de negociação nele. Além disso, adicione os parâmetros de entrada:
//+------------------------------------------------------------------+ //| TestDoEasyPart04.mq5 | //| Copyright 2018, MetaQuotes Software Corp. | //| https://mql5.com/en/users/artmedia70 | //+------------------------------------------------------------------+ #property copyright "Copyright 2018, MetaQuotes Software Corp." #property link "https://mql5.com/en/users/artmedia70" #property version "1.00" //--- includes #include <DoEasy\Engine.mqh> #include <Trade\Trade.mqh> //--- enums enum ENUM_BUTTONS { BUTT_BUY, BUTT_BUY_LIMIT, BUTT_BUY_STOP, BUTT_BUY_STOP_LIMIT, BUTT_CLOSE_BUY, BUTT_CLOSE_BUY2, BUTT_CLOSE_BUY_BY_SELL, BUTT_SELL, BUTT_SELL_LIMIT, BUTT_SELL_STOP, BUTT_SELL_STOP_LIMIT, BUTT_CLOSE_SELL, BUTT_CLOSE_SELL2, BUTT_CLOSE_SELL_BY_BUY, BUTT_CLOSE_ALL, BUTT_PROFIT_WITHDRAWAL }; #define TOTAL_BUTT (16) //--- estruturas struct SDataButt { string name; string text; }; //--- variáveis de entrada input ulong InpMagic = 123; // Número mágico input double InpLots = 0.1; // Lotes input uint InpStopLoss = 50; // StopLoss em pontos input uint InpTakeProfit = 50; // TakeProfit em pontos input uint InpDistance = 50; // Distância das ordens pendentes (pontos) input uint InpDistanceSL = 50; // Distância das ordens StopLimit (pontos) input uint InpSlippage = 0; // Desvio em pontos input double InpWithdrawal = 10; // Retirada de fundos (no testador) //--- variáveis globais CEngine engine; CTrade trade; SDataButt butt_data[TOTAL_BUTT]; string prefix; double lot; double withdrawal=(InpWithdrawal<0.1 ? 0.1 : InpWithdrawal); ulong magic_number; uint stoploss; uint takeprofit; uint distance_pending; uint distance_stoplimit; uint slippage; //+------------------------------------------------------------------+
Aqui nós incluímos o objeto principal da biblioteca CEngine e a classe de negociação CTrade.
Em seguida, crie a enumeração especificando todos os botões necessários.
A sequência de métodos d enumeração é importante, pois define a ordem de criação dos botões e sua localização no gráfico.
Após isso, declare a estrutura para armazenar o nome do objeto gráfico do botão e o texto a ser inserido no botão.
No bloco de entradas, defina todas as variáveis do parâmetro do EA listados acima. No bloco de variáveis globais do EA, declare o objeto da biblioteca, objeto da classe de negociação, array de estruturas do botão e as variáveis que devem ser atribuído aos valores de entrada no manipulador da OnInit():
//+------------------------------------------------------------------+ //| Função de inicialização do Expert | //+------------------------------------------------------------------+ int OnInit() { //--- Verifica o tipo da conta if(!engine.IsHedge()) { Alert(TextByLanguage("Ошибка. Счёт должен быть хеджевым","Error. Account must be hedge")); return INIT_FAILED; } //--- define as variáveis globais prefix=MQLInfoString(MQL_PROGRAM_NAME)+"_"; for(int i=0;i<TOTAL_BUTT;i++) { butt_data[i].name=prefix+EnumToString((ENUM_BUTTONS)i); butt_data[i].text=EnumToButtText((ENUM_BUTTONS)i); } lot=NormalizeLot(Symbol(),fmax(InpLots,MinimumLots(Symbol())*2.0)); magic_number=InpMagic; stoploss=InpStopLoss; takeprofit=InpTakeProfit; distance_pending=InpDistance; distance_stoplimit=InpDistanceSL; slippage=InpSlippage; //--- cria os botões if(!CreateButtons()) return INIT_FAILED; //--- trade.SetDeviationInPoints(slippage); trade.SetExpertMagicNumber(magic_number); trade.SetTypeFillingBySymbol(Symbol()); trade.SetMarginMode(); trade.LogLevel(LOG_LEVEL_ERRORS); //--- return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+
No manipulador da OnInit(), verificamos o tipo de conta e, se não for do tipo hedging, informamos isso e saímos do programa com um erro.
Em seguida, é definido o prefixo de nomes de objetos (para que o EA seja capaz de reconhecer seus objetos) e preenchido o array de estruturas com os dados do botão em um loop pelo número de botões.
O nome do objeto de botão é definido como uma representação do prefixo+string da enumeração ENUM_BUTTONS correspondente ao índice do loop, enquanto o texto do botão é compilado, transformando a representação dos caracteres da enumeração correspondente ao índice do loop usando a função EnumToButtText().
O lote das posições em abertas e das ordens colocadas é calculado mais para frente. Como metade das posições está encerrada, o lote de uma posição aberta deve ser pelo menos o dobro do lote mínimo. Portanto, o lote máximo é retirado de dois:
1) inserido nos parâmetros de entrada, 2) lote mínimo multiplicado por dois na linha fmax(InpLots,MinimumLots(Symbol())*2.0), o valor obtido do lote é normalizado e atribuído à variável global lot. Como resultado, se o lote inserido pelo usuário nos parâmetros de entrada for menor que o dobro do lote mínimo, será usado o dobro do lote mínimo. Caso contrário, será aplicado o lote inserido pelo usuário.
As entradas restantes são atribuídas às variáveis globais apropriadas e a função CreateButtons() é chamada para criar os botões do array de estrutura já preenchido com os dados do botão durante a etapa anterior. Se a criação do botão usando a função ButtonCreate() falhar, a mensagem de erro é exibida e a a operação do programa termina com um erro de inicialização.
Finalmente, a classe CTrade é inicializada:
//--- trade.SetDeviationInPoints(slippage); trade.SetExpertMagicNumber(magic_number); trade.SetTypeFillingBySymbol(Symbol()); trade.SetMarginMode(); trade.LogLevel(LOG_LEVEL_ERRORS); //---
- Define o desvio em pontos,
- define o número mágico,
- define o tipo de execução da ordem de acordo com as configurações do símbolo atual,
- define o modo de cálculo da margem de acordo com as configurações da conta atual e
- coloca o nível de registro das mensagens para exibir apenas as mensagens de erro no diário
(o modo de registro completo é ativado automaticamente no testador).
No manipulador OnDeinit(), implemente a remoção de todos os botões pelo prefixo do nome do objeto:
//+------------------------------------------------------------------+ //| Função de desinicialização do Expert | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- remove os objetos ObjectsDeleteAll(0,prefix); } //+------------------------------------------------------------------+
Agora vamos decidir sobre o timer da biblioteca e a ordem de inicialização do manipulador de eventos do EA.
- Se o EA não for iniciado no testador, o timer da biblioteca deve ser iniciado a partir do timer do EA, enquanto o manipulador de eventos trabalha no modo normal.
- Se o EA for iniciado no testador, o timer da biblioteca deve ser iniciado a partir do manipulador OnTick() do EA. O evento de pressionamento do botão também é monitorado na OnTick().
Manipuladores OnTick(), OnTimer() e OnChartEvent() do EA:
//+------------------------------------------------------------------+ //| Função Tick do Expert | //+------------------------------------------------------------------+ void OnTick() { //--- if(MQLInfoInteger(MQL_TESTER)) engine.OnTimer(); int total=ObjectsTotal(0); for(int i=0;i<total;i++) { string obj_name=ObjectName(0,i); if(StringFind(obj_name,prefix+"BUTT_")<0) continue; PressButtonEvents(obj_name); } } //+------------------------------------------------------------------+ //| Funçao timer | //+------------------------------------------------------------------+ void OnTimer() { if(!MQLInfoInteger(MQL_TESTER)) engine.OnTimer(); } //+------------------------------------------------------------------+ //| Função ChartEvent | //+------------------------------------------------------------------+ void OnChartEvent(const int id, const long &lparam, const double &dparam, const string &sparam) { if(MQLInfoInteger(MQL_TESTER)) return; if(id==CHARTEVENT_OBJECT_CLICK && StringFind(sparam,"BUTT_")>0) { PressButtonEvents(sparam); } } //+------------------------------------------------------------------+
Na OnTick()
- Verifica onde o EA é iniciado. Se ele foi iniciado no testador, chame o manipulador OnTimer() da biblioteca.
- Em seguida, verifica o nome do objeto por todos os objetos do gráfico atual no loop. Se ele corresponder ao nome de um botão, o manipulador do pressionamento do botão é chamado.
Na OnTimer()
- Verifica onde o EA é iniciado. Se ele não foi iniciado no testador, chame o manipulador OnTimer() da biblioteca.
Na OnChartEvent()
- Verifica onde o EA é iniciado. Se ele foi iniciado no testador, sai do manipulador.
- Em seguida, o ID do evento é verificado e, se esse for o evento de clique em um objeto gráfico e o nome do objeto contiver um texto pertencente aos botões, o manipulador de pressionamento do botão correspondente é chamado.
Função CreateButtons():
//+------------------------------------------------------------------+ //| Cria o painel de botões | //+------------------------------------------------------------------+ bool CreateButtons(void) { int h=18,w=84,offset=10; int cx=offset,cy=offset+(h+1)*(TOTAL_BUTT/2)+h+1; int x=cx,y=cy; int shift=0; for(int i=0;i<TOTAL_BUTT;i++) { x=x+(i==7 ? w+2 : 0); if(i==TOTAL_BUTT-2) x=cx; y=(cy-(i-(i>6 ? 7 : 0))*(h+1)); if(!ButtonCreate(butt_data[i].name,x,y,(i<TOTAL_BUTT-2 ? w : w*2+2),h,butt_data[i].text,(i<4 ? clrGreen : i>6 && i<11 ? clrRed : clrBlue))) { Alert(TextByLanguage("Не удалось создать кнопку \"","Could not create button \""),butt_data[i].text); return false; } } ChartRedraw(0); return true; } //+------------------------------------------------------------------+
Nesta função, tudo se resume a calcular as coordenadas e cores de um botão em um loop pelo número de membros da enumeração ENUM_BUTTONS. As coordenadas e a cor são calculadas com base no índice do loop indicando o número do membro da enumeração ENUM_BUTTONS. Após o cálculo das coordenadas x e y, a função de criação do botão com as coordenadas e valores da cor calculados no loop é chamada.
Função EnumToButtText():
//+------------------------------------------------------------------+ //| Converte a enumeração no texto do botão | //+------------------------------------------------------------------+ string EnumToButtText(const ENUM_BUTTONS member) { string txt=StringSubstr(EnumToString(member),5); StringToLower(txt); StringReplace(txt,"buy","Buy"); StringReplace(txt,"sell","Sell"); StringReplace(txt,"_limit"," Limit"); StringReplace(txt,"_stop"," Stop"); StringReplace(txt,"close_","Close "); StringReplace(txt,"2"," 1/2"); StringReplace(txt,"_by_"," by "); StringReplace(txt,"profit_","Profit "); return txt; } //+------------------------------------------------------------------+
Tudo é simples aqui: a função recebe o membro da enumeração e converte-o em uma string removendo o texto desnecessário. Em seguida, todos os caracteres da string obtida são convertidos em minúsculas e todas as entradas inadequadas são substituídas com aquelas necessárias.
A string de enumeração de entrada convertida no texto é finalmente retornada.
As funções para criação do botão, colocação e obtenção de seu estado:
//+------------------------------------------------------------------+ //| Cria o botão | //+------------------------------------------------------------------+ bool ButtonCreate(const string name,const int x,const int y,const int w,const int h,const string text,const color clr,const string font="Calibri",const int font_size=8) { if(ObjectFind(0,name)<0) { if(!ObjectCreate(0,name,OBJ_BUTTON,0,0,0)) { Print(DFUN,TextByLanguage("не удалось создать кнопку! Код ошибки=","Could not create button! Error code="),GetLastError()); return false; } ObjectSetInteger(0,name,OBJPROP_SELECTABLE,false); ObjectSetInteger(0,name,OBJPROP_HIDDEN,true); ObjectSetInteger(0,name,OBJPROP_XDISTANCE,x); ObjectSetInteger(0,name,OBJPROP_YDISTANCE,y); ObjectSetInteger(0,name,OBJPROP_XSIZE,w); ObjectSetInteger(0,name,OBJPROP_YSIZE,h); ObjectSetInteger(0,name,OBJPROP_CORNER,CORNER_LEFT_LOWER); ObjectSetInteger(0,name,OBJPROP_ANCHOR,ANCHOR_LEFT_LOWER); ObjectSetInteger(0,name,OBJPROP_FONTSIZE,font_size); ObjectSetString(0,name,OBJPROP_FONT,font); ObjectSetString(0,name,OBJPROP_TEXT,text); ObjectSetInteger(0,name,OBJPROP_COLOR,clr); ObjectSetString(0,name,OBJPROP_TOOLTIP,"\n"); ObjectSetInteger(0,name,OBJPROP_BORDER_COLOR,clrGray); return true; } return false; } //+------------------------------------------------------------------+ //| Retorna o estado do botão | //+------------------------------------------------------------------+ bool ButtonState(const string name) { return (bool)ObjectGetInteger(0,name,OBJPROP_STATE); } //+------------------------------------------------------------------+ //| Define o estado do botão | //+------------------------------------------------------------------+ void ButtonState(const string name,const bool state) { ObjectSetInteger(0,name,OBJPROP_STATE,state); } //+------------------------------------------------------------------+
Tudo é simples e claro aqui, portanto, nenhuma explicação é necessária.
A função para manipular os botões pressionados:
//+------------------------------------------------------------------+ //| Manipulação dos botões pressionados | //+------------------------------------------------------------------+ void PressButtonEvents(const string button_name) { //--- Converte o nome do botão em seu ID de string string button=StringSubstr(button_name,StringLen(prefix)); //--- Se o botão foi pressionado if(ButtonState(button_name)) { //--- Se o botão BUTT_BUY for pressionado: Abre uma posição de Compra if(button==EnumToString(BUTT_BUY)) { //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY,0,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY,0,takeprofit); //--- Abre uma posição de Compra trade.Buy(NormalizeLot(Symbol(),lot),Symbol(),0,sl,tp); } //--- Se o botão BUTT_BUY_LIMIT for pressionado: coloca uma BuyLimit else if(button==EnumToString(BUTT_BUY_LIMIT)) { //--- Obtém o posicionamento correto da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_LIMIT,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY_LIMIT,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY_LIMIT,price_set,takeprofit); //--- Define a ordem BuyLimit trade.BuyLimit(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_BUY_STOP for pressionado: Coloca a BuyStop else if(button==EnumToString(BUTT_BUY_STOP)) { //--- Obtém o preço correto de posicionamento da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_STOP,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY_STOP,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY_STOP,price_set,takeprofit); //--- Define a ordem BuyStop trade.BuyStop(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_BUY_STOP_LIMIT for pressionado: Coloca a BuyStopLimit else if(button==EnumToString(BUTT_BUY_STOP_LIMIT)) { //--- Obtém o preço correto de colocação da ordem BuyStop relativo ao StopLevel double price_set_stop=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_STOP,distance_pending); //--- Calcula o preço da ordem BuyLimit relativo ao nível BuyStop considerando o StopLevel double price_set_limit=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_LIMIT,distance_stoplimit,price_set_stop); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY_STOP,price_set_limit,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY_STOP,price_set_limit,takeprofit); //--- Define a ordem BuyStopLimit trade.OrderOpen(Symbol(),ORDER_TYPE_BUY_STOP_LIMIT,lot,price_set_limit,price_set_stop,sl,tp); } //--- Se o botão BUTT_SELL for pressionado: Abre uma posição de Venda else if(button==EnumToString(BUTT_SELL)) { //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL,0,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL,0,takeprofit); //--- Abre uma posição de Venda trade.Sell(lot,Symbol(),0,sl,tp); } //--- Se o botão BUTT_SELL_LIMIT for pressionado: Coloca uma SellLimit else if(button==EnumToString(BUTT_SELL_LIMIT)) { //--- Obtém o preço correto da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_LIMIT,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL_LIMIT,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL_LIMIT,price_set,takeprofit); //--- Coloca a ordem SellLimit trade.SellLimit(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_SELL_STOP for pressionado: Coloca a SellStop else if(button==EnumToString(BUTT_SELL_STOP)) { //--- Obtém o preço correto de colocação da ordem relativo ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_STOP,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL_STOP,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL_STOP,price_set,takeprofit); //--- Coloca a ordem SellStop trade.SellStop(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_SELL_STOP_LIMIT for pressionado: Coloca a SellStopLimit else if(button==EnumToString(BUTT_SELL_STOP_LIMIT)) { //--- Obtém o preço correto da ordem SellStop em relação ao StopLevel double price_set_stop=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_STOP,distance_pending); //--- Calcula o preço da ordem SellLimit relativo ao nível de SellStop considerando o StopLevel double price_set_limit=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_LIMIT,distance_stoplimit,price_set_stop); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL_STOP,price_set_limit,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL_STOP,price_set_limit,takeprofit); //--- Coloca a ordem SellStopLimit trade.OrderOpen(Symbol(),ORDER_TYPE_SELL_STOP_LIMIT,lot,price_set_limit,price_set_stop,sl,tp); } //--- Se o botão BUTT_CLOSE_BUY for pressionado: Encerra a Compra com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_BUY)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Obtém o ticket da posição de Compra e encerra a posição pelo ticket trade.PositionClose(position.Ticket()); } } } //--- Se o botão BUTT_CLOSE_BUY2 é pressionado: encerra metade da Compra com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_BUY2)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Calcula o volume de encerramento e encerra a metade da posição de Compra pelo ticket trade.PositionClosePartial(position.Ticket(),NormalizeLot(position.Symbol(),position.VolumeCurrent()/2.0)); } } } //--- Se o botão BUTT_CLOSE_BUY_BY_SELL for pressionado: Encerra a Compra com o lucro máximo pela Venda oposta com lucro máximo else if(button==EnumToString(BUTT_CLOSE_BUY_BY_SELL)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list_buy=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list_buy=CSelect::ByOrderProperty(list_buy,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_buy.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index_buy=CSelect::FindOrderMax(list_buy,ORDER_PROP_PROFIT_FULL); //--- Obtém a lista de todas as posições em aberto CArrayObj* list_sell=engine.GetListMarketPosition(); //--- Seleciona as posições de Venda somente da lista list_sell=CSelect::ByOrderProperty(list_sell,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_sell.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index_sell=CSelect::FindOrderMax(list_sell,ORDER_PROP_PROFIT_FULL); if(index_buy>WRONG_VALUE && index_sell>WRONG_VALUE) { //--- Seleciona a posição de Compra com o lucro máximo COrder* position_buy=list_buy.At(index_buy); //--- Seleciona a posição de Venda com o lucro máximo COrder* position_sell=list_sell.At(index_sell); if(position_buy!=NULL && position_sell!=NULL) { //--- Encerra a posição de Compra pela posição oposta de Venda trade.PositionCloseBy(position_buy.Ticket(),position_sell.Ticket()); } } } //--- Se o botão BUTT_CLOSE_SELL for pressionado: Encerra a Venda com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_SELL)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de Venda da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Obtém o ticket de venda e encerra a posição pelo ticket trade.PositionClose(position.Ticket()); } } } //--- Se o botão BUTT_CLOSE_SELL2 for pressionado: Encerra metade da Venda com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_SELL2)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de Venda da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Calcula o volume de encerramento e encerra a metade da posição de Venda pelo ticket trade.PositionClosePartial(position.Ticket(),NormalizeLot(position.Symbol(),position.VolumeCurrent()/2.0)); } } } //--- Se o botão BUTT_CLOSE_SELL_BY_BUY for pressionado: Encerra a Venda com o lucro máximo pela Compra oposta com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_SELL_BY_BUY)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list_sell=engine.GetListMarketPosition(); //--- Obtém apenas as posições de Venda na lista list_sell=CSelect::ByOrderProperty(list_sell,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_sell.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index_sell=CSelect::FindOrderMax(list_sell,ORDER_PROP_PROFIT_FULL); //--- Obtém a lista de todas as posições em aberto CArrayObj* list_buy=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list_buy=CSelect::ByOrderProperty(list_buy,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_buy.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index_buy=CSelect::FindOrderMax(list_buy,ORDER_PROP_PROFIT_FULL); if(index_sell>WRONG_VALUE && index_buy>WRONG_VALUE) { //--- Seleciona a posição de Venda com o lucro máximo COrder* position_sell=list_sell.At(index_sell); //--- Seleciona a posição de Compra com o lucro máximo COrder* position_buy=list_buy.At(index_buy); if(position_sell!=NULL && position_buy!=NULL) { //--- Encerra a posição de venda pela posição de Compra oposta trade.PositionCloseBy(position_sell.Ticket(),position_buy.Ticket()); } } } //--- Se o botão BUTT_CLOSE_ALL for pressionado: Encerra todas as posições começando com aquela com o menor lucro else if(button==EnumToString(BUTT_CLOSE_ALL)) { //--- Recebe a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); if(list!=NULL) { //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); int total=list.Total(); //--- No loop da posição com o menor lucro for(int i=0;i<total;i++) { COrder* position=list.At(i); if(position==NULL) continue; //--- encerra cada posição pelo seu ticket trade.PositionClose(position.Ticket()); } } } //--- Se o botão BUTT_PROFIT_WITHDRAWAL for pressionado: Retira os fundos da conta if(button==EnumToString(BUTT_PROFIT_WITHDRAWAL)) { //--- Se o programa é iniciado no testador if(MQLInfoInteger(MQL_TESTER)) { //--- Emula a retirada de fundos TesterWithdrawal(withdrawal); } } //--- Aguarda 1/10 de segundo Sleep(100); //--- "Despressiona" o botão e redesenha o gráfico ButtonState(button_name,false); ChartRedraw(); } } //+------------------------------------------------------------------+
A função é bem grande, mas simples: ela recebe o nome do objeto do botão a ser convertido em um ID de string. O estado do botão é verificado em seguida e, se for pressionado, a ID da string é verificada. A ramificação if-else apropriada é executada calculando todos os níveis e aplicando um ajuste necessário para não violar a limitação do StopLevel. O método correspondente da classe de negociação é executado.
Todas as explicações são escritas diretamente nas linhas de comentários do código.
Para o EA de teste, nós fizemos as verificações mínimas necessárias, ignorando todas as outras verificações importantes para uma conta real. Atualmente, o mais importante para nós é verificar a operação da biblioteca, em vez de desenvolver um EA para trabalhar com ele em contas reais.
A listagem completa do EA de teste:
//+------------------------------------------------------------------+ //| TestDoEasyPart04.mq5 | //| Copyright 2018, MetaQuotes Software Corp. | //| https://mql5.com/en/users/artmedia70 | //+------------------------------------------------------------------+ #property copyright "Copyright 2018, MetaQuotes Software Corp." #property link "https://mql5.com/en/users/artmedia70" #property version "1.00" //--- includes #include <DoEasy\Engine.mqh> #include <Trade\Trade.mqh> //--- enums enum ENUM_BUTTONS { BUTT_BUY, BUTT_BUY_LIMIT, BUTT_BUY_STOP, BUTT_BUY_STOP_LIMIT, BUTT_CLOSE_BUY, BUTT_CLOSE_BUY2, BUTT_CLOSE_BUY_BY_SELL, BUTT_SELL, BUTT_SELL_LIMIT, BUTT_SELL_STOP, BUTT_SELL_STOP_LIMIT, BUTT_CLOSE_SELL, BUTT_CLOSE_SELL2, BUTT_CLOSE_SELL_BY_BUY, BUTT_CLOSE_ALL, BUTT_PROFIT_WITHDRAWAL }; #define TOTAL_BUTT (16) //--- estruturas struct SDataButt { string name; string text; }; //--- variáveis de entrada input ulong InpMagic = 123; // Número mágico input double InpLots = 0.1; // Lotes input uint InpStopLoss = 50; // StopLoss em pontos input uint InpTakeProfit = 50; // TakeProfit em pontos input uint InpDistance = 50; // Distância das ordens pendentes (pontos) input uint InpDistanceSL = 50; // Distância das ordens StopLimit (pontos) input uint InpSlippage = 0; // Desvio em pontos input double InpWithdrawal = 10; // Retirada de fundos (no testador) //--- variáveis globais CEngine engine; CTrade trade; SDataButt butt_data[TOTAL_BUTT]; string prefix; double lot; double withdrawal=(InpWithdrawal<0.1 ? 0.1 : InpWithdrawal); ulong magic_number; uint stoploss; uint takeprofit; uint distance_pending; uint distance_stoplimit; uint slippage; //+------------------------------------------------------------------+ //| Função de inicialização do Expert | //+------------------------------------------------------------------+ int OnInit() { //--- Verifica o tipo da conta if(!engine.IsHedge()) { Alert(TextByLanguage("Ошибка. Счёт должен быть хеджевым","Error. Account must be hedge")); return INIT_FAILED; } //--- define as variáveis globais prefix=MQLInfoString(MQL_PROGRAM_NAME)+"_"; for(int i=0;i<TOTAL_BUTT;i++) { butt_data[i].name=prefix+EnumToString((ENUM_BUTTONS)i); butt_data[i].text=EnumToButtText((ENUM_BUTTONS)i); } lot=NormalizeLot(Symbol(),fmax(InpLots,MinimumLots(Symbol())*2.0)); magic_number=InpMagic; stoploss=InpStopLoss; takeprofit=InpTakeProfit; distance_pending=InpDistance; distance_stoplimit=InpDistanceSL; slippage=InpSlippage; //--- cria os botões if(!CreateButtons()) return INIT_FAILED; //--- define os parâmetros de negociação trade.SetDeviationInPoints(slippage); trade.SetExpertMagicNumber(magic_number); trade.SetTypeFillingBySymbol(Symbol()); trade.SetMarginMode(); trade.LogLevel(LOG_LEVEL_NO); //--- return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Função de desinicialização do Expert | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- remove os objetos ObjectsDeleteAll(0,prefix); } //+------------------------------------------------------------------+ //| Função Tick do Expert | //+------------------------------------------------------------------+ void OnTick() { //--- if(MQLInfoInteger(MQL_TESTER)) engine.OnTimer(); int total=ObjectsTotal(0); for(int i=0;i<total;i++) { string obj_name=ObjectName(0,i); if(StringFind(obj_name,prefix+"BUTT_")<0) continue; PressButtonEvents(obj_name); } if(engine.TradeEventCode()!=TRADE_EVENT_FLAG_NO_EVENT) { Print(DFUN,EnumToString((ENUM_TRADE_EVENT_FLAGS)engine.TradeEventCode())); } engine.TradeEventCode(); } //+------------------------------------------------------------------+ //| Funçao timer | //+------------------------------------------------------------------+ void OnTimer() { if(!MQLInfoInteger(MQL_TESTER)) engine.OnTimer(); } //+------------------------------------------------------------------+ //| Função ChartEvent | //+------------------------------------------------------------------+ void OnChartEvent(const int id, const long &lparam, const double &dparam, const string &sparam) { if(MQLInfoInteger(MQL_TESTER)) return; if(id==CHARTEVENT_OBJECT_CLICK && StringFind(sparam,"BUTT_")>0) { PressButtonEvents(sparam); } } //+------------------------------------------------------------------+ //| Cria o painel de botões | //+------------------------------------------------------------------+ bool CreateButtons(void) { int h=18,w=84,offset=10; int cx=offset,cy=offset+(h+1)*(TOTAL_BUTT/2)+h+1; int x=cx,y=cy; int shift=0; for(int i=0;i<TOTAL_BUTT;i++) { x=x+(i==7 ? w+2 : 0); if(i==TOTAL_BUTT-2) x=cx; y=(cy-(i-(i>6 ? 7 : 0))*(h+1)); if(!ButtonCreate(butt_data[i].name,x,y,(i<TOTAL_BUTT-2 ? w : w*2+2),h,butt_data[i].text,(i<4 ? clrGreen : i>6 && i<11 ? clrRed : clrBlue))) { Alert(TextByLanguage("Не удалось создать кнопку \"","Could not create button \""),butt_data[i].text); return false; } } ChartRedraw(0); return true; } //+------------------------------------------------------------------+ //| Cria o botão | //+------------------------------------------------------------------+ bool ButtonCreate(const string name,const int x,const int y,const int w,const int h,const string text,const color clr,const string font="Calibri",const int font_size=8) { if(ObjectFind(0,name)<0) { if(!ObjectCreate(0,name,OBJ_BUTTON,0,0,0)) { Print(DFUN,TextByLanguage("не удалось создать кнопку! Код ошибки=","Could not create button! Error code="),GetLastError()); return false; } ObjectSetInteger(0,name,OBJPROP_SELECTABLE,false); ObjectSetInteger(0,name,OBJPROP_HIDDEN,true); ObjectSetInteger(0,name,OBJPROP_XDISTANCE,x); ObjectSetInteger(0,name,OBJPROP_YDISTANCE,y); ObjectSetInteger(0,name,OBJPROP_XSIZE,w); ObjectSetInteger(0,name,OBJPROP_YSIZE,h); ObjectSetInteger(0,name,OBJPROP_CORNER,CORNER_LEFT_LOWER); ObjectSetInteger(0,name,OBJPROP_ANCHOR,ANCHOR_LEFT_LOWER); ObjectSetInteger(0,name,OBJPROP_FONTSIZE,font_size); ObjectSetString(0,name,OBJPROP_FONT,font); ObjectSetString(0,name,OBJPROP_TEXT,text); ObjectSetInteger(0,name,OBJPROP_COLOR,clr); ObjectSetString(0,name,OBJPROP_TOOLTIP,"\n"); ObjectSetInteger(0,name,OBJPROP_BORDER_COLOR,clrGray); return true; } return false; } //+------------------------------------------------------------------+ //| Retorna o estado do botão | //+------------------------------------------------------------------+ bool ButtonState(const string name) { return (bool)ObjectGetInteger(0,name,OBJPROP_STATE); } //+------------------------------------------------------------------+ //| Define o estado do botão | //+------------------------------------------------------------------+ void ButtonState(const string name,const bool state) { ObjectSetInteger(0,name,OBJPROP_STATE,state); } //+------------------------------------------------------------------+ //| Transforma a enumeração em texto do botão | //+------------------------------------------------------------------+ string EnumToButtText(const ENUM_BUTTONS member) { string txt=StringSubstr(EnumToString(member),5); StringToLower(txt); StringReplace(txt,"buy","Buy"); StringReplace(txt,"sell","Sell"); StringReplace(txt,"_limit"," Limit"); StringReplace(txt,"_stop"," Stop"); StringReplace(txt,"close_","Close "); StringReplace(txt,"2"," 1/2"); StringReplace(txt,"_by_"," by "); StringReplace(txt,"profit_","Profit "); return txt; } //+------------------------------------------------------------------+ //| Manipa os pressionamentos de botões | //+------------------------------------------------------------------+ void PressButtonEvents(const string button_name) { //--- Converte o nome do botão em seu ID de string string button=StringSubstr(button_name,StringLen(prefix)); //--- Se o botão foi pressionado if(ButtonState(button_name)) { //--- Se o botão BUTT_BUY for pressionado: Abre uma posição de Compra if(button==EnumToString(BUTT_BUY)) { //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY,0,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY,0,takeprofit); //--- Abre uma posição de Compra trade.Buy(NormalizeLot(Symbol(),lot),Symbol(),0,sl,tp); } //--- Se o botão BUTT_BUY_LIMIT for pressionado: Coloca a BuyLimit else if(button==EnumToString(BUTT_BUY_LIMIT)) { //--- Obtém o preço correto de posicionamento da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_LIMIT,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY_LIMIT,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY_LIMIT,price_set,takeprofit); //--- Define a ordem BuyLimit trade.BuyLimit(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_BUY_STOP for pressionado: Coloca a BuyStop else if(button==EnumToString(BUTT_BUY_STOP)) { //--- Obtém o preço correto de posicionamento da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_STOP,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY_STOP,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY_STOP,price_set,takeprofit); //--- Define a ordem BuyStop trade.BuyStop(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_BUY_STOP_LIMIT for pressionado: Coloca a BuyStopLimit else if(button==EnumToString(BUTT_BUY_STOP_LIMIT)) { //--- Obtém o preço correto do BuyStop relativo ao StopLevel double price_set_stop=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_STOP,distance_pending); //--- Calcula o preço da ordem BuyLimit relativo ao nível de colocação da BuyStop considerando o StopLevel double price_set_limit=CorrectPricePending(Symbol(),ORDER_TYPE_BUY_LIMIT,distance_stoplimit,price_set_stop); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_BUY_STOP,price_set_limit,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_BUY_STOP,price_set_limit,takeprofit); //--- Define a ordem BuyStopLimit trade.OrderOpen(Symbol(),ORDER_TYPE_BUY_STOP_LIMIT,lot,price_set_limit,price_set_stop,sl,tp); } //--- Se o botão BUTT_SELL for pressionado: Abre uma posição de Venda else if(button==EnumToString(BUTT_SELL)) { //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL,0,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL,0,takeprofit); //--- Abre uma posição de Venda trade.Sell(lot,Symbol(),0,sl,tp); } //--- Se o botão BUTT_SELL_LIMIT for pressionado: Coloca uma SellLimit else if(button==EnumToString(BUTT_SELL_LIMIT)) { //--- Obtém o preço correto de posicionamento da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_LIMIT,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL_LIMIT,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL_LIMIT,price_set,takeprofit); //--- Coloca a ordem SellLimit trade.SellLimit(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_SELL_STOP for pressionado: Coloca a SellStop else if(button==EnumToString(BUTT_SELL_STOP)) { //--- Obtém o preço correto de posicionamento da ordem em relação ao StopLevel double price_set=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_STOP,distance_pending); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL_STOP,price_set,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL_STOP,price_set,takeprofit); //--- Coloca a ordem SellStop trade.SellStop(lot,price_set,Symbol(),sl,tp); } //--- Se o botão BUTT_SELL_STOP_LIMIT for pressionado: Coloca a SellStopLimit else if(button==EnumToString(BUTT_SELL_STOP_LIMIT)) { //--- Obtém o preço correto da ordem SellStop em relação ao StopLevel double price_set_stop=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_STOP,distance_pending); //--- Calcula o preço da ordem SellLimit relativo ao nível de SellStop considerando o StopLevel double price_set_limit=CorrectPricePending(Symbol(),ORDER_TYPE_SELL_LIMIT,distance_stoplimit,price_set_stop); //--- Obtém os preços corretos de StopLoss e TakeProfit em relação ao nível de colocação da ordem, considerando o StopLevel double sl=CorrectStopLoss(Symbol(),ORDER_TYPE_SELL_STOP,price_set_limit,stoploss); double tp=CorrectTakeProfit(Symbol(),ORDER_TYPE_SELL_STOP,price_set_limit,takeprofit); //--- Coloca a ordem SellStopLimit trade.OrderOpen(Symbol(),ORDER_TYPE_SELL_STOP_LIMIT,lot,price_set_limit,price_set_stop,sl,tp); } //--- Se o botão BUTT_CLOSE_BUY for pressionado: Encerra a Compra com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_BUY)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Obtém o ticket da posição de Compra e encerra a posição pelo ticket trade.PositionClose(position.Ticket()); } } } //--- Se o botão BUTT_CLOSE_BUY2 for pressionado: Encerra a metade da Compra com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_BUY2)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Calcula o volume de encerramento e encerra a metade da posição de Compra pelo ticket trade.PositionClosePartial(position.Ticket(),NormalizeLot(position.Symbol(),position.VolumeCurrent()/2.0)); } } } //--- Se o botão BUTT_CLOSE_BUY_BY_SELL for pressionado: Encerra a Compra com o lucro máximo pela Venda oposta com lucro máximo else if(button==EnumToString(BUTT_CLOSE_BUY_BY_SELL)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list_buy=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list_buy=CSelect::ByOrderProperty(list_buy,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_buy.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index_buy=CSelect::FindOrderMax(list_buy,ORDER_PROP_PROFIT_FULL); //--- Obtém a lista de todas as posições em aberto CArrayObj* list_sell=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de Venda da lista list_sell=CSelect::ByOrderProperty(list_sell,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_sell.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index_sell=CSelect::FindOrderMax(list_sell,ORDER_PROP_PROFIT_FULL); if(index_buy>WRONG_VALUE && index_sell>WRONG_VALUE) { //--- Seleciona a posição de Compra com o lucro máximo COrder* position_buy=list_buy.At(index_buy); //--- Seleciona a posição de Venda com o lucro máximo COrder* position_sell=list_sell.At(index_sell); if(position_buy!=NULL && position_sell!=NULL) { //--- Encerra a posição de Compra pela de Venda oposta trade.PositionCloseBy(position_buy.Ticket(),position_sell.Ticket()); } } } //--- Se o botão BUTT_CLOSE_SELL for pressionado: Encerra a Venda com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_SELL)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de Venda da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Obtém o ticket de venda e encerra a posição pelo ticket trade.PositionClose(position.Ticket()); } } } //--- Se o botão BUTT_CLOSE_SELL2 for pressionado: Encerra metade da Venda com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_SELL2)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de Venda da lista list=CSelect::ByOrderProperty(list,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index=CSelect::FindOrderMax(list,ORDER_PROP_PROFIT_FULL); if(index>WRONG_VALUE) { COrder* position=list.At(index); if(position!=NULL) { //--- Calcula o volume de encerramento e encerra a metade da posição de Venda pelo ticket trade.PositionClosePartial(position.Ticket(),NormalizeLot(position.Symbol(),position.VolumeCurrent()/2.0)); } } } //--- Se o botão BUTT_CLOSE_SELL_BY_BUY for pressionado: Encerra a Venda com o lucro máximo pela Compra oposta com o lucro máximo else if(button==EnumToString(BUTT_CLOSE_SELL_BY_BUY)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list_sell=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de Venda da lista list_sell=CSelect::ByOrderProperty(list_sell,ORDER_PROP_TYPE,POSITION_TYPE_SELL,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_sell.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Venda com o lucro máximo int index_sell=CSelect::FindOrderMax(list_sell,ORDER_PROP_PROFIT_FULL); //--- Obtém a lista de todas as posições em aberto CArrayObj* list_buy=engine.GetListMarketPosition(); //--- Seleciona apenas as posições de compra da lista list_buy=CSelect::ByOrderProperty(list_buy,ORDER_PROP_TYPE,POSITION_TYPE_BUY,EQUAL); //--- Ordena a lista por lucro considerando a comissão e swap list_buy.Sort(SORT_BY_ORDER_PROFIT_FULL); //--- Obtém o índice da posição de Compra com o lucro máximo int index_buy=CSelect::FindOrderMax(list_buy,ORDER_PROP_PROFIT_FULL); if(index_sell>WRONG_VALUE && index_buy>WRONG_VALUE) { //--- Seleciona a posição de Venda com o lucro máximo COrder* position_sell=list_sell.At(index_sell); //--- Seleciona a posição de Compra com o lucro máximo COrder* position_buy=list_buy.At(index_buy); if(position_sell!=NULL && position_buy!=NULL) { //--- Encerra a posição de Venda pela de Compra oposta trade.PositionCloseBy(position_sell.Ticket(),position_buy.Ticket()); } } } //--- Se o BUTT_CLOSE_ALL for pressionado: Encerra todas as posições começando com aquela com o menor lucro else if(button==EnumToString(BUTT_CLOSE_ALL)) { //--- Obtém a lista de todas as posições em aberto CArrayObj* list=engine.GetListMarketPosition(); if(list!=NULL) { //--- Ordena a lista por lucro considerando a comissão e swap list.Sort(SORT_BY_ORDER_PROFIT_FULL); int total=list.Total(); //--- No loop da posição com o menor lucro for(int i=0;i<total;i++) { COrder* position=list.At(i); if(position==NULL) continue; //--- encerra cada posição pelo seu ticket trade.PositionClose(position.Ticket()); } } } //--- Se o botão BUTT_PROFIT_WITHDRAWAL for pressionado: Retira os fundos da conta if(button==EnumToString(BUTT_PROFIT_WITHDRAWAL)) { //--- Se o programa é iniciado no testador if(MQLInfoInteger(MQL_TESTER)) { //--- Emula a retirada de fundos TesterWithdrawal(withdrawal); } } //--- Aguarda 1/10 de segundo Sleep(100); //--- "Despressiona" o botão e redesenha o gráfico ButtonState(button_name,false); ChartRedraw(); } } //+------------------------------------------------------------------+
O código parece bem longo... No entanto, isso é apenas o começo, pois tudo deve ser simplificado para os usuários finais. A maioria das ações que realizamos aqui deve ser ocultada no código da biblioteca, enquanto o mecanismo mais amigável de interação com a biblioteca deve ser introduzido.
Vamos iniciar o EA no testador e experimentar os botões:
Tudo está ativado corretamente e o diário recebe as mensagens sobre os eventos ocorridos.
Atualmente, o último evento é sempre fixo. Em outras palavras, se nós fecharmos várias posições simultaneamente, apenas a última posição dentre as várias fechadas se encontrará no evento. O fechamento em massa pode ser monitorado pelo número de novos negócios ou ordens do histórico. É possível, então, obter a lista de todas as posições encerradas recentemente por seu número e definir o seu conjunto inteiro. Vamos desenvolver uma classe de coleção de eventos separada para isso. Isso nos permitirá ter acesso constante a todos os eventos ocorridos no programa.
Atualmente, todas as mensagens de evento no diário de teste são exibidas no método CEngine::WorkWithHedgeCollections() do objeto base da biblioteca, e nós precisamos que o programa personalizado conheça os códigos de evento para "entender" o que aconteceu na conta. Isso nos permitirá formar a lógica de resposta do programa, dependendo do evento. Para testar a capacidade de conseguir isso, nós criaremos dois métodos no objeto base da biblioteca. Um método é armazenar o código do último evento, enquanto o outro é decodificar esse código consistindo em um conjunto de sinalizadores de evento.
No próximo artigo, nós criaremos uma classe completa para trabalhar com os eventos da conta.
No corpo da classe CEngine, defina o método de decodificação do código de evento e defina o código de evento de negociação da conta, o método de verificar a presença de uma flag de evento no código do evento, o método para receber o último evento de negociação do programa que realizou a chamada, bem como o método de redefinição do valor do último evento de negociação:
//+------------------------------------------------------------------+ //| Classe base da Biblioteca | //+------------------------------------------------------------------+ class CEngine : public CObject { private: CHistoryCollection m_history; // Coleção do histórico de ordens e negócios CMarketCollection m_market; // Coleção de ordens à mercado e negócios CArrayObj m_list_counters; // Lista dos contadores do timer bool m_first_start; // Flag da primeira execução bool m_is_hedge; // Flag da conta hedge bool m_is_market_trade_event; // Flag do evento de negociação da conta bool m_is_history_trade_event; // Flag do evento do histórico de negociação int m_trade_event_code; // Código do estado do evento de negociação da conta ENUM_TRADE_EVENT m_acc_trade_event; // Evento de negociação da conta //--- Decodifica o código do evento e define o evento de negociação na conta void SetTradeEvent(void); //--- Retorna o índice do contador por id int CounterIndex(const int id) const; //--- Retorna a (1) primeira flag de ativação, (2) presença da flag no evento de negociação bool IsFirstStart(void); bool IsTradeEventFlag(const int event_code) const { return (this.m_trade_event_code&event_code)==event_code; } //--- Trabalhar com as coleções de (1) hedging, (2) netting void WorkWithHedgeCollections(void); void WorkWithNettoCollections(void); //--- Retorna a última (1) ordem pendente, (2) ordem à mercado, (3) última posição, (4) posição pelo ticket COrder* GetLastMarketPending(void); COrder* GetLastMarketOrder(void); COrder* GetLastPosition(void); COrder* GetPosition(const ulong ticket); //--- Retorna a última (1) ordem pendente removida, (2) ordem do histórico, (3) ordem do histórico pelo seu ticket COrder* GetLastHistoryPending(void); COrder* GetLastHistoryOrder(void); COrder* GetHistoryOrder(const ulong ticket); //--- Retorna a (1) primeira e a (2) última ordem do histórico da lista de todos as ordens de posição, (3) o último negócio COrder* GetFirstOrderPosition(const ulong position_id); COrder* GetLastOrderPosition(const ulong position_id); COrder* GetLastDeal(void); public: //--- Retorna a lista de (1) posições, (2) ordens pendentes e (3) ordens à mercado CArrayObj* GetListMarketPosition(void); CArrayObj* GetListMarketPendings(void); CArrayObj* GetListMarketOrders(void); //--- Retorna a lista do histórico de (1) ordens, (2) ordens pendentes removidas, (3) negócios, (4) todas as ordens pelo id da posição CArrayObj* GetListHistoryOrders(void); CArrayObj* GetListHistoryPendings(void); CArrayObj* GetListHistoryDeals(void); CArrayObj* GetListAllOrdersByPosID(const ulong position_id); //--- Redefine o último evento de negociação void ResetLastTradeEvent(void) { this.m_acc_trade_event=TRADE_EVENT_NO_EVENT; } //--- Retorna o (1) último evento de negociação, (2) o código de evento de negociação, (3) a flag de conta de hedge ENUM_TRADE_EVENT LastTradeEvent(void) const { return this.m_acc_trade_event; } int TradeEventCode(void) const { return this.m_trade_event_code; } bool IsHedge(void) const { return this.m_is_hedge; } //--- Cria o contador do timer void CreateCounter(const int id,const ulong frequency,const ulong pause); //--- Timer void OnTimer(void); //--- Construtor/destrutor CEngine(); ~CEngine(); }; //+------------------------------------------------------------------+
Além do corpo da classe, escrevemos o método para decodificar um evento de negociação (escrevemos todos os esclarecimentos diretamente no código):
//+------------------------------------------------------------------+ //| Decodifica o código do evento e define um evento de negociação | //+------------------------------------------------------------------+ void CEngine::SetTradeEvent(void) { //--- Nenhum evento de negociação. Exit if(this.m_trade_event_code==TRADE_EVENT_FLAG_NO_EVENT) return; //--- A ordem pendente está definida (verifica se o código do evento é correspondido, pois pode haver apenas uma flag aqui) if(this.m_trade_event_code==TRADE_EVENT_FLAG_ORDER_PLASED) { this.m_acc_trade_event=TRADE_EVENT_PENDING_ORDER_PLASED; Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } //--- A ordem pendente é removida (verifica se o código do evento é correspondido, pois pode haver apenas uma flag aqui) if(this.m_trade_event_code==TRADE_EVENT_FLAG_ORDER_REMOVED) { this.m_acc_trade_event=TRADE_EVENT_PENDING_ORDER_REMOVED; Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } //--- A posição é aberta (verifique se há várias flags no código do evento) if(this.IsTradeEventFlag(TRADE_EVENT_FLAG_POSITION_OPENED)) { //--- Se esta ordem pendente for ativada pelo preço if(this.IsTradeEventFlag(TRADE_EVENT_FLAG_ORDER_ACTIVATED)) { this.m_acc_trade_event=(!this.IsTradeEventFlag(TRADE_EVENT_FLAG_PARTIAL) ? TRADE_EVENT_PENDING_ORDER_ACTIVATED : TRADE_EVENT_PENDING_ORDER_ACTIVATED_PARTIAL); Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } this.m_acc_trade_event=(!this.IsTradeEventFlag(TRADE_EVENT_FLAG_PARTIAL) ? TRADE_EVENT_POSITION_OPENED : TRADE_EVENT_POSITION_OPENED_PARTIAL); Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } //--- A posição está encerrada (verifica se há várias flags no código do evento) if(this.IsTradeEventFlag(TRADE_EVENT_FLAG_POSITION_CLOSED)) { //--- se a posição for encerrada por StopLoss if(this.IsTradeEventFlag(TRADE_EVENT_FLAG_SL)) { //--- verifica a flag de encerramento parcial e define o evento de negociação "Posição encerrada por StopLoss" ou "Posição encerrada parcialmente por StopLoss" this.m_acc_trade_event=(!this.IsTradeEventFlag(TRADE_EVENT_FLAG_PARTIAL) ? TRADE_EVENT_POSITION_CLOSED_BY_SL : TRADE_EVENT_POSITION_CLOSED_PARTIAL_BY_SL); Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } //--- se a posição for encerrada por TakeProfit else if(this.IsTradeEventFlag(TRADE_EVENT_FLAG_TP)) { //--- verifica a flag de encerramento parcial e define o evento de negociação "Posição encerrada por TakeProfit" ou "Posição encerrada parcialmente por TakeProfit" this.m_acc_trade_event=(!this.IsTradeEventFlag(TRADE_EVENT_FLAG_PARTIAL) ? TRADE_EVENT_POSITION_CLOSED_BY_TP : TRADE_EVENT_POSITION_CLOSED_PARTIAL_BY_TP); Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } //--- se a posição for encerrada por uma oposto else if(this.IsTradeEventFlag(TRADE_EVENT_FLAG_BY_POS)) { //--- verifica a flag de encerramento parcial e define o evento "Posição encerrada por uma oposta" ou "Posição encerrada parcialmente por uma oposta" this.m_acc_trade_event=(!this.IsTradeEventFlag(TRADE_EVENT_FLAG_PARTIAL) ? TRADE_EVENT_POSITION_CLOSED_BY_POS : TRADE_EVENT_POSITION_CLOSED_PARTIAL_BY_POS); Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } //--- Se a posição estiver encerrada else { //--- verifica a flag de encerramento parcial e define o evento "Posição encerrada" ou "Posição encerrada parcialmente" this.m_acc_trade_event=(!this.IsTradeEventFlag(TRADE_EVENT_FLAG_PARTIAL) ? TRADE_EVENT_POSITION_CLOSED : TRADE_EVENT_POSITION_CLOSED_PARTIAL); Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } } //--- Operação de saldo na conta (esclarece o evento pelo tipo de negócio) if(this.m_trade_event_code==TRADE_EVENT_FLAG_ACCOUNT_BALANCE) { //--- Inicializa o evento de negociação this.m_acc_trade_event=TRADE_EVENT_NO_EVENT; //--- Pega o último negócio COrder* deal=this.GetLastDeal(); if(deal!=NULL) { ENUM_DEAL_TYPE deal_type=(ENUM_DEAL_TYPE)deal.GetProperty(ORDER_PROP_TYPE); //--- se o negócio for uma operação de saldo if(deal_type==DEAL_TYPE_BALANCE) { //--- verifica o lucro do negócio e define o evento (depósito ou retirada de fundos) this.m_acc_trade_event=(deal.Profit()>0 ? TRADE_EVENT_ACCOUNT_BALANCE_REFILL : TRADE_EVENT_ACCOUNT_BALANCE_WITHDRAWAL); } //--- Os tipos de operação de saldo restante correspondem à enumeração ENUM_DEAL_TYPE que começa com DEAL_TYPE_CREDIT else if(deal_type>DEAL_TYPE_BALANCE) { //--- configura o evento this.m_acc_trade_event=(ENUM_TRADE_EVENT)deal_type; } } Print(DFUN,"Code=",this.m_trade_event_code,", m_acc_trade_event=",EnumToString(m_acc_trade_event)); return; } } //+------------------------------------------------------------------+
Adiciona a chamada do método de codificação do evento de negociação e remove a exibição de descrições de eventos no diário no final do método WorkWithHedgeCollections() verificando e criando um código de evento de negociação:
//+------------------------------------------------------------------+ //| Verificação dos eventos de negociação (hedging) | //+------------------------------------------------------------------+ void CEngine::WorkWithHedgeCollections(void) { //--- Inicialize o código e as flags do evento de negociação this.m_trade_event_code=TRADE_EVENT_FLAG_NO_EVENT; this.m_is_market_trade_event=false; this.m_is_history_trade_event=false; //--- Atualiza as listas this.m_market.Refresh(); this.m_history.Refresh(); //--- Ações durante a primeira execução if(this.IsFirstStart()) { this.m_acc_trade_event=TRADE_EVENT_NO_EVENT; return; } //--- Verifica o estado do mercado e as mudanças no histórico da conta this.m_is_market_trade_event=this.m_market.IsTradeEvent(); this.m_is_history_trade_event=this.m_history.IsTradeEvent(); //--- #ifdef __MQL4__ #else // MQL5 //--- Se um evento se referir apenas a ordens à mercado e posições if(this.m_is_market_trade_event && !this.m_is_history_trade_event) { //--- Se o número de ordens pendentes aumentou if(this.m_market.NewPendingOrders()>0) { //--- Adiciona a flag de colocação da ordem pendente this.m_trade_event_code+=TRADE_EVENT_FLAG_ORDER_PLASED; } //--- Se o número de ordens à mercado aumentou if(this.m_market.NewMarketOrders()>0) { //--- não adiciona a flag de evento //--- ... } } //--- Se um evento se referir apenas as ordens do negócios do histórico else if(this.m_is_history_trade_event && !this.m_is_market_trade_event) { //--- Se um novo negócio aparecer if(this.m_history.NewDeals()>0) { //--- Adiciona a flag de um evento de saldo da conta this.m_trade_event_code+=TRADE_EVENT_FLAG_ACCOUNT_BALANCE; } } //--- Se os eventos estiverem relacionados a ordens à mercado e posições do histórico else if(this.m_is_market_trade_event && this.m_is_history_trade_event) { //--- Se o número de ordens pendentes diminuiu e nenhum novo negócio apareceu if(this.m_market.NewPendingOrders()<0 && this.m_history.NewDeals()==0) { //--- Adiciona a flag de remoção de uma ordem pendente this.m_trade_event_code+=TRADE_EVENT_FLAG_ORDER_REMOVED; } //--- Se houver um novo negócio e uma nova ordem no histórico if(this.m_history.NewDeals()>0 && this.m_history.NewOrders()>0) { //--- Pega o último negócio COrder* deal=this.GetLastDeal(); if(deal!=NULL) { //--- No caso de um negócio de entrada à mercado if(deal.GetProperty(ORDER_PROP_DEAL_ENTRY)==DEAL_ENTRY_IN) { //--- Adiciona o flag de abertura de posição this.m_trade_event_code+=TRADE_EVENT_FLAG_POSITION_OPENED; //--- Se o número de ordens pendentes diminuiu if(this.m_market.NewPendingOrders()<0) { //--- Adiciona a flag de uma ativação de ordem pendente this.m_trade_event_code+=TRADE_EVENT_FLAG_ORDER_ACTIVATED; } //--- Obtém o ticket da ordem ulong order_ticket=deal.GetProperty(ORDER_PROP_DEAL_ORDER); COrder* order=this.GetHistoryOrder(order_ticket); if(order!=NULL) { //--- Se o volume atual da ordem exceder zero if(order.VolumeCurrent()>0) { //--- Adiciona a flag de execução parcial this.m_trade_event_code+=TRADE_EVENT_FLAG_PARTIAL; } } } //--- No caso de um negócio de saída à mercado if(deal.GetProperty(ORDER_PROP_DEAL_ENTRY)==DEAL_ENTRY_OUT) { //--- Adiciona a flag de encerramento de posição this.m_trade_event_code+=TRADE_EVENT_FLAG_POSITION_CLOSED; //--- Obtém o ticket da ordem do negócio ulong order_ticket=deal.GetProperty(ORDER_PROP_DEAL_ORDER); COrder* order=this.GetHistoryOrder(order_ticket); if(order!=NULL) { //--- Se a posição do negócio ainda estiver presente no mercado COrder* pos=this.GetPosition(deal.PositionID()); if(pos!=NULL) { //--- Adiciona a flag de execução parcial this.m_trade_event_code+=TRADE_EVENT_FLAG_PARTIAL; } //--- Caso contrário, se a posição for encerrada por completo else { //--- Se a ordem tiver a flag de encerramento pelo StopLoss if(order.IsCloseByStopLoss()) { //--- Adiciona a flag do encerramento por StopLoss this.m_trade_event_code+=TRADE_EVENT_FLAG_SL; } //--- Se a ordem tiver a flag do encerramento por TakeProfit if(order.IsCloseByTakeProfit()) { //--- Adicionar a flag do encerramento por TakeProfit this.m_trade_event_code+=TRADE_EVENT_FLAG_TP; } } } } //--- Se encerrado pela oposta if(deal.GetProperty(ORDER_PROP_DEAL_ENTRY)==DEAL_ENTRY_OUT_BY) { //--- Adiciona a flag de encerramento de posição this.m_trade_event_code+=TRADE_EVENT_FLAG_POSITION_CLOSED; //--- Adiciona a flag de encerramento pela oposta this.m_trade_event_code+=TRADE_EVENT_FLAG_BY_POS; //--- Pega a ordem do negócio ulong ticket_from=deal.GetProperty(ORDER_PROP_DEAL_ORDER); COrder* order=this.GetHistoryOrder(ticket_from); if(order!=NULL) { //--- Se a posição da ordem ainda estiver presente no mercado COrder* pos=this.GetPosition(order.PositionID()); if(pos!=NULL) { //--- Adiciona a flag de execução parcial this.m_trade_event_code+=TRADE_EVENT_FLAG_PARTIAL; } } } //--- final do último bloco de manipulação de negócios } } } #endif this.SetTradeEvent(); } //+------------------------------------------------------------------+
Assim, depois de criar o código do evento no método WorkWithHedgeCollections(), nós chamamos o método de decodificação de eventos. O que nos impede de decodificá-lo imediatamente? O ponto é que nosso método atual de decodificação é temporário. É necessário verificar o processo de decodificação. Uma classe de evento de negociação completa deve ser criada nos próximos artigos.
O método SetTradeEvent() define o evento de negociação, grava seu valor para a variável membro de classe m_acc_trade_event, enquanto os métodos LastTradeEvent() e ResetLastTradeEvent() permitem ler o valor da variável como o último evento de negociação na conta e redefini-lo (semelhante a GetLastError()) no programa que faz a chamada.
No manipulador da OnTick() do EA de teste TestDoEasyPart04.mqh, adicione as linhas para ler o último evento de negociação e exibi-lo como no comentário do gráfico:
//+------------------------------------------------------------------+ //| Função Tick do Expert | //+------------------------------------------------------------------+ void OnTick() { //--- static ENUM_TRADE_EVENT last_event=WRONG_VALUE; if(MQLInfoInteger(MQL_TESTER)) engine.OnTimer(); int total=ObjectsTotal(0); for(int i=0;i<total;i++) { string obj_name=ObjectName(0,i); if(StringFind(obj_name,prefix+"BUTT_")<0) continue; PressButtonEvents(obj_name); } if(engine.LastTradeEvent()!=last_event) { Comment("\nLast trade event: ",EnumToString(engine.LastTradeEvent())); last_event=engine.LastTradeEvent(); } } //+------------------------------------------------------------------+
Agora, se você executar este EA no testador e clicar nos botões, os eventos de negociação em andamento do método CEngine::SetTradeEvent() serão exibidos no diário, enquanto o comentário do gráfico exibirá a descrição do último evento ocorrido na conta recebida pelo EA da biblioteca usando o método LastTradeEvent():
Qual é o próximo?
No próximo artigo, nós desenvolveremos as classes de objetos de eventos e a coleção de objetos de eventos semelhantes a coleções de ordens e posições e ensinaremos ao objeto da biblioteca base para enviar os eventos para o programa.
Todos os arquivos da versão atual da biblioteca estão anexados abaixo, juntamente com os arquivos do EA de teste para você testar e fazer o download.
Deixe suas perguntas, comentários e sugestões nos comentários.
Artigos anteriores da série:
Traduzido do russo pela MetaQuotes Ltd.
Artigo original: https://www.mql5.com/ru/articles/5724
Arquivos anexados |
MQL5.zip
(44.67 KB)
Aviso: Todos os direitos sobre esses materiais pertencem à MetaQuotes Ltd. É proibida a reimpressão total ou parcial.
Ir para discussão
Estudo de técnicas de análise de velas (parte IV): Atualizações e adições ao Pattern Analyzer
O artigo apresenta uma nova versão do aplicativo Pattern Analyzer. Esta versão fornece correções de bugs e novos recursos, bem como a interface de usuário revisada. Os comentários e sugestões do artigo anterior foram levados em conta no desenvolvimento da nova versão. A aplicação resultante é descrita neste artigo.
Utilitário para seleção e navegação em MQL5 e MQL4: aumentamos a informatividade de gráficos
Neste artigo, continuaremos a expandir a funcionalidade do nosso utilitário. Desta vez, adicionaremos a possibilidade de exibir informações em gráficos projetados para facilitar nossa negociação. Em particular, adicionaremos ao gráfico os preços máximo e mínimo do dia anterior, os níveis arredondados, os preços máximo e mínimo do ano, a hora de início da sessão, etc.
Implementado OLAP na negociação (Parte 1): Noções básicas da análise de dados multidimensionais
O artigo descreve os princípios gerais de como construir uma estrutura para analisar dados multidimensionais (OLAP) rapidamente, além disso, apresenta como implementá-la em MQL e como usá-la no ambiente MetaTrader usando um exemplo que mostra o processamento do histórico de uma conta de negociação.
Visualização do histórico de negociação multimoeda em relatórios em HTML e CSV
Como é sabido, desde seu lançamento, o MetaTrader 5 vem oferecendo testes multimoedas. Essa função é procurada pela maioria dos traders, mas, infelizmente, não é tão universal quanto gostaríamos. O artigo apresenta vários programas para traçar gráficos usando objetos gráficos baseados no histórico de negociação a partir de relatórios nos formatos HTML e CSV. A negociação de vários instrumentos pode ser analisada em paralelo em várias sub-janelas, ou numa só janela usando a comutação dinâmica realizada pelo usuário.
Você está perdendo oportunidades de negociação:
- Aplicativos de negociação gratuitos
- 8 000+ sinais para cópia
- Notícias econômicas para análise dos mercados financeiros
Registro
Login
Você concorda com a política do site e com os termos de uso
Se você não tem uma conta, por favor registre-se