DeleteByName

//+------------------------------------------------------------------+
//|                                              DeleteByPreName.mq4 |
//|                                                      Äåíèñ Îðëîâ |
//|                                    http://denis-or-love.narod.ru |
//|Clears the chart of all objects with the name beginning on the specified prefix
//|Äëÿ áûñòðîé î÷èñòêè ãðàôèêà îò îáúåêòîâ ïî íà÷àëó èõ èìåíè        |
//+------------------------------------------------------------------+
#property copyright "Äåíèñ Îðëîâ"
#property link      "http://denis-or-love.narod.ru"


#property show_inputs

extern string PreName ="íàïå÷àòàéòå ïðåôèêñ";
//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
//----
   for(int k=ObjectsTotal()-1; k>=0; k--)  // Ïî êîëè÷åñòâó âñåõ îáúåêòîâ 
     {
      string Obj_Name=ObjectName(k);   // Çàïðàøèâàåì èìÿ îáúåêòà
      string Head=StringSubstr(Obj_Name,0,StringLen(PreName));// Èçâëåêàåì ïåðâûå ñèì

      if (Head==PreName)// Íàéäåí îáúåêò, ..
         {
         ObjectDelete(Obj_Name);
         //Alert(Head+";"+Prefix);
         }                  
     }
//----
   return(0);
  }
//+------------------------------------------------------------------+