grid yens

grid yens

This script is designed to automate the drawing of "Pivot Points" on your trading charts. Pivot points are technical analysis levels used by traders to identify potential areas of support (where prices might stop falling) and resistance (where prices might stop rising).

The tool allows you to visualize these levels across three different timeframes: Daily, Weekly, and Monthly. Here is a breakdown of how the logic works for each:

Core Functionality

The script scans historical price data to identify key milestones—specifically the High, Low, and Close prices of previous periods. It then uses mathematical formulas to project several horizontal lines onto your current chart. These lines serve as visual "roadmaps" for where the market might react in the future.

Timeframe Breakdowns

1. Daily Pivot Points When enabled, the script looks at the price action of the previous trading day. It calculates a central "Pivot" line and identifies:

  • Resistance Levels (R1, R2, R3): These indicate areas where selling pressure might increase.
  • Support Levels (S1, S2, S3): These indicate areas where buying interest might strengthen.

2. Weekly Pivot Points This is the default setting for this script. It focuses on the opening price of the current week and projects a wide range of levels.

  • It creates a series of "Weekly Support" (WS) and "Weekly Resistance" (WR) lines.
  • These are plotted at specific increments (ranging from 50 to 400 units), helping traders see the broad boundaries of the week's price movement.

3. Monthly Pivot Points When activated, the script analyzes the high, low, and closing prices of the previous month. It generates:

  • A Monthly Pivot line (the average equilibrium for the month).
  • Monthly Resistance and Support levels to help identify long-term market trends and major structural turning points.

Visual Experience

To keep your chart clean and readable, the script follows these visual rules:

  • Color Coding: Each timeframe and type of level is assigned a specific color (e.g., Magenta for Daily Pivots, Aqua/Blue for Weekly, and Brown/Silver/Blue for Monthly) so you can distinguish them at a glance.
  • Labels: The script automatically places text labels on the lines (such as "Daily R1" or "Weekly Support") so you don't have to guess which line is which.
  • Clean Cleanup: When you remove the script from your chart, it is programmed to automatically delete all the lines and labels it created, leaving your workspace tidy.
10 Views
1 Downloads
0 Favorites
grid yens 
//+------------------------------------------------------------------+
//|        KlPivot_Weekly_yen.mq4              by Habeeb             |
//|                                                                  |
//+------------------------------------------------------------------+

#property indicator_chart_window

   extern bool Daily   = False;
   extern bool Weekly  = True;
   extern bool Monthly = False;

   double YesterdayHigh;
   double YesterdayLow;
   double YesterdayClose;
   double Day_Price[][6];
   double Pivot,S1,S2,S3,R1,R2,R3;
   
   double WeekOpen;
   double WeekLow;
   double WeekClose;
   double Weekly_Price[][6];
   double WeekPivot,WS1,WS2,WS3,WS4,WS5,WS6,WS7,WS8,WR1,WR2,WR3,WR4,WR5,WR6,WR7,WR8;
   
   double MonthHigh;
   double MonthLow;
   double MonthClose;
   double Month_Price[][6];
   double MonthPivot,MS1,MS2,MS3,MR1,MR2,MR3;

int init()
  {
   return(0);
  }
  
//-------------------------------------------------------- 
  
