Поомогите пожалуста доработать индикатор

[[Удален]]

Это полуавтоматический индикатор, должен рисовать горизонтальную линию для каждой нарисованной вручную трендовой линии. Пока что рисует только на одной.

//+------------------------------------------------------------------+
//|                                               DobDisHalfAuto.mq4 |
//|                                               Copyright © L-user |
//|                                                       22.04.2010 | 
//|                                                   Описание: link | 
//+------------------------------------------------------------------+
string str="DobDisHalfAuto.mq4";
#property copyright "L-user"
#property link ""
#property indicator_chart_window

void init()
{
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+

int start()
{
  ObjectDelete("PriceTarget A");

int obj_total=ObjectsTotal();
for(int k=0;k<obj_total;k++)
  {

double time1=ObjectGet(ObjectName(k), OBJPROP_TIME1);
double time2=ObjectGet(ObjectName(k), OBJPROP_TIME2);
double time3=ObjectGet(ObjectName(k), OBJPROP_TIME3);

double price1=ObjectGet(ObjectName(k), OBJPROP_PRICE1);
double price2=ObjectGet(ObjectName(k), OBJPROP_PRICE2);
double price3=ObjectGet(ObjectName(k), OBJPROP_PRICE3);

ObjectSet(ObjectName(k), OBJPROP_PRICE3, price2+(price2-price1));
ObjectSet(ObjectName(k), OBJPROP_TIME3, time2+(time2-time1));

//------------------------------------------------------------------------------------------

ObjectCreate("PriceTarget A", OBJ_HLINE, 0, time3, price3);
ObjectSet("PriceTarget A", OBJPROP_COLOR, Blue); 
ObjectSet("PriceTarget A", OBJPROP_BACK, true);
ObjectSet("PriceTarget A", OBJPROP_WIDTH, 1);
ObjectSet("PriceTarget A", OBJPROP_STYLE, STYLE_DOT);    
         
}   
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {

   return(0);
  }

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

Пробовал так:

ObjectCreate("PriceTarget A"+k, OBJ_HLINE, 0, time3, price3);
ObjectSet("PriceTarget A"+k, OBJPROP_COLOR, Blue); 
ObjectSet("PriceTarget A"+k, OBJPROP_BACK, true);
ObjectSet("PriceTarget A"+k, OBJPROP_WIDTH, 1);
ObjectSet("PriceTarget A"+k, OBJPROP_STYLE, STYLE_DOT); 

...но с каждым тиком рисовалось дополнительно по одной лишней линии.