Perguntas de Iniciantes MQL5 MT5 MetaTrader 5

olegin038 2014.05.12 15:21 #2451

Boa tarde. A minha pergunta pode parecer incrivelmente estúpida para muitas pessoas, peço desculpa, ainda sou um principiante neste ramo, não consigo perceber o que está errado.

Criei um ficheiro de texto em MQL5\Files³date.txt e não o posso abrir. O erro 5004 está a escrever. Por favor, ajudem-me se puderem.

#property copyright "Copyright 2013, MetaQuotes Software Corp."
#property link      "http://www.mql5.com"
#property version   "1.00"

int OnInit()
  {
   return(0);
  }
  
void OnDeinit(const int reason)
  {
   return;
  }
  
void OnTick()
  {
   ResetLastError();
   int Handle=FileOpen("date.txt",FILE_CSV|FILE_READ|FILE_WRITE|FILE_COMMON,';');
   if(Handle==-1)   
     { 
     Print("Файл не открыт, ошибка: ", GetLastError());     
     }
   return;
  }

Williams' Percent Range - Double Exponential Moving Average Acelerador Oscilador - Indicadores

Artem Temnikov 2014.05.12 15:32 #2452

olegin038:

Boa tarde. A minha pergunta pode parecer incrivelmente estúpida para muitas pessoas, peço desculpa, ainda sou um principiante neste ramo, não consigo perceber o que está errado.

Criei um ficheiro de texto em MQL5\Files\Files\Txt e não o posso abrir. O erro 5004 está a escrever. Por favor ajudem se puderem.

Se o seu ficheiro não estiver na pasta partilhada de terminais clientes MT5 (e no seu caso está),

Tem de remover a bandeira FILE_COMMON:

void OnTick()
  {
   ResetLastError();
   int Handle=FileOpen("date.txt",FILE_CSV|FILE_READ|FILE_WRITE,';');
   if(Handle==-1)   
     { 
     Print("Файл не открыт, ошибка: ", GetLastError());     
     }
   return;
  }

olegin038 2014.05.12 15:48 #2453

Fleder:

Se o seu ficheiro não estiver na pasta partilhada de terminais clientes MT5 (e no seu caso está),

A bandeira FILE_COMMON deve ser retirada:

Obrigado pela ajuda, mas infelizmente não ajudou. Experimentei muitas variantes com as bandeiras. Além disso, escreve erro 5004. Há mais alguma coisa que eu deva tentar?

Artem Temnikov 2014.05.12 15:51 #2454

olegin038:
Obrigado pela ajuda, mas infelizmente não ajudou. Experimentei muitas opções com as bandeiras. Além disso, escreve erro 5004. Há mais alguma coisa que eu possa tentar?

Tente abri-lo simplesmente como um ficheiro de texto:

void OnTick()
  {
   ResetLastError();
   int Handle=FileOpen("date.txt",FILE_TXT|FILE_READ|FILE_WRITE);
   if(Handle==-1)   
     { 
     Print("Файл не открыт, ошибка: ", GetLastError());     
     }
   return;
  }

olegin038 2014.05.12 15:54 #2455

Fleder:

Tente abri-lo simplesmente como um ficheiro de texto:

Também não funcionou. Nunca trabalhei com ficheiros antes. Não precisa de prescrever nada extra aqui?

Artem Temnikov 2014.05.12 15:57 #2456

olegin038:
Também não funcionou. Nunca trabalhei com ficheiros antes. Não precisa de fazer nada extra aqui?

Sim, tem de ter a certeza de fechar o ficheiro:

void OnTick()
  {
   ResetLastError();
   int Handle=FileOpen("date.txt",FILE_CSV|FILE_READ|FILE_WRITE,';');
   if(Handle==-1)   
     { 
     Print("Файл не открыт, ошибка: ", GetLastError());     
     }
   FileClose(Handle);
   return;
  }

olegin038 2014.05.12 16:01 #2457

Fleder:

Sim, deve sempre fechar o ficheiro:

Muito obrigado! Ajudou muito. O erro já não é exibido.

Abramboss 2014.05.12 19:56 #2458

Partilharei os cursos de autores eminentes da minha biblioteca pessoal.

