Язык программирования MQL4
Подождите немного. Документ загружается.
управление вариантам case 20 и case 21 передаётся в случаях, если значимыми являются
критерии на продажу или закрытие рыночных ордеров Sell.
Обратите внимание, все исполнительные торговые функции, формирующие торговые
приказы, вызываются из функции Trade(), которая в свою очередь вызывается при
исполнении специальной функции start() эксперта, запускаемой клиентским терминалом в
результате прихода очередного тика. Код функции Trade() составлен таким образом, что
управление не возвращается в функцию start() (и в конечном счёте клиентскому
терминалу) до тех пор, пока не будут исполнены все необходимые исполнительные
торговые функции. Поэтому все торговые операции, предусмотренные для каждого из
торговых критериев, осуществляются экспертом подряд, без пауз. Исключение
составляют случаи, когда при исполнении торговых операций возникают критические
ошибки (см. раздел Функция обработки ошибок).
Если при исполнении функции Criterion() определено, что ни один из торговых критериев
не является значимым (переменная Trad_Oper равна 0), то управление передаётся на метку
case 0, в результате чего дважды вызывается для исполнения функция Tral_Stop() для
модификации заявленных значений рыночных ордеров разных типов. Реализованная в
эксперте торговая стратегия допускает наличие только одного рыночного ордера, поэтому
порядок следования вызовов функций Tral_Stop(0) и Tral_Stop(1) не имеет значения. В
данном случае сделан случайный выбор.
В случае, если функция Criterion() вернула значение -1, то это означает, что эксперт
прикреплён в окно финансового инструмента, не являющегося EURUSD. В этом случае
функция Trade() не осуществляет вызов каких-либо исполнительных торговых функций и
возвращает управление вызвавшей её специальной функции start().
13.7.2 Пользовательская исполнительная торговая функция
Close_All()
int Close_All( int Tip)
Функция закрывает все рыночные ордера указанного типа.
Параметр Tip может принимать следующие значения, соответствующие типу
закрываемых ордеров:
0 - тип закрываемых ордеров Buy;
1 - тип закрываемых ордеров Sell.
911
Для исполнения функции требуется применение в программе функции учёта ордеров
Terminal(), функции слежения за событиями Events() и функции обработки ошибок
Errors(). Для вывода сообщений функция предполагает использование информационной
функции Inform(). В случае, если функция Inform() не включена в эксперт, сообщения не
выводятся.
Используются значения глобальных массивов:
Mas_Ord_New - массив характеристик ордеров на момент последнего исполнения
функции Terminal();
Mas_Tip - массив количества ордеров всех типов на момент последнего исполнения
функции Terminal().
Исполнительная торговая функция Close_All() оформлена в виде включаемого файла
Close_All.mqh:
//--------------------------------------------------------------------
// 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
912
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 в заголовке оператора цикла
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 лот.
Обратите внимание, количество лотов - единственный критерий, принятый для
определения порядка закрытия ордеров. Прибыль/убыток по ордеру, курс открытия
913
ордера, а также другие параметры, характеризующие ордер (заявленные цены стоп-
приказов, время и причина открытия и пр.), не рассматриваются.
Все рыночные ордера определённого типа должны быть закрыты в
случае, если критерий закрытия ордеров этого типа является
значимым, в порядке от большего к меньшему.
Для соблюдения указанного порядка закрытия ордеров в блоке 3-4 используется цикл for,
в котором среди всех ордеров заданного типа выбирается один ордер, имеющий
наибольшее количество лотов. Поиск этого ордера выполняется на основе анализа
значений элементов глобального массива Mas_Ord_New, содержащего информацию обо
всех ордерах, присутствующих в торговле. После того как номер этого ордера определён,
в зависимости от типа ордера вычисляется заявленная цена закрытия, равная
соответствующему значению последней известной двухсторонней котировки. Если тип
закрываемых ордеров 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().
914
Если в результате исполнения торгового приказа функция OrderClose() вернула значение
false, то это значит, что ордер не закрыт. Чтобы выяснить причину неудачи выполняется
анализ последней ошибки, возникшей при попытке осуществления торговой операции.
Для этого вызывается функция Errors() (см. раздел Функция обработки ошибок). Если при
исполнении этой функции обнаруживается, что ошибка является непреодолимой
(например, торговля запрещена), то функция Close_All() заканчивает работу и возвращает
управление в управляющую торговую функцию 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 (количество пунктов).
915
Исполнительная торговая функция 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 --
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(); // Функция учёта ордеров
916
Events(); // Отслеживание событий
}
//--------------------------------------------------------------- 5 --
return; // Выход из пользов. функции
}
//--------------------------------------------------------------- 6 --
В блоках 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.
Обработка ошибок во всех пользовательских исполнительных торговых функциях
выполняется подобным образом. Если торговая операция завершилась успехом, то
917
функция заканчивает работу (потому, что не будет выполняться очередная итерация цикла
while, т.к. после исполнения функции Terminal() значение элемента массива Mas_Tip[Tip]
будет равно 1). Если же торговый приказ не был исполнен, то выполняется анализ ошибок
(блок 4-5). В этом случае вызывается для исполнения функция обработки ошибок Errors().
Если она возвращает 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();
918
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 ордера
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; // Назначен к модифи.
}
919
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(); // Отслеживание событий
}
return; // Выход из пользов. функции
}
//--------------------------------------------------------------- 6 --
В блоках 1-3 описаны глобальные переменные, используемые в функции, а также открыты
и описаны локальные переменные. В цикле for (блоки 3-6) выполняется отбор ордеров
заданного типа, и если StopLoss какого-либо из этих ордеров находится дальше от
текущей цены, чем задано пользователем, этот ордер модифицируется.
Для облегчения восприятия кода значения некоторых элементов массива ордеров
Mas_Ord_New присваиваются простым переменным (блок 3-4). Далее для переменной
TralingStop выполняется необходимая проверка: если значение этой переменной меньше
минимально допустимой дистанции, установленной дилинговым центром, то оно
увеличивается до минимально допустимой величины.
В блоке 4-5, в зависимости от типа ордера, выполняются необходимые вычисления.
Например, если значение передаваемого параметра Tip равно 1 (необходимо
модифицировать ордер Sell), то управление передаётся на метку case 1 оператора switch.
Здесь выполняется проверка необходимости модификации StopLoss ордера (в
соответствии с правилами, применяемыми для ордера этого типа, см. Требования и
ограничения торговых операций). Если StopLoss вообще не установлен или находится
920