Qualquer pergunta de novato, de modo a não desorganizar o fórum. Profissionais, não passem por aqui. Em nenhum lugar sem você - 6. - página 539

 
tatianati:

Obrigado! Funcionou, eu era feliz quando criança, mas o conselheiro deixou de exibir "novo". Você pode me dizer onde eu errei?

Huh, encontrei o erro, não onde eu estava procurando originalmente. Eu mesmo não consigo lidar com a próxima tarefa.

Favor informar como definir a faixa de desvio - distância do preço em relação ao MA.

extern string s10                = ">>>>>>>>>>>>>>>>>>>>>>>>>>>>";
extern string s11                = ">>> Вход против МА";
extern int    iMA_Period         = 365;
extern int    iMA_OpenDistance   = 60;     // как задать диапазон? например 60-85 за его пределами не открывать ордеров

Aqui está a parte de entrada

int GetSignal()
{
  int Signal = 0;

  double iMA_Signal = iMA(Symbol(), 0, iMA_Period, 0, MODE_SMMA, PRICE_CLOSE, 0);
  
  int Ma_Bid_Diff = MathAbs(iMA_Signal - Bid)/vPoint;
  
  if(Ma_Bid_Diff > iMA_OpenDistance && Bid > iMA_Signal) Signal = -1;
  if(Ma_Bid_Diff > iMA_OpenDistance && Bid < iMA_Signal) Signal = 1;
  
  return(Signal);
}
 
tatianati:

Huh, encontrei o erro, não onde eu estava procurando originalmente. Eu não consigo lidar com a próxima tarefa sozinho.

Você pode me dizer como definir a faixa de desvio - distância do preço em relação ao MA.

Aqui está a parte de entrada


extern int    Min_iMA_OpenDistance   = 60;
extern int    Max_iMA_OpenDistance   = 85;

E, portanto, a condição

if(Ma_Bid_Diff > Min_iMA_OpenDistance && Ma_Bid_Diff < Max_iMA_OpenDistance && Bid > iMA_Signal)
 

Precisamos alterar corretamente os dados iniciais no consultor para (1 compra, -1 venda)

//+------------------------------------------------------------------+

//| SimpleBars_rob.mq4 |
//| Copyright © 2010, Equipe ENSED |
//| http://www.ensed.org |
//+------------------------------------------------------------------+
#direitos de propriedade intelectual "Copyright © 2010, Equipe ENSED"
#link da propriedade "http://www.ensed.org

externo int SL = 50; // valor de perda stop (em pips)
TP = 150; // Valor do Take Profit (em pontos)
Lotes duplos externos = 0,1; // lote de trabalho (micro lotes - 0,01, mini lotes - 0,1, lotes normais - 1,0)
string externa Order_Comment = "robô"; // comentário que será usado para fazer pedidos
escorregamento interno externo = 5; // nível máximo de escorregamento permitido (em pontos)
número de ordens de magia para o robô (para distinguir negócios "amigáveis")
bool externo Play_Sound = falso; // reprodução de som na abertura: verdadeiro - permitido, falso - proibido

