Ковалев Сергей. Программирование на алгоритмическом языке MQL4
Подождите немного. Документ загружается.
851
Однако, в данном случае общее количество записей неизвестно. Вместе с тем, в данном
примере каждое событие описывается двумя значениями, составляющими одну строку
вида: значение, файловый разделитель, значение, признак окончания строки. В данном
случае полагается, что если есть одна запись (первое значение в строке), то есть и другая
запись; но если нет первой записи, то нет и второй, а значит нет и события, поэтому
создавать графический объект не нужно. Если обеих записей или какой-либо одной из них
не существует, то при попытке чтения записи файловый указатель переместится в конец
файла, т.е. такое место, где справа от указателя нет никаких данных. Проверка в строках 3
и 4 позволяет выявить этот факт. Если указанную проверку (две последние строки в блоке
5-6) удалить, то в процессе исполнения программы будет создан лишний графический
объект. И лишь после этого сработает условие окончания цикла while и управление будет
передано в блок 8-9. В общем случае при составлении алгоритмов чтения файлов
необходимо учитывать логику представления данных в файле, порядок следования
записей и разделителей, количество строк и пр. Для каждого конкретного случая должен
быть определён конкретный алгоритм.
Данные, прочитанные из файла, имеют строковый тип. Для того, чтобы воспользоваться
полученными значениями для создания графических объектов, необходимо преобразовать
данные в нужный тип. В блоке 6-7 первое (прочитанное в очередной строке) значение
преобразуется в значение типа datetime и в дальнейшем используется в качестве
координаты графического объекта, поставленного в соответствие событию. Первые три
символа из второго прочитанного строкового значения сравниваются с первой и второй
тройкой символов в названии финансового инструмента. Если есть совпадение, то
графический объект получает соответствующие свойства: стиль линии - сплошная и цвет -
красный (блок 7-8). В других случаях объекты отображаются оранжевым пунктиром. В
результате исполнения скрипта в окне финансового инструмента можно наблюдать линии
новостей:
852
Рис. 150. Графические объекты в окне финансового инструмента после исполнения
timetablenews.mq4.
Таким образом, скрипт может быть исполнен в окне любого валютного инструмента, при
этом в каждом окне сплошная красная вертикальная линия будет отражать события,
касающиеся этого инструмента, а пунктирные линии - события по другим инструментам.
Для отображения текстового описания объекта необходимо включить галочку опции
"Показывать описания объектов" в окне Свойства финансового инструмента (F8) >
Общие.
В блоке 8-9, после того, как задача решена, а именно все необходимые объекты созданы,
ранее открытый файл закрывается. Файл необходимо закрывать для того, чтобы, во-
первых, не расходовать лишние ресурсы компьютера, а во-вторых, для того, чтобы
обеспечить другим программам доступ к файлу в режиме записи. Нормальной следует
считать практику закрытия файла сразу после того, как все данные из него прочитаны
(или записаны в файл) и в использовании файла больше нет необходимости. Закрытие
файла выполняется с помощью функции FileClose().
12.6.7 Функция FileClose()
void FileClose(int handle)
Функция выполняет закрытие файла, ранее открытого функцией FileOpen().
Параметры:
handle - файловый описатель, возвращаемый функцией FileOpen().
853
Для того, чтобы у трейдера была возможность практически использовать скрипт
timetablenews. mq4, в его распоряжении должен быть способ создания файла,
содержащего расписание новостей на некоторый период. Такой файл может быть создан с
помощью любого текстового редактора, однако в этом случае остаётся возможность
ошибки (иногда можно ошибочно не указать разделитель). Рассмотрим вариант создания
рабочего файла средствами MQL4.
Задача 37. Представить код эксперта для создания файла расписания
новостей.
В общем случае эксперт может быть предназначен для создания файла, содержащего
любое количество новостей. Рассматриваемый здесь эксперт createfile.mq4 создаёт
рабочий файл, содержащий сведения не более, чем о пяти событиях.
//--------------------------------------------------------------------
// createfile.mq4
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
extern string Date_1=""; // 2007.05.11 10:30
extern string Text_1=""; // CHF Разрешения на строительство
extern string Date_2=""; // 2007.05.11 12:00
extern string Text_2=""; // GBP Ставка рефинансирования,2%,2.5%
extern string Date_3=""; // 2007.05.11 13:15
extern string Text_3=""; // EUR Встреча управляющих банков G10
extern string Date_4=""; // 2007.05.11 15:30
extern string Text_4=""; // USD Количество безработных в США
extern string Date_5=""; // 2007.05.11 18:30
extern string Text_5=""; // JPY Промышленное производство
//--------------------------------------------------------------- 2 --
int start() // Спец. функция start
{
//--------------------------------------------------------------- 3 --
int Handle, // Файловый описатель
Qnt_Symb; // Количество записанных симв.
string File_Name="News.csv"; // Имя файла
string Erray[5,2]; // Массив на 5 новостей
//--------------------------------------------------------------- 4 --
Erray[0,0]=Date_1; // Заполняем массив значениями
Erray[0,1]=Text_1;
Erray[1,0]=Date_2;
854
Erray[1,1]=Text_2;
Erray[2,0]=Date_3;
Erray[2,1]=Text_3;
Erray[3,0]=Date_4;
Erray[3,1]=Text_4;
Erray[4,0]=Date_5;
Erray[4,1]=Text_5;
//--------------------------------------------------------------- 5 --
Handle=FileOpen(File_Name,FILE_CSV|FILE_WRITE,";");//Открытие файла
if(Handle==-1) // Неудача при открытии файла
{
Alert("Ошибка при открытии файла. ",// Сообщение об ошибке
"Возможно, файл занят другим приложением");
PlaySound("Bzrrr.wav"); // Звуковое сопровождение
return; // Выход из start()
}
//--------------------------------------------------------------- 6 --
for(int i=0; i<=4; i++) // Цикл по всему массиву
{
if(StringLen(Erray[i,0])== 0 || // Если значение первой или ..
StringLen(Erray[i,1])== 0) // ..второй перемен. не введено
break; // .. то выход из цикла
Qnt_Symb=FileWrite(Handle,Erray[i,0],Erray[i,1]);//Запись в файл
if(Qnt_Symb < 0) // Если не получилось
{
Alert("Ошибка записи в файл ",GetLastError());// Сообщение
PlaySound("Bzrrr.wav"); // Звуковое сопровождение
FileClose( Handle ); // Закрываем файл
return; // Выход из start()
}
}
//--------------------------------------------------------------- 7 --
FileClose( Handle ); // Закрываем файл
Alert("Файл ",File_Name," создан.");// Сообщение
PlaySound("Bulk.wav"); // Звуковое сопровождение
return; // Выход из start()
}
//--------------------------------------------------------------- 8 --
Исходные данные вводятся в программу с помощью внешних переменных типа string
(блок 1-2). В блоке 3-4 открыты и описаны переменные. Для удобства обработки в
программе введенные данные записываются (блок 4-5) в строковый массив Erray[][].
Каждое событие (сведения, характеризующие новость) представлено в двух элементах
массива по второму измерению. Размер первого измерения (количество строк в массиве)
определяется количеством новостей, в данном случае 5. Для того, чтобы при опробовании
855
эксперта на демо-счёте не вводить вручную все значения, можно загрузить файл настроек
эксперта example_news.set; файл настроек эксперта должен находиться в каталоге
Каталог_терминала\presets \.
В блоке 5-6 выполняется открытие файла. Если операция закончилась неудачей, то после
сообщения пользователю функция start() заканчивает работу. Если файл открыт удачно, то
управление передаётся оператору цикла for, в блок 6-7. Количество итераций в цикле
ограничивается количеством новостей, а именно, числом 5. В общем случае количество
вводимых значений, размер массива Erray и количество итераций можно увеличить до
желаемого.
На каждой итерации цикла выполняется проверка: не является ли какое либо из
введенных значений пустым. Для этого вычисляется длина строковых значений элементов
массива Erray. Если какое-то из них имеет нулевую длину, то это расценивается как
отсутствие текущего и следующих сообщений, поэтому текущая итерация прерывается.
До тех пор, пока не нашлось пустое значение элемента массива, выполняется запись
значений двух элементов массива в файл. Для записей значений в csv-файл используется
функция FileWrite():
12.6.8 Функция FileWrite()
int FileWrite(int handle, ...)
Функция предназначена для записи данных в файл CSV, разделитель между данными
включается автоматически. После записи в файл добавляется признак конца строки "\r\n".
При выводе числовые данные преобразуются в текстовый формат (см. функцию Print()).
Функция возвращает количество записанных символов или отрицательное значение, если
происходит ошибка.
Параметры:
handle - файловый описатель, возвращаемый функцией FileOpen();
... - данные, разделенные запятыми. Может быть не больше 63 параметров.
Данные типов double, int автоматически преобразовываются в строку (данные типов color,
datetime и bool воспринимаются как целые числа тип int, и тоже преобразовываются в
строку), данные типа string выводятся как есть, без преобразования. В качестве параметра
нельзя передать массивы; массивы должны выводиться поэлементно.
856
В рассматриваемом примере данные записываются в файл в строке:
Qnt_Symb=FileWrite(Handle,Erray[i,0],Erray[i,1]);//Запись в файл
При записи в файл после значения Erray[i,0] будет записан разделитель (символ,
используемый как разделитель, указывается в функции открытия файла FileOpen(), в
данном случае ';'). После окончания исполнения функции FileWrite(), т.е. в конце записи,
будет автоматически записан признак конца строки "\r\n". На всех последующих
итерациях цикла for будет сделана очередная запись такого же вида. Каждая новая запись
начинается с того места, где остался файловый указатель после последней записи. При
этом в файл будут записаны значения следующих элементов массива Erray (индексы
элементов на каждой итерации увеличиваются на 1).
Если текущая запись в файл выполнена успешно, то управление передаётся на
следующую итерацию. Если же запись в файл закончилась неудачей, то после сообщения
пользователю файл закрывается с помощью функции FileClose() и функция start()
заканчивает работу. Если все записи в файл выполнены успешно, то после окончания
исполнения цикла for управление передаётся функции закрытия файла FileClose() в блок
7-8. В этом случае выводится сообщение об успешном создании файла, после чего
исполнение функции start() заканчивается. По окончании исполнения эксперта будет
создан файл News.csv, представленный на Рис. 149.
12.6.9 Функции, применяемые для осуществления файловых операций
Функция Краткое описание
FileClose Закрытие файла, ранее открытого функцией FileOpen().
FileDelete Удаление указанного файла. Файлы могут быть удалены только в
том случае, если они расположены в папке
каталог_терминала\experts\files (каталог_терминала\tester\files в
случае тестирования эксперта) или ее подпапках.
857
FileFlush Сброс на диск всех данных, оставшихся в файловом буфере ввода-
вывода.
FileIsEnding Возвращает TRUE, если файловый указатель находится в конце
файла, иначе возвращает FALSE. В случае достижения конца файла
в процессе чтения функция GetLastError() вернет ошибку
ERR_END_OF_FILE (4099)
FileIsLineEnding
Возвращает TRUE, если файловый указатель находится в конце
строки файла формата CSV, иначе возвращает FALSE.
FileOpen Открывает Файл для ввода и/или вывода. Возвращает файловый
описатель открытого файла или -1 в случае неудачи.
FileOpenHistory Открывает файл в текущей папке истории
(каталог_терминала\history\server_name) или ее подпапках.
Возвращает описатель файла или -1 в случае неудачи.
FileReadArray Функция читает указанное число элементов из двоичного файла в
массив. Перед чтением данных массив должен быть достаточного
размера. Функция возвращает количество фактически прочитанных
элементов.
FileReadDouble Функция читает число двойной точности с плавающей точкой
(double) из текущей позиции бинарного файла. Размер числа может
быть 8 байтов (double) или 4 байта (float).
FileReadInteger Функция читает целое число из текущей позиции бинарного файла.
Размер целого числа может быть 1, 2 или 4 байта. Если размер числа
не указан, система пытается прочитать как 4-байтовое целое число.
FileReadNumber
Чтение числа с текущей позиции файла CSV до разделителя.
Применяется только для файлов CSV.
858
FileReadString Функция читает строку с текущей позиции файла. Применяется как
к CSV, так и к двоичным файлам. Для текстовых файлов строка
будет прочитана до разделителя. Для бинарных файлов в строку
будет прочитано указанное количество символов.
FileSeek Функция перемещает файловый указатель на новую позицию,
которая является смещением в байтах от начала, конца или текущей
позиции файла. Следующее чтение или запись происходят с новой
позиции. Если перемещение файлового указателя прошло успешно,
функция возвращает TRUE, иначе возвращает FALSE.
FileSize Функция возвращает размер файла в байтах.
FileTell Функция возвращает смещение текущей позицию файлового
указателя от начала файла.
FileWrite Функция предназначена для записи данных в файл CSV,
разделитель между данными включается автоматически. После
записи в файл добавляется признак конца строки "\r\n". При выводе
числовые данные преобразуются в текстовый формат. Возвращает
количество записанных символов или отрицательное значение, если
происходит ошибка.
FileWriteArray Функция записывает массив в бинарный файл.
FileWriteDouble Функция записывает число с плавающей запятой в двоичный файл.
FileWriteInteger Функция записывает значение целого числа в двоичный файл.
FileWriteString Функция записывает строку в двоичный файл с текущей позиции.
Возвращает число фактически записанных байтов или
отрицательное значение в случае ошибки.
859
Для получения подробного описания этих и других функций необходимо обратиться к
справочной документации на MQL4.community, сайте MetaQuotes Software Corp. или к
разделу "Справка" в редакторе MetaEditor
12.7 Массивы и таймсерии
При работе с массивами очень важно помнить, что в MQL4 нумерация любой
последовательности однотипных элементов начинается с нуля.
Ранее указывалось, что не следует путать максимальное значение индекса элемента
массива с количеством элементов этого массива (см. Массивы). Например, если объявлен
массив:
int Erray_OHL[3]; // Объявление массива
то это значит, что одномерный массив (имеющий одно измерение) с именем Erray_OHL
состоит из трёх элементов. Индексация элементов массива начинается с нуля, т.е. первый
из трёх элементов имеет индекс 0 (Erray_OHL[0]), второй элемент - индекс 1
(Erray_OHL[1 ]), а третий элемент - индекс 2 (Erray_OHL[2 ]). Таким образом,
максимальное значение индекса элемента массива на единицу меньше, чем количество
элементов в этом измерении. В данном случае массив является одномерным, т.е можно
говорить о количестве элементов в первом измерении: поскольку количество элементов в
массиве равно 3, значит максимальное значение индекса равно 2.
То же можно сказать и о нумерации измерений массива. Например, если объявлен массив:
int Erray_OHL[3][8]; // Объявление массива
то это значит, что массив имеет два измерения. Первое измерение этого массива
определяет количество строк (в данном примере 3), а второе измерение - количество
элементов в строке (или, что то же самое, количество столбцов, в данном примере 8).
Сами измерения также нумеруется. Первое измерение имеет номер 0, а второе измерение -
номер 1. Номера измерений используются, например, в функции ArrayRange().
12.7.1 Функция ArrayRange()
int ArrayRange(object array[], int range_index)
Функция возвращает число элементов в указанном измерении массива.
860
Использование функции ArrayRange() можно продемонстрировать при решении
следующей задачи:
Задача 38. Значения элементов матрицы 3х5 содержатся в массиве Mas_1.
Получить значения массива Mas_2, значения элементов в котором равны
значениям транспонированной матрицы. Использовать произвольные
значения элементов.
Зададимся некоторыми значениями элементов и представим исходную и искомую
матрицы, содержащиеся, соответственно, в массивах Mas_1 и Mas_2:
Индексы
0 1 2 3 4
0 1 2 3 4 5
1 11 12 13 14 15
2 21 22 23 24 25
Индексы
0 1 2
0 1 11 21
1 2 12 22
2 3 13 23
3 4 14 24
4 5 15 25
Исходная матрица, массив Mas_1.
Транспонированная матрица,
массив Mas_2.
Рис. 151. Исходная и транспонированная матрицы.
В данном случае вся задача сводится к тому, чтобы переписать значения одного массива в
другой, соблюдая при этом правила транспонирования матрицы, а именно, значения
элементов, содержащихся в столбцах исходного массива, переписать в строки искомого
массива. Решение задачи транспонирование матрицы реализовано в эксперте matrix.mq4:
//--------------------------------------------------------------------
// matrix.mq4
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
int start() // Спец. функция start