/*
   Generated by EX4-TO-MQ4 decompiler V4.0.225.1g []
   Website: http://purebeam.biz
   E-mail : purebeam@gmail.com
*/
#property copyright "Copyright © 2004, Mr KAY Software"
#property link      ""

#property indicator_chart_window
#property indicator_buffers 7
#property indicator_color1 Maroon
#property indicator_color2 Fuchsia
#property indicator_color3 Red
#property indicator_color4 Yellow
#property indicator_color5 Lime
#property indicator_color6 Chartreuse
#property indicator_color7 PaleTurquoise

extern string Support_Resist_TimeFrame = "Enter TimeFrame in mins";
extern string TimeFrame_Example = "1 day =1440, 1 Week = 10080";
extern int TimeFrame = 10080;
extern string DisplayLocation = "X and Y coord of Display";
extern int xwkly = 5;
extern int ywkly = 35;
double g_ibuf_112[];
double g_ibuf_116[];
double g_ibuf_120[];
double g_ibuf_124[];
double g_ibuf_128[];
double g_ibuf_132[];
double g_ibuf_136[];

int init() {
   SetIndexStyle(0, DRAW_LINE);
   SetIndexBuffer(0, g_ibuf_112);
   SetIndexStyle(1, DRAW_LINE);
   SetIndexBuffer(1, g_ibuf_116);
   SetIndexStyle(2, DRAW_LINE);
   SetIndexBuffer(2, g_ibuf_120);
   SetIndexStyle(3, DRAW_LINE);
   SetIndexBuffer(3, g_ibuf_124);
   SetIndexStyle(4, DRAW_LINE);
   SetIndexBuffer(4, g_ibuf_128);
   SetIndexStyle(5, DRAW_LINE);
   SetIndexBuffer(5, g_ibuf_132);
   SetIndexStyle(6, DRAW_LINE);
   SetIndexBuffer(6, g_ibuf_136);
   SetIndexLabel(0, "Weekly_R3");
   SetIndexLabel(1, "Weekly_R2");
   SetIndexLabel(2, "Weekly_R1");
   SetIndexLabel(3, "Weekly_Pivot");
   SetIndexLabel(4, "Weekly_S1");
   SetIndexLabel(5, "Weekly_S2");
   SetIndexLabel(6, "Weekly_S3");
   return (0);
}

int deinit() {
   ObjectsDeleteAll();
   return (0);
}

int start() {
   int li_0 = IndicatorCounted();
   if (li_0 > 0) li_0--;
   int li_4 = Bars - li_0;
   //ObjectCreate("KAY_Weekly", OBJ_LABEL, 0, xwkly, ywkly);
   //ObjectSet("KAY_Weekly", OBJPROP_XDISTANCE, xwkly);
   //ObjectSet("KAY_Weekly", OBJPROP_YDISTANCE, ywkly);
   //ObjectSetText("KAY_Weekly", "Copyright © 2004, Mr KAY Weekly Support & Resistance", 8, "verdana", White);
   for (int li_8 = li_4; li_8 >= 0; li_8--) {
      g_ibuf_124[li_8] = (iHigh(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1) + iLow(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1) + iClose(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) +
         1)) / 3.0;
      g_ibuf_120[li_8] = 2.0 * g_ibuf_124[li_8] - iLow(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1);
      g_ibuf_128[li_8] = 2.0 * g_ibuf_124[li_8] - iHigh(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1);
      g_ibuf_116[li_8] = g_ibuf_124[li_8] + (iHigh(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1) - iLow(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) +
         1));
      g_ibuf_132[li_8] = g_ibuf_124[li_8] - (iHigh(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1) - iLow(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) +
         1));
      g_ibuf_112[li_8] = g_ibuf_116[li_8] + (iHigh(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1) - iLow(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) +
         1));
      g_ibuf_136[li_8] = g_ibuf_132[li_8] - (iHigh(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) + 1) - iLow(NULL, TimeFrame, iBarShift(NULL, TimeFrame, Time[li_8]) +
         1));
   }
   return (0);
}