Ваши вопросы по языку MQL4

ИванМН

ИванМН

Местный знаток
Дорогие спецы! Имеем код:

int Handle = FileOpen("2022.02.01 12-00",FILE_ANSI|FILE_WRITE|FILE_COMMON,'-'); //открыли для записи
FileWrite(Handle,"1","643","USDCAD","[11-1.30-0.70]");//записали набор данных
FileSeek(Handle,0,SEEK_SET);//переставили указатель в начало файла (это, думаю, излишне, но всё же)
FileClose(Handle);//закрыли файл
Handle = FileOpen("2022.02.01 12-00",FILE_ANSI|FILE_SHARE_READ|FILE_COMMON,'-');//открыли для чтения
Print(FileTell(Handle)," ",FileReadNumber(Handle)," ",FileReadNumber(Handle));
FileClose(Handle);//закрыли файл

Запись в журнале должна содержать в себе текущую позицию указателя, пробел, первое считанное значение из файла (1), пробел, второе считанное значение из файла (643). Вместо этого в журнал выдаётся следующее:

6 643.0 1.0

То есть файловый указатель по непостижимой мною причине стоит не на начале файла, а в шести байтах от него, на втором разделителе ("-"), а последующее чтение происходит справа налево. Попытки переставить указатель в начало файла при помощи функции FileSeek успеха не принесли.
Моего интеллекта для осознания причины происходящего недостаточно. Прошу пояснить, что это за дичь.
 
mobidik

mobidik

-----
ИванМН сказал(а):
То есть файловый указатель по непостижимой мною причине стоит не на начале файла, а в шести байтах от него, на втором разделителе ("-"), а последующее чтение происходит справа налево. Попытки переставить указатель в начало файла при помощи функции FileSeek успеха не принесли.
Моего интеллекта для осознания причины происходящего недостаточно. Прошу пояснить, что это за дичь.
Нажмите, чтобы раскрыть...
А вы принты пропишите так:
Print(FileTell(Handle));
Print(FileReadString(Handle));
Print(FileReadString(Handle));
Print(FileReadString(Handle));
Print(FileReadString(Handle));
 
ИванМН

ИванМН

Местный знаток
mobidik сказал(а):
А вы принты пропишите так:
Print(FileTell(Handle));
Print(FileReadString(Handle));
Print(FileReadString(Handle));
Print(FileReadString(Handle));
Print(FileReadString(Handle));
Нажмите, чтобы раскрыть...
Я бы хотел понять причину именно в моём коде, а не искать обход. Обход (костыль) я уже сам нашёл и применил, он работает. Но почему некорректно работает мой вариант?
 
mobidik

mobidik

-----
ИванМН сказал(а):
Я бы хотел понять причину именно в моём коде, а не искать обход. Обход (костыль) я уже сам нашёл и применил, он работает. Но почему некорректно работает мой вариант?
Нажмите, чтобы раскрыть...
Так нет тут костыля :)
не верный вывод информации.
Если хочется увидеть все в одном принте, тогда так:
C-подобный:
Expand Collapse Copy 
int t = FileTell(Handle);
string a = FileReadString(Handle);
string b = FileReadString(Handle);

Print(/*FileTell(Handle)*/ t," ",/*FileReadNumber(Handle)*/ a," ",/*FileReadNumber(Handle)*/ b);

Сравните результат...
 
ИванМН

ИванМН

Местный знаток
МобиДик, я был не совсем точен, виноват. Для простоты в вопросе я привёл строку записи данных в виде:

FileWrite(Handle,"1","643","USDCAD","[11-1.30-0.70]");

но на самом деле в советнике первые два значения (с которыми я и имею проблему) записываются не строковыми константами, а числами: типа uchar для записи единицы и типа ushort для числа 643:

FileWrite(Handle,uchar(Sets[a].Dir),Sets[a].SL,......);

Стало быть, и считываться они должны функцией FileReadNumber, а не FileReadString, с приведением из double к соответствующему исходному типу. Так почему же указатель стоит не на начале файла, и чтение идёт задом наперёд?
 
mobidik

mobidik

-----
ИванМН сказал(а):
записываются не строковыми константами, а числами: типа uchar для записи единицы и типа ushort для числа 643:

FileWrite(Handle,uchar(Sets[a].Dir),Sets[a].SL,......);
Нажмите, чтобы раскрыть...
Да какая разница, справка гласит: "При выводе числовые данные преобразуются в текстовый формат...".
ИванМН сказал(а):
Стало быть, и считываться они должны функцией FileReadNumber, а не FileReadString
Нажмите, чтобы раскрыть...
FileReadNumber() <=> StrToDouble(FileReadString())
ИванМН сказал(а):
с приведением из double к соответствующему исходному типу
Нажмите, чтобы раскрыть...
А это уже Ваша задача...
ИванМН сказал(а):
Так почему же указатель стоит не на начале файла, и чтение идёт задом наперёд?
Нажмите, чтобы раскрыть...
Каким именно образом и направлением идет наполнение ф-ции Print() - мне не известно, но её вывод произойдет только после того, как все необходимые данные будут получены. Из этого можно сделать вывод, что значение указателя выводится то, которое было перед последним обращением к чтению файла, как вариант... Выше я Вам показал, что вывод принтов для каждого значения в отдельности, никаких нареканий не вызывает, все норм.
 
ZNV

ZNV

Активный участник
Здравствуйте.
Помогите, пожалуйста, функцию написать.
Надо из истории по паре вытащить сумму последних убыточных ордеров. Стопом служит прибыльный.
Спасибо.
 
Ugar

Ugar

Гуру форума
ZNV сказал(а):
Здравствуйте.
Помогите, пожалуйста, функцию написать.
Надо из истории по паре вытащить сумму последних убыточных ордеров. Стопом служит прибыльный.
Спасибо.
Нажмите, чтобы раскрыть...
А в каком порядке должны быть ордера? Может быть в порядке времени открытия, в порядке времени закрытия, по тикетам. От этого зависит как сортировать
 
ZNV

ZNV

Активный участник
Ugar сказал(а):
А в каком порядке должны быть ордера? Может быть в порядке времени открытия, в порядке времени закрытия, по тикетам. От этого зависит как сортировать
Нажмите, чтобы раскрыть...

Та вроде сделал.. Спасибо. Ошибок не обнаружено)


C-подобный:
Expand Collapse Copy 
double sumloss(string s)
{
   double count=0;
   for(int trade=OrdersHistoryTotal()-1; trade>=0; trade--)
   {
      f= OrderSelect(trade, SELECT_BY_POS, MODE_HISTORY);
      if( OrderSymbol()==s )
      {
         if(OrderProfit()<0)
         {
            count += OrderProfit();
         }
         if(OrderProfit()>=0)
         {
            return(count);
         }
      }
     
   }
   return(count);
}
 
Ugar

Ugar

Гуру форума
ZNV сказал(а):
Та вроде сделал.. Спасибо. Ошибок не обнаружено)


C-подобный:
Expand Collapse Copy 
double sumloss(string s)
{
   double count=0;
   for(int trade=OrdersHistoryTotal()-1; trade>=0; trade--)
   {
      f= OrderSelect(trade, SELECT_BY_POS, MODE_HISTORY);
      if( OrderSymbol()==s )
      {
         if(OrderProfit()<0)
         {
            count += OrderProfit();
         }
         if(OrderProfit()>=0)
         {
            return(count);
         }
      }
    
   }
   return(count);
}
Нажмите, чтобы раскрыть...
Ну да, ну да. А в каком порядке они там в истории лежат не важно. Если ордера по одному открываются и закрываются, то вполне пойдёт. Если не учитывать что при сравнении double данных не стоит использовать ==, >=, <=. Но новички это почти никогда не учитывают погрешности.
Вместо
if(OrderProfit()<0)
стоит написать if(OrderProfit()< -0.0001).
А вместо
if(OrderProfit()>=0)
стоит написать if(OrderProfit()> -0.0001).
 
ZNV

ZNV

Активный участник
Ugar сказал(а):
Ну да, ну да. А в каком порядке они там в истории лежат не важно. Если ордера по одному открываются и закрываются, то вполне пойдёт. Если не учитывать что при сравнении double данных не стоит использовать ==, >=, <=. Но новички это почти никогда не учитывают погрешности.
Вместо
if(OrderProfit()<0)
стоит написать if(OrderProfit()< -0.0001).
А вместо
if(OrderProfit()>=0)
стоит написать if(OrderProfit()> -0.0001).
Нажмите, чтобы раскрыть...
А как порядок добавить?
Я просуммировал вручную, перепроверил, у меня все сошлось. Разве оно не берет с последних и дальше.. ?? :unsure:
Как порядок добавить?
 
Ugar

Ugar

Гуру форума
ZNV сказал(а):
А как порядок добавить?
Я просуммировал вручную, перепроверил, у меня все сошлось. Разве оно не берет с последних и дальше.. ?? :unsure:
Как порядок добавить?
Нажмите, чтобы раскрыть...
Будет работать по истории так как в истории от последних к первым. Вопрос только в том как в они лежат в истории. А там бардак. Вернее есть закономерность, но она вряд ли понравится.
Короче, если надо в каком то порядке, сначала надо сортировать.
В цикле перебирая ордера внести их в двухмерный массив. В первое измерение внести данные по которому надо отсортировать, во второе тикеты ордеров.
Потом сортировать массив с помощью ArraySort.
Дальше в цикле перебирать ордера в массиве выбирать по тикету из второго измерения и уже суммировать прибыль.
 
  • Like
Реакции: ZNV
ИванМН

ИванМН

Местный знаток
mobidik сказал(а):
Да какая разница, справка гласит: "При выводе числовые данные преобразуются в текстовый формат...".

FileReadNumber() <=> StrToDouble(FileReadString())

А это уже Ваша задача...

Каким именно образом и направлением идет наполнение ф-ции Print() - мне не известно, но её вывод произойдет только после того, как все необходимые данные будут получены. Из этого можно сделать вывод, что значение указателя выводится то, которое было перед последним обращением к чтению файла, как вариант... Выше я Вам показал, что вывод принтов для каждого значения в отдельности, никаких нареканий не вызывает, все норм.
Нажмите, чтобы раскрыть...
В общем, если резюмировать: получать и использовать значения из файла надо "поштучно", одно за другим - на каждое полученное значение своё применение этого значения. Если пытаться делать это "потоком" - каждое значение получается из файла в рамках единого применения, - начинается какая-то лютая ересь, описанная мной выше. Очевидно, эти процессы не до конца проработаны разработчиками и носят частично неопределённый характер.
 
mobidik

mobidik

-----
ИванМН сказал(а):
Если пытаться делать это "потоком" - каждое значение получается из файла в рамках единого применения, - начинается какая-то лютая ересь, описанная мной выше.
Нажмите, чтобы раскрыть...
Нет, не верно. Исходя из Вашей логики, функция должна возвращать промежуточный результат в процессе своей работы. Т.е., сперва, ф-ция Print() напечатала номер положения указателя, затем продолжила свою работу, прочла первую строку данных - дополнила к ранее напечатанному, затем прочла следующую строку и снова дополнила к ранее напечатанному и т.д..? Вот это бред, не так ли? Вывод на печать произойдет тогда, когда будет выполнен весь код внутри ф-ции, согласно её алгоритма работы. В данном случае, на печать будет выведен результат после прочтения всех данных и, соответственно, на тот момент положение файлового указателя уже не будет в самом начале файла.
А не знание, не понимание, процессов заложенных разработчиком, приводит вот к таким выводам:
ИванМН сказал(а):
Очевидно, эти процессы не до конца проработаны разработчиками и носят частично неопределённый характер.
Нажмите, чтобы раскрыть...
 
ZNV

ZNV

Активный участник
Здравствуйте.
Вопрос по iCustom. Как проверить найден ли подключаемый индикатор?
Проблема в том что значения некоторых индикаторов, возвращают 0 как результат. И iCustom = 0, не будет говорить о не нахождении... :unsure:
 
AlexeyVik

AlexeyVik

Программист mql4 mql5
ZNV сказал(а):
Здравствуйте.
Вопрос по iCustom. Как проверить найден ли подключаемый индикатор?
Проблема в том что значения некоторых индикаторов, возвращают 0 как результат. И iCustom = 0, не будет говорить о не нахождении... :unsure:
Нажмите, чтобы раскрыть...
В случае отсутствия индикатора получишь ошибку
4072ERR_INDICATOR_CANNOT_LOADОшибка загрузки пользовательского индикатора

Следовательно после iCustom() поставь проверку типа if(GetLastError() == ERR_INDICATOR_CANNOT_LOAD)
 
  • Love
Реакции: ZNV
ZNV

ZNV

Активный участник
Здравствуйте.
В подвальном индикаторе, на картинке, график цен разных пар. Как привести все к значению от 0 до 100% ?
... по типу стохастика или рси.
Я их код смотрел, но ничего не понял... :(
 

Вложения

  • EURJPYM15.png
    EURJPYM15.png
    69,9 КБ · Просмотры: 39
AlexeNP

AlexeNP

Гуру форума
ZNV сказал(а):
Здравствуйте.
В подвальном индикаторе, на картинке, график цен разных пар. Как привести все к значению от 0 до 100% ?
... по типу стохастика или рси.
Я их код смотрел, но ничего не понял... :(
Нажмите, чтобы раскрыть...
max - максимальное значение по истории, min - минимальное... cur - текущее значение

percent = 100*(cur - min)/(max - min)
 
  • Like
Реакции: ZNV
ZNV

ZNV

Активный участник
Скажите, есть ли способ проверить быстродействие индикатора? Его нагрузку в каком то измерении...?

Я хочу сравнить 2 индикатора, по нагрузке, какой "легче".
 
Для ответа нужно войти/зарегистрироваться
Подписаться на канал в Telegram
Верх