Ковалев Сергей. Программирование на алгоритмическом языке MQL4
Подождите немного. Документ загружается.
941
управление в управляющую торговую функцию Trade(), что в конечном счёте приводит к
завершению исполнения специальной функции start() эксперта. На следующем тике
торговый терминал снова запустит на исполнение функцию start(), и если критерий
закрытия на тот момент будет ещё актуален, то это снова приведёт к вызову на
исполнение функции закрытия всех ордеров Close_All().
13.7.3 Пользовательская исполнительная торговая функция
Open_Ord()
int Open_Ord ( int Tip)
Функция открывает один рыночный ордер указанного типа.
Параметр Tip может принимать следующие значения, соответствующие типу
закрываемых ордеров:
0 - тип закрываемых ордеров Buy;
1 - тип закрываемых ордеров Sell.
Для исполнения функции требуется применение в программе функции учёта ордеров
Terminal(), функции слежения за событиями Events() и функции обработки ошибок
Errors(). Для вывода сообщений функция предполагает использование информационной
функции Inform(). В случае, если функция Inform() не включена в эксперт, сообщения не
выводятся.
Используются значения глобальных переменных:
Mas_Tip - массив количества ордеров всех типов на момент последнего исполнения
функции Terminal();
StopLoss - значение StopLoss (количество пунктов);
TakeProfit - значение TakeProfit (количество пунктов).
Исполнительная торговая функция Open_Ord() оформлена в виде включаемого файла
Open_Ord.mqh:
//--------------------------------------------------------------------
// Open_Ord.mqh
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
// Функция открытия одного рыночного ордера указанного типа
942
// Глобальные переменные:
// int Mas_Tip Массив типов ордеров
// int StopLoss Значение StopLoss (количество пунктов)
// int TakeProfit Значение TakeProfit (количество пунктов)
//--------------------------------------------------------------- 2 --
int Open_Ord(int Tip)
{
int Ticket, // Номер ордера
MN; // MagicNumber
double SL, // StopLoss (относит.знач.цены)
TP; // TakeProf (относит.знач.цены)
//--------------------------------------------------------------- 3 --
while(Mas_Tip[Tip]==0) // До тех пор, пока ..
{ //.. не достигнут успех
if (StopLoss<Level_new) // Если меньше допустимого..
StopLoss=Level_new; // .. то допустимый
if (TakeProfit<Level_new) // Если меньше допустимого..
TakeProfit=Level_new; // ..то допустимый
MN=TimeCurrent(); // Простой MagicNumber
Inform(13,Tip); // Сообщение о попытке откр
if (Tip==0) // Будем открывать Buy
{
SL=Bid - StopLoss* Point; // StopLoss (цена)
TP=Bid + TakeProfit*Point; // TakeProfit (цена)
Ticket=OrderSend(Symbol(),0,Lots_New,Ask,2,SL,TP,"",MN);
}
if (Tip==1) // Будем открывать Sell
{
SL=Ask + StopLoss* Point; // StopLoss (цена)
TP=Ask - TakeProfit*Point; // TakeProfit (цена)
Ticket=OrderSend(Symbol(),1,Lots_New,Bid,2,SL,TP,"",MN);
}
//--------------------------------------------------------- 4 --
if (Ticket<0) // Не получилось :(
{ // Поинтересуемся ошибками:
if(Errors(GetLastError())==false)// Если ошибка непреодолимая
return; // .. то уходим.
}
Terminal(); // Функция учёта ордеров
Events(); // Отслеживание событий
}
//--------------------------------------------------------------- 5 --
return; // Выход из пользов. функции
}
//--------------------------------------------------------------- 6 --
943
В блоках 1-3 функции Open_Ord() описаны глобальные переменные, значения которых
используются при исполнении функции, а также открыты и описаны локальные
переменные. Основной код функции сосредоточен в операторе цикла while (блоки 3-5),
который исполняется до тех пор, пока в торговле нет ни одного ордера заданного типа
Tip.
Торговая стратегия предполагает открытие ордеров, имеющих ненулевые стоп-приказы. В
общем случае трейдер может установить такие значения стоп-приказов, которые не
удовлетворяют требованиям дилингового центра, а именно меньше ограничивающей
минимальной дистанции. Поэтому перед открытием ордера выполняется необходимая
проверка: если последняя известная минимальная дистанция (Level_new) превышает
значение внешней переменной StopLoss или TakeProfit, то значение этой переменной
увеличивается и устанавливается равным Level_new.
Каждый открываемый ордер имеет свой уникальный MagicNumber, равный текущему
серверному времени. В результате исполнения одного эксперта по финансовому
инструменту может быть одновременно открыт только один рыночный ордер (или
установлен отложенный). Таким образом гарантируется, что все рыночные ордера будут
иметь уникальный MagicNumber. Перед открытием ордера исполняется функция Inform(),
в результате чего выводится сообщение о попытке совершить торговую операцию.
В зависимости от типа ордера выполняется тело одного из операторов if. Например, если
значение передаваемого параметра Tip равно 0, то это значит, что необходимо открыть
ордер Buy. В этом случае вычисляются значения StopLoss и TakeProfit, соответствующие
типу ордера Buy, и после этого управление передаётся в строку
Ticket=OrderSend(Symbol(),0,Lots_New,Ask,2,SL,TP,"",MN);
для формирования торгового приказа на открытие рыночного ордера Buy. Аналогичные
вычисления производятся в случае, если значение параметра Tip равно 1, т.е необходимо
открыть ордер Sell.
Обработка ошибок во всех пользовательских исполнительных торговых функциях
выполняется подобным образом. Если торговая операция завершилась успехом, то
функция заканчивает работу (потому, что не будет выполняться очередная итерация цикла
while, т.к. после исполнения функции Terminal() значение элемента массива Mas_Tip[Tip]
будет равно 1). Если же торговый приказ не был исполнен, то выполняется анализ ошибок
(блок 4-5). В этом случае вызывается для исполнения функция обработки ошибок Errors().
944
Если она возвращает false (ошибка является критической), то исполнение функции
Open_Ord() заканчивается, управление последовательно возвращается в управляющую
торговую функцию Trade(), специальную функцию start() и далее клиентскому терминалу.
Если же ошибка является преодолимой, то после обновления массивов ордеров в функции
Terminal() управление передаётся на очередную итерацию цикла while, в результате чего
выполняется ещё одна попытка открыть ордер.
Таким образом, функция Open_Ord() удерживает управление до тех пор, пока не будет
открыт ордер, либо при исполнении торгового приказа будет получена критическая
ошибка.
13.7.4 Пользовательская исполнительная торговая функция
Tral_Stop()
int Tral_Stop ( int Tip)
Функция модификации всех рыночных ордеров указанного типа.
Параметр Tip может принимать следующие значения, соответствующие типу
закрываемых ордеров:
0 - тип закрываемых ордеров Buy;
1 - тип закрываемых ордеров Sell.
Для исполнения функции требуется применение в программе функции учёта ордеров
Terminal(), функции слежения за событиями Events() и функции обработки ошибок
Errors(). Для вывода сообщений функция предполагает использование информационной
функции Inform(). В случае, если функция Inform() не включена в эксперт, сообщения не
выводятся.
Используются значения глобальных переменных:
Mas_Ord_New - массив характеристик ордеров на момент последнего исполнения
функции Terminal();
TralingStop - дистанция между рыночной ценой и желаемым значением заявленной цены
StopLoss (количество пунктов).
Исполнительная торговая функция Tral_Stop() оформлена в виде включаемого файла
Tral_Stop.mqh:
945
//--------------------------------------------------------------------
// Tral_Stop.mqh
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
// Функция модификации StopLoss всех ордеров указанного типа
// Глобальные переменные:
// Mas_Ord_New Массив ордеров последний известный
// int TralingStop Значение TralingStop(количество пунктов)
//--------------------------------------------------------------- 2 --
int Tral_Stop(int Tip)
{
int Ticket; // Номер ордера
double
Price, // Цена открытия рыночного ордера
TS, // TralingStop (относит.знач.цены)
SL, // Значение StopLoss ордера
TP; // Значение TakeProfit ордера
bool Modify; // Признак необходимости модифи.
//--------------------------------------------------------------- 3 --
for(int i=1;i<=Mas_Ord_New[0][0];i++) // Цикл по всем ордерам
{ // Ищем ордера задан. типа
if (Mas_Ord_New[i][6]!=Tip) // Если это не наш тип..
continue; //.. то переступим ордер
Modify=false; // Пока не назначен к модифи
Price =Mas_Ord_New[i][1]; // Цена открытия ордера
SL =Mas_Ord_New[i][2]; // Значение StopLoss ордера
TP =Mas_Ord_New[i][3]; // Значение TakeProft ордера
Ticket=Mas_Ord_New[i][4]; // Номер ордера
if (TralingStop<Level_new) // Если меньше допустимого..
TralingStop=Level_new; // .. то допустимый
TS=TralingStop*Point; // То же в относит.знач.цены
//--------------------------------------------------------- 4 --
switch(Tip) // Переход на тип ордера
{
case 0 : // Ордер Buy
if (NormalizeDouble(SL,Digits)<// Если ниже желаемого..
NormalizeDouble(Bid-TS,Digits))
{ // ..то модифицируем его:
SL=Bid-TS; // Новый его StopLoss
Modify=true; // Назначен к модифи.
}
break; // Выход из switch
case 1 : // Ордер Sell
if (NormalizeDouble(SL,Digits)>// Если выше желаемого..
NormalizeDouble(Ask+TS,Digits)||
NormalizeDouble(SL,Digits)==0)//.. или нулевой(!)
946
{ // ..то модифицируем его
SL=Ask+TS; // Новый его StopLoss
Modify=true; // Назначен к модифи.
}
} // Конец switch
if (Modify==false) // Если его не надо модифи..
continue; // ..то идём по циклу дальше
bool Ans=OrderModify(Ticket,Price,SL,TP,0);//Модифицируем его!
//--------------------------------------------------------- 5 --
if (Ans==false) // Не получилось :(
{ // Поинтересуемся ошибками:
if(Errors(GetLastError())==false)// Если ошибка непреодолимая
return; // .. то уходим.
i--; // Понижение счётчика
}
Terminal(); // Функция учёта ордеров
Events(); // Отслеживание событий
}
return; // Выход из пользов. функции
}
//--------------------------------------------------------------- 6 --
В блоках 1-3 описаны глобальные переменные, используемые в функции, а также открыты
и описаны локальные переменные. В цикле for (блоки 3-6) выполняется отбор ордеров
заданного типа, и если StopLoss какого-либо из этих ордеров находится дальше от
текущей цены, чем задано пользователем, этот ордер модифицируется.
Для облегчения восприятия кода значения некоторых элементов массива ордеров
Mas_Ord_New присваиваются простым переменным (блок 3-4). Далее для переменной
TralingStop выполняется необходимая проверка: если значение этой переменной меньше
минимально допустимой дистанции, установленной дилинговым центром, то оно
увеличивается до минимально допустимой величины.
В блоке 4-5, в зависимости от типа ордера, выполняются необходимые вычисления.
Например, если значение передаваемого параметра Tip равно 1 (необходимо
модифицировать ордер Sell), то управление передаётся на метку case 1 оператора switch.
Здесь выполняется проверка необходимости модификации StopLoss ордера (в
соответствии с правилами, применяемыми для ордера этого типа, см. Требования и
ограничения торговых операций). Если StopLoss вообще не установлен или находится
дальше от текущего курса, чем на величину дистанции TralingStop, то вычисляется
желаемое новое значение StopLoss. Торговый приказ для модификации ордера
формируется в строке:
947
bool Ans = OrderModify(Ticket,Price,SL,TP,0);//Модифицируем его!
Ранее отмечалось, что рассматриваемая здесь торговая стратегия предполагает наличие
только одного рыночного ордера. Тем не менее, функция Tral_Stop() предусматривает
возможность модификации нескольких рыночных ордеров одного типа. Если трейдер не
вмешивается в торговлю во время работы эксперта, то необходимость модифицировать
несколько ордеров не возникает. Однако для случая, когда трейдер допускает открытие
рыночного ордера вручную (в дополнение к уже имеющемуся), возникает вопрос о
порядке модификации ордеров, а именно, какой из них необходимо модифицировать
раньше других и почему.
При рассмотрении порядка закрытия нескольких ордеров было указано, что критерием,
определяющим приоритет закрытия ордеров, является количество лотов. Такое решение
очевидно - чем больше лотов (из суммарного количества) будет закрыто, тем быстрее
будет реакция эксперта на срабатывание признака закрытия. Вопрос о порядке
модификации ордеров не имеет однозначного решения. Во всех случаях критерий для
определения порядка модификации ордеров диктуется сущностью торговой стратегии.
Таким критерием может быть не только количество лотов, но и факт отсутствия StopLoss
на каком-либо из ордеров, размер дистанции от StopLoss до текущей цены. В ряде случаев
критерием может выступать обобщённый показатель - размер убытка, который может
быть получен при резком изменении цены, т.е. при условии одномоментного
автоматического закрытия всех рыночных ордеров по StopLoss.
В рассматриваемом примере функции Tral_Stop() реализован случайный порядок
модификации ордеров - ордера модифицируются в той последовательности, в которой они
встречаются в списке открытых рыночных и установленных отложенных ордеров. В
каждом конкретном случае функцию необходимо доработать - запрограммировать
порядок модификации ордеров в соответствии с правилами конкретной стратегии.
Особое внимание нужно обратить на тот факт, что все торговые операции совершаются в
режиме реального времени. Если ордеров слишком много, то эксперт будет генерировать
множество торговых приказов. За время, пока эти приказы будут исполнены, рынок может
развернуться. Однако функция не возвращает управление в вызывающую её функцию
Trade() до тех пор, пока не будут модифицированы все ордера, подлежащие модификации.
Это значит, что возникает опасность пропустить торговый приказ на закрытие или
открытие ордеров. По этой причине любая стратегия должна составляться таким образом,
чтобы по возможности не допускать значительного количества рыночных ордеров.
948
В блоке 5-6 выполняется анализ ошибок, полученных при исполнении торговых приказов.
Если ошибка является критической, то функция заканчивает работу. Если же получена
преодолимая ошибка, то значение счётчика i понижается на 1. Это делается для того,
чтобы на очередной итерации цикла for была предпринята ещё одна попытка
модифицировать тот же ордер.
В большинстве случаев представленный код будет удовлетворять потребности
модификации нескольких ордеров. Вместе с тем, если в период нескольких неудачных
попыток модификации в составе ордеров произойдут изменения (например, какой-то из
ордеров будет закрыт при достижения рыночной ценой одного из стоп-приказов), то
порядок ордеров в массиве Mas_Ord_New может измениться. Это приведёт к тому, что
какой-то ордер может быть пропущен и не модифицирован в период последнего запуска
специальной функции start(). Ситуация может быть исправлена на следующем тике, при
очередном запуске функции start().
13.8 Функция обработки ошибок
Ошибки, возникающие при исполнении торговых приказов можно разделить на две
группы - преодолимые и критические. К преодолимым ошибкам относятся все ошибки,
сопровождающие отказ сервера, после которых можно продолжать торговлю. Например,
торговый приказ может быть отклонён брокером в случае, если на текущий момент в его
распоряжении нет информации о текущих ценах. Такая ситуация может возникнуть в
случае очень медленного рынка, т.е. в условиях, когда тики поступают редко. Или
напротив, в условиях быстро меняющегося рынка, когда поступающих котировок
слишком много, брокер не всегда может удовлетворить множество торговых заявок от
трейдеров, и тогда возникает пауза перед исполнением приказа, а иногда - отказ. В
подобных случаях эксперт, после исполнения некоторого кода, поставленного в
соответствие коду ошибки, может продолжать работу, например, после некоторой паузы
повторить торговый приказ.
К критическим относятся все ошибки, возникновение которых свидетельствует о каких-
либо серьёзных нарушениях. Например, если счёт заблокирован, то отправлять торговые
приказы на сервер нет никакого смысла. В этом случае эксперт должен вывести
необходимое сообщение, и не выполнять повторение торгового приказа. В составе
обычного эксперта функция обработки ошибок должна использоваться обязательно.
949
13.8.1 Пользовательская функция обработки ошибок Errors()
bool Errors( int Error )
Функция возвращает TRUE, если ошибка преодолимая и FALSE, если ошибка является
критической или отсутствует.
Параметр Error может принимать любое значение и соответствовать коду ошибки,
возникшей при попытке осуществить торговую операцию.
Пользовательская функция обработки ошибок Errors() оформлена в виде включаемого
файла Errors.mqh:
//--------------------------------------------------------------------
// Errors.mqh
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
// Функция обработки ошибок.
// Возвращаемые значения:
// true - если ошибка преодолимая (т.е. можно продолжать работу)
// false - если ошибка критическая (т.е. торговать нельзя)
//--------------------------------------------------------------- 2 --
bool Errors(int Error) // Пользовательская функция
{
// Error // Номер ошибки
if(Error==0)
return(false); // Нет ошибки
Inform(15,Error); // Сообщение
//--------------------------------------------------------------- 3 --
switch(Error)
{ // Преодолимые ошибки:
case 129: // Неправильная цена
case 135: // Цена изменилась
RefreshRates(); // Обновим данные
return(true); // Ошибка преодолимая
case 136: // Нет цен. Ждём новый тик.
while(RefreshRates()==false) // До нового тика
Sleep(1); // Задержка в цикле
return(true); // Ошибка преодолимая
case 146: // Подсистема торговли занята
Sleep(500); // Простое решение
RefreshRates(); // Обновим данные
return(true); // Ошибка преодолимая
// Критические ошибки:
case 2 : // Общая ошибка
950
case 5 : // Старая версия клиентского терминала
case 64: // Счет заблокирован
case 133: // Торговля запрещена
default: // Другие варианты
return(false); // Критическая ошибка
}
//--------------------------------------------------------------- 4 --
}
//--------------------------------------------------------------------
Одним из вопросов, возникающих при составлении алгоритма функции обработки ошибок
Errors(), является вопрос о том, что должна вернуть функция, если значение
передаваемого параметра равно 0 (т.е. ошибки нет). В правильно написанном эксперте
такая ситуация вообще не возникает. Однако при совершенствовании программы код
может быть несколько изменён, при этом в каких-то случаях может передаваться и
нулевое значение ошибки. Поэтому уже на этапе первоначальной разработки имеет смысл
ввести в функцию несколько строк кода для случая, если значение Error равно 0 (блок 2-
3).
Какой должна быть реакция функции Errors() на нулевое значение переменной Error,
зависит от того, какой алгоритм используется для обработки значения, возвращаемого
функцией. В рассматриваемом эксперте значение, возвращаемое функцией, принимается
во внимание в исполнительных торговых функциях. Если функция Errors() возвращает
значение true (ошибка преодолимая), то предпринимается повторная попытка осуществить
торговую операцию. Если же возвращено значение false, то исполнение торговой функции
прекращается и управление последовательно возвращается в вызывающую функцию,
затем в функцию start() и клиентскому терминалу. Если выбирать между двумя этими
вариантами, то случай, когда ошибки нет (Error = 0) соответствует второму варианту, а
именно возвращаемому значению false. Этим гарантируется, что однажды исполненный
приказ не будет повторён.
После вывода с помощью функции Inform() сообщения об ошибке управление передаётся
в блок 3-4, оператору switch. Для каждого из рассматриваемых кодов ошибок в функции
предусмотрен свой вариант case. Например, если возникла ошибка 136, то это значит, что
на текущий момент у брокера нет цен, на основании которых он может принять
правильное решение. Это значит также, что в период до ближайшего тика ситуация не
изменится, т.е. нет необходимости многократно повторять один и тот же торговый приказ,
он всё равно не будет исполнен. Правильным решением в этом случае является пауза -
отсутствие какой-либо инициативы со стороны эксперта. Для этой цели используется