//--------------------------------------------------------------------------------------------------------------------+
//+ configuração dos cronogramas e parâmetros do indicador SimpleBars |
período int externo = 6;
uso de bool externoFechar = verdadeiro;
largura int externa = 3;
//+ ajuste dos prazos e parâmetros do indicador SimpleBars |
//--------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//+ parada de trilha |
UseTrailingTrailing externo = verdadeiro; // parada de trilha on/off
TrailingStop externo int = 50; // tamanho fixo do trailing stop (em pips)
Passo de TrailingStep int externo = 1; // passo de trailing stop (em pontos)
//+ parada de trilha
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função é executada na inicialização do programa |
init() {
if(GlobalVariableCheck("this_bar "+Symbol()+Period()))
GlobalVariableDel("esta_barra "+Símbolo()+Periodo()));
retornar;
}
//| função, que é executada durante a inicialização do programa |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função é executada na desinicialização do programa |
void deinit() {
if(GlobalVariableCheck("this_bar "+Symbol()+Period()))
GlobalVariableDel("esta_barra "+Símbolo()+Periodo()));
retornar;
}
//| função, que é executada na desinicialização do programa |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função de busca de um sinal comercial |
int fsignals() {
sinal duplo = iCustom(NULL, 0, "SimpleBars", período, 0, 1, 4, 0);
retornar(0); // sinal para abrir uma compra
retornar(1); //abrir Sinal de venda
retorno(-1); // sem sinal
} //termine int fsignals()
//| função de busca de um sinal comercial
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função de rastrear o trabalho do robô na barra dada
bool this_bar() {
se(
(!GlobalVariableCheck("this_bar "+Symbol()+Periodo()))
|| (GlobalVariableGet("this_bar "+Symbol()+Period()!=Time[0])
) {
GlobalVariableSet("esta_barra "+Símbolo()+Periodo(),Tempo[0]);
retorno(falso);
{} else {
retorno(verdadeiro);
} // terminar se (. (!GlobalVariableCheck("this_bar "+Symbol()+Periodo()))
} //termine bool this_bar()
//| função de rastrear o fato do trabalho do robô na barra dada
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função de busca de ordens deste tipo |
bool find_orders(int magic=-1, int type=-1, string symb="NULL") {
/* retorna verdadeiro se pelo menos uma ordem do tipo dado com o número mágico dado for encontrada pelo símbolo dado */
para (int i=OrdensTotal()-1; i>=0; i--) {
if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) quebrar;
if(((OrderType()===type) ||| (type===-1))
&& ((OrderMagicNumber()==magic) ||| (magic===-1))
&& ((OrderSymbol()==Symbol() |||| (symb==="NONE")))) {
// se uma ordem é encontrada, retornar(true) e sair do laço
retorno(verdadeiro);
pausa;
} //termine if((OrderType()==type) && (OrderMagicNumber()==magic) && (OrderSymbol()==Symbol())
} //terminar para (int i2=OrdensTotal()-1; i2>=0; i2--)

retorno(falso); //retorno falso
} //end bool find_orders(int magic, int type)
//| função de busca de ordens do tipo dado |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função de cálculo do valor de Stop Loss para pedidos |
double sl(int sl_value, tipo int, double price=0.0, string symb="NONE", int rmode=1) {
//type=0 -> compras de mercado
//type=1 -> vendas de mercado
if(symb==="NONE") symb=Symbol();
if(type==0) price=NormalizeDouble(MarketInfo(symb,MODE_ASK),MarketInfo(symb,MODE_DIGITS))
if(type==1) price=NormalizeDouble(MarketInfo(symb,MODE_BID),MarketInfo(symb,MODE_DIGITS))
if(sl_value<=0) return(0);
if(rmode===1) {
if((type==0) ||| (type===2) ||| (type===4)) return(MarketInfo(symb,MODE_ASK)-sl_value*MarketInfo(symb,MODE_POINT)); // para compras
if((type==1) ||| (type===3) ||| (type===5)) return(MarketInfo(symb,MODE_BID)+sl_value*MarketInfo(symb,MODE_POINT)); // para vendas
}
if(rmode===2) {
if((type==0) ||| (type===2) ||| (type===4)) return(MarketInfo(symb,MODE_BID)-sl_value*MarketInfo(symb,MODE_POINT)); // para compra
if((type==1) ||| (type===3) ||| (type===5)) return(MarketInfo(symb,MODE_ASK)+sl_value*MarketInfo(symb,MODE_POINT)); // para venda
}
} //end sl(int sl_value, int type, double price=0.0, string symb="NONE", int rmode=1)
//| função para cálculo do valor de Stop Loss para pedidos |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função para calcular os valores de Take Profit para pedidos
double tp(int tp_value, int type, double price=0.0, string symb="NONE") {
//type=0 -> market buy
//type=1 -> vendas de mercado
if(symb==="NONE") symb=Symbol();
if(type==0) price=NormalizeDouble(MarketInfo(symb,MODE_ASK),MarketInfo(symb,MODE_DIGITS);
if(type==1) price=NormalizeDouble(MarketInfo(symb,MODE_BID),MarketInfo(symb,MODE_DIGITS))
if(tp_value<=0) return(0);
if((type==0) ||| (type===2) ||| (type===4)) return(price+tp_value*MarketInfo(symb,MODE_POINT)); // para compras
if((type==1) ||| (type===3) ||| (type===5)) return(MarketInfo(symb,MODE_BID)-tp_value*MarketInfo(symb,MODE_POINT)); // para vendas
} //terminar duplo tp(int tp_valor, tipo int, preço duplo=0,0, string symb="NONE")
//| função para cálculo do valor de Take Profit para pedidos |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função de abertura dos pedidos
void open_positions(int signal, double lot, double price=0.0, string symb="NONE") {
//sinal=0 -> sinal para abrir a compra
//sinal=1 -> sinal para abrir venda
/* externo */ int Conta_Of_Trade_Try=5, Pausa_Of_Trade_Try=5;

int i = 0; //variável para o contador de laço
int err = 0;

if(symb==="NONE") symb=Symbol();
if(sinal==0)
price=NormalizeDouble(MarketInfo(symb,MODE_ASK),MarketInfo(symb,MODE_DIGITS)); //open price for buying
if(signal===1)
price=NormalizeDouble(MarketInfo(symb,MODE_BID),MarketInfo(symb,MODE_DIGITS)); // preço aberto para venda

while(i<=Count_Of_Trade_Try) {
A //função para abrir o pedido (embutida). Para a conveniência da percepção, os parâmetros são colocados em linhas diferentes:
int ticket = OrderSend(Symbol(), //symbol
sinal, //tipo de ordem
lote, //volume
preço, // preço aberto
Escorregamento, // nível de requote permitido
sl(SL,sinal), // valor de Stop Loss
tp(TP,sinal), //valor de lucro
Order_Comment, //comentário de ordem
Magic_Number, // número mágico
0, // tempo de expiração (utilizado para pedidos pendentes)
CLR_NONE); //cor da seta exibida na tabela (CLR_NONE - seta não está desenhada)
se(ticket!=-1) // se a abertura foi bem sucedida, desenhe um objeto gráfico e saia do loop
pausa;
err=GetLastError();
if(err!=0) Print("Error: "+Market_Err_To_Str(err));
i++;
Sleep(Pause_Of_Trade_Try*1000); //in em caso de erro, pausa antes de tentar novamente
} //termine while(i<=count)
} //end void open_positions(int signal, double lot, double price=0.0, string symb="NONE")
//| função para abrir pedidos |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------+
//| função de decodificação de códigos de erro |
string Market_Err_To_Str(int err) {
A função /* cobre apenas os códigos de erro das operações comerciais */
switch(err) {
case(0): return("Sem erro");
caso(1): retorno("Nenhum erro, mas o resultado é desconhecido");
caso(2): retorno("Erro geral");
caso(3): retorno("Parâmetros incorretos");
case(4): return("Servidor comercial está ocupado");
case(5): return("Versão antiga do terminal do cliente");
case(6): return("Sem conexão com o servidor comercial");
caso(7): retorno("Não há direitos suficientes");
caso(8): retorno ("Pedidos muito freqüentes");
case(9): return("Invalid operation disrupting server operation");
caso(64): devolução("Conta bloqueada");
caso(65): devolução("Número de conta incorreto");
caso(128): devolução ("O prazo para a transação expirou");
caso(129): devolução("Preço incorreto");
case(130): devolução ("Paradas incorretas");
case(131): return("Volume incorreto");
case(132): retorno ("O mercado está fechado");
caso(133): devolução("Comércio proibido");
case(134): return("Não há dinheiro suficiente para executar a transação");
case(135): devolução ("O preço mudou");
caso(136): devolução("Sem preço");
case(137): return("O corretor está ocupado");
case(138): devolução ("Novos preços");
caso(139): devolução ("O pedido está bloqueado e já está sendo processado");
case(140): devolução("Compra permitida apenas");
case(141): retorno ("Demasiados pedidos");
caso(145): devolução ("Não é permitida a modificação, porque a ordem está muito próxima do mercado");
case(146): return("O subsistema comercial está ocupado");
caso(147): devolução("O uso da data de expiração é proibido pelo corretor");
caso(148): devolução("O número de ordens em aberto e pendentes atingiu o limite estabelecido pelo corretor;)
caso(149): retorno ("Tentativa de abrir uma posição oposta a uma posição existente se o hedging for proibido");
case(150): return("Tentativa de fechar uma posição sobre um símbolo, em contravenção à regra FIFO");

padrão: return("");
} //end switch(err)
} //end string Err_To_Str(int err)
//| função para decodificar códigos de erro |
//+-------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------+
//| Operações de fechamento de transações |||
//+----------------------------------------------------------------------------------------------------+
//| função de fechar um pedido por seu número (bilhete) |


bool close_by_ticket(int c_ticket, int slipage) {
/*
função de fechar um comércio por seu número (bilhete).
Ao fechar uma ordem de mercado, o nível de deslizamento máximo permitido é levado em conta (deslizamento)
*/
/* externo */ int Conta_Of_Trade_Try=5, Pausa_Of_Trade_Try=5;

int i = 0; //variável para o contador de laço
int err = 0;
bool ticket = falso; //variável para o (in)sucesso do fechamento de um comércio
preço duplo = 0,0; // preço para a transação a ser fechada (para ordens de mercado)
if(OrderSelect(c_ticket,SELECT_BY_TICKET,MODE_TRADES)) { //selecionar pedido por bilhete
if(OrderType()==OP_BUY) price = NormalizeDouble(Bid,Digits); // preço de compra
if(OrderType()==OP_SELL) price = NormalizeDouble(Ask,Digits); // preço de venda
for(i=0;i<=Count_Of_Trade_Try;i++) {
se(OrderType()<=1) // se a ordem for de mercado, feche-a, se for uma ordem pendente, apague-a
ticket=OrderClose(OrderTicket(),OrderLots(),price,slipage,CLR_NONE);
senão
ticket=OrderDelete(OrderTicket());

se(bilhete) { // se o fechamento ou exclusão foi bem sucedido - retornar verdadeiro e sair do laço
retorno(verdadeiro);
pausa;
} // terminar se(bilhete)
err=GetLastError();
if(err!=0) Print("Error: "+Market_Err_To_Str(err));
Sleep(Pause_Of_Trade_Try*1000); //in em caso de um erro, pausa antes de tentar novamente
} // terminar para(i=0;i<=Count_Of_Trade_Try;i++)
} // terminar if(OrderSelect(c_ticket,SELECT_BY_TICKET,MODE_TRADES))

retorno(falso); //retorno falso
} //end bool close_by_ticket(int c_ticket)
//| função de fechar um pedido por seu número (bilhete) |
//+----------------------------------------------------------------------------------------------------+

bool cbm(int magic, int slipage, int type) {
/*
Fechar por magia (fechar todas as ordens do tipo dado com o MagicNumber dado)
O deslizamento máximo admissível é levado em conta
A função close_by_ticket é utilizada.
*/
int n = 0;
enquanto (find_orders(magic, type))
para (int i2=OrdensTotal()-1; i2>=0; i2--) {
se (!OrderSelect(i2,SELECT_BY_POS,MODE_TRADES)) quebrar;

if ((OrderType()==type) && (OrderMagicNumber()==magic)) {
close_by_ticket(OrderTicket(), slip;)
n++;
} // terminar se (((OrderType()==OP_BUY) ||| (OrderType()==OP_SELL)) && (OrderMagicNumber()==magic))
} //terminar para (int i2=OrdensTotal()-1; i2>=0; i2--)

if(n>0)
retorno(verdadeiro);

retorno(falso);
} //end bool cbm(int magic, int slipage, int type)
//| Operações de fechamento comercial |
//+-------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| perda da trailing stop |
vazio T_SL() {
se(!UseTrailing) retornar;
int i = 0;
for(i=0; i<OrdersTotal(); i++) {
if(!(OrderSelect(i, SELECT_BY_POS, MODE_TRADES))) continua;
if(OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic_Number) continua;

if(OrderType()==OP_BUY) {
if(NormalizeDouble(Bid-OrderOpenPrice(),Digits)>NormalizeDouble(TrailingStop*Point,Digits)) {
if(NormalizeDouble(OrderStopLoss(),Digits)<NormalizeDouble(Bid-(TrailingStop+TrailingStep-1)*Point,Digits))
OrderModify(OrderTicket(), OrderOpenPrice(), NormalizeDouble(Bid-TrailingStop*Point,Digits), OrderTakeProfit(), 0, CLR_NONE)
} //termine if(NormalizeDouble(Bid-OrderOpenPrice(),Digits)>NormalizeDouble(TrailingStop*Point,Digits))
} //termine if(OrderType()==OP_BUY)

if(OrderType()==OP_SELL) {
if(NormalizeDouble(OrderOpenPrice()-Ask,Digits)>NormalizeDouble(TrailingStop*Point,Digits)) {
if(NormalizeDouble(OrderStopLoss(),Digitos)>NormalizeDouble(Ask+(TrailingStop+TrailingStep-1)*Ponto,Digitos))
OrderModify(OrderTicket(), OrderOpenPrice(), NormalizeDouble(Ask+TrailingStop*Point,Digitos), OrderTakeProfit(), 0, CLR_NONE)
} //termine if(NormalizeDouble(OrderOpenPrice()-Ask,Digits)>NormalizeDouble(TrailingStop*Point,Digits))
} //termine if(OrderType()==OP_SELL)
} // terminar para(i=0; i<OrdensTotal(); i++)
} //terminar vazio T_SL()
//| perda da trailing stop |
//+-------------------------------------------------------------------------------------------------------------------+

//+-------------------------------------------------------------------------------------------------------------------+
//| função principal |
início nulo() {

int sig = fsignals();

if(!find_orders(Magic_Number)) {
if((sig!=-1)) {
if(!this_bar()) {
open_positions(sig, Lots);
if(Play_Sound)
PlaySound("alert.wav");
}
} //termine if((sig!=-1) && (!this_bar())
{} else {
if(sig==0) {
if(cbm(Magic_Number, Slipage, 1)) {
open_positions(sig, Lots);
if(Play_Sound)
PlaySound("alert.wav");
} // terminar if(cbm(Magic_Number, Slipage, 1))
} // terminar se(sig==0)
if(sig===1) {
if(cbm(Magic_Number, Slipage, 0)) {
open_positions(sig, Lots);
if(Play_Sound)
PlaySound("alert.wav");
} // terminar if(cbm(Magic_Number, Slipage, 0))
} //termine if(sig===1)
T_SL();
} //termine if(!find_orders(Magic_Number) (caso contrário)
retornar;
}
//| função principal |
//+-------------------------------------------------------------------------------------------------------------------+
 

Olá conhecedores. Ajuda - não está funcionando. Acho que fiquei confuso com a inicialização de variáveis . Minha cabeça está girando, mas não consigo encontrar nenhum erro.

Em vez de abrir posições, o EA deve desenhar setas no preço Klose(0) e, em vez de fechar - uma cruz e imprimir os dados ( fExpiration_func(Expiration), fop_time, cl_time, fop_price, cl_price, ftype) em uma nova linha.

Aqui o estocástico é tomado apenas como exemplo.

 //+------------------------------------------------------------------+
//|                                                     binar_v1.mq4 |
//|                        Copyright 2014, MetaQuotes Software Corp. |
//|                                              https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2014, MetaQuotes Software Corp."
#property link        "https://www.mql5.com"
#property version    "1.00"


//--- input Time parameters
input uchar     hs = 9 ; 
input uchar     ms = 0 ; 
input uchar     he = 18 ; 
input uchar     me = 0 ;
//--- input Indicator parameters

//--- input Expiration parameters
input uchar     Expiration = 2 ; //время експирации в минутах


input bool      strategy_1  =   true ;


bool poz;                                   //открытая/закрытая позиция
datetime op_time;                         //время открытия
double op_price;                           //цена открытия
char type;                                 //тип открытой позиции -1 СЕЛЛ, 1- БАИ
//+=================================================================================+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit ()
  {
//--- 
   
      
//---
   return ( INIT_SUCCEEDED );
  }
//+=================================================================================+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit ( const int reason)
  {
//--- destroy timer
   
      
  }
//+=================================================================================+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick ()
  {
   //подщитаем арифметическое среднее OC за прошлую неделю
   //Пощет один раз в неделю    
     /* if(isNewBar("",PERIOD_W1)){      
         uchar iPr=iBarShift(NULL,PERIOD_M1,iTime(NULL,PERIOD_W1,1));
         uchar iPn=iBarShift(NULL,PERIOD_M1,iTime(NULL,PERIOD_W1,1))+10080;
         double avgM1=AvgOC(iPr,iPn,0);                                     // M1 OC цредняя за прошлую неделю               
      }*/
       if (!fisTradeTimeInt( 9 , 0 , 18 , 0 )) return ;                                 //Время торгов
       if (strategy_1== true )fStrategy1();
  }
//+=================================================================================+
//| Timer function                                                   |
//+------------------------------------------------------------------+

//+=================================================================================+
void fStrategy1
   (
   
   )
//--------------------   
{
   

   if (poz== true )                             //если есть открыта позиция
      fClose_Pos(op_time,op_price,type);       //закрываем
   if (poz== false ){                           //если нет открытой
      fOpen_buy(poz,op_time,op_price,type);   //покупка   
      fOpen_sell(poz,op_time,op_price,type);   //продажа
   }       
}
//+=================================================================================+
void fOpen_buy
   (
   bool & op,                                 //открытая/закрытая позиция
   datetime & out_op_time,                       //время открытия
   double & out_op_price,                         //цена открытия
   char & out_type                               //тип открытой позиции -1 СЕЛЛ, 1- БАИ
   )
//--------------------
{
   double stoch_M0_1 = iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_MAIN , 1 );
   double stoch_M0_2 = iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_MAIN , 2 );
   double stoch_M0_1s= iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_SIGNAL , 1 );
   double stoch_M0_2s= iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_SIGNAL , 2 );
   
   string arrowName;
   
   if (!op){      
       if (stoch_M0_1 < 20 && stoch_M0_2 < stoch_M0_2s && stoch_M0_1s < stoch_M0_1){
          out_type=- 1 ;
          op= true ;
          out_op_price= Close [ 0 ];
          out_op_time= Time [ 0 ];
          arrowName= "Buy" + TimeToStr ( TimeCurrent (), TIME_DATE | TIME_SECONDS );
          fDrawArrow(arrowName= "" ,out_op_price,out_op_time,Blue, 240 );               //стрелка открытой позиции
      }
          
   }     
}
//+=================================================================================+
void fOpen_sell
   (
   bool op,                                 //открытая/закрытая позиция
   datetime & out_op_time,                       //время открытия
   double & out_op_price,                         //цена открытия
   char & out_type                               //тип открытой позиции -1 СЕЛЛ, 1- БАИ
   )
//--------------------   
{      
   double stoch_M0_1 = iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_MAIN , 1 );
   double stoch_M0_2 = iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_MAIN , 2 );
   double stoch_M0_1s= iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_SIGNAL , 1 );
   double stoch_M0_2s= iStochastic ( NULL , 0 , 5 , 3 , 3 , MODE_SMA , 0 , MODE_SIGNAL , 2 );
   
   string arrowName;
   
   if (!op){      
       if (stoch_M0_1 > 80 && stoch_M0_2 > stoch_M0_2s && stoch_M0_1s > stoch_M0_1){
          out_type=- 1 ;
          op= true ;
          out_op_price= Close [ 0 ];
          out_op_time= Time [ 0 ];
          arrowName= "Sell" + TimeToStr ( TimeCurrent (), TIME_DATE | TIME_SECONDS );
          fDrawArrow(arrowName= "" ,out_op_price,out_op_time,Red, 240 );               //стрелка открытой позиции
      }
          
   }     
}
//+=================================================================================+
void fClose_Pos //jei yra atidaryta, uzdarom
   (
   datetime fop_time,                       //время открытия
   double fop_price,                       //цена открытия
   char ftype                               //тип открытой позиции -1 СЕЛЛ, 1- БАИ
   )
//-------------------   
{
   string arrowName= "Close" + TimeToStr ( TimeCurrent (), TIME_DATE | TIME_SECONDS );    
   double cl_price;
   string fileName= StringConcatenate ( "Strategy_1  " ,Expiration, " " , Period (), ".csv" );
   
   if (Expiration<= 5 ){                     //
       datetime cl_time= Expiration* 60 +op_time;                                         //время закрытия
       if ( TimeCurrent ()>=cl_time){
         
         cl_price= Close [ 0 ];               //цена закрытия         
         fDrawArrow(arrowName,cl_price,cl_time,Yellow, 251 );                             //наносим крестик на график
         fSaveToFile(fileName,Expiration, fop_time, cl_time, fop_price, cl_price, ftype);   //в новую строку сохроняем в файле
      }   
   }
   else {
      cl_time= fExpiration_func(Expiration)* 60 +op_time;                                 //время закрытия
      
       if ( TimeMinute ( TimeCurrent ())>= TimeMinute (cl_time)){
         
         cl_price= Close [ 0 ];      
         fDrawArrow(arrowName,cl_price,cl_time,Yellow, 251 );                             //наносим крестик на график
         fSaveToFile(fileName,fExpiration_func(Expiration), fop_time, cl_time, fop_price, cl_price, ftype); //в новую строку сохроняем в файле
     }
   }   
}
//+=================================================================================+
bool fisNewBar 
   (
   string f_sy,   
   int f_tf
   )
{
     int iIndex = - 1 ;
//----
     switch (f_tf)
    {
         case 1     : iIndex = 0 ; break ;
         case 5     : iIndex = 1 ; break ;
         case 15    : iIndex = 2 ; break ;
         case 30    : iIndex = 3 ; break ;
         case 60    : iIndex = 4 ; break ;
         case 240   : iIndex = 5 ; break ;
         case 1440 : iIndex = 6 ; break ;
         case 10080 : iIndex = 7 ; break ;
         default    : iIndex =- 1 ; break ;
    }
    
     static int LastBar[ 8 ]= { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 }; 
     datetime curbar = iTime (f_sy, f_tf, 0 );
     if (LastBar[iIndex] != curbar)
    {
        LastBar[iIndex] = curbar;
         return ( true );
    }
     else
    { return ( false );
 }
 }