Yerin, Bazhenov, Strmzh, Lukyanov, Cheryomushkin, Herchik, Alex Million, etc.

Praticamente todos os cursos destes autores.

Pergunte.

Dmitriy Skub 2014.05.13 21:47 #2459

Abramboss:
Cursos partilhados por autores proeminentes da minha biblioteca pessoal.

Yerin, Bazhenov, Strmzh, Lukyanov, Cheryomushkin, Herchik, Alex Million, etc.

Praticamente todos os cursos destes autores.

Pergunte.

Partilhar de graça? Interessado em Gerchik.

Евгений 2014.05.14 17:21 #2460

Olá a todos, preciso de ajuda com o famoso indicador CrossArbitr. O código não é, evidentemente, meu. Precisava de alguma informação, que não sai. Portanto, em ordem.

Adicionei variáveisduplo n, m;

"\nDiferença BID Synthetic and Real =", n=(CalcBid-Bid-Bid),

"\, Difference ASK Synthetic and Real =", m=(CalcAsk-Ask),

"\nTotal =" (m - n) <----

Acaba por jurar pelo menos neste escalão (algumas operatot esperadas). Quem me pode dizer o que estou a fazer mal?

//+------------------------------------------------------------------+
//|                                                  CrossArbitr.mq4 |
//|                                                        Scriptong |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright "Scriptong"
#property link      ""

#property indicator_chart_window
//---- input parameters
extern bool      ShowBid=false;
extern bool      ShowAsk=false;
extern color     BidColor = Lime;
extern color     AskColor = Yellow;
extern int       AlarmIfPointDifference = 10;
extern string    AlarmFile = "wait.wav"; 


bool Activate = False;
string FP, SP;
double Tick;
int WayForCross;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   string S = Symbol();
   if(StringFind(S, "USD", 0) != -1)
     {
      Comment("Индикатор работает только с кроссовыми парами (GBPJPY, EURJPY, EURGBP и т. д)!");
      return(0);
     }

   if(StringLen(S) != 6)
     {
      Comment("Индикатор работает только с валютными парами, у которых название состоит из шести символов!");
      return(0);
     }
     
   // Поиск первой валютной пары кросса
   FP = StringSubstr(S, 0, 3)+"USD";
   MarketInfo(FP, MODE_BID);
   if(GetLastError() > 0)
     {
      FP = "USD"+StringSubstr(S, 0, 3);
      MarketInfo(FP, MODE_BID);
      if(GetLastError() > 0)
        {
         Comment("Невозможно найти инструмент ", FP, " или ", StringSubstr(S, 0, 3)+"USD. Необходимо добавить его в Обзоре рынка и перезапустить индикатор.");
         return(0);
        } 
     } 
   // --------------------------------------  
     
   // "Создание" второй валютной пары кросса
   SP = "USD"+StringSubstr(S, 3, 3);
   MarketInfo(SP, MODE_BID);
   if(GetLastError() > 0)
     {
      SP = StringSubstr(S, 3, 3)+"USD";
      MarketInfo(SP, MODE_BID);
      if(GetLastError() > 0)
        {
         Comment("Невозможно найти инструмент ", SP, " или ", StringSubstr(S, 3, 3)+"USD. Необходимо добавить его в Обзоре рынка и перезапустить индикатор.");
         return(0);
        } 
     } 
   // --------------------------------------  

   // Определение пути синтеза кросса
   if (StringFind(FP, "USD") == 3 && StringFind(SP, "USD") == 0)
     WayForCross = 1;
   if (StringFind(FP, "USD") == 0 && StringFind(SP, "USD") == 0)
     WayForCross = 2;
   if (StringFind(FP, "USD") == 3 && StringFind(SP, "USD") == 3)
     WayForCross = 3;
   if (StringFind(FP, "USD") == 0 && StringFind(SP, "USD") == 3)
     WayForCross = 4;
   // -------------------------------

   Tick = MarketInfo(Symbol(), MODE_TICKSIZE);
   
   Activate = True;  
//----
   return(0);
  }
  
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   Comment("");
   if(ObjectFind("CrossBid") == 0)
     ObjectDelete("CrossBid");
   if(ObjectFind("CrossAsk") == 0)
     ObjectDelete("CrossAsk");
   
