//+------------------------------------------------------------------+
//|                                           Custom_Zone_Candle.mq4 |
//|                                                            Dadas |
//|                                              fx-nvatc.comeze.com |
//+------------------------------------------------------------------+
#property copyright "Dadas"
#property link      "fx-nvatc.comeze.com"

#property indicator_chart_window

// extern bool Multi_Custom_Zone_Candle = false;
extern bool Show_Custom_Zone_Candle = false;
extern int   Custom_Zone_Candle_Tf  = 240;
extern int   Custom_Zone_Candle_Index= 1;
extern int Custom_Zone_Candle_Offset = 10;
extern bool Pause_Custom_Zone_Candle = false;
extern color Custom_Zone_Candle_HL_Color = Moccasin; 
extern color Custom_Zone_Candle_HH_Color = Moccasin; 
extern color Custom_Zone_Candle_Color = Gainsboro;
extern bool  Custom_Zone_Candle_Bckg = true ;

// PTECZ_Label section
///*
extern bool Show_MN_PTECZ_Label = true;
extern bool Show_W1_PTECZ_Label = true;
extern bool Show_D1_PTECZ_Label = true;
extern bool Show_H4_PTECZ_Label = true;
extern bool Show_H1_PTECZ_Label = true;
extern bool Show_M30_PTECZ_Label = true;
extern bool Show_M15_PTECZ_Label = true;
extern bool Show_M5_PTECZ_Label = true;
extern bool Show_M1_PTECZ_Label = true;
extern int If_PTECZ_Label_Corner = 3;
extern color If_PTECZ_Label_Color_UP = LimeGreen;
extern color If_PTECZ_Label_Color_DOWN = OrangeRed;
extern color If_No_PTECZ_Color = DarkOrange;
extern int If_PTECZ_Label_FontSize = 12;

int PTECZ_Label_Index = 1;

int MN_PTECZ_Label_Tf  = 43200;
int W1_PTECZ_Label_Tf  = 10080;
int D1_PTECZ_Label_Tf  = 1440;
int H4_PTECZ_Label_Tf  = 240;
int H1_PTECZ_Label_Tf  = 60;
int M30_PTECZ_Label_Tf  = 30;
int M15_PTECZ_Label_Tf  = 15;
int M5_PTECZ_Label_Tf  = 5;
int M1_PTECZ_Label_Tf  = 1;

string MN_PTECZ_Label_String  = "MN";
string W1_PTECZ_Label_String  = "W1";
string D1_PTECZ_Label_String  = "D1";
string H4_PTECZ_Label_String  = "H4";
string H1_PTECZ_Label_String  = "H1";
string M30_PTECZ_Label_String  = "M30";
string M15_PTECZ_Label_String  = "M15";
string M5_PTECZ_Label_String  = "M5";
string M1_PTECZ_Label_String  = "M1";

int MN_YDISTANCE,W1_YDISTANCE,D1_YDISTANCE,H4_YDISTANCE,H1_YDISTANCE,M30_YDISTANCE,
M15_YDISTANCE,M5_YDISTANCE,M1_YDISTANCE;
//*/
/*
extern bool Show_PTECZ_Label = true;
extern int   PTECZ_Label_Tf  = 240;
extern int If_PTECZ_Label_Corner = 3;
extern color If_PTECZ_Label_Color_UP = LimeGreen;
extern color If_PTECZ_Label_Color_DOWN = OrangeRed;
extern color If_No_PTECZ_Color = DarkOrange;
extern int If_PTECZ_Label_FontSize = 9;

int PTECZ_Label_Index = 1;
*/
//----

//PTECZ_Candle section:
extern bool Show_PTECZ_Candle = false;
extern int   PTECZ_Candle_Tf  = 0;
extern int   PTECZ_Candle_BarsBack = 500;
extern color PTECZ_Candle_ArrowColor = OrangeRed;
extern int PTECZ_Candle_ArrowOffset = 100;

int   PTECZ_Candle_ArrowCode = 115;
int PTECZ_Candle_Arrow;
double PTECZ_Candle_price;
//----



int   Custom_Zone_Candle_Frame = 2 ;


datetime Custom_Zone_Candle_time1,Custom_Zone_Candle_time2;
double Custom_Zone_Candle_price1,Custom_Zone_Candle_price2,Custom_Zone_Candle_price3,
Custom_Zone_Candle_price4,Custom_Zone_Candle_price5,Custom_Zone_Candle_price6;
// int Custom_Zone_Candle_Index;