int deinit()
  {
ObjectDelete("PivotLine");

ObjectDelete("R1_Line");
ObjectDelete("R2_Line");
ObjectDelete("R3_Line");

ObjectDelete("S1_Line");
ObjectDelete("S2_Line");
ObjectDelete("S3_Line");  

//--------------------------------

ObjectDelete("PivotLabel");

ObjectDelete("R1_Label");
ObjectDelete("R2_Label");
ObjectDelete("R3_Label");

ObjectDelete("S1_Label");
ObjectDelete("S2_Label");
ObjectDelete("S3_Label"); 

//--------------------------------------------------------

ObjectDelete("WeekPivotLine");

ObjectDelete("WR1_Line");
ObjectDelete("WR2_Line");
ObjectDelete("WR3_Line");
ObjectDelete("WR4_Line");
ObjectDelete("WR5_Line");
ObjectDelete("WR6_Line");
ObjectDelete("WR7_Line");
ObjectDelete("WR8_Line");

ObjectDelete("WS1_Line");
ObjectDelete("WS2_Line");
ObjectDelete("WS3_Line");
ObjectDelete("WS4_Line");
ObjectDelete("WS5_Line");
ObjectDelete("WS6_Line");
ObjectDelete("WS7_Line");
ObjectDelete("WS8_Line"); 

//--------------------------------

ObjectDelete("WeekPivotLabel");

ObjectDelete("WR1_Label");
ObjectDelete("WR2_Label");
ObjectDelete("WR3_Label");
ObjectDelete("WR4_Label");
ObjectDelete("WR5_Label");
ObjectDelete("WR6_Label");
ObjectDelete("WR7_Label");
ObjectDelete("WR8_Label");

ObjectDelete("WS1_Label");
ObjectDelete("WS2_Label");
ObjectDelete("WS3_Label");
ObjectDelete("WS4_Label");
ObjectDelete("WS5_Label"); 

//--------------------------------------------------------

ObjectDelete("MonthPivotLine");

ObjectDelete("MR1_Line");
ObjectDelete("MR2_Line");
ObjectDelete("MR3_Line");

ObjectDelete("MS1_Line");
ObjectDelete("MS2_Line");
ObjectDelete("MS3_Line");  

//--------------------------------

ObjectDelete("MonthPivotLabel");

ObjectDelete("MR1_Label");
ObjectDelete("MR2_Label");
ObjectDelete("MR3_Label");

ObjectDelete("MS1_Label");
ObjectDelete("MS2_Label");
ObjectDelete("MS3_Label");

return(0);
}
//--------------------------------------------------------- 

int start()
{

ArrayInitialize(Day_Price,0);
ArrayCopyRates(Day_Price,(Symbol()), 1440);


YesterdayHigh  = Day_Price[1][3];
YesterdayLow   = Day_Price[1][2];
YesterdayClose = Day_Price[1][4];

Pivot = ((YesterdayHigh + YesterdayLow + YesterdayClose)/3);

   R1 = (2*Pivot)-YesterdayLow;
   S1 = (2*Pivot)-YesterdayHigh;

   R2 = Pivot+(R1-S1);
   S2 = Pivot-(R1-S1);

   S3 = (YesterdayLow - (2*(YesterdayHigh-Pivot)));
   R3 = (YesterdayHigh + (2*(Pivot-YesterdayLow)));

//--------------------------------------------------------
//--------------------------------------------------------

ArrayInitialize(Weekly_Price, 0);
ArrayCopyRates(Weekly_Price, Symbol(), 10080);

WeekOpen  = Weekly_Price[0][1];
//WeekLow   = Weekly_Price[1][2];
//WeekClose = Weekly_Price[1][4];

WeekPivot = WeekOpen;

      WR1 = WeekPivot + 0.5;
      WS1 = WeekPivot - 0.5;

      WR2 = WeekPivot + 1.0;
      WS2 = WeekPivot - 1.0;

      WS3 = WeekPivot - 1.5;
      WR3 = WeekPivot + 1.5;
      
      WS4 = WeekPivot - 2.0;
      WR4 = WeekPivot + 2.0;
      
      WS5 = WeekPivot - 2.5;
      WR5 = WeekPivot + 2.5;
      
      WS6 = WeekPivot - 3.0;
      WR6 = WeekPivot + 3.0;
      
      WS7 = WeekPivot - 3.5;
      WR7 = WeekPivot + 3.5;
      
      WS8 = WeekPivot - 4.0;
      WR8 = WeekPivot + 4.0;          

//--------------------------------------------------------
//--------------------------------------------------------

ArrayInitialize(Month_Price, 0);
ArrayCopyRates(Month_Price, Symbol(), 43200);

MonthHigh  = Month_Price[1][3];
MonthLow   = Month_Price[1][2];
MonthClose = Month_Price[1][4];

MonthPivot = ((MonthHigh + MonthLow + MonthClose)/3);

      MR1 = (2*MonthPivot)-MonthLow;
      MS1 = (2*MonthPivot)-MonthHigh;

      MR2 = MonthPivot+(MR1-MS1);
      MS2 = MonthPivot-(MR1-MS1);

      MS3 = (MonthLow - (2*(MonthHigh-MonthPivot)));
      MR3 = (MonthHigh + (2*(MonthPivot-MonthLow)));

//--------------------------------------------------------

if (Daily==true)
{

ObjectCreate("PivotLine", OBJ_HLINE,0, CurTime(),Pivot);
ObjectSet("PivotLine", OBJPROP_COLOR, Magenta);
ObjectSet("PivotLine", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("PivotLabel") != 0)
{
ObjectCreate("PivotLabel", OBJ_TEXT, 0, Time[20], Pivot);
ObjectSetText("PivotLabel", "Daily Pivot", 8, "Arial", Magenta);
}
else
{
ObjectMove("PivotLabel", 0, Time[20], Pivot);
}

//--------------------------------------------------------

ObjectCreate("R1_Line", OBJ_HLINE,0, CurTime(),R1);
ObjectSet("R1_Line", OBJPROP_COLOR, Maroon);
ObjectSet("R1_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("R1_Label") != 0)
{
ObjectCreate("R1_Label", OBJ_TEXT, 0, Time[20], R1);
ObjectSetText("R1_Label", "Daily R1", 8, "Arial", Red);
}
else
{
ObjectMove("R1_Label", 0, Time[20], R1);
}

//--------------------------------------------------------

ObjectCreate("R2_Line", OBJ_HLINE,0, CurTime(),R2);
ObjectSet("R2_Line", OBJPROP_COLOR, Red);
ObjectSet("R2_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("R2_Label") != 0)
{
ObjectCreate("R2_Label", OBJ_TEXT, 0, Time[20], R2);
ObjectSetText("R2_Label", "Daily R2", 8, "Arial", Red);
}
else
{
ObjectMove("R2_Label", 0, Time[20], R2);
}

//---------------------------------------------------------

ObjectCreate("R3_Line", OBJ_HLINE,0, CurTime(),R3);
ObjectSet("R3_Line", OBJPROP_COLOR, Red);
ObjectSet("R3_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("R3_Label") != 0)
{
ObjectCreate("R3_Label", OBJ_TEXT, 0, Time[20], R3);
ObjectSetText("R3_Label", "Daily R3", 8, "Arial", Red);
}
else
{
ObjectMove("R3_Label", 0, Time[20], R3);
}

//---------------------------------------------------------

ObjectCreate("S1_Line", OBJ_HLINE,0, CurTime(),S1);
ObjectSet("S1_Line", OBJPROP_COLOR, LimeGreen);
ObjectSet("S1_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("S1_Label") != 0)
{
ObjectCreate("S1_Label", OBJ_TEXT, 0, Time[20], S1);
ObjectSetText("S1_Label", "Daily S1", 8, "Arial", LimeGreen);
}
else
{
ObjectMove("S1_Label", 0, Time[20], S1);
}

//---------------------------------------------------------

ObjectCreate("S2_Line", OBJ_HLINE,0, CurTime(),S2);
ObjectSet("S2_Line", OBJPROP_COLOR, LimeGreen);
ObjectSet("S2_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("S2_Label") != 0)
{
ObjectCreate("S2_Label", OBJ_TEXT, 0, Time[20], S2);
ObjectSetText("S2_Label", "Daily S2", 8, "Arial", LimeGreen);
}
else
{
ObjectMove("S2_Label", 0, Time[20], S2);
}
//---------------------------------------------------------

ObjectCreate("S3_Line", OBJ_HLINE,0, CurTime(),S3);
ObjectSet("S3_Line", OBJPROP_COLOR, LimeGreen);
ObjectSet("S3_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("S3_Label") != 0)
{
ObjectCreate("S3_Label", OBJ_TEXT, 0, Time[20], S3);
ObjectSetText("S3_Label", "Daily S3", 8, "Arial", LimeGreen);
}
else
{
ObjectMove("S3_Label", 0, Time[20], S3);
}
}
ObjectsRedraw();

//---------------------------------------------------------
//---------------------------------------------------------
//---------------------------------------------------------

if (Weekly==true)
{
ObjectCreate("WeekPivotLine", OBJ_HLINE,0, CurTime(),WeekPivot);
ObjectSet("WeekPivotLine", OBJPROP_COLOR, Aqua);
ObjectSet("WeekPivotLine", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WeekPivotLabel") != 0)
{
ObjectCreate("WeekPivotLabel", OBJ_TEXT, 0, Time[30], WeekPivot);
ObjectSetText("WeekPivotLabel", "WeeklyPivot 00", 8, "Arial", Aqua);
}
else
{
ObjectMove("WeekPivotLabel", 0, Time[30], WeekPivot);
}

//--------------------------------------------------------

ObjectCreate("WR1_Line", OBJ_HLINE,0, CurTime(),WR1);
ObjectSet("WR1_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR1_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR1_Label") != 0)
{
ObjectCreate("WR1_Label", OBJ_TEXT, 0, Time[30], WR1);
ObjectSetText("WR1_Label", " ", 8, "Arial", White);
}
else
{
ObjectMove("WR1_Label", 0, Time[30], WR1);
}

//--------------------------------------------------------

ObjectCreate("WR2_Line", OBJ_HLINE,0, CurTime(),WR2);
ObjectSet("WR2_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR2_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR2_Label") != 0)
{
ObjectCreate("WR2_Label", OBJ_TEXT, 0, Time[30], WR2);
ObjectSetText("WR2_Label", " +100", 8, "Arial", White);
}
else
{
ObjectMove("WR2_Label", 0, Time[30], WR2);
}

//---------------------------------------------------------

ObjectCreate("WR3_Line", OBJ_HLINE,0, CurTime(),WR3);
ObjectSet("WR3_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR3_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR3_Label") != 0)
{
ObjectCreate("WR3_Label", OBJ_TEXT, 0, Time[30], WR3);
ObjectSetText("WR3_Label", " +150", 8, "Arial", White);
}
else
{
ObjectMove("WR3_Label", 0, Time[30], WR3);
}

//---------------------------------------------------------

ObjectCreate("WR4_Line", OBJ_HLINE,0, CurTime(),WR4);
ObjectSet("WR4_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR4_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR4_Label") != 0)
{
ObjectCreate("WR4_Label", OBJ_TEXT, 0, Time[30], WR4);
ObjectSetText("WR4_Label", " +200", 8, "Arial", White);
}
else
{
ObjectMove("WR4_Label", 0, Time[30], WR4);
}
//---------------------------------------------------------

ObjectCreate("WR5_Line", OBJ_HLINE,0, CurTime(),WR5);
ObjectSet("WR5_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR5_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR5_Label") != 0)
{
ObjectCreate("WR5_Label", OBJ_TEXT, 0, Time[30], WR5);
ObjectSetText("WR5_Label", " +250", 8, "Arial", White);
}
else
{
ObjectMove("WR5_Label", 0, Time[30], WR5);
}

//---------------------------------------------------------

ObjectCreate("WR6_Line", OBJ_HLINE,0, CurTime(),WR6);
ObjectSet("WR6_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR6_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR6_Label") != 0)
{
ObjectCreate("WR6_Label", OBJ_TEXT, 0, Time[30], WR6);
ObjectSetText("WR6_Label", " +300", 8, "Arial", White);
}
else
{
ObjectMove("WR6_Label", 0, Time[30], WR6);
}

//---------------------------------------------------------

ObjectCreate("WR7_Line", OBJ_HLINE,0, CurTime(),WR7);
ObjectSet("WR7_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR7_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR7_Label") != 0)
{
ObjectCreate("WR7_Label", OBJ_TEXT, 0, Time[30], WR7);
ObjectSetText("WR7_Label", " +350", 8, "Arial", White);
}
else
{
ObjectMove("WR7_Label", 0, Time[30], WR7);
}


//---------------------------------------------------------

ObjectCreate("WR8_Line", OBJ_HLINE,0, CurTime(),WR8);
ObjectSet("WR8_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WR8_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WR8_Label") != 0)
{
ObjectCreate("WR8_Label", OBJ_TEXT, 0, Time[30], WR8);
ObjectSetText("WR8_Label", " +400", 8, "Arial", White);
}
else
{
ObjectMove("WR8_Label", 0, Time[30], WR8);
}


//--------------------------------------------------------

ObjectCreate("WS1_Line", OBJ_HLINE,0, CurTime(),WS1);
ObjectSet("WS1_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS1_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS1_Label") != 0)
{
ObjectCreate("WS1_Label", OBJ_TEXT, 0, Time[30], WS1);
ObjectSetText("WS1_Label", "-50", 8, "Arial", White);
}
else
{
ObjectMove("WS1_Label", 0, Time[30], WS1);
}