//+=================================================================================+
int fExpiration_func
   (
   uchar e
   )
//--------------------   
{  
   uchar ex= 0 ;
   uchar mod= 0 ;
   if (e< 6 ) 
      ex=e; //return(e);
   else {
      mod= fmod (e, 5 );
       if (mod== 4 ) 
         ex=e+mod; //return(e+mod);
       else
         if (mod < 4 ) 
            ex=e-mod; //return(e-mod);
    }     
   return (ex); //grazina laiko tarpa minutemis
}
//+=================================================================================+
bool fisTradeTimeInt     //время торгов
   (
   uchar hstart= 0 , 
   uchar mstart= 0 , 
   uchar hend= 0 , 
   uchar mend= 0
   ) 
//--------------------   
{
   datetime db, de;           
   uchar       hc;              

  db= StrToTime ( TimeToStr ( TimeCurrent (), TIME_DATE )+ " " +hstart+ ":" +mstart);
  de= StrToTime ( TimeToStr ( TimeCurrent (), TIME_DATE )+ " " +hend+ ":" +mend);
  hc= TimeHour ( TimeCurrent ());
   if (db>=de) {
     if (hc>=hend) de+= 24 * 60 * 60 ; 
     else db-= 24 * 60 * 60 ;
  }
   if ( TimeCurrent ()>=db && TimeCurrent ()<=de) return ( True );
   else return ( False );
}
//+=================================================================================+
void fDrawArrow //наносим стрелки на график
   (
   string arrowName= "" ,
   double dwPrice= 0 ,
   datetime dwTime= 0 ,
   color dwColor=Silver,
   uchar dwArrowIndex= 0
   )
