//+------------------------------------------------------------------+
//| Time_Go! .mq4 |
//| |
//| Dobryjj |
//+------------------------------------------------------------------+
#property copyright ""
#property link ""
/*=====INPUT parameters=====*/
extern int A=50; //откладываемое расстояние
double pr0,prp,Hight,low;
double V,kt,per,price;
int i0,ip;
datetime tp,t0,time;
/*==========================*/
int init()
{
per=Period();
kt=per;
t0=WindowTimeOnDropped();
i0=iBarShift(Symbol(),Period(),t0); // считываем
pr0=Close[i0];
ip=i0+40;
tp=Time[ip];
prp=Close[ip];
if(ObjectFind("LineV")==-1)
{
ObjectCreate("LineV",2,0,tp,prp,t0,pr0); //Рисуем трендовую линию
ObjectSet ("LineV",OBJPROP_COLOR,Blue);
ObjectSet ("LineV", OBJPROP_RAY,False);
}
if(ObjectFind("LineW")==-1)
{
ObjectCreate( "LineW",OBJ_ARROW,0,0,0); //Рисуем Вертикальную линию
ObjectSetText("LineW","text",12,"Arial",Blue);
ObjectSet("LineW",OBJPROP_ARROWCODE,89);
ObjectSet("LineW",OBJPROP_WIDTH,2);
ObjectSet("LineW",OBJPROP_COLOR,Blue);
}
return(0);
}
/*==========================================================*/
int start()
{
while(IsStopped()==false)
{
tp=ObjectGet("LineV",OBJPROP_TIME1);
t0=ObjectGet("LineV",OBJPROP_TIME2);
prp=ObjectGet("LineV",OBJPROP_PRICE1);
pr0=ObjectGet("LineV",OBJPROP_PRICE2);
ip=iBarShift(Symbol(),Period(),tp);
i0=iBarShift(Symbol(),Period(),t0);
if (t0>Time[0]) i0=(Time[0]-t0)/60/per;
/*------------------------------------------*/
prp=ObjectGet("LineV",OBJPROP_PRICE1);
pr0=ObjectGet("LineV",OBJPROP_PRICE2);
pr0=NormalizeDouble(pr0,4);
prp=NormalizeDouble(prp,4);
/*------------------------------------------*/
//перерисовываем
int degre_75=75;
Ris(degre_75,"1234");
}
return(0);
}
/*==========================================================*/
int deinit()
{
ObjectDelete("LineV");
ObjectDelete("LineW");
}
/*==========================================================*/
int Ris(int xxx,string text)
{
time = Time[i0-xxx];
price=iHigh(Symbol(),PERIOD_D1,2);
ObjectSet( "LineW",OBJPROP_TIME1,time);
ObjectSet( "LineW",OBJPROP_PRICE1,price);
ObjectSetText("LineW",text,12,"Arial",Blue);
return(0);
}