Weekly and Monthly (Daily) Pivot Point Indicators

//+------------------------------------------------------------------+
//|                                                 AllPivots_v2.mq4 |
//|                                  Copyright © 2007, Forex-TSD.com |
//|                         Written by IgorAD,[email protected] |   
//|            http://finance.groups.yahoo.com/group/TrendLaboratory |                                      
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, Forex-TSD.com "
#property link      "http://www.forex-tsd.com/"

#property indicator_chart_window
#property indicator_buffers   4
#property indicator_color1    LightBlue
#property indicator_color2    Tomato
#property indicator_color3    Aqua
#property indicator_color4    Orange

extern int     CountPeriods=10;
extern string  TimePeriod="D1";
extern bool    Plot_pivots=true;
extern bool    Plot_middle=True;
extern bool    Plot_camarilla=false;

   datetime time1;
   datetime time2;
   double open,close,high,low;
   double P,R1,R2,R3,S1,S2,S3,M0,M1,M2,M3,M4,M5;
   double H1,H2,H3,H4,L1,L2,L3,L4,Range;
   double pstyle, mstyle,cstyle;
   int shift, num, period;
     
   void ObjDel()
   {
      for (;num<=CountPeriods;num++)
      {
      ObjectDelete("PP["+num+"]");
      ObjectDelete("R1["+num+"]");
      ObjectDelete("R2["+num+"]");
      ObjectDelete("R3["+num+"]");
      ObjectDelete("S1["+num+"]");
      ObjectDelete("S2["+num+"]");
      ObjectDelete("S3["+num+"]");
      
      ObjectDelete("M0["+num+"]");
      ObjectDelete("M1["+num+"]");
      ObjectDelete("M2["+num+"]");
      ObjectDelete("M3["+num+"]");
      ObjectDelete("M4["+num+"]");
      ObjectDelete("M5["+num+"]");
      
      ObjectDelete("H1["+num+"]");
      ObjectDelete("H2["+num+"]");
      ObjectDelete("H3["+num+"]");
      ObjectDelete("H4["+num+"]");
      ObjectDelete("L1["+num+"]");
      ObjectDelete("L2["+num+"]");
      ObjectDelete("L3["+num+"]");
      ObjectDelete("L4["+num+"]");
      }
   }

   void PlotLine(string name,double value,double line_color,double style)
   {
   ObjectCreate(name,OBJ_TREND,0,time1,value,time2,value);
   ObjectSet(name, OBJPROP_WIDTH, 1);
   ObjectSet(name, OBJPROP_STYLE, style);
   ObjectSet(name, OBJPROP_RAY, false);
   ObjectSet(name, OBJPROP_BACK, true);
   ObjectSet(name, OBJPROP_COLOR, line_color);
    }        
int init()
  {
   if (TimePeriod=="H1" || TimePeriod=="60") period=PERIOD_H1; 
   else
   if (TimePeriod=="H4" || TimePeriod=="240") period=PERIOD_H4; 
   else
   if (TimePeriod=="D1" || TimePeriod=="1440") period=PERIOD_D1;
   else
   if (TimePeriod=="W1" || TimePeriod=="10080") period=PERIOD_W1; 
   else
   if (TimePeriod=="MN" || TimePeriod=="43200") period=PERIOD_MN1;
   else
   {
   Comment("Wrong TimePeriod. Must be H1, H4, D1, W1 or MN"); 
   return(0);
   }
  return(0);
  }
   
   
int deinit()
  {
   ObjDel();
   Comment("");
   return(0);
  }