//Candle Index section:
extern bool Show_Candle_Index = false;
extern color Candle_Index_ArrowColor = Black;

int   Candle_Index_ArrowCode = 158;
int Candle_Index_Arrow;
double Candle_Index_price;
//----

// CZC_Time_Lines section:
extern bool Show_CZC_Time_Lines = false;
extern color CZC_Time_Lines_Color = LimeGreen;
extern int   CZC_Time_Lines_Style = 2;
extern int   CZC_Time_Lines_Width = 0;
datetime CZC_Time_Lines_Open_Hour,CZC_Time_Lines_Close_Hour,CZC_Time_Lines_Next_Close_Hour;
//----
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
// PTECZ_Candle section:

   PTECZ_Candle_Arrow = PTECZ_Candle_BarsBack;
   if(PTECZ_Candle_Tf==0){PTECZ_Candle_Tf=Period();}

  for(int PTECZ_Candle_i = 1 ; PTECZ_Candle_i < PTECZ_Candle_Arrow ; PTECZ_Candle_i++)
  {
      PTECZ_Candle_CreateArrow("PTECZ_Candle = "+PTECZ_Candle_i ,PTECZ_Candle_ArrowColor,PTECZ_Candle_ArrowCode);
  }
//----
  
// Candle Index section:

   Candle_Index_Arrow = Bars;

  for(int Candle_Index_i = 1 ; Candle_Index_i < Candle_Index_Arrow ; Candle_Index_i++)
  {
      Candle_Index_CreateArrow("Candle_Index = "+Candle_Index_i ,Candle_Index_ArrowColor,Candle_Index_ArrowCode);
  }
//----

// Master_Start_Line section:
if(Show_CZC_Time_Lines==true)
  {
  ObjectCreate("CZC_Time_Lines_Open", OBJ_VLINE, 0, 0, 0); 
  ObjectCreate("CZC_Time_Lines_Close", OBJ_VLINE, 0, 0, 0); 
  ObjectCreate("CZC_Time_Lines_Next_Close", OBJ_VLINE, 0, 0, 0);    
  } 
//----

// PTECZ_Label section
MN_YDISTANCE=113;
W1_YDISTANCE=100;
D1_YDISTANCE=87;
H4_YDISTANCE=74;
H1_YDISTANCE=61;
M30_YDISTANCE=48;
M15_YDISTANCE=35;
M5_YDISTANCE=22;
M1_YDISTANCE=9;
if(If_PTECZ_Label_FontSize>12){If_PTECZ_Label_FontSize=12;}
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
//Rectangles section:
if(Pause_Custom_Zone_Candle==false)
{
  ObjectDelete("Custom_Zone_Candle"); 
  ObjectDelete("Custom_Zone_Candle_HL");   
  ObjectDelete("Custom_Zone_Candle_HH");  
}  
//----

//Candle Index section:
  Candle_Index_Arrow = Bars;
  for(int Candle_Index_i = 1 ; Candle_Index_i < Candle_Index_Arrow ; Candle_Index_i++)
  {
     ObjectDelete("Candle_Index = "+Candle_Index_i);      
  }  
 //----  
 
 //PTECZ_Candle section:
  PTECZ_Candle_Arrow = PTECZ_Candle_BarsBack;
  for(int PTECZ_Candle_i = 1 ; PTECZ_Candle_i < PTECZ_Candle_Arrow ; PTECZ_Candle_i++)
  {
     ObjectDelete("PTECZ_Candle = "+PTECZ_Candle_i); 
  }  
 //---- 
 
 // CZC_Time_Lines section:
  ObjectDelete("CZC_Time_Lines_Open");  
  ObjectDelete("CZC_Time_Lines_Close"); 
  ObjectDelete("CZC_Time_Lines_Next_Close");    
//----  

