Вопрос по Cycle Lines

Новый комментарий
 
Привет всем!
подскажите пожайлуста как поставить Vertical Line по всему графику в определенное время (например в 8.00 на M30). Cycle Lines делает так не совсем корректно - через определенное количество баров, а на 30-минутках количество баров одного дня не всегда совпадает с другим днем...
 
а никак.

если только написать свой индюк, который палки вертикальный рисует сам.
 
Проще скриптом ;)
 
Кто может написать такой индюк или скрипт подскажите плиз
:)
  
//+------------------------------------------------------------------+
//|                                                  Cycle Lines.mq4 |
//|                                      Copyright © 2005, komposter |
//|                                      mailto:komposterius@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, komposter"
#property link      "mailto:komposterius@mail.ru"
#property show_inputs
extern int hour = 8;
extern color LineColor = Red;
extern int LineWigth = 1;
extern int LineStyle = 0;

int start()
{
	for ( int i = Bars - 1; i >= 0; i -- )
	{
		if ( TimeHour(Time[i]) == hour ) break;
	}

	datetime TimeNow;
	int x;
	for ( TimeNow = Time[i], x = 0; TimeNow <= Time[0]; TimeNow += 86400, x++ )
	{
		ObjectCreate( "CycleLine" + x, OBJ_VLINE, 0, TimeNow, 0.0, 0, 0.0 );
		ObjectSet( "CycleLine" + x, OBJPROP_TIME1, TimeNow );
		ObjectSet( "CycleLine" + x, OBJPROP_COLOR, LineColor );
		ObjectSet( "CycleLine" + x, OBJPROP_WIDTH, LineWigth );
		if ( LineWigth == 1 ) { ObjectSet( "CycleLine" + x, OBJPROP_STYLE, LineStyle ); }
	}
	ObjectsRedraw();
	Print( "Нарисовано ", x, " линий" );
return(0);
}
 
Для очистки графика только от этих линий:
//+------------------------------------------------------------------+
//|                                           Delete Cycle Lines.mq4 |
//|                                      Copyright © 2005, komposter |
//|                                      mailto:komposterius@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, komposter"
#property link      "mailto:komposterius@mail.ru"

int start()
{
	for ( int x = 0; x < 10000; x ++ ) ObjectDelete("CycleLine" + x);
return(0);
}
 
у меня такой скрипт..
#property copyright "Copyright © 2005, Myxu"
#define sut 86400
#define chas 3600
string on(int t){return("Утро "+TimeDay(t)+"/"+TimeMonth(t)); }
//********************************************************************
int start()  {double pp1,pp2; int a,b,c,t,tt1,tt2,tt3,i;t=Time[0]+10*sut; t=t-t%sut; tt1=6*chas+0*60;tt2=8*chas+0*60;tt3=7*chas+10*60;
//********************************************************************
//   if ((TimeOnDropped()%sut)/chas==7) 
   if (ObjectFind(on(t-5*sut)+"l")==0) {
      for(i=0;i<220;i++){
         ObjectDelete(on(t)+"r"); ObjectDelete(on(t)+"l"); ObjectDelete(on(t)+"ll"); 
         ObjectDelete(on(t)+"a"); ObjectDelete(on(t)+"a+");
         ObjectDelete(on(t)+"a1"); ObjectDelete(on(t)+"a2");   
         t-=sut;
      }
   }else {
      for(i=0;i<120;i++){
          pp1=Close[iBarShift(0,0,t+tt3)]+25*Point; pp2=pp1-50*Point;
          ObjectCreate(on(t)+"r",OBJ_RECTANGLE,0,t+tt1,pp1,t+tt2,pp2);
          ObjectSet(on(t)+"r", OBJPROP_COLOR, SeaGreen);
          ObjectSet(on(t)+"r", OBJPROP_STYLE, 0);
          ObjectSet(on(t)+"r", OBJPROP_BACK,false);
          if(TimeDayOfWeek(t+tt1)==5) ObjectSet(on(t)+"r", OBJPROP_COLOR, MediumBlue);

          ObjectCreate(on(t)+"l",OBJ_VLINE,0,t+tt3,1.22);
          ObjectSet(on(t)+"l", OBJPROP_COLOR, MediumOrchid);
          ObjectSet(on(t)+"l", OBJPROP_STYLE, 0);

          ObjectCreate(on(t)+"ll",OBJ_VLINE,0,t+tt3-60*40,1.22);
          ObjectSet(on(t)+"ll", OBJPROP_COLOR, MediumOrchid);
          ObjectSet(on(t)+"ll", OBJPROP_STYLE, 0);
          
          ObjectCreate(on(t)+"a",OBJ_VLINE,0,t+13*chas+30*60,1.22);
          ObjectSet(on(t)+"a", OBJPROP_COLOR, DarkOrange);
          ObjectSet(on(t)+"a", OBJPROP_STYLE, STYLE_DASHDOTDOT);

          ObjectCreate(on(t)+"a+",OBJ_VLINE,0,t+14*chas+30*60,1.22);
          ObjectSet(on(t)+"a+", OBJPROP_COLOR, DarkOrange);
          ObjectSet(on(t)+"a+", OBJPROP_STYLE, STYLE_DOT);

          ObjectSetVisibility(on(t)+"r",7);
          ObjectSetVisibility(on(t)+"l",7);
          ObjectSetVisibility(on(t)+"ll",7);
          ObjectSetVisibility(on(t)+"a",7);
          ObjectSetVisibility(on(t)+"a+",7);
          

         t-=sut;
      }
   }
}


чтоб на M30 было его видно, нужно вместо семёрок поставить или "15" или "31", не помню..

Новый комментарий