Нужна помощь - страница 3

Новый комментарий
 
Держи Комсомольчанин:
//+------------------------------------------------------------------+
//|                                            КОМСА РУЛИТ 1000%.mq4 |
//|                                                      meta-trader |
//|                              http://www.meta-trader2007.narod.ru |
//+------------------------------------------------------------------+
#property copyright "meta-trader"
#property link      "http://www.meta-trader2007.narod.ru"
extern string a = "Если mach = false, то переворот будет 1 раз, если true, то бесконечное кол-во раз ";
extern bool mach = false;
extern double n=1.4000;
extern string a2="Opдера";
extern int TakeProfit = 50;
extern int Stoploss = 30; 
extern string a3="Магическое число ордера (для поз открытых в ручную - всегда 0)";
extern int MAGIC=0;
static int prevtime = 0; 
extern string a4= "Проскальзывание";
extern int slippage=10;
double Lots;
int start()
  {
//----
if (mach == false && prevtime ==1)return(0);
int cnt;
int total=OrdersTotal();
  
   for(cnt=0;cnt<total;cnt++)
     {
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if(OrderType()<=OP_SELL &&  OrderSymbol()==Symbol() && OrderMagicNumber() == MAGIC)  
        {
        Lots=OrderLots();
         if(OrderType()==OP_BUY)   
           {
            if(Bid==n  )
                {
                 OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet); // close position
                 Prodaza ();
                 prevtime = 1;
                 return(0); 
                }
 
           }
         else 
           {
            if( Ask==n)
              {
               OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet); // close position
               Pokypka ();
               prevtime = 1;
               return(0); 
              }
 
           }
        }
     }
//----
   return(0);
  }
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
// Покупку делаем как в магазине :)
//+------------------------------------------------------------------+
 void Pokypka ()
 {
   int ticket;
   RefreshRates();
   ticket=OrderSend(Symbol(),OP_BUY,Lots,NormalizeDouble(Ask,Digits),slippage,NormalizeDouble((Bid-Stoploss*Point),Digits),NormalizeDouble((Ask+TakeProfit*Point),Digits),"Neuron systems",MAGIC,0,Green);
 
   if(ticket>0)
     {
      if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("Купили! : ",OrderOpenPrice());
          
     }
     else Print("Ошибка при покупке : ",GetLastError()); 
   return(0); 
 }
//+------------------------------------------------------------------+
// Будем продавать то есть барыжничить!
//+------------------------------------------------------------------+ 
void Prodaza ()
{  
  int ticket;
  RefreshRates();
  ticket=OrderSend(Symbol(),OP_SELL,Lots,NormalizeDouble(Bid,Digits),slippage,NormalizeDouble((Ask+Stoploss*Point),Digits),NormalizeDouble((Bid-TakeProfit*Point),Digits),"Neuron systems",MAGIC,0,Red);
 
   if(ticket>0)
    {
     if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) Print("Продали!: ",OrderOpenPrice());
           
    }
   else Print("Ошибка при продаже : ",GetLastError()); 
  return(0); 
}
Вроде без ошибок, но лучше на демке проверить.
 
meta-trader2007 писал (а):
Комса рулит. Ёу! :)

Большое спасибо за советник!!!
123
Новый комментарий