// PTECZ_Label section

  ObjectDelete("PTECZ_Label"); 
      
 //    /*
   ObjectDelete("MN_PTECZ_Label"); 
   ObjectDelete("W1_PTECZ_Label"); 
   ObjectDelete("D1_PTECZ_Label"); 
   ObjectDelete("H4_PTECZ_Label"); 
   ObjectDelete("H1_PTECZ_Label"); 
   ObjectDelete("M30_PTECZ_Label");
   ObjectDelete("M15_PTECZ_Label"); 
   ObjectDelete("M5_PTECZ_Label"); 
   ObjectDelete("M1_PTECZ_Label");    
   //  */  
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {   ObjectDelete("PTECZ_Label"); 
//----
if(Show_Custom_Zone_Candle==true)
  {

Custom_Zone_Candle_price1 = iHigh(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price2 = iLow(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
if(iOpen(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index)<iClose(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index))
  {
Custom_Zone_Candle_price3 = iHigh(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price4 = iClose(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price5 = iOpen(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price6 = iLow(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
  }
if(iOpen(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index)>iClose(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index))
  {
Custom_Zone_Candle_price3 = iHigh(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price4 = iOpen(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price5 = iClose(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
Custom_Zone_Candle_price6 = iLow(NULL, Custom_Zone_Candle_Tf, Custom_Zone_Candle_Index);
  }
Custom_Zone_Candle_time1 = iTime(NULL, Period(), Bars); // Custom_Zone_Candle_Index);
Custom_Zone_Candle_time2 = iTime(NULL, Custom_Zone_Candle_Tf, 0)+Custom_Zone_Candle_Tf*60*Custom_Zone_Candle_Offset;
//----
   

    if(Pause_Custom_Zone_Candle==false)
     {
     ObjectDelete("Custom_Zone_Candle");
     
     }
     
     ObjectCreate("Custom_Zone_Candle", OBJ_RECTANGLE,0,Custom_Zone_Candle_time1,Custom_Zone_Candle_price1,Custom_Zone_Candle_time2,Custom_Zone_Candle_price2);
     ObjectSet("Custom_Zone_Candle", OBJPROP_BACK,Custom_Zone_Candle_Bckg);
     ObjectSet("Custom_Zone_Candle", OBJPROP_COLOR,Custom_Zone_Candle_Color); 
     ObjectSet("Custom_Zone_Candle", OBJPROP_WIDTH,Custom_Zone_Candle_Frame);
     
     if(Pause_Custom_Zone_Candle==false)
     {
     ObjectDelete("Custom_Zone_Candle_HL");
     }
     
     ObjectCreate("Custom_Zone_Candle_HL", OBJ_RECTANGLE,0,Custom_Zone_Candle_time1,Custom_Zone_Candle_price3,Custom_Zone_Candle_time2,Custom_Zone_Candle_price4);
     ObjectSet("Custom_Zone_Candle_HL", OBJPROP_BACK,Custom_Zone_Candle_Bckg);
     ObjectSet("Custom_Zone_Candle_HL", OBJPROP_COLOR,Custom_Zone_Candle_HL_Color); 
     ObjectSet("Custom_Zone_Candle_HL", OBJPROP_WIDTH,Custom_Zone_Candle_Frame);
     
     if(Pause_Custom_Zone_Candle==false)
     { 
     ObjectDelete("Custom_Zone_Candle_HH");
     }
     
     ObjectCreate("Custom_Zone_Candle_HH", OBJ_RECTANGLE,0,Custom_Zone_Candle_time1,Custom_Zone_Candle_price5,Custom_Zone_Candle_time2,Custom_Zone_Candle_price6);
     ObjectSet("Custom_Zone_Candle_HH", OBJPROP_BACK,Custom_Zone_Candle_Bckg);
     ObjectSet("Custom_Zone_Candle_HH", OBJPROP_COLOR,Custom_Zone_Candle_HH_Color); 
     ObjectSet("Custom_Zone_Candle_HH", OBJPROP_WIDTH,Custom_Zone_Candle_Frame);     
  }     
//----

// PTECZ_Label section

///*
if(Show_MN_PTECZ_Label==true)
  {
 ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE); 
   
if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE); 
   }
   }
   
if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE);
   }
   }
  if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE);
 } 
 }
 
 }
 //----
 if(Show_W1_PTECZ_Label==true)
  {
 ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE); 
   
if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE); 
   }
   }
   
if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE);
   }
   }
  if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_D1_PTECZ_Label==true)
  {
 ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE); 
   
if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE); 
   }
   }
   
if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE);
   }
   }
  if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_H4_PTECZ_Label==true)
  {
 ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE); 
   
if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE); 
   }
   }
   
if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE);
   }
   }
  if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_H1_PTECZ_Label==true)
  {
 ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE); 
   
if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE); 
   }
   }
   
if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE);
   }
   }
  if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_M30_PTECZ_Label==true)
  {
 ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE); 
   
if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE); 
   }
   }
   
if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE);
   }
   }
  if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_M15_PTECZ_Label==true)
  {
 ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE); 
   
if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE); 
   }
   }
   
if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE);
   }
   }
  if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_M5_PTECZ_Label==true)
  {
 ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE); 
   
