Quaisquer perguntas de recém-chegados sobre MQL4 e MQL5, ajuda e discussão sobre algoritmos e códigos - página 44

 
trader781:
#property strict


//+------------------------------------------------------------------+
//|                                                      ProjectName |
//|                                      Copyright 2012, CompanyName |
//|                                       http://www.companyname.net |
//+------------------------------------------------------------------+
extern double Lots=0.01; //Oбьем открываемого ордера
extern double Martin=2;
extern int    Step=200;
extern int    TakeProfit=250;

extern const string Настройки_работы_советника="";

int Period1=6;//Период 1МА
ENUM_APPLIED_PRICE PRICE1=PRICE_MEDIAN;             // 1МА По цене

int Period2=50;//Период 2МА
ENUM_APPLIED_PRICE PRICE2=PRICE_MEDIAN;             // 2МА По цене

int Period3=800;//Период 3МА
ENUM_APPLIED_PRICE PRICE3=PRICE_MEDIAN;             // 3МА По цене

int Period4=25;//Период 4МА
ENUM_APPLIED_PRICE PRICE4=PRICE_MEDIAN;             // 4МА По цене, вспомогательная

uint  X=20;                                                // отклонение от ма, пунктов
int   i;                                                   // исходный счетчик ордеров
bool  dummy;                                               // для выхода функций в переменную
int   ticket;                                            // тикет открываемого ордера
int   Magic=444;                                           // Magic Number
int   lastlot,tp;
double price;
int    count;
int    otype;



int OnInit()
  {
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
  }
void OnTick()
  {
     {
      if(Bars<801) //--- Проверим достаточна ли в истории баров для анализа и разрешение торговли
         return;
     }
//+----------------------------------------------------------------Сборник параметров индикаторов

   double ma1=NormalizeDouble(iMA(NULL,0,Period1,0,MODE_SMA,PRICE1,1),5);  //+----6

   double ma2=NormalizeDouble(iMA(NULL,0,Period2,0,MODE_SMA,PRICE2,1),5);  //+----50

   double ma3=NormalizeDouble(iMA(NULL,0,Period3,0,MODE_SMA,PRICE3,1),5);  //+----800

   double ma31=NormalizeDouble(iMA(NULL,0,Period3,0,MODE_SMA,PRICE3,10),5);   //+----800
   double ma32=NormalizeDouble(iMA(NULL,0,Period3,0,MODE_SMA,PRICE3,20),5);  //+----800
   double ma33=NormalizeDouble(iMA(NULL,0,Period3,0,MODE_SMA,PRICE3,30),5);  //+----800

   double ma4=NormalizeDouble(iMA(NULL,0,Period4,0,MODE_SMA,PRICE4,0),5);  //+----25
//+-----------------------------------------------------------------  Открытие ордеров по 25-50 ма

//+-------------------------------------------------- открыть ордер

   if(Counts()==0)               //+-------------если количество ордеров равно 0
     {
      if((MathAbs(ma2-ma4)>30*_Point)
         && (MathAbs(Bid-ma3)>100*Point())
         && (ma31>ma32>ma33)) //+-----покупка по 6+50
        {
         ticket=OrderSend(Symbol(),OP_BUY,Lots,Ask,0,0,0,"",Magic,0,clrAzure);//+-------------отправка 1 ордера
        }
      if((MathAbs(ma2-ma3)>30*_Point))//+-------------условие продажи
        {
         ticket=OrderSend(Symbol(),OP_SELL,Lots,Bid,0,0,0,"",Magic,0,clrAzure);//+-------------отправка 1 ордера
        }
        if (ticket==0)
            {
            return;
            }
     }
    
      else      //+------------если уже есть
    
        {
         if(FindLastOType()==OP_BUY)
           {
          
            if(Ask<=FindLastOrderOpenPrice()-Step*Point())
              {
               ticket=OrderSend(Symbol(),OP_BUY,(FindLastLot()*Martin),Ask,0,0,0,"",Magic,0,clrAzure);
               ModifyOrders();
               myOrdersCloseTotal();
              }
           }

         if(FindLastOType()==OP_SELL)
           {
          
            if(Bid>=FindLastOrderOpenPrice()+Step*Point())
              {
               ticket=OrderSend(Symbol(),OP_SELL,(FindLastLot()*Martin),Bid,0,0,0,"",Magic,0,clrAzure);
               ModifyOrders();
               myOrdersCloseTotal();
              }
           }
        }
     }
  
//+-------------------------------------------------------------количество ордеров в рынке

int Counts()
  {
   count=0;
   for(i=OrdersTotal()-1; i>=0; i--) //   цикл будет работать пока не останется ордеров
     {
      if((OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) && (OrderSymbol()==Symbol()) && (OrderMagicNumber()==Magic))
        {
         if((OrderType()==OP_BUY || OrderType()==OP_SELL) && (OrderTicket()==ticket))
            count++;
        }
     }
   return(count);
  }
//+---------------------------------------------------------------найти тип последнего ордера
int FindLastOType()
  {
   for(i=OrdersTotal()-1; i>=0; i--) //   цикл будет работать пока не останется ордеров
     {
      if((OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) && OrderSymbol()==Symbol() && (OrderMagicNumber()==Magic))
        {
         if((OrderType()==OP_BUY || OrderType()==OP_SELL) && (OrderTicket()==ticket))
            return(OrderType());
        }
     }
   return(-1);
  }
//+--------------------------------------------------------------вернуть цену последнего открытого ордера

