1_Minute

//+------------------------------------------------------------------+
//|                                                     %_Minute.mq4 |
//|                                                            Verdi |
//|                                                  nemo811@mail.ru |
//+------------------------------------------------------------------+

// Ñêðèïò âûâîäèò % çàêðûòûõ ñäåëîê äëèòåëüíîñòüþ íå áîëåå N_Minute ìèíóò

#property copyright "Verdi"
#property link      "nemo811@mail.ru, www.mt4.ucoz.com"
#property show_inputs

extern int N_Minute = 3;

int start()
  {
   int OrdClose=OrdClose_b();
   int OrdCloseT=OrdCloseT_b();
   double $3M=0;
   if (OrdClose>0 && OrdCloseT>0)
   {$3M=NormalizeDouble(OrdCloseT*100/OrdClose,2);}
   Alert(" ",$3M," %\n www.mt4.ucoz.com");
   return(0);
  }
//+------------------------------------------------------------------+

int OrdCloseT_b()
 {
  int OrdCloseT=0;
  datetime OrdOpenTime=0;
  datetime OrdCloseTime=0;
  int i;
  for(i=OrdersHistoryTotal()-1;i>=0;i--)
   {
    if (OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) == true)
     {
      if(OrderType()==OP_BUY || OrderType()==OP_SELL)
       {
        if(OrdOpenTime<OrderOpenTime())
         {
          OrdOpenTime=OrderOpenTime();
         } 
        if(OrdCloseTime<OrderCloseTime())
         {
          OrdCloseTime=OrderCloseTime();
         } 
        if(OrdOpenTime>0 && OrdCloseTime>0 && OrdCloseTime-OrdOpenTime<=N_Minute*60)
         {
          OrdCloseT++;
         }  
       }          
     }
    OrdOpenTime=0;
    OrdCloseTime=0;
   }
   return(OrdCloseT);
 }
 
int OrdClose_b()
 {
  int OrdClose=0;
  int i;
  for(i=OrdersHistoryTotal()-1;i>=0;i--)
   {
    if (OrderSelect(i,SELECT_BY_POS,MODE_HISTORY) == true)
     {
      if(OrderType()==OP_BUY || OrderType()==OP_SELL)
       {
        OrdClose++;
       }          
     }
   }
   return(OrdClose);
 }