if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE); 
   }
   }
   
if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE);
   }
   }
  if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE);
 } 
 }
 
 }
 //----
  if(Show_M1_PTECZ_Label==true)
  {
 ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE); 
   
if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE); 
   }
   }
   
if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE);
   }
   }
  if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE); 
 } 
 } 
   
 if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE);
 } 
 }
 
 }
 //----
//*/
/*
if(Show_PTECZ_Label==true)
  {
 ObjectCreate("PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("PTECZ_Label",PTECZ_Label_Tf+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); 
 ObjectSet("PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("PTECZ_Label",OBJPROP_YDISTANCE,9); 
   
if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   { 
 ObjectCreate("PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("PTECZ_Label",PTECZ_Label_Tf+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("PTECZ_Label",OBJPROP_YDISTANCE,9); 
   }
   }
   
if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1))
 {
if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)<=iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index)<=iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)) 
   {
 ObjectCreate("PTECZ_Label",OBJ_LABEL,0,0,0);
 ObjectSetText("PTECZ_Label",PTECZ_Label_Tf+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
 ObjectSet("PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("PTECZ_Label",OBJPROP_YDISTANCE,9);
   }
   }
  if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("PTECZ_Label",PTECZ_Label_Tf+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_UP); 
 ObjectSet("PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("PTECZ_Label",OBJPROP_YDISTANCE,9); 
 } 
 } 
   
 if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index))
 {
   if(iClose(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1)<iOpen(NULL,PTECZ_Label_Tf,PTECZ_Label_Index+1))
    {
  ObjectCreate("PTECZ_Label",OBJ_LABEL,0,0,0);    
  ObjectSetText("PTECZ_Label",PTECZ_Label_Tf+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_PTECZ_Label_Color_DOWN); 
  ObjectSet("PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner);
 ObjectSet("PTECZ_Label",OBJPROP_XDISTANCE,9); 
 ObjectSet("PTECZ_Label",OBJPROP_YDISTANCE,9);
 } 
 }
 
 }
//----
*/

// Candle Index section:
if(Show_Candle_Index==true)
  {
    Candle_Index_Arrow = Bars;
  
  if(Candle_Index_IsNewBar())
   {
   
     for(int Candle_Index_i = 1 ; Candle_Index_i < Candle_Index_Arrow ; Candle_Index_i++)
     {
      Candle_Index_price = Low[Candle_Index_i]-5*Point ;
         
      Candle_Index_SetArrow("Candle_Index = "+Candle_Index_i ,Candle_Index_price,Time[Candle_Index_i]);      
     }   
   }
   }
 //---- 
  
 // PTECZ_Candle section:
if(Show_PTECZ_Candle==true)
  {
    PTECZ_Candle_Arrow = PTECZ_Candle_BarsBack;
  
  if(PTECZ_Candle_IsNewBar())
   {
   
     for(int PTECZ_Candle_i = 1 ; PTECZ_Candle_i < PTECZ_Candle_Arrow ; PTECZ_Candle_i++)
     {
      PTECZ_Candle_price = Low[PTECZ_Candle_i]-PTECZ_Candle_ArrowOffset*Point ;
//----      
 if(iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1)>iOpen(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1))
 {
if(iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1)>=iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i)&&iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i)>=iOpen(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1)) 
   { 
   if(PTECZ_Candle_Tf==Period())
   {       
      PTECZ_Candle_SetArrow("PTECZ_Candle = "+PTECZ_Candle_i ,PTECZ_Candle_price,Time[PTECZ_Candle_i]);      
    }
    }
    } 
 //----     
 //---- 
  if(iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1)<iOpen(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1))
 {
if(iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1)<=iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i)&&iClose(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i)<=iOpen(NULL,PTECZ_Candle_Tf,PTECZ_Candle_i+1)) 
   {
      if(PTECZ_Candle_Tf==Period())
   { 
       PTECZ_Candle_SetArrow("PTECZ_Candle = "+PTECZ_Candle_i ,PTECZ_Candle_price,Time[PTECZ_Candle_i]);      
    }
    }
   } 
 //----     
     }   
   }
   }
 //----
 
 // CZC_Time_Lines section:
