ClearTP_ALL

//+------------------------------------------------------------------+
//|                                                  ClearTP_ALL.mq4 |
//|                                   Copyright © 2008, Serega Lykov |
//|                                       http://mtexperts.narod.ru/ |
//+------------------------------------------------------------------+

#property copyright "Copyright © 2008, Serega Lykov"
#property link      "http://mtexperts.narod.ru/"

int start()
  {
   Comment("Script ClearTP_ALL is run...");
   int total = OrdersTotal() - 1;
   for(int i=total; i>=0; i--) if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES) == true) if(OrderTakeProfit() != 0) bool err = OrderModify(OrderTicket(),OrderOpenPrice(),OrderStopLoss(),0,OrderExpiration(),CLR_NONE);
  }

int deinit()
  {
   Comment("");
  }

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