Обучение языку MQL4 под MetaTrader 4📌

Благодарю, ребят! Попробую оба варианта. Кстати, такую запись я не встречал в хелпе по mql: maFast. Может, это в пятой версии?

Кстати, такую запись я не встречал в хелпе по mql: maFast. Может, это в пятой версии?

Всем добрый вечер! Кто может написать сову по моей стратегии?

Всем добрый вечер! Кто может написать сову по моей стратегии?

TradeHistory_v4.mq49 скач.
TradeHistory_v4.1.mq47 скач.
TradeHistory_v4.2.mq415 скач.

Приветствую Господа трейдеры. Я новичок. Пытаюсь освоить язык программирования. Уже запутался. Задача - открытие одного ордера на каждом закрытии бара М15 в ту же сторону
...........
open = NormalizeDouble(iOpen(Symbol(),PERIOD_M15,1),Digits);
close = NormalizeDouble(iClose(Symbol(),PERIOD_M15,1),Digits);

if (close > open && CountTrades() == 0)
{ ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, slippage, SL, TP, "", magic, Blue);
if (OrderSelect(ticket, SELECT_BY_TICKET, MODE_TRADES))
{ SL = NormalizeDouble(Ask - StopLoss * Point, Digits);
TP = NormalizeDouble(Ask + TakeProfit * Point, Digits);
bool res=OrderModify(ticket, OrderOpenPrice(), SL, TP, 0);
if(!res)
{ Print ("Ошибка модификации ордера. Код ошибки=",GetLastError());
}
else
Print("Цена ордера успешно модифицирована.");
}
}
........
При условии " CountTrades() == 0" открывает один ордер, но пока открытый ордер не закроется, другой не открывает. Без этого условия, ордера строчит на каждом тике . Помогите пжста , как правильно прописать проверку баров? :-/ Извините за возможно некорректно сформулированный вопрос, но думаю логика понятна. Всем профита!

Вам нужно немного уточнить логику - вы хотите, чтобы на каждом баре открывался ордер, не важно при этом, сколько уже их открыто? Тогда вам проверка CountTrades() не нужна, вам нужен алгоритм выполнения кода на каждом баре. Можно примерно так:

int BBars=0;
void OnTick()
{
   if(BBars!=Bars)
     {BBars=Bars;
      // код выполняемый на каждом баре текущего ТФ....
     }
}

Спасибо! Попробую :-?

Вариант JR может иногда выдавать ложный сигнал... Терминал иногда подкачивает историю и количество бар меняется, правда это бывает не часто...
имхо лучше так:

bool isNewBar()
{
static datetime new_Bar;
if (new_Bar == Time[1]) return(false); //Если бар не закрыт - выход
new_Bar = Time[1];
return(true);
}