//--------------------   
{
   ObjectCreate       ( 0 ,arrowName, OBJ_ARROW , 0 , 0 , 0 , 0 , 0 );                 // создадим стрелку
   ObjectSetInteger   ( 0 ,arrowName, OBJPROP_ARROWCODE ,dwArrowIndex);       // установим код стрелки
   ObjectSetInteger   ( 0 ,arrowName, OBJPROP_COLOR ,dwTime);                 // зададим время
   ObjectSetInteger   ( 0 ,arrowName, OBJPROP_COLOR ,dwColor);               // зададим Цвет
   ObjectSetDouble    ( 0 ,arrowName, OBJPROP_PRICE ,dwPrice);               // зададим цену
   ChartRedraw ( 0 );
}
//+=================================================================================+
//Aritmetinis vidurkis

double fAvgOC
   (
   uchar count_start,       //nuo kurio baro pradesim skaiciuoti
   uchar end_count,         //iki kurio baro skaiciuosime
   uchar j= 0                //keli barai is eiles
   )
//--------------------   
{
   static double sum= 0 ;
   if (sum== 0 ){
       int n= 0 ;
       for ( int i=end_count; i<count_start; i++){
         double h= iClose ( NULL , PERIOD_M1 ,i);  
         double l= iOpen ( NULL , PERIOD_M1 ,i+j); 
         sum+= fabs (h-l);                   //padidinam avg 
         n++;                             //kie kartu buvo didintas avg
      }
       double avg=sum/n;                           //Surandam Mean aritmetini vidurki                 
   }   
   return (avg);                           //grazina kainu skirtumo vidurki
}
//+=================================================================================+
void fSaveToFile
   (
   string fileName,
   char expirration,       //realus ekspiracijos laikas minutemis
   datetime fop_time,
   datetime fcl_time,
   double fop_price,
   double fcl_price,
   uchar ftype
   )
