Язык программирования MQL4
Подождите немного. Документ загружается.
//--------------------------------------------------------------------
// Close_All.mqh
// Предназначен для использования в качестве примера в учебнике MQL4.
//--------------------------------------------------------------- 1 --
// Функция закрытия всех рыночных ордеров указанного типа
// Глобальные переменные:
// Mas_Ord_New Массив ордеров последний известный
// Mas_Tip Массив типов ордеров
//--------------------------------------------------------------- 2 --
int Close_All(int Tip) // Пользовательская функция
{
// int Tip // Тип ордера
int Ticket=0; // Номер ордера
double Lot=0; // Количество закр. лотов
double Price_Cls; // Цена закрытия ордера
//--------------------------------------------------------------- 3 --
while(Mas_Tip[Tip]>0) // До тех пор, пока есть ..
{ //.. ордера заданного типа
for(int i=1; i<=Mas_Ord_New[0][0]; i++)// Цикл по живым ордерам
{
if(Mas_Ord_New[i][6]==Tip && // Среди ордеров нашего типа
Mas_Ord_New[i][5]>Lot) // .. выбираем самый дорогой
{ // Этот больше ранее найден.
Lot=Mas_Ord_New[i][5]; // Наибольший найденный лот
Ticket=Mas_Ord_New[i][4]; // Номер его ордера такой
}
}
if (Tip==0) Price_Cls=Bid; // Для ордеров Buy
if (Tip==1) Price_Cls=Ask; // Для ордеров Sell
Inform(12,Ticket); // Сообщение о попытке закр.
bool Ans=OrderClose(Ticket,Lot,Price_Cls,2);// Закрыть ордер !:)
//--------------------------------------------------------- 4 --
if (Ans==false) // Не получилось :(
{ // Поинтересуемся ошибками:
if(Errors(GetLastError())==false)// Если ошибка непреодолимая
return; // .. то уходим.
}
//--------------------------------------------------------- 5 --
Terminal(); // Функция учёта ордеров
Events(); // Отслеживание событий
}
return; // Выход из пользов. функции
}
//--------------------------------------------------------------- 6 --
В блоке 1-2 описаны используемые глобальные переменные, в блоке 2-3 открыты и
описаны локальные переменные. Условие Mas_Tip[Tip]>0 в заголовке оператора цикла
571
while (блоки 3-6) предполагает, что функция будет удерживать управление до тех пор,
пока не выполнит своё предназначение, а именно, пока не будут закрыты все ордера
заданного типа. Элемент глобального массива Mas_Tip[Tip] содержит значение, равное
количеству ордеров заданного типа Tip. Например, если функция Close_All() вызвана с
передаваемым параметром, равным 1, то это означает, что ей предписывается закрыть все
рыночные ордера Sell (см. Типы торговых операций). В этом случае значение элемента
массива Mas_Tip[1] будет равно количеству имеющихся ордеров Sell (последнему
известному на момент исполнения функции Terminal()). Таким образом, оператор цикла
while будет исполнен столько раз, сколько имеется ордеров Sell.
Если трейдер не вмешивается в работу эксперта (т.е. не выставляет ордера вручную), то в
торговле может присутствовать только один рыночный ордер того или иного типа. Если
же трейдер по своей инициативе установил дополнительно один или несколько рыночных
ордеров, то при исполнении функции Close_All() должен быть соблюдён некоторый
порядок закрытия ордеров. Предпочтительным является порядок закрытия ордеров от
большего к меньшему. Например, если на момент начала исполнения функции Close_All()
имеется три ордера Sell, причём один из них открыт на 5 лотов, другой на 1 лот, а третий -
на 4 лота, то в соответствии с указанным порядком ордера будут закрыты в такой
последовательности: сначала ордер в объёме 5 лотов, потом 4 лота и последним - ордер
объёмом 1 лот.
Обратите внимание, количество лотов - единственный критерий, принятый для
определения порядка закрытия ордеров. Прибыль/убыток по ордеру, курс открытия
ордера, а также другие параметры, характеризующие ордер (заявленные цены стоп-
приказов, время и причина открытия и пр.), не рассматриваются.
Все рыночные ордера определённого типа должны быть закрыты в
случае, если критерий закрытия ордеров этого типа является
значимым, в порядке от большего к меньшему.
Для соблюдения указанного порядка закрытия ордеров в блоке 3-4 используется цикл for,
в котором среди всех ордеров заданного типа выбирается один ордер, имеющий
наибольшее количество лотов. Поиск этого ордера выполняется на основе анализа
значений элементов глобального массива Mas_Ord_New, содержащего информацию обо
всех ордерах, присутствующих в торговле. После того как номер этого ордера определён,
в зависимости от типа ордера вычисляется заявленная цена закрытия, равная
572
соответствующему значению последней известной двухсторонней котировки. Если тип
закрываемых ордеров Buy, то следует заявлять цену закрытия в соответствии со
значением Bid, а если Sell, - то Ask.
Непосредственно перед формированием торгового приказа выводится информация о
попытке закрыть ордер, для этого используется вызов функции Inform(). Торговый приказ
на закрытие ордера формируется в строке:
bool Ans=OrderClose(Ticket,Lot,Price_Cls,2);// Закрыть ордер !:)
В качестве параметров используются вычисленные значения: Ticket - номер ордера, Lot -
количество лотов, Price_Cls - заявленная цена закрытия, 2 - проскальзывание.
В блоке 4-5 выполняется анализ результатов выполнения торговой операции. Если
функция OrderClose() вернула значение true, то это означает, что торговая операция
успешно завершена, т.е. ордер закрыт. В этом случае управление передаётся в блок 5-6,
где обновляется информация об ордерах, имеющихся на текущий момент. После
исполнения функций Terminal() и Events() текущая итерация цикла while заканчивается (за
время, пока исполняется функция, в том числе, выполняются торговые операции,
количество ордеров может измениться, поэтому исполнение функции учёта ордеров на
каждой итерации цикла while обязательно). В случае если в торговле ещё присутствуют
ордера заданного типа, то на следующей итерации цикла while они будут закрыты, при
этом для определения параметров очередного закрываемого ордера используются новые
значения элементов массивов Mas_Ord_New и Mas_Tip, полученные при исполнении
функции Terminal().
Если в результате исполнения торгового приказа функция OrderClose() вернула значение
false, то это значит, что ордер не закрыт. Чтобы выяснить причину неудачи выполняется
анализ последней ошибки, возникшей при попытке осуществления торговой операции.
Для этого вызывается функция Errors() (см. раздел Функция обработки ошибок). Если при
исполнении этой функции обнаруживается, что ошибка является непреодолимой
(например, торговля запрещена), то функция Close_All() заканчивает работу и возвращает
управление в управляющую торговую функцию Trade(), что в конечном счёте приводит к
завершению исполнения специальной функции start() эксперта. На следующем тике
торговый терминал снова запустит на исполнение функцию start(), и если критерий
закрытия на тот момент будет ещё актуален, то это снова приведёт к вызову на
исполнение функции закрытия всех ордеров Close_All().
573
9.4.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 --
// Функция открытия одного рыночного ордера указанного типа
// Глобальные переменные:
// 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 --
574
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 --
В блоках 1-3 функции Open_Ord() описаны глобальные переменные, значения которых
используются при исполнении функции, а также открыты и описаны локальные
переменные. Основной код функции сосредоточен в операторе цикла while (блоки 3-5),
который исполняется до тех пор, пока в торговле нет ни одного ордера заданного типа
Tip.
Торговая стратегия предполагает открытие ордеров, имеющих ненулевые стоп-приказы. В
общем случае трейдер может установить такие значения стоп-приказов, которые не
удовлетворяют требованиям дилингового центра, а именно меньше ограничивающей
минимальной дистанции. Поэтому перед открытием ордера выполняется необходимая
проверка: если последняя известная минимальная дистанция (Level_new) превышает
575
значение внешней переменной 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().
Если она возвращает false (ошибка является критической), то исполнение функции
Open_Ord() заканчивается, управление последовательно возвращается в управляющую
торговую функцию Trade(), специальную функцию start() и далее клиентскому терминалу.
Если же ошибка является преодолимой, то после обновления массивов ордеров в функции
Terminal() управление передаётся на очередную итерацию цикла while, в результате чего
выполняется ещё одна попытка открыть ордер.
Таким образом, функция Open_Ord() удерживает управление до тех пор, пока не будет
открыт ордер, либо при исполнении торгового приказа будет получена критическая
ошибка.
576
9.4.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:
//--------------------------------------------------------------------
// 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 ордера
577
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)//.. или нулевой(!)
{ // ..то модифицируем его
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(); // Отслеживание событий
}
578
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. Торговый приказ для модификации ордера
формируется в строке:
bool Ans = OrderModify(Ticket,Price,SL,TP,0);//Модифицируем его!
Ранее отмечалось, что рассматриваемая здесь торговая стратегия предполагает наличие
только одного рыночного ордера. Тем не менее, функция Tral_Stop() предусматривает
возможность модификации нескольких рыночных ордеров одного типа. Если трейдер не
вмешивается в торговлю во время работы эксперта, то необходимость модифицировать
несколько ордеров не возникает. Однако для случая, когда трейдер допускает открытие
рыночного ордера вручную (в дополнение к уже имеющемуся), возникает вопрос о
порядке модификации ордеров, а именно, какой из них необходимо модифицировать
раньше других и почему.
При рассмотрении порядка закрытия нескольких ордеров было указано, что критерием,
определяющим приоритет закрытия ордеров, является количество лотов. Такое решение
очевидно - чем больше лотов (из суммарного количества) будет закрыто, тем быстрее
будет реакция эксперта на срабатывание признака закрытия. Вопрос о порядке
579
модификации ордеров не имеет однозначного решения. Во всех случаях критерий для
определения порядка модификации ордеров диктуется сущностью торговой стратегии.
Таким критерием может быть не только количество лотов, но и факт отсутствия StopLoss
на каком-либо из ордеров, размер дистанции от StopLoss до текущей цены. В ряде случаев
критерием может выступать обобщённый показатель - размер убытка, который может
быть получен при резком изменении цены, т.е. при условии одномоментного
автоматического закрытия всех рыночных ордеров по StopLoss.
В рассматриваемом примере функции Tral_Stop() реализован случайный порядок
модификации ордеров - ордера модифицируются в той последовательности, в которой они
встречаются в списке открытых рыночных и установленных отложенных ордеров. В
каждом конкретном случае функцию необходимо доработать - запрограммировать
порядок модификации ордеров в соответствии с правилами конкретной стратегии.
Особое внимание нужно обратить на тот факт, что все торговые операции совершаются в
режиме реального времени. Если ордеров слишком много, то эксперт будет генерировать
множество торговых приказов. За время, пока эти приказы будут исполнены, рынок может
развернуться. Однако функция не возвращает управление в вызывающую её функцию
Trade() до тех пор, пока не будут модифицированы все ордера, подлежащие модификации.
Это значит, что возникает опасность пропустить торговый приказ на закрытие или
открытие ордеров. По этой причине любая стратегия должна составляться таким образом,
чтобы по возможности не допускать значительного количества рыночных ордеров.
В блоке 5-6 выполняется анализ ошибок, полученных при исполнении торговых приказов.
Если ошибка является критической, то функция заканчивает работу. Если же получена
преодолимая ошибка, то значение счётчика i понижается на 1. Это делается для того,
чтобы на очередной итерации цикла for была предпринята ещё одна попытка
модифицировать тот же ордер.
В большинстве случаев представленный код будет удовлетворять потребности
модификации нескольких ордеров. Вместе с тем, если в период нескольких неудачных
попыток модификации в составе ордеров произойдут изменения (например, какой-то из
ордеров будет закрыт при достижения рыночной ценой одного из стоп-приказов), то
порядок ордеров в массиве Mas_Ord_New может измениться. Это приведёт к тому, что
какой-то ордер может быть пропущен и не модифицирован в период последнего запуска
специальной функции start(). Ситуация может быть исправлена на следующем тике, при
очередном запуске функции start().
580