int start()
  {
  int i;
     
  ObjDel();
  num=0;
  
  for (shift=CountPeriods-1;shift>=0;shift--)
  {
  time1=iTime(NULL,period,shift);
             
  high  = iHigh(NULL,period,shift+1);
  low   = iLow(NULL,period,shift+1);
  open  = iOpen(NULL,period,shift+1);
  close = iClose(NULL,period,shift+1);
  
  P  = (high+low+close)/3.0;
        
  R1 = 2*P-low;
  R2 = P+(high - low);
  R3 = (2*P)+(high-(2*low));
        
  S1 = 2*P-high;
  S2 = P-(high - low);
  S3 = (2*P)-((2*high)-low);
         
  M0=0.5*(S2+S3);
  M1=0.5*(S1+S2);
  M2=0.5*(P+S1);
  M3=0.5*(P+R1);
  M4=0.5*(R1+R2);
  M5=0.5*(R2+R3);
         
  Range = high - low;
  H4 = close + (Range * 1.1/2.0);
  H3 = close + (Range * 1.1/4.0);
  H2 = close + (Range * 1.1/6.0);
  H1 = close + (Range * 1.1/12.0);

  L1 = close - (Range * 1.1/12.0);
  L2 = close - (Range * 1.1/6.0);
  L3 = close - (Range * 1.1/4.0);
  L4 = close - (Range * 1.1/2.0);
       
  time2=time1+period*60;
         
  pstyle=2;
  mstyle=3;
  cstyle=1;
  num=shift;
       
  PlotLine("PP["+num+"]",P,Gray,pstyle);
  if(Plot_pivots)
  {
        
   PlotLine("R1["+num+"]",R1,Red,pstyle);
   PlotLine("R2["+num+"]",R2,FireBrick,pstyle);
   PlotLine("R3["+num+"]",R3,Maroon,pstyle);
               
   PlotLine("S1["+num+"]",S1,Lime,pstyle);
   PlotLine("S2["+num+"]",S2,Green,pstyle);
   PlotLine("S3["+num+"]",S3,DarkGreen,pstyle);
  }
         
  if(Plot_middle)
  {
   PlotLine("M0["+num+"]",M0,White,pstyle);
   PlotLine("M1["+num+"]",M1,White,pstyle);
   PlotLine("M2["+num+"]",M2,White,pstyle);
   PlotLine("M3["+num+"]",M3,White,pstyle);
   PlotLine("M4["+num+"]",M4,White,pstyle);
   PlotLine("M5["+num+"]",M5,White,pstyle);
  }
         
  if(Plot_camarilla)
  {
   PlotLine("H4["+num+"]",H4,LightBlue,cstyle);
   PlotLine("H3["+num+"]",H3,DeepSkyBlue,cstyle);
   PlotLine("H2["+num+"]",H2,MediumSlateBlue,cstyle);
   PlotLine("H1["+num+"]",H1,RoyalBlue,cstyle);
      
   PlotLine("L1["+num+"]",L1,Chocolate,cstyle);
   PlotLine("L2["+num+"]",L2,Orange,cstyle);
   PlotLine("L3["+num+"]",L3,Goldenrod,cstyle);
   PlotLine("L4["+num+"]",L4,Yellow,cstyle);
  }
  }
   return(0);
  }
//+------------------------------------------------------------------+

Quoting NoJobRob

Disliked

I customized the AllPivots_v2 indicator to my liking, and saved 3 different versions of it as Pivots Day, Pivots Week, and Pivots Month so I could just slap on whatever I wanted on a particular chart. However, for some reason it only shows one of them. I had Pivots Day plotted and then when I added Pivots Week it made Pivots Day disappear while showing Pivots Week. Same thing for Pivots Month. Can anyone tell me why this is happening? Here's the code and indi's:

Ignored

Quoting kishoresiju

Disliked

Hello All MASTER MIND, I have a Fibonacci Daily Pivot S/R indicator. It works very nice... But I need some extra features like: 1. Add Extra Feature for Weekly and Monthly Pivot, Support - Resistance 2. Exclude Sunday Candles. Add GMT offset 3. Make all solid thin lines with gray color, I don't like dashed dotted lines. I know this is very simple job for experience programmer. I have attached the file, please edit it and add such extra feature and share it everywhere as it is mostly needed. Thank you {file}

Ignored

Quoting aquaart

Disliked

Hi y'all, :A Request: I have a large number of indicators here, from many different people. However I am looking for a weekly pivot point indicator that has an adjustable timezone (time zone). And a nice thank you to all the people that created these indi's. That is I would like to be able to do weekly pivots based on Monday 2am through to Monday 2am as my servers are based in Cypress and hence their 2am is GMT midnight. I would also like to be able to 7am to 7am so that I get the NY's EST pivot lines. Cause my programming skills are very limited,...

Ignored

Quoting aquaart

Disliked

Hi y'all, :A Request: I have a large number of indicators here, from many different people. However I am looking for a weekly pivot point indicator that has an adjustable timezone (time zone). And a nice thank you to all the people that created these indi's. That is I would like to be able to do weekly pivots based on Monday 2am through to Monday 2am as my servers are based in Cypress and hence their 2am is GMT midnight. I would also like to be able to 7am to 7am so that I get the NY's EST pivot lines. Cause my programming skills are very limited,...

Ignored

Quoting Imsuccessful

Disliked

{quote} Hey there, I love your Fibonacci Pivot Indicator... I was wondering, did you ever get those modifications you wanted? I would love to have the modified version that you were looking for.

Ignored

Quoting paulsue

Disliked

{quote} Did you ever find your fibo pivot indicator which can plot Daily, Weekly and Monthly fibo pivots on your Daily chart? I am looking for this indicator as well. I have an indicator which I am using now, which writes Weekly and Monthly Support/Resistance in big letters which masks my candles. There are no adjustable settings on this one! Hence I am looking for a Daily/Weekly/Monthly fibo pivot indicator which does not clutter the Daily chart with too much of text on the chart. Can you help? Paul Ika

Ignored