//+------------------------------------------------------------------+
//| Multi Pivots.mq4 |
//| Converted to MT4 / MQ4 by Flash52 |
//| MetaTrader_Experts_and_Indicators@yahoogroups.com |
//+------------------------------------------------------------------+
#property copyright "Converted to MT4 / MQ4 by Flash52"
#property link "MetaTrader_Experts_and_Indicators@yahoogroups.com"
//----
// This indicator allows the user to select which set(s) of pivots they wish to display.
// If your favorite pivot is not included, simply add it in or modify one of the existing pivots
//----
#property indicator_chart_window
extern int Show_Woodies_Pivots = 1; // 1 = Yes, 0 = No
extern int Show_Camarilla_Pivots = 1; // 1 = Yes, 0 = No
extern int Show_Demark_Pivots = 1; // 1 = Yes, 0 = No
extern int Show_Standard_Pivots = 0; // 1 = Yes, 0 = No
datetime prevtime=0;
datetime prev_day=0;
datetime cur_day=0;
double rates_d1[2][6];
double day_high=0;
double day_low=0;
double yesterday_high=0;
double yesterday_open=0;
double yesterday_low=0;
double yesterday_close=0;
double today_open=0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//---- TODO: add your code here
//----
return(0);
}
//+------------------------------------------------------------------+
//| Multi Daily Pivots iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
//---- initialize local variables
double r2=0;
double r1=0;
double p=0;
double s1=0;
double s2=0;
double sr3=0;
double sr2=0;
double sr1=0;
double sp=0;
double ss1=0;
double ss2=0;
double ss3=0;
double ch1=0;
double ch2=0;
double ch3=0;
double ch4=0;
double cl1=0;
double cl2=0;
double cl3=0;
double cl4=0;
double D1=0.091667;
double D2=0.183333;
double D3=0.2750;
double D4=0.55;
double dr=0;
double ds=0;
double x=0;
string ch3_text="";
//---- exit if period is greater than daily charts
if(Period() > 1440)
{
Print("Error - Chart period is greater than 1 day.");
return(-1); // then exit
}
//---- If the day has changed then get new daily rates & recalculate pivots
//---- Check for day change once each new bar
//---- Allow labels & lines to be redrawn each bar
if(prevtime == Time[0])return(0); // exit unless new bar
prevtime = Time[0]; // reset to current bar time
cur_day = Day();
if(prev_day != cur_day)
{
ArrayCopyRates(rates_d1, Symbol(), PERIOD_D1);
yesterday_close = rates_d1[1][4];
yesterday_open = rates_d1[1][1];
today_open = rates_d1[0][1];
yesterday_high = rates_d1[1][3];
yesterday_low = rates_d1[1][2];
prev_day = cur_day;
}
//---- Calculate Standard Pivots
if(Show_Standard_Pivots == 1)
{
sp = (yesterday_high+yesterday_low+yesterday_close+today_open)/4;
sr1 = (2*sp)-yesterday_low;
ss1 = (2*sp)-yesterday_high;
sr2 = sp+(yesterday_high-yesterday_low);
ss2 = sp-(yesterday_high+yesterday_low);
sr3 = (2*sp)-yesterday_low-yesterday_low+yesterday_high;
ss3 = (2*sp)-yesterday_high-yesterday_high+yesterday_low;
//---- Set standard pivot line labels on chart window
if(ObjectFind("SR1 label") != 0)
{
ObjectCreate("SR1 label", OBJ_TEXT, 0, Time[20], sr1);
ObjectSetText("SR1 label", "R1 "+DoubleToStr(sr1,4), 8, "Arial", White);
}
else
{
ObjectSetText("SR1 label", "R1 "+DoubleToStr(sr1,4), 8, "Arial", White);
ObjectMove("SR1 label", 0, Time[20], sr1);
}
if(ObjectFind("SR2 label") != 0)
{
ObjectCreate("SR2 label", OBJ_TEXT, 0, Time[20], sr2);
ObjectSetText("SR2 label", "R2 "+DoubleToStr(sr2,4), 8, "Arial", White);
}
else
{
ObjectSetText("SR2 label", "R2 "+DoubleToStr(sr2,4), 8, "Arial", White);
ObjectMove("SR2 label", 0, Time[20], sr2);
}
if(ObjectFind("SR3 label") != 0)
{
ObjectCreate("SR3 label", OBJ_TEXT, 0, Time[20], sr3);
ObjectSetText("SR3 label", "R3 "+DoubleToStr(sr3,4), 8, "Arial", White);
}
else
{
ObjectSetText("SR3 label", "R3 "+DoubleToStr(sr3,4), 8, "Arial", White);
ObjectMove("SR3 label", 0, Time[20], sr3);
}
if(ObjectFind("SP label") != 0)
{
ObjectCreate("SP label", OBJ_TEXT, 0, Time[20], sp);
ObjectSetText("SP label", "Pivot "+DoubleToStr(sp,4), 8, "Arial", White);
}
else
{
ObjectSetText("SP label", "Pivot "+DoubleToStr(sp,4), 8, "Arial", White);
ObjectMove("SP label", 0, Time[20], sp);
}
if(ObjectFind("SS1 label") != 0)
{
ObjectCreate("SS1 label", OBJ_TEXT, 0, Time[20], ss1);
ObjectSetText("SS1 label", "S1 "+DoubleToStr(ss1,4), 8, "Arial", White);
}
else
{
ObjectSetText("SS1 label", "S1 "+DoubleToStr(ss1,4), 8, "Arial", White);
ObjectMove("SS1 label", 0, Time[20], ss1);
}
if(ObjectFind("SS2 label") != 0)
{
ObjectCreate("SS2 label", OBJ_TEXT, 0, Time[20], ss2);
ObjectSetText("S2 label", "S2 "+DoubleToStr(ss2,4), 8, "Arial", White);
}
else
{
ObjectSetText("SS2 label", "S2 "+DoubleToStr(ss2,4), 8, "Arial", White);
ObjectMove("SS2 label", 0, Time[20], ss2);
}
if(ObjectFind("SS3 label") != 0)
{
ObjectCreate("SS3 label", OBJ_TEXT, 0, Time[20], ss3);
ObjectSetText("SS3 label", "S3 "+DoubleToStr(ss3,4), 8, "Arial", White);
}
else
{
ObjectSetText("SS3 label", "S3 "+DoubleToStr(ss3,4), 8, "Arial", White);
ObjectMove("SS3 label", 0, Time[20], ss3);
}
//---- Set standard pivot lines on chart window
if(ObjectFind("SS1 line") != 0)
{
ObjectCreate("SS1 line", OBJ_HLINE, 0, Time[40], ss1);
ObjectSet("SS1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SS1 line", OBJPROP_COLOR, LimeGreen);
}
else
{
ObjectMove("SS1 line", 0, Time[40], ss1);
}
if(ObjectFind("SS2 line") != 0)
{
ObjectCreate("SS2 line", OBJ_HLINE, 0, Time[40], ss2);
ObjectSet("SS2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SS2 line", OBJPROP_COLOR, LimeGreen);
}
else
{
ObjectMove("SS2 line", 0, Time[40], ss2);
}
if(ObjectFind("SS3 line") != 0)
{
ObjectCreate("SS3 line", OBJ_HLINE, 0, Time[40], ss3);
ObjectSet("SS3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SS3 line", OBJPROP_COLOR, LimeGreen);
}
else
{
ObjectMove("SS3 line", 0, Time[40], ss3);
}
if(ObjectFind("SP line") != 0)
{
ObjectCreate("SP line", OBJ_HLINE, 0, Time[40], sp);
ObjectSet("SP line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SP line", OBJPROP_COLOR, Magenta);
}
else
{
ObjectMove("SP line", 0, Time[40], sp);
}
if(ObjectFind("SR1 line") != 0)
{
ObjectCreate("SR1 line", OBJ_HLINE, 0, Time[40], sr1);
ObjectSet("SR1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SR1 line", OBJPROP_COLOR, OrangeRed);
}
else
{
ObjectMove("SR1 line", 0, Time[40], sr1);
}
if(ObjectFind("SR2 line") != 0)
{
ObjectCreate("SR2 line", OBJ_HLINE, 0, Time[40], sr2);
ObjectSet("SR2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SR2 line", OBJPROP_COLOR, OrangeRed);
}
else
{
ObjectMove("SR2 line", 0, Time[40], sr2);
}
if(ObjectFind("SR3 line") != 0)
{
ObjectCreate("SR3 line", OBJ_HLINE, 0, Time[40], sr3);
ObjectSet("SR3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("SR3 line", OBJPROP_COLOR, OrangeRed);
}
else
{
ObjectMove("SR3 line", 0, Time[40], sr3);
}
}
//---- End Of standard pivots
//----------------------------------------------------------------------------------------------
//---- Calculate Woody Pivots
if(Show_Woodies_Pivots == 1)
{
p = (yesterday_high + yesterday_low + today_open + today_open) / 4;// Woodies Pivot
r1 = (2*p)-yesterday_low;
s1 = (2*p)-yesterday_high;
r2 = p+(yesterday_high - yesterday_low);
s2 = p-(yesterday_high - yesterday_low);
//---- Set Woody pivot line labels on chart window
if(ObjectFind("R1 label") != 0)
{
ObjectCreate("R1 label", OBJ_TEXT, 0, Time[20], r1);
ObjectSetText("R1 label", "Woodies R1 "+DoubleToStr(r1,4), 8, "Arial", White);
}
else
{
ObjectSetText("R1 label", "Woodies R1 "+DoubleToStr(r1,4), 8, "Arial", White);
ObjectMove("R1 label", 0, Time[20], r1);
}
if(ObjectFind("R2 label") != 0)
{
ObjectCreate("R2 label", OBJ_TEXT, 0, Time[20], r2);
ObjectSetText("R2 label", "Woodies R2 "+DoubleToStr(r2,4), 8, "Arial", White);
}
else
{
ObjectSetText("R2 label", "Woodies R2 "+DoubleToStr(r2,4), 8, "Arial", White);
ObjectMove("R2 label", 0, Time[20], r2);
}
if(ObjectFind("P label") != 0)
{
ObjectCreate("P label", OBJ_TEXT, 0, Time[20], p);
ObjectSetText("P label", "Woodies Pivot "+DoubleToStr(p,4), 8, "Arial", White);
}
else
{
ObjectSetText("P label", "Woodies Pivot "+DoubleToStr(p,4), 8, "Arial", White);
ObjectMove("P label", 0, Time[20], p);
}
if(ObjectFind("S1 label") != 0)
{
ObjectCreate("S1 label", OBJ_TEXT, 0, Time[20], s1);
ObjectSetText("S1 label", "Woodies S1 "+DoubleToStr(s1,4), 8, "Arial", White);
}
else
{
ObjectSetText("S1 label", "Woodies S1 "+DoubleToStr(s1,4), 8, "Arial", White);
ObjectMove("S1 label", 0, Time[20], s1);
}
if(ObjectFind("S2 label") != 0)
{
ObjectCreate("S2 label", OBJ_TEXT, 0, Time[20], s2);
ObjectSetText("S2 label", "Woodies S2 "+DoubleToStr(s2,4), 8, "Arial", White);
}
else
{
ObjectSetText("S2 label", "Woodies S2 "+DoubleToStr(s2,4), 8, "Arial", White);
ObjectMove("S2 label", 0, Time[20], s2);
}
//---- Set Woody pivot lines on chart window
if(ObjectFind("S1 line") != 0)
{
ObjectCreate("S1 line", OBJ_HLINE, 0, Time[40], s1);
ObjectSet("S1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("S1 line", OBJPROP_COLOR, LimeGreen);
}
else
{
ObjectMove("S1 line", 0, Time[40], s1);
}
if(ObjectFind("S2 line") != 0)
{
ObjectCreate("S2 line", OBJ_HLINE, 0, Time[40], s2);
ObjectSet("S2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("S2 line", OBJPROP_COLOR, LimeGreen);
}
else
{
ObjectMove("S2 line", 0, Time[40], s2);
}
if(ObjectFind("P line") != 0)
{
ObjectCreate("P line", OBJ_HLINE, 0, Time[40], p);
ObjectSet("P line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("P line", OBJPROP_COLOR, Magenta);
}
else
{
ObjectMove("P line", 0, Time[40], p);
}
if(ObjectFind("R1 line") != 0)
{
ObjectCreate("R1 line", OBJ_HLINE, 0, Time[40], r1);
ObjectSet("R1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("R1 line", OBJPROP_COLOR, OrangeRed);
}
else
{
ObjectMove("R1 line", 0, Time[40], r1);
}
if(ObjectFind("R2 line") != 0)
{
ObjectCreate("R2 line", OBJ_HLINE, 0, Time[40], r2);
ObjectSet("R2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
ObjectSet("R2 line", OBJPROP_COLOR, OrangeRed);
}
else
{
ObjectMove("R2 line", 0, Time[40], r2);
}
}
//---- End Of Woodies Pivots
//---------------------------------------------------------------------------------------------
//---- Calculate & Display Camarilla Equation Pivots
if(Show_Camarilla_Pivots == 1)
{
//---- To display all 8 Camarilla pivots remove comment symbols and
// add the appropriate object functions below
// ch1 = ((yesterday_high - yesterday_low) * D1) + yesterday_close;
// ch2 = ((yesterday_high - yesterday_low) * D2) + yesterday_close;
ch3 = ((yesterday_high - yesterday_low)* D3) + yesterday_close;
ch4 = ((yesterday_high - yesterday_low)* D4) + yesterday_close;
// cl1 = yesterday_close - ((yesterday_high - yesterday_low)*(D1));
// cl2 = yesterday_close - ((yesterday_high - yesterday_low)*(D2));
cl3 = yesterday_close - ((yesterday_high - yesterday_low)*(D3));
cl4 = yesterday_close - ((yesterday_high - yesterday_low)*(D4));
//---- Set Camarilla pivots line labels on chart window
if(ObjectFind("CH3") != 0)
{
ObjectCreate("CH3", OBJ_TEXT, 0, Time[35], ch3);
ObjectSetText("CH3","Camarilla H3 "+DoubleToStr(ch3,4) , 8, "Arial", White);
}
else
{
ObjectSetText("CH3","Camarilla H3 "+DoubleToStr(ch3,4) , 8, "Arial", White);
ObjectMove("CH3", 0, Time[35], ch3);
}
if(ObjectFind("CH4") != 0)
{
ObjectCreate("CH4", OBJ_TEXT, 0, Time[35], ch4);
ObjectSetText("CH4", "Camarilla H4 "+DoubleToStr(ch4,4), 8, "Arial", White);
}
else
{
ObjectSetText("CH4", "Camarilla H4 "+DoubleToStr(ch4,4), 8, "Arial", White);
ObjectMove("CH4", 0, Time[35], ch4);
}
if(ObjectFind("CL3") != 0)
{
ObjectCreate("CL3", OBJ_TEXT, 0, Time[35], cl3);
ObjectSetText("CL3", "Camarilla L3 "+DoubleToStr(cl3,4), 8, "Arial", White);
}
else
{
ObjectSetText("CL3", "Camarilla L3 "+DoubleToStr(cl3,4), 8, "Arial", White);
ObjectMove("CL3", 0, Time[35 ], cl3);
}
if(ObjectFind("CL4") != 0)
{
ObjectCreate("CL4", OBJ_TEXT, 0, Time[ 35], cl4);
ObjectSetText("CL4", "Camarilla L4 "+DoubleToStr(cl4,4), 8, "Arial", White);
}
else
{
ObjectSetText("CL4", "Camarilla L4 "+DoubleToStr(cl4,4), 8, "Arial", White);
ObjectMove("CL4", 0, Time[35], cl4);
}
//---- Set Camarilla pivots lines on chart window
if(ObjectFind("CH3line") != 0)
{
ObjectCreate("CH3line", OBJ_HLINE, 0, Time[40], ch3);
ObjectSet("CH3line", OBJPROP_STYLE, STYLE_DOT);
ObjectSet("CH3line", OBJPROP_COLOR, Red);
}
else
{
ObjectMove("CH3line", 0, Time[40], ch3);
}
if(ObjectFind("CH4line") != 0)
{
ObjectCreate("CH4line", OBJ_HLINE, 0, Time[40], ch4);
ObjectSet("CH4line", OBJPROP_STYLE, STYLE_DOT);
ObjectSet("CH4line", OBJPROP_COLOR, DodgerBlue);
}
else
{
ObjectMove("CH4line", 0, Time[40], ch4);
}
if(ObjectFind("CL3line") != 0)
{
ObjectCreate("CL3line", OBJ_HLINE, 0, Time[40], cl3);
ObjectSet("CL3line", OBJPROP_STYLE, STYLE_DOT);
ObjectSet("CL3line", OBJPROP_COLOR, Red);
}
else
{
ObjectMove("CL3line", 0, Time[40], cl3);
}
if(ObjectFind("CL4line") != 0)
{
ObjectCreate("CL4line", OBJ_HLINE, 0, Time[40], cl4);
ObjectSet("CL4line", OBJPROP_STYLE, STYLE_DOT);
ObjectSet("CL4line", OBJPROP_COLOR, DodgerBlue);
}
else
{
ObjectMove("CL4line", 0, Time[40], cl4);
}
}
//---- End Of Camarilla Pivots
//----------------------------------------------------------------------------------------------
//---- Calculate DeMark Pivots (Projected Daily High & Low)
if(Show_Demark_Pivots == 1)
{
if(yesterday_close < yesterday_open)
{
x = (yesterday_high + (2* yesterday_low) + yesterday_close);
}
if(yesterday_close > yesterday_open)
{
x = ((yesterday_high*2) + yesterday_low + yesterday_close);
}
if(yesterday_close == yesterday_open)
{
x = (yesterday_high + yesterday_low + (2* yesterday_close));
}
dr = (x/2 - yesterday_low); //projected high
ds = (x/2 - yesterday_high); //projected low
//---- Set DeMark pivots line labels on chart window
if(ObjectFind("DS Label") != 0)
{
ObjectCreate("DS Label", OBJ_TEXT, 0, Time[55], ds);
ObjectSetText("DS Label", "DeMark Projected Low "+DoubleToStr(ds,4), 8, "Arial", White);
}
else
{
ObjectSetText("DS Label", "DeMark Projected Low "+DoubleToStr(ds,4), 8, "Arial", White);
ObjectMove("DS Label", 0, Time[55], ds);
}
if(ObjectFind("DR Label") != 0)
{
ObjectCreate("DR Label", OBJ_TEXT, 0, Time[55], dr);
ObjectSetText("DR Label", "DeMark Projected High "+DoubleToStr(dr,4), 8, "Arial", White);
}
else
{
ObjectSetText("DR Label", "DeMark Projected High "+DoubleToStr(dr,4), 8, "Arial", White);
ObjectMove("DR Label", 0, Time[55], dr);
}
//---- Set DeMark pivots lines on chart window
if(ObjectFind("DS Line") != 0)
{
ObjectCreate("DS Line", OBJ_HLINE, 0, Time[50], ds);
ObjectSet("DS Line", OBJPROP_STYLE, STYLE_DASHDOT);
ObjectSet("DS Line", OBJPROP_COLOR, Red);
}
else
{
ObjectMove("DS Line", 0, Time[50], ds);
}
if(ObjectFind("DR Line") != 0)
{
ObjectCreate("DR Line", OBJ_HLINE, 0, Time[50], dr);
ObjectSet("DR Line", OBJPROP_STYLE, STYLE_DASHDOT);
ObjectSet("DR Line", OBJPROP_COLOR, Lime);
}
else
{
ObjectMove("DR Line", 0, Time[50], dr);
}
}
//---- End Of Demark Pivots
//----------------------------------------------------------------------------------------------
//---- Done
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Indicator Curves created:
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: