TS

//+------------------------------------------------------------------+
//|                                                     Scalping.mq4 |
//|                      Copyright © 2005, MetaQuotes Software Corp. |
//|                                        http://www.scalping.nm.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, MetaQuotes Software Corp."
#property link      "http://www.scalping.nm.ru"

//---- input parameters
extern int       TS=25;
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//---- 
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//---- 
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
   int cnt;
//---- 
if (TS<5)
   {
   Print("Ìàëåíüêèé òðåéëèíã");
   return(0);
   } 
for(cnt=0;cnt<OrdersTotal();cnt++)
{
   if (OrderSelect(cnt,SELECT_BY_POS)==true)
   {
      if (OrderSymbol()==Symbol())
      {
         if (OrderType()==OP_BUY)
         {
            if (Bid-OrderOpenPrice()>TS*Point)
            {
               if (OrderStopLoss()<Bid-TS*Point)
               {
                  OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TS*Point,OrderTakeProfit(),0,Red);
               }
            }
         }
         if (OrderType()==OP_SELL)
         {
            if (Ask-OrderOpenPrice()>TS*Point)
            {
               if (OrderStopLoss()<Ask-TS*Point)
               {
                  OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TS*Point,OrderTakeProfit(),0,Blue);
               }
            }
         }
      }
   }
}
//----
   return(0);
  }
//+------------------------------------------------------------------+