Multiple time frame candle overlay

Quoting Pipo

Disliked

here ya go.

Ignored

Quoting aud

Disliked

I don't think you are understanding how the indi works. You can set it to show any multiple of the time frame you have placed it on.

Ignored

Quoting Pipo

Disliked

here ya go. {file} {file}

Ignored

Quoting swami76

Disliked

bump!!! any update on this?

Ignored

Quoting mmarwaha

Disliked

hi guys, this is a great indicator. can someone edit the code so that the ohlc values shown are optional to turn off thanks

Ignored

Quoting mk905

Disliked

Hi, does anyone has ex5 version?

Ignored

Quoting Shabs19

Disliked

{quote} Try this one: {file}

Ignored

Quoting moritoagusto

Disliked

Hi, is there any coder can do modification on the setting parameters, which is "CustomCandleTimeShift" from number of candle to GMT time zone. Thank you in advance. {file} {image}

Ignored

#property link      "[email protected]"
#property copyright "@ 2006 mankurt, 2024 aPhong"
#property indicator_chart_window
//+------------------------------------------------------------------------------------------------+
extern int   TimeFrame=240;
extern int   BarOnHTF_ToShow=10;
extern bool  Draw_CurrentBar = false;
extern color UpCandle= C'38,113,72';
extern color DnCandle= C'148,29,29';
extern color DojiColor=clrWhiteSmoke;
extern bool  Bar_BackGround = true;
extern int               Body_Width=1;
extern ENUM_LINE_STYLE   Body_Style            = STYLE_DASHDOTDOT;
extern int               Wick_Width=3;
extern ENUM_LINE_STYLE   Wick_Style            = STYLE_SOLID;
extern int   CustomCandleTimeShift=0;
extern bool  BGCandle =false;
//template code start1; copy and paste
extern string             button_note1          = "------------------------------";
extern ENUM_BASE_CORNER   btn_corner            = CORNER_RIGHT_LOWER;                 //chart btn_corner for anchoring
extern string             btn_text              = "LoveU";
extern string             btn_Font              = "Arial";
extern int                btn_FontSize          = 13;                                //btn__font size
extern color              btn_text_ON_color     = C'255,255,128';
extern color              btn_text_OFF_color    = clrSilver;
extern color              btn_background_color  = C'5,5,7';
extern color              btn_border_color      = C'5,5,7';
extern int                button_x              = 80;                                //btn__x
extern int                button_y              = 60;                                //btn__y
extern int                btn_Width             = 80;                                //btn__width
extern int                btn_Height            = 40;                                //btn__height
extern string             button_note2          = "------------------------------";
//internal variables
extern bool                      show_data             = true;
string IndicatorName, IndicatorObjPrefix, buttonId;
//template code end1
//+------------------------------------------------------------------------------------------------+
int      Nbar,OpenBar,timer,i,timerTF,name,MidBar;
double   Barmax;//***
double   HighPrevBar,LowPrevBar,ClosePrevBar;
double   OpenNewBar,HighNewBar,LowNewBar,CloseNewBar;
double   HighCurBar,LowCurBar,CloseCurBar;
double   priceNewSH,priceNewSL,pricePrevSH,pricePrevSL,priceCurSH,priceCurSL;
string   nameNewCandle,namePrevCandle;
string   nameNewShadowH,nameNewShadowL,namePrevShadowH,namePrevShadowL;
string   NameBar, NameHigh, NameLow;
datetime TimeOpenNewBar,TimeCloseNewBar,TimeClosePrevBar;
datetime timeNewShadow,timePrevShadow;
bool     NewBar;
//+------------------------------------------------------------------------------------------------------------------+
string GenerateIndicatorName(const string target) //don't change anything in this function
{
   string name2 = target;
   int try = 2;
   while (WindowFind(name2) != -1)
   {
      name2 = target + " #" + IntegerToString(try++);
   }
   return name2;
}
//+------------------------------------------------------------------------------------------------------------------+
int OnInit()  //don't forget to change buttonId name
{
   IndicatorName = GenerateIndicatorName(btn_text);
   IndicatorObjPrefix = "__" + IndicatorName + "__";
   IndicatorShortName(IndicatorName);
   IndicatorDigits(Digits);
  
   double val;
   if (GlobalVariableGet(IndicatorName + "_visibility", val))
      show_data = val != 0;
   // Create button
   ChartSetInteger(ChartID(), CHART_EVENT_MOUSE_MOVE, 1);
   buttonId = IndicatorObjPrefix + "CandleOverlay";                 //don't forget to change name here
   createButton(buttonId, btn_text, btn_Width, btn_Height, btn_Font, btn_FontSize, btn_background_color, btn_border_color, btn_text_ON_color);
   ObjectSetInteger(ChartID(), buttonId, OBJPROP_YDISTANCE, button_y);
   ObjectSetInteger(ChartID(), buttonId, OBJPROP_XDISTANCE, button_x);
// put init() here
   init2();
   return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------------------------------------------------------+
//don't change anything in this function
void createButton(string buttonID,string buttonText,int width,int height,string font,int fontSize,color bgColor,color borderColor,color txtColor)
{
      ObjectDelete    (ChartID(),buttonID);
      ObjectCreate    (ChartID(),buttonID,OBJ_BUTTON,0,0,0);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_COLOR,txtColor);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_BGCOLOR,bgColor);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_BORDER_COLOR,borderColor);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_XSIZE,width);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_YSIZE,height);
      ObjectSetString (ChartID(),buttonID,OBJPROP_FONT,font);
      ObjectSetString (ChartID(),buttonID,OBJPROP_TEXT,buttonText);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_FONTSIZE,fontSize);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_SELECTABLE,0);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_CORNER,btn_corner);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_HIDDEN,1);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_XDISTANCE,9999);
      ObjectSetInteger(ChartID(),buttonID,OBJPROP_YDISTANCE,9999);
}
//+------------------------------------------------------------------------------------------------------------------+
int deinit()
{
   ObjectsDeleteAll(ChartID(), IndicatorObjPrefix);
   //put deinit() here
   deinit2();
    return(0);
}
//+------------------------------------------------------------------------------------------------------------------+
//don't change anything in this function
bool recalc = true;
void handleButtonClicks()
{
   if (ObjectGetInteger(ChartID(), buttonId, OBJPROP_STATE)){
            ObjectSetInteger(ChartID(), buttonId, OBJPROP_STATE, false);
            show_data = !show_data;
            GlobalVariableSet(IndicatorName + "_visibility", show_data ? 1.0 : 0.0);
            recalc = true;
            start();}
}
//+------------------------------------------------------------------------------------------------------------------+
void OnChartEvent(const int id, //don't change anything in this function
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
{
   if(id==CHARTEVENT_OBJECT_CREATE || id==CHARTEVENT_OBJECT_DELETE) return;
   if(id==CHARTEVENT_MOUSE_MOVE || id==CHARTEVENT_MOUSE_WHEEL) return;
   if (  !ObjectGetInteger(ChartID(), buttonId, OBJPROP_STATE) &&
      id == CHARTEVENT_OBJECT_CLICK   && sparam == buttonId){
      indicatorObjDeleteAll();}
   //
   handleButtonClicks();
   //
}
//+------------------------------------------------------------------------------------------------------------------+
int start()
{
   handleButtonClicks();
   recalc = false;
  
      if (show_data)
         {
          ObjectSetInteger(ChartID(),buttonId,OBJPROP_COLOR,btn_text_ON_color);
          init2();
          start2();
         }
      else
         {
          ObjectSetInteger(ChartID(),buttonId,OBJPROP_COLOR,btn_text_OFF_color);
          deinit2();
         }
   return(0);
}
//+------------------------------------------------------------------------------------------------------------------+
int init2(){
//IndicatorShortName("M"+TimeFrame+" íà M"+Period());
Nbar=TimeFrame/Period();
timer=Period()*60;
timerTF=TimeFrame*60;
name=0;
TimeOpenNewBar=Time[Bars-1];
OpenNewBar=Open[Bars-1];
NewBar=false;
NameBar="Bar M"+TimeFrame+"-";
NameHigh="High M"+TimeFrame+"-";
NameLow="Low M"+TimeFrame+"-";
return(0);}
//+------------------------------------------------------------------------------------------------+
int deinit2(){
for(int DelOBJ=1; DelOBJ<=name; DelOBJ++){
ObjectDelete(NameBar+DelOBJ);
ObjectDelete(NameHigh+DelOBJ);
ObjectDelete(NameLow+DelOBJ);}
Comment("");
return(0);}
//+------------------------------------------------------------------------------------------------+
int start2(){
// Validation:
   //if(TimeFrame>1440) {Comment("\n"," TimeFrame more than D1 is not supporting!!!");return(0);}
   //if(Period()>240)   {Comment("\n"," Period more than H4 is not supporting!!!");return(0);}
   if(TimeFrame<=Period()||MathMod(TimeFrame,Period())!=0) return(0);
// calculate no. bars on current Timeframe to draw:
Barmax = Nbar*BarOnHTF_ToShow;
if(Barmax!=0)  {i=Barmax;}
  else         {i=Bars-IndicatorCounted();}
// drawing:
//while(i>0){i--;
while(i>0){
i--;
if (Draw_CurrentBar){
                     while(i>=0){if   (Time[i]==TimeOpenNewBar||BarNew(i,TimeFrame)==false)    i--;
                                else      {NewBar=true; name++; break;};}}
                                                                          
     else {
                     while(i>=Nbar){if   (Time[i]==TimeOpenNewBar||BarNew(i,TimeFrame)==false)    i--;
                                else      {NewBar=true; name++; break;};}}
                                                                  
                                                                
//----                        
if(i<0) i=0;
if(NewBar==true){
//+-----------------------------------------Previos Bar--------------------------------------------+
      
        OpenBar=iBarShift(0,0,TimeOpenNewBar,false);
        TimeClosePrevBar=Time[i+1];
        ClosePrevBar=Close[i+1];
        HighPrevBar=High[iHighest(0,0,MODE_HIGH,OpenBar-i,i+1)];
        LowPrevBar=Low[iLowest(0,0,MODE_LOW,OpenBar-i,i+1)];
        namePrevCandle=NameBar+(name-1);
        MidBar=OpenBar-MathRound((OpenBar-i)/2);
        timePrevShadow=Time[MidBar];
        pricePrevSH=PriceShadow(OpenNewBar,ClosePrevBar,0);
        pricePrevSL=PriceShadow(OpenNewBar,ClosePrevBar,1);
        namePrevShadowH=NameHigh+(name-1);
        namePrevShadowL=NameLow+(name-1);
      //+----------------------------------Modifi Previos Bar & Shadow-----------------------------------+
      if(ObjectFind(namePrevCandle)==0){
        ObjectMove(namePrevCandle,1,TimeClosePrevBar,ClosePrevBar);
        PropBar(OpenNewBar,ClosePrevBar,namePrevCandle);
        if(OpenBar==i+1) ObjectSet(namePrevCandle,OBJPROP_WIDTH, Body_Width*3);}
      if(ObjectFind(namePrevShadowH)==0){
        if(pricePrevSH==HighPrevBar) ObjectDelete(namePrevShadowH);
         else{ObjectMove(namePrevShadowH,0,timePrevShadow,pricePrevSH);
          ObjectMove(namePrevShadowH,1,timePrevShadow,HighPrevBar);
          ColorShadow(OpenNewBar,ClosePrevBar,namePrevShadowH);
          ObjectSetText(namePrevShadowH,"High="+DoubleToStr(HighPrevBar,Digits),7,"Tahoma");}}
      if(ObjectFind(namePrevShadowL)==0){
        if(pricePrevSL==LowPrevBar) ObjectDelete(namePrevShadowL);
         else{ObjectMove(namePrevShadowL,0,timePrevShadow,pricePrevSL);
          ObjectMove(namePrevShadowL,1,timePrevShadow,LowPrevBar);
          ColorShadow(OpenNewBar,ClosePrevBar,namePrevShadowL);
          ObjectSetText(namePrevShadowL,"Low="+DoubleToStr(LowPrevBar,Digits),7,"Tahoma");}}
      //+-------------------------------------------New Bar----------------------------------------------+
        OpenNewBar=Open[i];
        TimeOpenNewBar=Time[i];
        HighNewBar=High[i];
        LowNewBar=Low[i];
        CloseNewBar=Close[i];
        TimeCloseNewBar=Time[i]+timerTF-timer;
        nameNewCandle=NameBar+name;
        timeNewShadow=Time[i]+MathRound(Nbar/2)*timer;
        priceNewSH=PriceShadow(OpenNewBar,CloseNewBar,0);
        priceNewSL=PriceShadow(OpenNewBar,CloseNewBar,1);
        nameNewShadowH=NameHigh+name;
        nameNewShadowL=NameLow+name;
        NewBar=false;}
 else{
      
      //+------------------------------------------Current Bar-------------------------------------------+
      
        OpenBar=iBarShift(0,0,TimeOpenNewBar,false);
        CloseCurBar=Close[i];
        HighCurBar=High[iHighest(0,0,MODE_HIGH,OpenBar+1,i)];
        LowCurBar=Low[iLowest(0,0,MODE_LOW,OpenBar+1,i)];
        priceCurSH=PriceShadow(OpenNewBar,CloseCurBar,0);
        priceCurSL=PriceShadow(OpenNewBar,CloseCurBar,1);}
//+------------------------------Create New Object & Modifi Current--------------------------------+
if(ObjectFind(nameNewCandle)!=0){
  ObjectCreate(nameNewCandle,OBJ_RECTANGLE,0,TimeOpenNewBar,OpenNewBar,TimeCloseNewBar,CloseNewBar);
  ObjectSet(nameNewCandle,OBJPROP_STYLE, Body_Style);
  //******* set bar background
  ObjectSet(nameNewCandle,OBJPROP_BACK, Bar_BackGround);
  PropBar(OpenNewBar,CloseNewBar,nameNewCandle);}
 else{
  ObjectMove(nameNewCandle,1,TimeCloseNewBar,CloseCurBar);      
  PropBar(OpenNewBar,CloseCurBar,nameNewCandle);}
if(ObjectFind(nameNewShadowH)!=0){
  ObjectCreate(nameNewShadowH,OBJ_TREND,0,timeNewShadow,priceNewSH,timeNewShadow,HighNewBar);
  ObjectSet(nameNewShadowH,OBJPROP_STYLE, Wick_Style);
  ObjectSet(nameNewShadowH,OBJPROP_WIDTH, Wick_Width);
  ObjectSet(nameNewShadowH,OBJPROP_RAY, false);
  //******* set bar background
  ObjectSet(nameNewShadowH,OBJPROP_BACK, Bar_BackGround);
  ColorShadow(OpenNewBar,CloseNewBar,nameNewShadowH);}
 else{
  ObjectMove(nameNewShadowH,0,timeNewShadow,priceCurSH);
  ObjectMove(nameNewShadowH,1,timeNewShadow,HighCurBar);
  ColorShadow(OpenNewBar,CloseCurBar,nameNewShadowH);}
if(ObjectFind(nameNewShadowL)!=0){
  ObjectCreate(nameNewShadowL,OBJ_TREND,0,timeNewShadow,priceNewSL,timeNewShadow,LowNewBar);
  ObjectSet(nameNewShadowL,OBJPROP_STYLE, Wick_Style);
  ObjectSet(nameNewShadowL,OBJPROP_WIDTH, Wick_Width);
  ObjectSet(nameNewShadowL,OBJPROP_RAY, false);
  //******* set bar background
  ObjectSet(nameNewShadowL,OBJPROP_BACK, Bar_BackGround);  
  ColorShadow(OpenNewBar,CloseNewBar,nameNewShadowL);}
 else{
  ObjectMove(nameNewShadowL,0,timeNewShadow,priceCurSL);
  ObjectMove(nameNewShadowL,1,timeNewShadow,LowCurBar);
  ColorShadow(OpenNewBar,CloseCurBar,nameNewShadowL);}}
//+-------------------------------------Comment OHLC-----------------------------------------------+
Comment("");
return(0);}
//_________end Start()
////////////////////////////////////////////////////////////////////////////////////////////////////
//----- User defined Functions----------
//+---------------------Main Function "New Bar or Old Bar"-----------------------------------------+
bool BarNew (int j, int tmf)
{
//MathFloor(TimeDayOfYear(Time[j+CustomCandleTimeShift])/7)*10080
   int t0=MathFloor(TimeDayOfYear(Time[j+CustomCandleTimeShift])/7)*10080+1440*(TimeDayOfWeek(Time[j+CustomCandleTimeShift])-1)+60*TimeHour(Time[j+CustomCandleTimeShift])+TimeMinute(Time[j+CustomCandleTimeShift]),
       t1=MathFloor(TimeDayOfYear(Time[j+1+CustomCandleTimeShift])/7)*10080+1440*(TimeDayOfWeek(Time[j+1+CustomCandleTimeShift])-1)+60*TimeHour(Time[j+1+CustomCandleTimeShift])+TimeMinute(Time[j+1+CustomCandleTimeShift]);
      Print( t0, " ", t1);
   if(MathMod(t0,tmf)-MathMod(t1,tmf)==t0-t1) return(false);
   else return(true);
}
//+---------------------Function "Price Shadow"----------------------------------------------------+
double PriceShadow (double OpnB, double ClsB, int swt){
double prH, prL;
if(OpnB<ClsB){prH=ClsB; prL=OpnB;}
if(OpnB>ClsB){prH=OpnB; prL=ClsB;}
if(OpnB==ClsB){prH=ClsB; prL=ClsB;}
//
switch(swt){case 0:return(prH);break;
case 1:return(prL);break;}
//
return(0);//************
}
//+---------------------Function "Properti Bars"---------------------------------------------------+
void PropBar (double OpPr, double ClPr, string NmOBJ)
{string Cl=" Close="+DoubleToStr(ClPr,Digits);
string Op=" Open="+DoubleToStr(OpPr,Digits);
if(OpPr==ClPr){ObjectSet(NmOBJ,OBJPROP_BACK, false);
ObjectSet(NmOBJ,OBJPROP_COLOR,DojiColor);
ObjectSetText(NmOBJ,"Doji "+Op+Cl,7,"Tahoma");}
if(OpPr<ClPr){ObjectSet(NmOBJ,OBJPROP_COLOR,UpCandle);
ObjectSet(NmOBJ,OBJPROP_BACK, BGCandle);
ObjectSetText(NmOBJ,"UpBar "+Op+Cl,7,"Tahoma");}
if (OpPr>ClPr){ObjectSet(NmOBJ,OBJPROP_COLOR,DnCandle);
ObjectSet(NmOBJ,OBJPROP_BACK, BGCandle);
ObjectSetText(NmOBJ,"DnBar "+Op+Cl,7,"Tahoma");}
ObjectSet(NmOBJ,OBJPROP_WIDTH, Body_Width);}
//+----------------------Function "Color Shadow"---------------------------------------------------+
void ColorShadow (double OP, double CP, string NOBJ)
{if(OP==CP)ObjectSet(NOBJ,OBJPROP_COLOR,DojiColor);
if(OP<CP)ObjectSet(NOBJ,OBJPROP_COLOR,UpCandle);
if (OP>CP)ObjectSet(NOBJ,OBJPROP_COLOR,DnCandle);}
//=====================================================
void indicatorObjDeleteAll(){
ObjectsDeleteAll(ChartID(), "Bar M");
ObjectsDeleteAll(ChartID(), "High M");
ObjectsDeleteAll(ChartID(), "Low M");
}
//+----------------------------------------------END-----------------------------------------------+