//--------------------   
{
   //--- правильный способ работы в "файловой песочнице"
   ResetLastError ();
  
   int filehandle= FileOpen (fileName, FILE_WRITE | FILE_CSV );
   if (filehandle!= INVALID_HANDLE )
     {
      FileWrite(filehandle,
               expirration, //real expiration time
               fop_time, //TimeToStr(op_time,TIME_DATE|TIME_SECONDS),
               fcl_time, //TimeToStr(cl_time,TIME_DATE|TIME_SECONDS),
               op_price,
               fcl_price,
               type);
       FileClose (filehandle);
       Print ( "FileOpen OK" );
     }
   else Print ( "Операция FileOpen неудачна, ошибка " ,GetLastError());
}
//+=================================================================================+
/*int gUrdala_News()
{
   HideTestIndicators(true);
   int nResult = iCustom(NULL, PERIOD_M1, "Urdala_News", MinDo, MinPosle, ChasPoyasServera, 0, 0);
   HideTestIndicators(false);
   return(nResult);
}*/
//+=================================================================================+
/*datetime SecondsAfter    //grazinamas laiko tarpas po timeOp
   (
   datetime timeOp,      //laiko atskaitos pradzia
   datetime t
   ) 
{
     
   if (t<timeOp) t=timeOp;          
   return(TimeCurrent()-t);
}*/
//+=================================================================================+
//---------------------------------------------------
   /* void click
   (
   int x, 
   int y
   ) 
   {    
      SetCursorPos(x,y); // см. тут _http://www.vsokovikov.narod.ru/New_MSDN_API/Cursor/fn_setcursorpos.htm 
      mouse_event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0); 
      mouse_event(MOUSEEVENTF_LEFTUP, x, y, 0, 0); 
   }*/