if(Show_CZC_Time_Lines==true)
  { 
  CZC_Time_Lines_Open_Hour = iTime(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index);
  ObjectSet("CZC_Time_Lines_Open", OBJPROP_BACK,true);
  ObjectSet("CZC_Time_Lines_Open", OBJPROP_WIDTH,CZC_Time_Lines_Width);
  ObjectSet("CZC_Time_Lines_Open", OBJPROP_COLOR,CZC_Time_Lines_Color);
  ObjectSet("CZC_Time_Lines_Open", OBJPROP_STYLE,CZC_Time_Lines_Style);
  ObjectSet("CZC_Time_Lines_Open", OBJPROP_TIME1,CZC_Time_Lines_Open_Hour);
  
  CZC_Time_Lines_Close_Hour = iTime(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index-1);
  ObjectSet("CZC_Time_Lines_Close", OBJPROP_BACK,true);
  ObjectSet("CZC_Time_Lines_Close", OBJPROP_WIDTH,CZC_Time_Lines_Width);
  ObjectSet("CZC_Time_Lines_Close", OBJPROP_COLOR,CZC_Time_Lines_Color);
  ObjectSet("CZC_Time_Lines_Close", OBJPROP_STYLE,CZC_Time_Lines_Style);
  ObjectSet("CZC_Time_Lines_Close", OBJPROP_TIME1,CZC_Time_Lines_Close_Hour);
  
  CZC_Time_Lines_Next_Close_Hour = iTime(NULL,Custom_Zone_Candle_Tf,Custom_Zone_Candle_Index-2);
  ObjectSet("CZC_Time_Lines_Next_Close", OBJPROP_BACK,true);
  ObjectSet("CZC_Time_Lines_Next_Close", OBJPROP_WIDTH,CZC_Time_Lines_Width);
  ObjectSet("CZC_Time_Lines_Next_Close", OBJPROP_COLOR,CZC_Time_Lines_Color);
  ObjectSet("CZC_Time_Lines_Next_Close", OBJPROP_STYLE,CZC_Time_Lines_Style);
  ObjectSet("CZC_Time_Lines_Next_Close", OBJPROP_TIME1,CZC_Time_Lines_Next_Close_Hour); 
  }
//----
   return(0);
  }
//+------------------------------------------------------------------+
// Candle Index section:
//+------------------------------------------------------------------+
void Candle_Index_CreateArrow(string Candle_Index_name,color Candle_Index_c,int Candle_Index_code)
{
    ObjectCreate(Candle_Index_name ,OBJ_ARROW,0,0,0);
    ObjectSet(Candle_Index_name, OBJPROP_ARROWCODE,Candle_Index_code);
    ObjectSet(Candle_Index_name ,OBJPROP_COLOR,Candle_Index_c);
}
//+------------------------------------------------------------------+
void Candle_Index_SetArrow(string Candle_Index_name,double Candle_Index_price,datetime Candle_Index_time)
{
    ObjectSet(Candle_Index_name, OBJPROP_PRICE1,Candle_Index_price);
    ObjectSet(Candle_Index_name, OBJPROP_TIME1,Candle_Index_time);
}

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

bool Candle_Index_IsNewBar()
{ 
  static datetime Candle_Index_prevTime1 = -1;
  
  if(Candle_Index_prevTime1 != Time[6])
  { 
   Candle_Index_prevTime1 = Time[6]; 
       
   return(true);  
  } 

  return(false); 
}
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
// PTECZ_Candle section:
//+------------------------------------------------------------------+
void PTECZ_Candle_CreateArrow(string PTECZ_Candle_name,color PTECZ_Candle_c,int PTECZ_Candle_code)
{
    ObjectCreate(PTECZ_Candle_name ,OBJ_ARROW,0,0,0);
    ObjectSet(PTECZ_Candle_name, OBJPROP_ARROWCODE,PTECZ_Candle_code);
    ObjectSet(PTECZ_Candle_name ,OBJPROP_COLOR,PTECZ_Candle_c);
}
//+------------------------------------------------------------------+
void PTECZ_Candle_SetArrow(string PTECZ_Candle_name,double PTECZ_Candle_price,datetime PTECZ_Candle_time)
{
    ObjectSet(PTECZ_Candle_name, OBJPROP_PRICE1,PTECZ_Candle_price);
    ObjectSet(PTECZ_Candle_name, OBJPROP_TIME1,PTECZ_Candle_time);
}

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

bool PTECZ_Candle_IsNewBar()
{ 
  static datetime PTECZ_Candle_prevTime1 = -1;
  
  if(PTECZ_Candle_prevTime1 != Time[6])
  { 
   PTECZ_Candle_prevTime1 = Time[6]; 
       
   return(true);  
  } 

  return(false); 
}
//+------------------------------------------------------------------+