History_Draw_Delete

//+------------------------------------------------------------------+
//|                                                          111.mq4 |
//|                                          Copyright © 2007, DRKNN |
//|                                                    drknn@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2007, DRKNN"
#property link      "drknn@mail.ru"
#include <Errors.mqh>
//#property show_inputs
//extern int ChisloSvech=300;
/*
  Ñêðèïò ïðîõîäèò ïî èñòîðèè ñäåëîê è íàíîñèò íà ãðàôèê ñòàòèñòèêó òîðãîâ êàê â òåñòåðå.
*/

//+------------------------------------------------------------------+
//|                 Íà÷àëî ðàáîòû ñêðèïòà                            |
//+------------------------------------------------------------------+
int start()
  {
  
  string SMB=Symbol();
  double OpenBuy=0.0,CloseBuy=0.0,OpenSell=0.0,CloseSell=0.0;//êîîðäèíàòû îòðåçêîâ
  int i,Ticket;
  int HistTotal=0;
  string L_name,Tip,Open_name,Close_name;
  datetime TimeOpenBuy=0,TimeCloseBuy=0,TimeOpenSell=0,TimeCloseSell=0;
  HistTotal=OrdersHistoryTotal();
  //Alert("HistTotal = ",HistTotal);
  for (i=0; i<HistTotal; i++) {//Íà÷àëî öèêëà
    if (!OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)) {WriteError(i);}
    if (OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)) {//íà÷àëî ðàáîòû ñ âûáðàííûì îðäåðîì
      if(OrderSymbol()!=SMB){continue;}
      
      if(OrderType()==OP_BUY ){
      // ------------- ïîëó÷àåì ïàðàìåòðû ëèíèé --------------
        OpenBuy=OrderOpenPrice();
        CloseBuy=OrderClosePrice();
        Ticket=OrderTicket();
        TimeOpenBuy=OrderOpenTime();
        TimeCloseBuy=OrderCloseTime();
        // ---- ãåíåðèðóåì èìåíà îáúåêòîâ ------
        Tip="Buy";//òèï ñäåëêè
        L_name="L_"+Tip+" ¹ "+Ticket;
        Open_name="Open"+Tip+" ¹ "+Ticket;//ñòðåëêà, îòêðûâàþùàÿ ñäåëêó
        Close_name="Close"+Tip+" ¹ "+Ticket;//ñòðåëêà, çàêðûâàþùàÿ ñäåëêó
        // ---- óäàëÿåì îòêðûâàþùóþ ñòðåëêó ------------
        ObjectDelete(Open_name);//îòêðûâàþùàÿ ñòðåëêà Áàé-îðäåðà
        // ---- óäàëÿåì çàêðûâàþùóþ ñòðåëêó ------------
        ObjectDelete(Close_name);//çàêðûâàþùàÿ ñòðåëêà Áàé-îðäåðà
        // ---- óäàëÿåì ëèíèè ------------ 
        ObjectDelete(L_name);//
      }
      if(OrderType()==OP_SELL){
        // ------------- ïîëó÷àåì ïàðàìåòðû ëèíèé ------------
        OpenSell=OrderOpenPrice();
        CloseSell=OrderClosePrice();
        Ticket=OrderTicket();
        TimeOpenSell=OrderOpenTime();
        TimeCloseSell=OrderCloseTime();
        // ---- ãåíåðèðóåì èìåíà îáúåêòîâ ------
        Tip="Sell";//òèï ñäåëêè
        L_name="L_"+Tip+" ¹ "+Ticket;
        Open_name="Open"+Tip+" ¹ "+Ticket;//ñòðåëêà, îòêðûâàþùàÿ ñäåëêó
        Close_name="Close"+Tip+" ¹ "+Ticket;//ñòðåëêà, çàêðûâàþùàÿ ñäåëêó
        // ---- óäàëÿåì îòêðûâàþùóþ ñòðåëêó ------------
        ObjectDelete(Open_name);//îòêðûâàþùàÿ ñòðåëêà Sell-îðäåðà
        // ---- óäàëÿåì çàêðûâàþùóþ ñòðåëêó ------------
        ObjectDelete(Close_name);//çàêðûâàþùàÿ ñòðåëêà Sell-îðäåðà
        // ---- óäàëÿåì ëèíèè ------------
        ObjectDelete(L_name);//
        
        
      }  
    
    //Print("L_name = ",L_name);
    //ObjectCreate
    }//êîíåö ðàáîòû ñ âûáðàííûì îðäåðîì
  }//Êîíåö öèêëà
  
  
   return(0);
  }
//+------------------------------------------------------------------+
//|                 Êîíåö ðàáîòû ñêðèïòà                             |
//+------------------------------------------------------------------+