//+=================================================================================+
//---------------------------------------------------
   /*void key
   (
   uchar kodas
   )
   {  
      keybd_event(kodas,0,0,0);      
      keybd_event(kodas,0,KEYEVENTF_KEYUP,0); 
   } */   
 

Então a questão é como devolver os dois valores. Tentei isto, mas erros

void OnTick()
  {
//---
   
   xy(10,20,100,100);
   Print("x=",x,"y=",y);
  }
//+------------------------------------------------------------------+
void xy(int xx,int xxx, int yy,int yyy,int & x,int & y){
   x=xx*xxx;
   y=yy+yyy;
}
 
gince:

Então a questão é como devolver os dois valores. Tentei isto, mas erros


void OnTick()
  {
//---
   int x,y;
   xy(10,20,100,100,x,y);
   Print("x=",x,"y=",y);
  }
//+------------------------------------------------------------------+
void xy(int xx,int xxx, int yy,int yyy, int &x,int &y){
   x=xx*xxx;
   y=yy+yyy;
}
 
gince:

Então a questão é como devolver os dois valores. Tentei isto, mas erros


Você já tentou usar variáveis? Talvez isso ajude.

void OnTick()
  {
//---
   int x=100.0, y=100.0;
   xy(10,20,100, 100, x,y);
   Print("x=",x,"y=",y);
  }
