Доработка советников: общая тема📌

/+------------------------------------------------------------------+
//| Догонялки |
//|
//|
//+------------------------------------------------------------------+
#property copyright "Copyright 2013, MetaQuotes Software Corp."
#property link "http://www.metaquotes.net"


extern double Lots = 0.1; // лот
extern int StopLoss = 50; // профит
extern int Step = 50; // шаг сетки
extern double Multipller = 1.0; // множитель
extern int Slippage = 5; // проскальзывание в пунктах
extern int Magic = 123; // магик
extern int Peri = 14; // период
extern int Otstup = 10; // отступ
extern int Otstup2 = 24; // отступ
extern int TrallingStep = 10;

int ticket; // для модификации ордеров
double price, SL, lastlot; // цена для расчёта, ТР для расчёта (определяем)
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init()
{
if (Digits == 3 || Digits == 5) // проверка если либо 3 либо 5 после запятой - то...
{
StopLoss *= 10; // ... мы умножаем ТР на 10...
Step *= 10; // ... и тоже самое с Шагом сетки
Slippage *= 10; // ... и для проскальзывания
Otstup *= 10; // отступ
Otstup2 *= 10; // отступ
TrallingStep *= 10;

}
return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start() // начало работы совы
{
Tralling();

if (CountTrades() == 0) // если кол-во ордеров = нулю, то ...
{
double ima = iMA(Symbol(), PERIOD_M30, Peri, 0, MODE_SMA, PRICE_CLOSE, 1); // МА символ, период, сдвиг вид, по ценам закрытия, прошлая свеча

if (Ask > ima) // если цена выше ма. то
{
ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, Slippage, 0, 0, "", Magic, 0, Blue); // открываем ордер на покупку на паре,опенбай, лотом, по цене аск
if (ticket > 0) // если ордеров больше 0, то...
{
SL = NormalizeDouble(ima, Digits); // ... вычисляем стоп лосс....
OrderModify(ticket, OrderOpenPrice(), SL, 0, 0); // ... и модифицируем ордер.
}
}
else if (Bid {
ticket = OrderSend(Symbol(), OP_SELL, Lots, Bid, Slippage, 0, 0, "", Magic, 0, Red); // открываем ордер на покупку на паре,опенбай, лотом, по цене аск
if (ticket > 0) // если ордеров больше 0, то...
{
SL = NormalizeDouble(ima, Digits); // ... вычисляем стоп лосс....
OrderModify(ticket, OrderOpenPrice(), SL, 0, 0); // ... и модифицируем ордер.
}
}
}
else // если нужно доливать
{
int order_type = FindLastOrderType();
if (order_type == OP_BUY)
{
price = FindLastPrice(OP_BUY);
if (Ask >= price + Step * Point)
{
lastlot = FindLastLots(OP_BUY);
lastlot = NormalizeDouble(lastlot * Multipller, 2);
ticket = OrderSend(Symbol(), OP_BUY, lastlot, Ask, Slippage, 0, 0, "", Magic, 0, Blue);
if (ticket > 0)
ModifyOrders(OP_BUY);
}
}
else if (order_type == OP_SELL)
{
price = FindLastPrice(OP_SELL);
if (Bid {
lastlot = FindLastLots(OP_SELL);
lastlot = NormalizeDouble(lastlot * Multipller, 2);
ticket = OrderSend(Symbol(), OP_SELL, lastlot, Bid, Slippage, 0, 0, "", Magic, 0, Red);
if (ticket > 0)
ModifyOrders(OP_SELL);
}
}
}


return(0);
}
//+------------------------------------------------------------------+
void Tralling()
{
double ima1 = iMA(Symbol(), PERIOD_M30, Peri, 0, MODE_SMA, PRICE_CLOSE, 1);

for (int i=0; 0 {
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic && OrderType())
{
SL = NormalizeDouble(ima1, Digits);
if (OrderStopLoss() != SL)
OrderModify(OrderTicket(), OrderOpenPrice(), SL, 0, 0);
}
}
}
}


//+------------------------------------------------------------------+
void ModifyOrders(int otype)
{
double avgprice = 0,
order_lots = 0,
ima2 = iMA(Symbol(), PERIOD_M30, Peri, 0, MODE_SMA, PRICE_CLOSE, 1);

price = 0;
for (int i=OrdersTotal()-1; i>=0; i--)
{
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic && OrderType() == otype)
{
price += OrderOpenPrice() * OrderLots();
order_lots += OrderLots();
}
}
}

avgprice = NormalizeDouble(ima2, Digits);

if (otype == OP_BUY) SL = NormalizeDouble(avgprice, Digits);
if (otype == OP_SELL) SL = NormalizeDouble(avgprice, Digits);

for (i=OrdersTotal()-1; i>=0; i--)
{
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic && OrderType() == otype)
OrderModify(OrderTicket(), OrderOpenPrice(), SL, 0, 0);
}
}
}
//+------------------------------------------------------------------+
double FindLastLots(int otype)
{
double oldlots;
int oldticket;

ticket = 0;
for(int i = OrdersTotal()-1; i>=0; i--)
{
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic && OrderType() == otype)
{
oldticket = OrderTicket();
if (oldticket > ticket)
{
oldlots = OrderLots();
ticket = oldticket;
}
}
}
}
return(oldlots);
}
//+------------------------------------------------------------------+
double FindLastPrice(int otype)
{
double oldopenprice;
int oldticket;

ticket = 0;
for(int i=OrdersTotal()-1; i>=0; i--)
{
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic && OrderType() == otype)
{
oldticket = OrderTicket();
if (oldticket > ticket)
{
oldopenprice = OrderOpenPrice();
ticket = oldticket;
}
}
}
}
return(oldopenprice);
}
//+------------------------------------------------------------------+
int FindLastOrderType()
{
for (int i=OrdersTotal()-1; i>=0; i--)
{
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic)
return(OrderType());
}
}
return(-1);
}
//+------------------------------------------------------------------+
int CountTrades() // описываем саму функцию CountTrades
{
int count = 0; // пока ордеорв у нас нет, переменная каунт=0
for (int i=OrdersTotal()-1; i>=0; i--)
{
if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) // проверяем выбрани ли ордер
{
if (OrderSymbol() == Symbol() && OrderMagicNumber() == Magic) // проверяем наш ли это ордер по паре и магику
count++; // если да то добавляем 1
}
}

return(count); // возвращаем изменённую переменную каунт
}
//+------------------------------------------------------------------+