Day_Hight_Low

ÿþ//+------------------------------------------------------------------+

//|                                                Day_Hight_Low.mq5 |

//|                        Copyright 2015, MetaQuotes Software Corp. |

//|                                             https://www.mql5.com |

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

#property script_show_inputs

//--- input parameters

input datetime Day;

input color    Day_level=clrDarkViolet;

input color    Night_Level=clrRoyalBlue;

input bool     Night_Session=true;

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

//| Script program start function                                    |

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

void OnStart()

  {

   datetime TStart,TDay,TNight;

   MqlDateTime STRTime;

   int IStart,IDay,INight;

   int IDayHight,IDayLow,INightHight,INightLow;

   double MHightD[1],MLowD[1],MHightN[1],MLowN[1];



//---

   TimeToStruct(Day,STRTime);

   STRTime.hour= 10;

   STRTime.min = 0;

   TStart=StructToTime(STRTime);

   STRTime.hour= 18;

   STRTime.min = 40;

   TDay=StructToTime(STRTime);

   STRTime.hour= 23;

   STRTime.min = 45;

   TNight=StructToTime(STRTime);

//Print (TStart, TDay, TNight);

   IStart=iBarShift(NULL,PERIOD_CURRENT,TStart,true);

   IDay=iBarShift(NULL,PERIOD_CURRENT,TDay,true);

   INight=iBarShift(NULL,PERIOD_CURRENT,TNight,true);

//Print ("IStart = ", IStart , " IDay = ", IDay, " INight = ",INight);

   IDayHight=iHighest(NULL,0,MODE_HIGH,IStart-IDay+1,IDay);

   IDayLow=iLowest(NULL,0,MODE_LOW,IStart-IDay+1,IDay);

   INightHight=iHighest(NULL,0,MODE_HIGH,IStart-INight+2,INight);

   INightLow=iLowest(NULL,0,MODE_LOW,IStart-INight+2,INight);

   CopyHigh(NULL,0,IDayHight,1,MHightD);

   CopyHigh(NULL,0,INightHight,1,MHightN);

   CopyLow(NULL,0,IDayLow,1,MLowD);

   CopyLow(NULL,0,INightLow,1,MLowN);

//Print ("Hight 4=O = ",MHightD[0]," - ",IDayHight," Low 4=O = ", MLowD[0], " - ",IDayLow," Hight A 25G5@>< = ", MHightN[0], " - ",INightHight, " Low A 25G5@>< = ",MLowN[0], " - ",INightLow);

   ObjectCreate(0,"NOFX_DH",OBJ_HLINE,0,IStart,MHightD[0]);

   ObjectSetInteger(0,"NOFX_DH",OBJPROP_COLOR,Day_level);

   ObjectSetInteger(0,"NOFX_DH",OBJPROP_HIDDEN,false);

   ObjectCreate(0,"NOFX_DL",OBJ_HLINE,0,IStart,MLowD[0]);

   ObjectSetInteger(0,"NOFX_DL",OBJPROP_COLOR,Day_level);

   ObjectSetInteger(0,"NOFX_DL",OBJPROP_HIDDEN,false);



   if(Night_Session)//5A;8 2:;NG5= CGQB =>G=>9 A5AA88, B> 4>@8A>2K205< =>G=K5 M:AB@5<C<K 5A;8 >=8 2KE>4OB 70 @0<:8 4=O

     {

      if(MHightD[0]<MHightN[0])//5A;8 4=52=>9 <0:A8<C< <5=LH5 =>G=>3> B> 4>@8A>2K205< C@>25=L 25G5@=53> <0:A8<C<0

        {

         ObjectCreate(0,"NOFX_NH",OBJ_HLINE,0,IStart,MHightN[0]);

         ObjectSetInteger(0,"NOFX_NH",OBJPROP_COLOR,Night_Level);

         ObjectSetInteger(0,"NOFX_NH",OBJPROP_HIDDEN,false);

        }

      if(MLowD[0]>MLowN[0])//5A;8 4=52=>9 <8=8<C< 1>;LH5 =>G=>3> B> 4>@8A>2K205< =>G=>9 <8=8<C<

        {

         ObjectCreate(0,"NOFX_DL",OBJ_HLINE,0,IStart,MLowN[0]);

         ObjectSetInteger(0,"NOFX_DL",OBJPROP_COLOR,Night_Level);

         ObjectSetInteger(0,"NOFX_DL",OBJPROP_HIDDEN,false);

        }

     }



  }

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