//+------------------------------------------------------------------+
void xy(int xx,int xxx, int yy,int yyy,int & x,int & y){
   x=xx*xxx;
   y=yy+yyy;
}
 

Ajude se você não se importar

para ensinar um consultor especializado em comércio pelo indicador

BS_Living Now ver #1.mq4 https://www.mql5.com/ru/code/11014#50910

UP= iCustom(Symbol(),NULL, "Now",BQuant,0,0);

DOW= iCustom(Symbol(),NULL, "Now",BQuant,1,0);


if(DOW){OrderSend(Symbol(), OP_SELL, Lot, Bid, Slip, 0, 0, "Forex-Robots.ru SELL", Magic, 0,Red);}


if(UP ){OrderSend(Symbol(), OP_BUY, Lot, Ask, Slip, 0, 0, "Forex-Robots.ru BUY", Magic, 0,Blue);}


Comentário

(

"\n Lucro: ", UP,

"\n Lucro: ", DOW

);

Eu tentei ler os valores no comentário, mas eles são sempre estáticos.

 
Vinin:


Você já tentou usar variáveis? Isso pode ajudar.


Obrigado, funciona.

 
sannin:

Ajude se você não se importar

para ensinar um consultor especializado em comércio pelo indicador

BS_Living Now ver #1.mq4 https://www.mql5.com/ru/code/11014#50910


UP= iCustom(Symbol(),NULL,"Now",BQuant,0,2);//

DOW= iCustom(Symbol(),NULL,"Now",BQuant,1,2);


if(DOW != 0){OrderSend(Symbol(), OP_SELL, Lot, Bid, Slip, 0, 0, "Forex-Robots.ru SELL", Magic, 0,Red);}



if(UP != 0){OrderSend(Symbol(), OP_BUY, Lot, Ask, Slip, 0, 0, "Forex-Robots.ru BUY", Magic, 0,Blue);}
Ainda não entrei no assunto, mas acho que é algo parecido com isto.