//---------------------------------------------------------

ObjectCreate("WS2_Line", OBJ_HLINE,0, CurTime(),WS2);
ObjectSet("WS2_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS2_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS2_Label") != 0)
{
ObjectCreate("WS2_Label", OBJ_TEXT, 0, Time[30], WS2);
ObjectSetText("WS2_Label", " -100", 8, "Arial", White);
}
else
{
ObjectMove("WS2_Label", 0, Time[30], WS2);
}

//---------------------------------------------------------

ObjectCreate("WS3_Line", OBJ_HLINE,0, CurTime(),WS3);
ObjectSet("WS3_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS3_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS3_Label") != 0)
{
ObjectCreate("WS3_Label", OBJ_TEXT, 0, Time[30], WS3);
ObjectSetText("WS3_Label", "-150", 8, "Arial", White);
}
else
{
ObjectMove("WS3_Label", 0, Time[30], WS3);
}

//---------------------------------------------------------
ObjectCreate("WS4_Line", OBJ_HLINE,0, CurTime(),WS4);
ObjectSet("WS4_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS4_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS4_Label") != 0)
{
ObjectCreate("WS4_Label", OBJ_TEXT, 0, Time[30], WS4);
ObjectSetText("WS4_Label", "-200", 8, "Arial", White);
}
else
{
ObjectMove("WS4_Label", 0, Time[30], WS4);
}


//---------------------------------------------------------
//---------------------------------------------------------
ObjectCreate("WS5_Line", OBJ_HLINE,0, CurTime(),WS5);
ObjectSet("WS5_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS5_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS5_Label") != 0)
{
ObjectCreate("WS5_Label", OBJ_TEXT, 0, Time[30], WS5);
ObjectSetText("WS5_Label", "-250", 8, "Arial", White);
}
else
{
ObjectMove("WS5_Label", 0, Time[30], WS5);
}
//---------------------------------------------------------
ObjectCreate("WS6_Line", OBJ_HLINE,0, CurTime(),WS6);
ObjectSet("WS6_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS6_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS6_Label") != 0)
{
ObjectCreate("WS6_Label", OBJ_TEXT, 0, Time[30], WS6);
ObjectSetText("WS6_Label", "-300", 8, "Arial", White);
}
else
{
ObjectMove("WS6_Label", 0, Time[30], WS6);
}
//---------------------------------------------------------
ObjectCreate("WS7_Line", OBJ_HLINE,0, CurTime(),WS7);
ObjectSet("WS7_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS7_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS7_Label") != 0)
{
ObjectCreate("WS7_Label", OBJ_TEXT, 0, Time[30], WS7);
ObjectSetText("WS7_Label", " -350", 8, "Arial", White);
}
else
{
ObjectMove("WS7_Label", 0, Time[30], WS7);
}
//---------------------------------------------------------
ObjectCreate("WS8_Line", OBJ_HLINE,0, CurTime(),WS8);
ObjectSet("WS8_Line", OBJPROP_COLOR, MediumBlue);
ObjectSet("WS8_Line", OBJPROP_STYLE, STYLE_SOLID);

if(ObjectFind("WS8_Label") != 0)
{
ObjectCreate("WS8_Label", OBJ_TEXT, 0, Time[30], WS8);
ObjectSetText("WS8_Label", " -400", 8, "Arial", White);
}
else
{
ObjectMove("WS8_Label", 0, Time[30], WS8);

}
}

//---------------------------------------------------------

if (Monthly==true)
{
ObjectCreate("MonthPivotLine", OBJ_HLINE,0, CurTime(),MonthPivot);
ObjectSet("MonthPivotLine", OBJPROP_COLOR, Brown);
ObjectSet("MonthPivotLine", OBJPROP_STYLE, STYLE_DASH);

if(ObjectFind("MonthPivotLabel") != 0)
{
ObjectCreate("MonthPivotLabel", OBJ_TEXT, 0, Time[40], MonthPivot);
ObjectSetText("MonthPivotLabel", "MonthlyPivot", 8, "Arial", Brown);
}
else
{
ObjectMove("MonthPivotLabel", 0, Time[40], MonthPivot);
}

//--------------------------------------------------------

ObjectCreate("MR1_Line", OBJ_HLINE,0, CurTime(),MR1);
ObjectSet("MR1_Line", OBJPROP_COLOR, Blue);
ObjectSet("MR1_Line", OBJPROP_STYLE, STYLE_DASHDOTDOT);

if(ObjectFind("MR1_Label") != 0)
{
ObjectCreate("MR1_Label", OBJ_TEXT, 0, Time[40], MR1);
ObjectSetText("MR1_Label", " Monthly R1", 8, "Arial", Blue);
}
else
{
ObjectMove("MR1_Label", 0, Time[40], MR1);
}

//--------------------------------------------------------

ObjectCreate("MR2_Line", OBJ_HLINE,0, CurTime(),MR2);
ObjectSet("MR2_Line", OBJPROP_COLOR, Blue);
ObjectSet("MR2_Line", OBJPROP_STYLE, STYLE_DASHDOTDOT);

if(ObjectFind("MR2_Label") != 0)
{
ObjectCreate("MR2_Label", OBJ_TEXT, 0, Time[40], MR2);
ObjectSetText("MR2_Label", " Monthly R2", 8, "Arial", Blue);
}
else
{
ObjectMove("MR2_Label", 0, Time[40], MR2);
}

//---------------------------------------------------------

ObjectCreate("MR3_Line", OBJ_HLINE,0, CurTime(),MR3);
ObjectSet("MR3_Line", OBJPROP_COLOR, Blue);
ObjectSet("MR3_Line", OBJPROP_STYLE, STYLE_DASHDOTDOT);

if(ObjectFind("MR3_Label") != 0)
{
ObjectCreate("MR3_Label", OBJ_TEXT, 0, Time[40], MR3);
ObjectSetText("MR3_Label", " Monthly R3", 8, "Arial", Blue);
}
else
{
ObjectMove("MR3_Label", 0, Time[40], MR3);
}

//---------------------------------------------------------

ObjectCreate("MS1_Line", OBJ_HLINE,0, CurTime(),MS1);
ObjectSet("MS1_Line", OBJPROP_COLOR, Silver);
ObjectSet("MS1_Line", OBJPROP_STYLE, STYLE_DASHDOTDOT);

if(ObjectFind("MS1_Label") != 0)
{
ObjectCreate("MS1_Label", OBJ_TEXT, 0, Time[40], MS1);
ObjectSetText("MS1_Label", "Monthly S1", 8, "Arial", Silver);
}
else
{
ObjectMove("MS1_Label", 0, Time[40], MS1);
}

//---------------------------------------------------------

ObjectCreate("MS2_Line", OBJ_HLINE,0, CurTime(),MS2);
ObjectSet("MS2_Line", OBJPROP_COLOR, Silver);
ObjectSet("MS2_Line", OBJPROP_STYLE, STYLE_DASHDOTDOT);

if(ObjectFind("MS2_Label") != 0)
{
ObjectCreate("MS2_Label", OBJ_TEXT, 0, Time[40], MS2);
ObjectSetText("MS2_Label", "Monthly S2", 8, "Arial", Silver);
}
else
{
ObjectMove("MS2_Label", 0, Time[40], MS2);
}

//---------------------------------------------------------

ObjectCreate("MS3_Line", OBJ_HLINE,0, CurTime(),MS3);
ObjectSet("MS3_Line", OBJPROP_COLOR, Silver);
ObjectSet("MS3_Line", OBJPROP_STYLE, STYLE_DASHDOTDOT);

if(ObjectFind("MS3_Label") != 0)
{
ObjectCreate("MS3_Label", OBJ_TEXT, 0, Time[40], MS3);
ObjectSetText("MS3_Label", "Monthly S3", 8, "Arial", Silver);
}
else
{
ObjectMove("MS3_Label", 0, Time[40], MS3);
}
}
//---------------------------------------------------------

ObjectsRedraw();

   return(0);
}

Similar scripts

AutoPivotIndicator_v1

AutoPivotIndicator_001

###Auto Pivot_002

This indicator dynamically projects daily, weekly, and monthly pivot points and support/resistance levels onto the chart while correcting for market session gaps.

AutoPivotIndicator

###Auto Pivot_001

This indicator dynamically projects daily, weekly, and monthly pivot levels along with their corresponding support and resistance boundaries while accounting for specific weekend market data anomalies.

###Auto Pivot

This indicator dynamically plots daily, weekly, and monthly pivot points along with their corresponding support and resistance levels while automatically correcting for weekend data discrepancies.

AutoPivotIndicator_003

ZMFX_all_pivot_levels

This indicator calculates and plots dynamic support and resistance levels across daily, weekly, and monthly horizons using high, low, and closing price arithmetic.

Pivot_Auto

pivot_###Auto Pivot_M

This indicator dynamically projects daily, weekly, and monthly pivot points along with their respective support and resistance levels while automatically correcting for weekend market gaps.

ZMFX_all_pivot_levels_v2

This indicator projects synchronized daily, weekly, and monthly pivot points along with their respective support and resistance boundaries onto the current chart for multi-horizon structural analysis.

Comments