338 lines
No EOL
28 KiB
MQL5
338 lines
No EOL
28 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| SuperCharlie_Aldridge_Dev_v0.mq5|
|
|
//| HEDGING HORN CAPITAL |
|
|
//| https://www.hhcapital.com.br |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "HEDGING HORN CAPITAL"
|
|
#property link "https://www.hhcapital.com.br"
|
|
#property version "DEV_v0"
|
|
#property description "INDICE"
|
|
//INDICE
|
|
|
|
//+===================================================================================================================================================================================+
|
|
//| 1 - SESSAO DE CABECALHO / ADMISSAO
|
|
//+===================================================================================================================================================================================+
|
|
//+------------------------------------------------------------------+
|
|
//| 1.1 - IMPORTACOES |
|
|
//+------------------------------------------------------------------+
|
|
#include <Math/Stat/Math.mqh>
|
|
#include "S1_Admissao1_v0.mqh";
|
|
|
|
//+===================================================================================================================================================================================+
|
|
//| 3.1 - SESSAO DE HORARIOS / CRONOMETRO
|
|
//+===================================================================================================================================================================================+
|
|
//+------------------------------------------------------------------+
|
|
//| 3.1.1 - FUNCAO DE ATUALIZAR HORARIO DE PREGAO |
|
|
//+------------------------------------------------------------------+
|
|
bool VerificaHorarioOrdens(MqlDateTime &horarioMQL_atual, ushort horarioShort_inicial, ushort horarioShort_final)
|
|
{
|
|
//Captura o horario atual e coloca em Struct MqlDateTime
|
|
TimeToStruct(TimeCurrent(), horarioMQL_atual);
|
|
|
|
|
|
ushort horarioShort_atual = 0;
|
|
|
|
//Converte o horario atual Struct em ushort
|
|
horarioShort_atual = horarioMQL_atual.hour * 60 + horarioMQL_atual.min;
|
|
|
|
//Verifica se esta dentro da sessao de trade do dia
|
|
if((horarioShort_atual > horarioShort_inicial) && (horarioShort_atual < horarioShort_final))
|
|
{
|
|
return true;
|
|
}
|
|
else return false;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.1.2 - FUNCAO DE ATUALIZAR HORARIO DE FECHAMENTO |
|
|
//+------------------------------------------------------------------+
|
|
bool VerificaHorarioFechamento(MqlDateTime &horarioMQL_atual, ushort horarioShort_fechamento)
|
|
{
|
|
//Captura o horario atual e coloca em Struct MqlDateTime
|
|
TimeToStruct(TimeCurrent(), horarioMQL_atual);
|
|
|
|
ushort horarioShort_atual = 0;
|
|
|
|
//Converte o horario atual Struct em ushort
|
|
horarioShort_atual = horarioMQL_atual.hour * 60 + horarioMQL_atual.min;
|
|
|
|
if(horarioShort_atual > horarioShort_fechamento)
|
|
{
|
|
return true;
|
|
}
|
|
else return false;
|
|
}
|
|
|
|
//+===================================================================================================================================================================================+
|
|
//| 3.2 - SESSAO DE RISCOS DE MERCADO/PORTFOLIO / FREIO DE MAO
|
|
//+===================================================================================================================================================================================+
|
|
//+------------------------------------------------------------------+
|
|
//| 3.2.1 - FUNCAO QUE VERIFICA OS RISCOS DE MERCADO |
|
|
//+------------------------------------------------------------------+
|
|
bool VerificaRiscos(double alvoFinanceiro, double stopFinanceiro, int intervaloTicks, double &MA[], int diaAtual, MqlDateTime &horario_atual, double diferencaSaldo, double saldoInicialDia, double saldoFinalDia, double limiteSupDesvio, MqlTick &ArrayTick[], double desvioPadrao, slot &SlotsC[], slot &SlotsV[], int inventario)
|
|
{
|
|
const int n = intervaloTicks;
|
|
double precos[];
|
|
double diferencaMA = 0.0;
|
|
ArrayResize(precos, n);
|
|
GetPrecosPassados(precos, ArrayTick, intervaloTicks);
|
|
// desvioPadrao = MathStandardDeviation(precos);
|
|
|
|
saldoFinalDia = AccountInfoDouble(ACCOUNT_BALANCE);
|
|
// Print("DiaAtual ", diaAtual, "Horario_atual.day ", horario_atual.day * horario_atual.mon);
|
|
if(diaAtual == horario_atual.day)
|
|
{
|
|
diferencaSaldo = saldoFinalDia - saldoInicialDia;
|
|
}
|
|
else
|
|
{
|
|
// Print("Dia anterior: ", diaAtual," Resultado: ", diferencaSaldo);
|
|
diaAtual = horario_atual.day;
|
|
saldoInicialDia = AccountInfoDouble(ACCOUNT_BALANCE);
|
|
diferencaSaldo = 0.0;
|
|
}
|
|
|
|
//Verifica se atingiu o 5% VAR - 3º Order Risk Management
|
|
if((diferencaSaldo < alvoFinanceiro) && (diferencaSaldo > stopFinanceiro))
|
|
{
|
|
//Verifica se atingiu o volatility cutouts - 2º Order Risk Management
|
|
// if(desvioPadrao < limiteSupDesvio)
|
|
// {
|
|
return false;
|
|
// }
|
|
// else return true;
|
|
}
|
|
else return true;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.2.2 - FUNCAO QUE CALCULA A MEDIA DE PRECOS |
|
|
//+------------------------------------------------------------------+
|
|
void GetPrecosPassados(double &precos[], MqlTick &ArrayTick[], int intervaloTicks)
|
|
{
|
|
if(CopyTicks(Symbol(),ArrayTick,COPY_TICKS_TRADE,0,intervaloTicks) != -1)
|
|
{
|
|
ArraySetAsSeries(ArrayTick,true);
|
|
for(int i=0;i<ArraySize(ArrayTick);i++)
|
|
{
|
|
precos[i] = ArrayTick[i].last;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Print("Falha ao obter o ArrayTick, falha para GetPrecosPassados");
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
//+===================================================================================================================================================================================+
|
|
//| 3.3 - SESSAO DE LIMITES / FREIO MOTOR
|
|
//+===================================================================================================================================================================================+
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.1 - FUNCAO QUE VERIFICA OS LIMITES DE COMPRA E VENDA |
|
|
//+------------------------------------------------------------------+
|
|
int VerificaSlots(const int inventario, const int rajada, int magic)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.2 - FUNCAO QUE VERIFICA LIMITE DE ORDENS DE COMPRA |
|
|
//+------------------------------------------------------------------+
|
|
int VerificaLimiteCompra(const int inventario, int magic)
|
|
{
|
|
double limite_Compra = inventario;
|
|
double qtdCompraEnviada = 0.0;
|
|
double qtdCompraExecutada = 0.0;
|
|
|
|
limite_Compra = limite_Compra - OrdensCompraLimitadasAbertas(magic, qtdCompraEnviada, qtdCompraExecutada) - PosicoesCompraAbertas(magic);
|
|
|
|
if(limite_Compra > 0) return 1;
|
|
else return 0;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.3 - FUNCAO QUE VERIFICA LIMITE DE ORDENS VENDA |
|
|
//+------------------------------------------------------------------+
|
|
int VerificaLimiteVenda(const int inventario, int magic)
|
|
{
|
|
double limite_Venda = inventario;
|
|
double qtdVendaEnviada = 0.0;
|
|
double qtdVendaExecutada = 0.0;
|
|
|
|
limite_Venda = limite_Venda - OrdensVendaLimitadasAbertas(magic, qtdVendaEnviada, qtdVendaExecutada) - PosicoesVendaAbertas(magic);
|
|
|
|
if(limite_Venda > 0) return 1;
|
|
else return 0;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.4 - FUNCAO QUE VERIFICA LIMITE EM VOLUME DE ORDENS DE COMPRA |
|
|
//+------------------------------------------------------------------+
|
|
int VerificaLimiteVolumeCompra(const int loteEnvio, double qtdCompraEnviada)
|
|
{
|
|
double limite = loteEnvio;
|
|
int returnCode = 1;
|
|
|
|
if(qtdCompraEnviada == 0.0) return 0;
|
|
if(qtdCompraEnviada == limite) return 1;
|
|
|
|
return returnCode;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.5 - FUNCAO QUE VERIFICA LIMITE EM VOLUME DE ORDENS VENDA |
|
|
//+------------------------------------------------------------------+
|
|
int VerificaLimiteVolumeVenda(const int loteEnvio, double qtdVendaEnviada)
|
|
{
|
|
double limite = loteEnvio;
|
|
int returnCode = 1;
|
|
|
|
if(qtdVendaEnviada == 0.0) return 0;
|
|
if(qtdVendaEnviada == limite) return 1;
|
|
|
|
return returnCode;
|
|
}
|
|
|
|
//+--------------------------------------------------------------------------+
|
|
//| 3.3.6 - FUNCAO DE CALCULO DO NUMERO DE ORDENS COMPRA LIMITADAS ABERTAS |
|
|
//+--------------------------------------------------------------------------+
|
|
int OrdensCompraLimitadasAbertas(int magic, double &qtdCompraEnviada, double &qtdCompraExecutada)
|
|
{
|
|
int ordens = 0;
|
|
|
|
//Percorre todas as ordens
|
|
for(int i=OrdersTotal()-1; i>=0; i--)
|
|
{
|
|
ulong ticket = OrderGetTicket(i);
|
|
string symbol = OrderGetString(ORDER_SYMBOL);
|
|
ulong magicEA = OrderGetInteger(ORDER_MAGIC);
|
|
|
|
//Verifica para cada ordem, se eh do simbolo corrente e do mesmo robo
|
|
if((symbol == _Symbol) && (magicEA == magic))
|
|
{
|
|
//Verifica se a ordem eh do tipo buy limit
|
|
if(OrderGetInteger(ORDER_TYPE) == ORDER_TYPE_BUY_LIMIT)
|
|
{
|
|
ordens = ordens + 1;
|
|
qtdCompraEnviada = OrderGetDouble(ORDER_VOLUME_INITIAL);
|
|
qtdCompraExecutada = qtdCompraEnviada - OrderGetDouble(ORDER_VOLUME_CURRENT);
|
|
}
|
|
}
|
|
}
|
|
|
|
return ordens;
|
|
}
|
|
|
|
//+--------------------------------------------------------------------------+
|
|
//| 3.3.7 - FUNCAO DE CALCULO DO NUMERO DE ORDENS VENDA LIMITADAS ABERTAS |
|
|
//+--------------------------------------------------------------------------+
|
|
int OrdensVendaLimitadasAbertas(int magic, double &qtdVendaEnviada, double &qtdVendaExecutada)
|
|
{
|
|
int ordens = 0;
|
|
|
|
//Percorre todas as ordens
|
|
for(int i=OrdersTotal()-1; i>=0; i--)
|
|
{
|
|
ulong ticket = OrderGetTicket(i);
|
|
string symbol = OrderGetString(ORDER_SYMBOL);
|
|
ulong magicEA = OrderGetInteger(ORDER_MAGIC);
|
|
|
|
//Verifica para cada ordem, se eh do simbolo corrente e do mesmo robo
|
|
if((symbol == _Symbol) && (magicEA == magic))
|
|
{
|
|
//Verifica se a ordem eh do tipo sell limit
|
|
if(OrderGetInteger(ORDER_TYPE) == ORDER_TYPE_SELL_LIMIT)
|
|
{
|
|
ordens = ordens + 1;
|
|
qtdVendaEnviada = OrderGetDouble(ORDER_VOLUME_INITIAL);
|
|
qtdVendaExecutada = qtdVendaEnviada - OrderGetDouble(ORDER_VOLUME_CURRENT);
|
|
}
|
|
}
|
|
}
|
|
|
|
return ordens;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.8 - FUNCAO DE CALCULO DO q |
|
|
//+------------------------------------------------------------------+
|
|
void AtualizaQuantidade(int &q, int magic)
|
|
{
|
|
q = 0;
|
|
|
|
q = PosicoesCompraAbertas(magic) - PosicoesVendaAbertas(magic);
|
|
|
|
return;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.9 - FUNCAO DE VERIFICACAO DE POSICAO DE COMPRA |
|
|
//+------------------------------------------------------------------+
|
|
int PosicoesCompraAbertas(int magic)
|
|
{
|
|
int positions = 0;
|
|
|
|
//Percorre todas as posicoes
|
|
for(int i=PositionsTotal()-1; i>=0; i--)
|
|
{
|
|
ulong ticket = PositionGetTicket(i);
|
|
string symbol = PositionGetString(POSITION_SYMBOL);
|
|
ulong magicEA = PositionGetInteger(POSITION_MAGIC);
|
|
|
|
//Verifica para cada posicao, se eh do simbolo corrente e do mesmo robo
|
|
if((symbol == _Symbol) && (magicEA == magic))
|
|
{
|
|
//Verifica se a posicao eh do tipo buy
|
|
if(PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_BUY)
|
|
{
|
|
positions = positions + 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
return positions;
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| 3.3.10 - FUNCAO DE VERIFICACAO DE POSICAO DE VENDAS |
|
|
//+------------------------------------------------------------------+
|
|
int PosicoesVendaAbertas(int magic)
|
|
{
|
|
int positions = 0;
|
|
|
|
//Percorre todas as posicoes
|
|
for(int i = PositionsTotal()-1; i>=0; i--)
|
|
{
|
|
ulong ticket = PositionGetTicket(i);
|
|
string symbol = PositionGetString(POSITION_SYMBOL);
|
|
ulong magicEA = PositionGetInteger(POSITION_MAGIC);
|
|
|
|
//Verifica para cada posicao, se eh do simbolo corrente e do mesmo robo
|
|
if((symbol == _Symbol) && (magicEA == magic))
|
|
{
|
|
//Verifica se a posicao eh do tipo sell
|
|
if(PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_SELL)
|
|
{
|
|
positions = positions + 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
return positions;
|
|
}
|
|
|
|
//+---------------------------------------------------------------------------+
|
|
//| 3.3.11 - FUNCAO QUE VERIFICA A NECESSIDADE DE MODIFICAR ORDENS ENVIADAS |
|
|
//+---------------------------------------------------------------------------+
|
|
int VerificaModificaOrdens()
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
//+===================================================================================================================================================================================+
|
|
//| FIM DO PROGRAMA
|
|
//+===================================================================================================================================================================================+ |