вызов: if ( isNewBar() ) { //Ваш код.... }

то: 0ll и JR спасибо за помощь.

Доброго дня. Программирую недавно. Есть несколько вопросов , которые сам сделать не могу.
Один из таких:

#property description "Советник выставляет всем ордерам стоплосс"
//--------------------------------------------------------------------*/
extern int Stoploss = 100; //стоплосс
//--------------------------------------------------------------------
int init()
{
DrawLABEL("Stoploss",StringConcatenate("Stoploss ",Stoploss),5,15,Gray);
return(0);
}
//-------------------------------------------------------------------
int deinit()
{
ObjectDelete("Stoploss");
return(0);
}
//--------------------------------------------------------------------
int start()
{
if (!IsTradeAllowed()) return(0);
int STOPLEVEL=MarketInfo(Symbol(),MODE_STOPLEVEL);
double OSL,OOP,SL;
int tip;
for (int i=0; i {
if (OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
{
if (OrderSymbol()==Symbol())
{
tip = OrderType();
OSL = NormalizeDouble(OrderStopLoss(),Digits);
OOP = NormalizeDouble(OrderOpenPrice(),Digits);
SL=OSL;
if (tip==OP_BUY)
{
if (OSL==0 && Stoploss>=STOPLEVEL && Stoploss!=0)
{
SL = NormalizeDouble(OOP - Stoploss * Point,Digits);
}
if (SL != OSL)
{
if (!OrderModify(OrderTicket(),OOP,SL,0,0,White)) Print("Error OrderModify ",GetLastError());
}
}
if (tip==OP_SELL)
{
if (OSL==0 && Stoploss>=STOPLEVEL && Stoploss!=0)
{
SL = NormalizeDouble(OOP + Stoploss * Point,Digits);
}
if (SL != OSL)
{
if (!OrderModify(OrderTicket(),OOP,SL,0,0,White)) Print("Error OrderModify ",GetLastError());
}
}
}
}
}
return(0);
}
//--------------------------------------------------------------------
void DrawLABEL(string name, string Name, int X, int Y, color clr)
{
if (ObjectFind(name)==-1)
{
ObjectCreate(name, OBJ_LABEL, 0, 0, 0);
ObjectSet(name, OBJPROP_CORNER, 1);
ObjectSet(name, OBJPROP_XDISTANCE, X);
ObjectSet(name, OBJPROP_YDISTANCE, Y);
}
ObjectSetText(name,Name,12,"Arial",clr);
}
//--------------------------------------------------------------------

Как сделать так чтобы стоплосс устанавливался на все ордера, кроме первого бай и первого сел ?
Большая просьба о помощи.

Как сделать так чтобы стоплосс устанавливался на все ордера, кроме первого бай и первого сел ?

Извеняюсь : первый это тот который открылся раньше всех остальных.
Будем пробовать то что Вы написали.

Парни, вот еще одна задачка:
Требуется находить на графике простую комбинацию из 2-х - 4-х подряд идущих свечей одинакового направления размером не меньше заданного (см. рисунок во вложении).
Т.е. имеем вводные:
BarsCount = задаваемое количество подряд идущих свечей одного направления
BarsPipsMin = минимальный размер свечи в пунктах.

Если находим BarsCount свечей подряд бай, каждая из которых не меньше BarsPipsMin - возвращаем к примеру 1, если то-же селл - возвращаем -1.

Кагбэ я это написал, обычный перебор в цикле со сравнением цен и размеров свечей, задача несложная, НО... получилось довольно громоздко и самое главное - медленно для тестера. Есть какие мысли, как это сделать компактно и быстро?

Парни, вот еще одна задачка:
Требуется находить на графике простую комбинацию из 2-х - 4-х подряд идущих свечей одинакового направления размером не меньше заданного (см. рисунок во вложении).
Т.е. имеем вводные:
BarsCount = задаваемое количество подряд идущих свечей одного направления
BarsPipsMin = минимальный размер свечи в пунктах.

Если находим BarsCount свечей подряд бай, каждая из которых не меньше BarsPipsMin - возвращаем к примеру 1, если то-же селл - возвращаем -1.

Кагбэ я это написал, обычный перебор в цикле со сравнением цен и размеров свечей, задача несложная, НО... получилось довольно громоздко и самое главное - медленно для тестера. Есть какие мысли, как это сделать компактно и быстро?

Ок, вот код:
Входные:
BarCount - количество свечей для проверки
BarPipsMin - минимальный размер свечи в пунктах

         int barBuy = 0;
         int barSell = 0;

         for (int i = 1; i             {
               if (Close > Open)
                  {
                     if(Close - Open >= BarPipsMin * Point)
                        barBuy ++;
                  }
               else if (Close )
                  {
                     if(Open - Close >= BarPipsMin * Point)
                        barSell ++;
                  }                  
            }
        if (barBuy == BarCount)
            return(1);
        else if (barSell == BarCount)
            return(-1);
        else
            return(0); 

Ок, вот код:
Входные:
BarCount - количество свечей для проверки
BarPipsMin - минимальный размер свечи в пунктах

         int barBuy = 0;
         int barSell = 0;

         for (int i = 1; i             {
               if (Close > Open)
                  {
                     if(Close - Open >= BarPipsMin * Point)
                        barBuy ++;
                  }
               else if (Close )
                  {
                     if(Open - Close >= BarPipsMin * Point)
                        barSell ++;
                  }                  
            }
        if (barBuy == BarCount)
            return(1);
        else if (barSell == BarCount)
            return(-1);
        else
            return(0); 

Поскольку детект идет по закрытым свечам, думаю можно еще по аналогии с недавно приведенным примером от Oll добавить вызов этой функции на новом баре а не на каждом тике.

Кстати, кто знает, как получить время тестирования эксперта в тестере? Для последующей оптимизации кода (ну кроме как сидеть с секундомером :) )

Коллеги прошу помощи с советником не могу понять почему не отрабатывает половина функции. Функция заключается в том что если цена пошла в минус на N пунктов то сделка закрывается и открывается в противоположенном направлении с удвоенным лотом и укороченным TP (так сказать что бы перекрыть убыток по закрытой сделке). Не выполняется именно раздел if (OrderType() == OP_SELL) в то время как раздел на OP_BUY отрабатывает отлично. Ни ошибок ни предупреждений программа не выдает.

void Castle()
{
for (int i=0; i {
if (OrderSelect(i,SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic)
{
if (OrderType() == OP_SELL) //--- НЕ ПОНИМАЮ ПОЧЕМУ НЕ ВЫПОЛНЯЕТСЯ
{
if (OrderProfit()*(-1) > Zamok)
{
DeleteOrders();
TP = NormalizeDouble(Ask + (TakeProfit/2) * Point, Digits());
if (!OrderSend(Symbol(), OP_BUY, Lots*2, MarketInfo(OrderSymbol(),MODE_ASK), Slippage, SL, TP, comment, 888, 0, DimGray))
Print("Замок не сформирован ", GetLastError());
}
}
if (OrderType() == OP_BUY) //-- ВЫПОЛНЯЕТСЯ НА УРА
{
if (OrderProfit()*(-1) > Zamok)
{
DeleteOrders();
TP = NormalizeDouble(Bid - (TakeProfit/2) * Point, Digits());
if (!OrderSend(Symbol(), OP_SELL, Lots*2, MarketInfo(OrderSymbol(),MODE_BID), Slippage, SL, TP, comment, 888, 0, DimGray))
Print("Замок не сформирован ", GetLastError());
}
}

}
}
}
}

Всем привет! Не могу понять почему ордера не открываются) В этом деле новичок, нужна помощь.

Мордекай.mq412 скач.

В новых билдах появилась интересная примочка, сейчас при компиляции, выдаёт видимо время разовой прогонки кода. Я ещё не проверял уменьшение времени при оптимизации, но видимо задумано для этого. Правда не совсем понятно, имеется ввиду прогонка основного тела советника или с учётом выхода на функции, так же если имеется множество условий с выходом на функции, не активные в данный момент, то картина опять же не будет чёткой.