//----
   return(0);
  }
  
//+------------------------------------------------------------------+
//| Приведение значений к точности одного тика                       |
//+------------------------------------------------------------------+
double ND(double A)
{
 return(NormalizeDouble(A, Digits));
}  

//+------------------------------------------------------------------+
//| Расчет значения синтетического бида                              |
//+------------------------------------------------------------------+
double CalcBidWayForCross()
{
 switch (WayForCross)
   {
    case 1: return(ND(MarketInfo(FP, MODE_BID)*MarketInfo(SP, MODE_BID)));
    case 2: return(ND(MarketInfo(SP, MODE_BID)/MarketInfo(FP, MODE_ASK)));
    case 3: return(ND(MarketInfo(FP, MODE_BID)/MarketInfo(SP, MODE_ASK)));
    case 4: return(1/(ND(MarketInfo(FP, MODE_ASK)*MarketInfo(SP, MODE_BID))));
   }
}

//+------------------------------------------------------------------+
//| Расчет значения синтетического аска                              |
//+------------------------------------------------------------------+
double CalcAskWayForCross()
{
 switch (WayForCross)
   {
    case 1: return(ND(MarketInfo(FP, MODE_ASK)*MarketInfo(SP, MODE_ASK)));
    case 2: return(ND(MarketInfo(SP, MODE_ASK)/MarketInfo(FP, MODE_BID)));
    case 3: return(ND(MarketInfo(FP, MODE_ASK)/MarketInfo(SP, MODE_BID)));
    case 4: return(1/(ND(MarketInfo(FP, MODE_BID)*MarketInfo(SP, MODE_ASK))));
   }
}

  
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int    counted_bars=IndicatorCounted();
//----
   if(!Activate)
    return(0);

   // Расчет синтетических Bid и Ask
   double CalcBid = CalcBidWayForCross();  
   RefreshRates();
   double CalcAsk = CalcAskWayForCross();  
   double n, m;
   // -------------------------------

   // Рисуем уровень синтетического Bid
   if (ShowBid)
     {
      if(ObjectFind("CrossBid") == -1)
        {
         ObjectCreate("CrossBid", OBJ_HLINE, 0, 0, CalcBid); 
         ObjectSet("CrossBid", OBJPROP_COLOR, BidColor);
         ObjectSet("CrossBid", OBJPROP_STYLE, STYLE_DOT);
        } 
       else
        if(!ObjectMove("CrossBid", 0, 1, CalcBid))
           Print("Ошибка перемещения №", GetLastError());
     }
   // ----------------------------------        

   // Рисуем уровень синтетического Ask
   if(ShowAsk)
    {
     if(ObjectFind("CrossAsk") == -1)
       {
        ObjectCreate("CrossAsk", OBJ_HLINE, 0, 0, CalcAsk); 
        ObjectSet("CrossAsk", OBJPROP_COLOR, AskColor);
        ObjectSet("CrossAsk", OBJPROP_STYLE, STYLE_DOT);
       } 
      else
       ObjectMove("CrossAsk", 0, 1, CalcAsk);
    }
   // ----------------------------------        

   Comment("Реальный BID = ", DoubleToStr(Bid, Digits), ", реальный ASK = ", DoubleToStr(Ask, Digits), 
           "\nСинтетик BID = ", DoubleToStr(CalcBid, Digits), ", синтетик ASK = ", DoubleToStr(CalcAsk, Digits),
           "\nРазница BID Синтетика и Реального =", n=(CalcBid-Bid),
           "\, Разница ASK Синтетика и Реального =", m=(CalcAsk-Ask),
           "\nИтог =" (m - n)
           );

   // Выдаем звуковой сигнал о превышении минимальной разности
   if(ND(MathAbs(CalcBid-Bid)) >= ND(AlarmIfPointDifference*Point))
     PlaySound(AlarmFile);
   // --------------------------------------------------------  
    
//----
   return(0);
  }
//+------------------------------------------------------------------+

Gráficos - Configurações - MetaTrader 5 para seus Profundidade de mercado -

Perguntas de Iniciantes MQL5 MT5 MetaTrader 5 - página 246