double FindLastOrderOpenPrice()

  {
   int    oldticket;
   ticket=0;
   double oldorderopenprice=0;
   for(i=OrdersTotal()-1; i>=0; i--) //   цикл будет работать пока не останется ордеров
     {
      if((OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) && OrderSymbol()==Symbol() && (OrderMagicNumber()==Magic) && (OrderType()<2))
        {

         oldticket=OrderTicket();
         if(oldticket>ticket)
           {
            ticket=oldticket;
            oldorderopenprice=OrderOpenPrice();
           }
        }

     }
   return(oldorderopenprice);
  }
//+--------------------------------------------------------------вернуть объем последнего ордера
double FindLastLot()
  {
   int oldticket;
   ticket=0;
   double oldlots=0;
   for(i=OrdersTotal()-1; i>=0; i--) //   цикл будет работать пока не останется ордеров
     {
      if((OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) && OrderSymbol()==Symbol() && (OrderMagicNumber()==Magic)
      && (OrderType()==OP_BUY || OrderType()==OP_SELL))
        {
         oldticket=OrderTicket();
         if(oldticket>ticket)
           {
            ticket=oldticket;
            oldlots=OrderLots();
           }

        }

     }
   return(oldlots);
  }
  //+---------------------------------------------------------закрыть все если хоть один из серии закрылся
  
  int myOrdersCloseTotal()


  {
  int myOrderS=0;
   for(i=OrdersTotal()-1; i>0; i--)
     {
      if(((OrderSelect(i,SELECT_BY_POS,MODE_TRADES))==true) && OrderSymbol()==Symbol() && (OrderType()<2))
        {
         myOrderS=OrdersTotal();
        }
        else
        dummy=(OrderClose(OrderTicket(),OrderLots(),Bid,0,White));
     }

   return (myOrderS);
  }

  
  
  
//+------------------------------------------------модификация существующих расчет тейка по средней цене
void ModifyOrders()
  {
   bool   z=true;
   double avg_price=0;
   price=0;
   double orderlots=0;
   for(i=OrdersTotal()-1; i>=0; i--)
     {
      if((OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) && (OrderSymbol()==Symbol())
      && (OrderMagicNumber()==Magic) && (FindLastOType()==OP_BUY))
        {
         price=(OrderOpenPrice()*OrderLots());
         orderlots=FindLastLot();
         avg_price=NormalizeDouble(price/orderlots,Digits);
         tp=(avg_price+TakeProfit*Point()); //+------------------------------------тут деление на 0 второго ордера
         z=OrderModify(OrderTicket(),OrderOpenPrice(),0,tp,0);
         if (!z)
         Print("Ошибка функции модифицирования");
        }
     }

   for(i=OrdersTotal()-1; i>=0; i--)
     {
      if((OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) && (OrderSymbol()==Symbol())
      && (OrderMagicNumber()==Magic) &&(FindLastOType()==OP_SELL))
       {
         price=(OrderOpenPrice()*OrderLots());
         orderlots=FindLastLot();
         avg_price=NormalizeDouble(price/orderlots,Digits);
         tp=(avg_price-TakeProfit*Point());   //+------------------------------------тут деление на 0 второго ордера
         z=OrderModify(OrderTicket(),OrderOpenPrice(),0,tp,0);
         if (!z)
         Print("Ошибка функции модифицирования");
       }
  
  
     }
    

  }







/*    
      
*/

//+------------------------------------------------------------------+

Pronto, bem feito.

E agora as linhas que o compilador está jurando.

 
trader781:

Não quero parecer intrusivo nesta sociedade, mas ninguém nunca me explicou de onde vem 0 nos cálculos?

poste 413

possível perda de dados devido à conversão do tipo count.mq4 231 12

possível perda de dados devido à conversão do tipo count.mq4 246 12

Você é incapaz de entender que TP e lotes não devem ser escritos em uma variável inteira? Por quê?
 
Vitalie Postolache:
Você não consegue entender que as ATs e os lotes não devem ser escritos em uma variável inteira? Por que este é o caso?


Podemos ver como escrever essas coisas corretamente?

 
Artyom Trishkin:
Mais uma vez, você quer saber o que estava no indicador no H1 na última hora, ou quer saber o que está acontecendo no indicador no H1 neste momento?

Você precisa dos valores do indicador, na primeira barra fechada H1.

 
trader781:


Podemos ver como registrar coisas como esta corretamente?

Elementar.
int   lastlot,tp;
double   lastlot,tp;
 
trader781:


Podemos ver como registrar coisas como esta corretamente?

double tp;
Declarar a variável tpcomo sendo do tipo duplo
 
Vitalie Postolache:
.
Alekseu Fedotov:

Obrigado, os erros desapareceram. Mas o bot ainda morre na partida, junto com o terminal, mas sem razão aparente

TestGenerator: erro de dados incomparável (limite de volume 262 em 2016.12.02 12:45 excedido)

TestGenerator: erro de dados incomparável (valor alto 1.10131 em 2016.10.13 10:05 não é alcançado a partir do menor período de tempo, preço alto 1.10123 desajustes)

 
trader781:

Obrigado, os erros desapareceram. Mas o bot ainda morre na partida junto com o terminal, mas sem nenhuma razão aparente

TestGenerator: erro de dados incomparável (limite de volume 262 em 2016.12.02 12:45 excedido)

TestGenerator: erro de dados incomparável (valor alto 1.10131 em 2016.10.13 10:05 não é alcançado a partir do menor período de tempo, preço alto 1.10123 desajustes)

Não é o bot que está "morto", é a história. Aprenda inglês, pelo menos com um dicionário.
 
Vitalie Postolache:
Não é o bot "morrendo", é a história. Aprenda inglês, pelo menos com um dicionário.

E em todos os fumos de uma só vez uma história de merda? Coincidência?

 
trader781:

E em todos os fumos de uma só vez uma história de merda? Coincidência?

Qual é o problema? Sempre foi assim.
Razão: