//+------------------------------------------------------------------+
//|                                                      FiboDay.mq4 |
//|                                              Copyright 2015, AM2 |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2015, AM2"
#property link      "http://www.forexsystems.biz"
#property version   "1.00"
#property strict

double LastOpen=0;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---

//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---

  }
//+------------------------------------------------------------------+
//| Проверяет значения точек привязки "Уровней Фибоначчи" и для      |
//| пустых значений устанавливает значения по умолчанию              |
//+------------------------------------------------------------------+
void ChangeFiboLevelsEmptyPoints(datetime &time1,double &price1,
                                 datetime &time2,double &price2)
  {
//--- если время второй точки не задано, то она будет на текущем баре
   if(!time2)
      time2=TimeCurrent();
//--- если цена второй точки не задана, то она будет иметь значение Bid
   if(!price2)
      price2=SymbolInfoDouble(Symbol(),SYMBOL_BID);
//--- если время первой точки не задано, то она лежит на 9 баров левее второй
   if(!time1)
     {
      //--- массив для приема времени открытия 10 последних баров
      datetime temp[10];
      CopyTime(Symbol(),Period(),time2,10,temp);
      //--- установим первую точку на 9 баров левее второй
      time1=temp[0];
     }
//--- если цена первой точки не задана, то сдвинем ее на 200 пунктов ниже второй
   if(!price1)
      price1=price2-200*SymbolInfoDouble(Symbol(),SYMBOL_POINT);
  }
//+------------------------------------------------------------------+
//| Cоздает "Уровни Фибоначчи" по заданным координатам               |
//+------------------------------------------------------------------+
bool FiboLevelsCreate(const long            chart_ID=0,        // ID графика
                      const string          name="FiboLevels", // имя объекта
                      const int             sub_window=0,      // номер подокна 
                      datetime              time1=0,           // время первой точки
                      double                price1=0,          // цена первой точки
                      datetime              time2=0,           // время второй точки
                      double                price2=0,          // цена второй точки
                      const color           clr=clrRed,        // цвет объекта
                      const ENUM_LINE_STYLE style=STYLE_SOLID, // стиль линии объекта
                      const int             width=1,           // толщина линии объекта
                      const bool            back=false,        // на заднем плане
                      const bool            selection=true,    // выделить для перемещений
                      const bool            ray_right=false,   // продолжение объекта вправо
                      const bool            hidden=true,       // скрыт в списке объектов
                      const long            z_order=0)         // приоритет на нажатие мышью
  {
//--- установим координаты точек привязки, если они не заданы
   ChangeFiboLevelsEmptyPoints(time1,price1,time2,price2);
//--- сбросим значение ошибки
   ResetLastError();
//--- создадим "Уровни Фибоначчи" по заданным координатам
   if(!ObjectCreate(chart_ID,name,OBJ_FIBO,sub_window,time1,price1,time2,price2))
     {
      Print(__FUNCTION__,
            ": не удалось создать \"Уровни Фибоначчи\"! Код ошибки = ",GetLastError());
      return(false);
     }
//--- установим цвет
   ObjectSetInteger(chart_ID,name,OBJPROP_COLOR,clr);
//--- установим стиль линии
   ObjectSetInteger(chart_ID,name,OBJPROP_STYLE,style);
//--- установим толщину линии
   ObjectSetInteger(chart_ID,name,OBJPROP_WIDTH,width);
//--- отобразим на переднем (false) или заднем (true) плане
   ObjectSetInteger(chart_ID,name,OBJPROP_BACK,back);
//--- включим (true) или отключим (false) режим выделения объекта для перемещений
//--- при создании графического объекта функцией ObjectCreate, по умолчанию объект
//--- нельзя выделить и перемещать. Внутри же этого метода параметр selection
//--- по умолчанию равен true, что позволяет выделять и перемещать этот объект
   ObjectSetInteger(chart_ID,name,OBJPROP_SELECTABLE,selection);
   ObjectSetInteger(chart_ID,name,OBJPROP_SELECTED,selection);
//--- включим (true) или отключим (false) режим продолжения отображения объекта вправо
   ObjectSetInteger(chart_ID,name,OBJPROP_RAY_RIGHT,ray_right);
//--- скроем (true) или отобразим (false) имя графического объекта в списке объектов
   ObjectSetInteger(chart_ID,name,OBJPROP_HIDDEN,hidden);
//--- установи приоритет на получение события нажатия мыши на графике
   ObjectSetInteger(chart_ID,name,OBJPROP_ZORDER,z_order);
//--- успешное выполнение
   return(true);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double up=iHigh(NULL,PERIOD_D1,1);
   double dn=iLow(NULL,PERIOD_D1,1);
   if(LastOpen!=Open[0])
     {
      if(Open[1]<up && Close[1]>up) Alert(Symbol()+" Пробили верхний стольник!!!");
      if(Open[1]>dn && Close[1]<dn) Alert(Symbol()+" Пробили нижний стольник!!!");
      LastOpen=Open[0];
     }

   ObjectDelete(0,"Fibo");
   FiboLevelsCreate(0,"Fibo",0,Time[0],up,Time[1],dn,Red,STYLE_SOLID,1,false,true,false,false,0);
   ObjectSet("Fibo",OBJPROP_FIBOLEVELS,8);

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+0,0.0);
   ObjectSetFiboDescription("Fibo",0,"100.0  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+1,1.0);
   ObjectSetFiboDescription("Fibo",1,"100.0  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+2,1.236);
   ObjectSetFiboDescription("Fibo",2,"123.6  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+3,-0.236);
   ObjectSetFiboDescription("Fibo",3,"123.6  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+4,1.382);
   ObjectSetFiboDescription("Fibo",4,"138.2  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+5,-0.382);
   ObjectSetFiboDescription("Fibo",5,"138.2  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+6,1.618);
   ObjectSetFiboDescription("Fibo",6,"161.8  (%$)");

   ObjectSet("Fibo",OBJPROP_FIRSTLEVEL+7,-0.618);
   ObjectSetFiboDescription("Fibo",7,"161.8  (%$)");
  }
//+------------------------------------------------------------------+

осталось только сделать сигнал 1 раз в день.
может доделайте? пожалуйста

он тянет сетку по уровням верно, но сетка ложится неверно и получается невозможность работать