1-2-3 Pattern MTF v3.1

Download script
Author: Copyright � 2008 Kirill, Barry_Stander_4
1-2-3 Pattern MTF v3.1

This script is designed for the MetaTrader platform to automatically identify and visualize specific price action structures known as "1-2-3 Patterns" on a trading chart. It serves as a technical analysis tool that helps traders spot momentum shifts and potential reversal or continuation points by identifying significant structural peaks and valleys.

Core Functionality

The script scans historical price data to detect high and low points (fractals). Once these key points are identified, it connects them to form a visual "1-2-3" sequence. This allows traders to see the geometric structure of the market's movement in real-time.

Key Features and Logic:

  • Dynamic Structure Detection: The script can operate in two different modes to find these peaks and valleys:

    1. Fractal Mode: Uses standard fractal logic to identify high/low points based on surrounding price bars.
    2. High-Low Mode: Uses a more strict comparison of recent candles to pinpoint local extremes, ensuring the detected patterns are distinct.
  • Automated Geometry Mapping: When the script identifies a valid sequence, it automatically draws trend lines on your chart. These lines connect the "1", "2", and "3" points of the pattern, making it easy to see where the market has moved from and where it is currently headed.

  • Fibonacci & Expansion Tools: Depending on the settings chosen, the script can project Fibonacci levels or expansion targets. This helps in predicting how far a price move might extend based on the proportions of the previous "1-2" move.

  • Smart Entry and Target Projections: One of the most practical features is the automatic calculation of trade zones. If the market moves into a specific structural position, the script can draw:

    • Entry Lines: Visual cues for where a trade might be initiated.
    • Target Lines: Predicted areas where profit could be taken.
    • Profit Labels: Text indicators that calculate the potential "reward" (in pips or points) based on the distance between your entry and your target.
  • Multi-Timeframe Compatibility: The script is capable of analyzing data from different timeframes than the one currently displayed on your screen. This allows you to monitor higher-level market structures while looking at a smaller, more detailed chart.

Visual Experience

The tool is designed to be clean and informative. It uses distinct colors for "High" patterns (usually Blue/Red) and "Low" patterns (usually Yellow/Green) so that buyers and sellers can immediately distinguish between bullish and bearish structures. The trend lines vary in style (solid vs. dashed) to separate the actual market structure from projected trade targets.

Indicators Used
Fractals
Miscellaneous
Implements a curve of type %1It issuies visual alerts to the screen
13 Views
0 Downloads
0 Favorites
1-2-3 Pattern MTF v3.1
//+------------------------------------------------------------------+
//|                                                    1-2-3 Pattern |
//|                         Copyright © 2008 Kirill, Barry_Stander_4 |
//|               StockProgrammer@mail.ru, Barry_Stander_4@yahoo.com |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2008 Kirill, Barry_Stander_4"
#property link      "StockProgrammer@mail.ru, Barry_Stander_4@yahoo.com"

#property  indicator_chart_window
#property  indicator_buffers 8
#property  indicator_color1  Black
#property  indicator_color2  Black
#property  indicator_color3  Black
#property  indicator_color4  Black
#property  indicator_color5  Black
#property  indicator_color6  Black
#property  indicator_color7  Black
#property  indicator_color8  Black


extern   int      period       =  0;       //ïåðèîä äëÿ ðàñ÷¸òà. Íå ìîæåò áûòü ìåíüøå ïåðèîäà ãðàôèêà.
extern   int      LineWidth = 3;
extern   int      Hi_Low_Mode = 1;
extern   int      Fibo_Mode = 1;
extern   int      Enable_Target = 1;
extern   double   Fibo_Target = 1.618;
int      var_116 = 200;
double   var_120;
double   var_128;
double   arr_136[5];
double   arr_140[5];
double   arr_144[5];
double   arr_148[5];
string   var_152;
int      var_160;
int      var_164;
int      var_168;
int      var_172;
int      var_176;
int      var_180;
int      var_184;
int      var_188;
int      var_192;
int      var_196;
extern   color    Pattern_High = Blue;
extern   color    TradeLine_High = Red;
extern   color    Pattern_Low = Yellow;
extern   color    TradeLine_Low = Green;
extern   color    Fibo = Black;
double   var_220;
double   var_228;
double   var_236;
double   var_244;
int      var_252 = 5;
int      var_256 = 0;
double   arr_260[];
double   arr_264[];
double   arr_268[];
double   arr_272[];
double   arr_276[];
double   arr_280[];
double   arr_284[];
double   arr_288[];
double   var_292 = 0;
double   var_300 = 0;
double   var_308 = 0;
double   var_316 = 0;

string name;
//+------------------------------------------------------------------+

int init()
{
name = WindowExpertName();

var_152 = "1-2-3 Pattern";
IndicatorShortName(var_152);
SetIndexLabel(0,var_152);
IndicatorBuffers(8);
SetIndexStyle(0,DRAW_NONE);
SetIndexStyle(1,DRAW_NONE);
SetIndexStyle(2,DRAW_NONE);
SetIndexStyle(3,DRAW_NONE);
SetIndexStyle(4,DRAW_NONE);
SetIndexStyle(5,DRAW_NONE);
SetIndexStyle(6,DRAW_NONE);
SetIndexStyle(7,DRAW_NONE);
SetIndexLabel(0,"Stop");
SetIndexLabel(1,"Enter");
SetIndexLabel(2,"Trade_Down");
SetIndexLabel(3,"Stop");
SetIndexLabel(4,"Enter");
SetIndexLabel(5,"Trade_UP");
SetIndexLabel(6,"D_Retrace");
SetIndexLabel(7,"U_Retrace");
SetIndexBuffer(0,arr_260);
SetIndexBuffer(1,arr_264);
SetIndexBuffer(2,arr_268);
SetIndexBuffer(3,arr_272);
SetIndexBuffer(4,arr_276);
SetIndexBuffer(5,arr_280);
SetIndexBuffer(6,arr_284);
SetIndexBuffer(7,arr_288);
SetIndexDrawBegin(0,0);
SetIndexDrawBegin(1,0);
SetIndexDrawBegin(2,0);
SetIndexDrawBegin(3,0);
SetIndexDrawBegin(4,0);
SetIndexDrawBegin(5,0);
SetIndexDrawBegin(6,0);
SetIndexDrawBegin(7,0);
DeleteObj();
}

//+------------------------------------------------------------------+

int deinit()
{
DeleteObj();
}

//+------------------------------------------------------------------+

int DeleteObj()
{
int var_DeleteObj_0;

ObjectDelete("HH0" + DoubleToStr(period, 0));
ObjectDelete("LL0" + DoubleToStr(period, 0));
ObjectDelete("HH1" + DoubleToStr(period, 0));
ObjectDelete("HH2" + DoubleToStr(period, 0));
ObjectDelete("HH3" + DoubleToStr(period, 0));
ObjectDelete("LL1" + DoubleToStr(period, 0));
ObjectDelete("LL2" + DoubleToStr(period, 0));
ObjectDelete("LL3" + DoubleToStr(period, 0));
ObjectDelete("EntryL" + DoubleToStr(period, 0));
ObjectDelete("TargetL" + DoubleToStr(period, 0));
ObjectDelete("TargetP" + DoubleToStr(period, 0));
ObjectDelete("EntryH" + DoubleToStr(period, 0));
ObjectDelete("TargetH" + DoubleToStr(period, 0));
return(0);
}

//+------------------------------------------------------------------+
bool alertflag = 0;
int start()
{

if(period == Period() || period == 0)
{
   alertflag = 0;

   double var_start_0;
   double var_start_8;
   int    i;
   int    var_start_20;
   int    counted_bars;
   double spread;
   double var_start_36;
   int    var_start_44;
   double var_start_48;
   int    var_start_56;
   double var_start_60;
   int    var_start_68;
   double var_start_72;
   int    var_start_80;
   double var_start_84;
   double var_start_92;
   double var_start_100;
   double var_start_108;
   double var_start_116;
   double var_start_124;


   counted_bars = IndicatorCounted();
   if (counted_bars < 0) return(-1);

   spread = MarketInfo(Symbol(),MODE_SPREAD);
   if (spread == 0.0) spread = (Ask - Bid) / Point;

   var_192 = 0;
   var_196 = 0;
   DeleteObj();

   for (i = var_116; i >= 0; i--)
      {
      if (Hi_Low_Mode == 1)
         {
         var_120 = iFractals(NULL,0,MODE_UPPER,i);
         if (var_120 > 0.0)
            {
            arr_136[1] = arr_136[3];
            arr_136[3] = var_120;
            arr_140[1] = arr_140[3];
            arr_140[3] = i;
            arr_140[2] = Lowest(NULL,0,MODE_LOW,arr_140[1] - arr_140[3] - 1.0,arr_140[3] + 1.0);
            arr_136[2] = Low[Lowest(NULL,0,MODE_LOW,arr_140[1] - arr_140[3] - 1.0,arr_140[3] + 1.0)];
            arr_140[4] = arr_140[3] - (arr_140[1] - arr_140[2]);
            if (arr_140[4] < 0.0) arr_140[4] = 0;
            arr_136[4] = arr_136[2];
            }
         var_128 = iFractals(NULL,0,MODE_LOWER,i);
         if (var_128 > 0.0)
            {
            arr_144[1] = arr_144[3];
            arr_144[3] = var_128;
            arr_148[1] = arr_148[3];
            arr_148[3] = i;
            arr_148[2] = Highest(NULL,0,MODE_HIGH,arr_148[1] - arr_148[3] - 1.0,arr_148[3] + 1.0);
            arr_144[2] = High[Highest(NULL,0,MODE_HIGH,arr_148[1] - arr_148[3] - 1.0,arr_148[3] + 1.0)];
            arr_148[4] = arr_148[3] - (arr_148[1] - arr_148[2]);
            if (arr_148[4] < 0.0) arr_148[4] = 0;
            arr_144[4] = arr_144[2];
            }
         }
      if (Hi_Low_Mode == 2)
         {
         if ((High[i - 1] < High[i]) && (High[i - 2] < High[i]) && (High[i - 2] < High[i - 1]) && (High[i + 1] < High[i]) && (High[i + 2] < High[i]) && (High[i + 2] < High[i + 1]))
            {
            arr_136[1] = arr_136[3];
            arr_136[3] = High[i];
            arr_140[1] = arr_140[3];
            arr_140[3] = i;
            arr_140[2] = Lowest(NULL,0,MODE_LOW,arr_140[1] - arr_140[3] - 1.0,arr_140[3] + 1.0);
            arr_136[2] = Low[Lowest(NULL,0,MODE_LOW,arr_140[1] - arr_140[3] - 1.0,arr_140[3] + 1.0)];
            arr_140[4] = arr_140[3] - (arr_140[1] - arr_140[2]);
            if (arr_140[4] < 0.0) arr_140[4] = 0;
            arr_136[4] = arr_136[2];
            }
         if ((Low[i - 1] > Low[i]) && (Low[i - 2] > Low[i]) && (Low[i - 2] > Low[i - 1]) && (Low[i + 1] > Low[i]) && (Low[i + 2] > Low[i]) && (Low[i + 2] > Low[i + 1]))
            {
            arr_144[1] = arr_144[3];
            arr_144[3] = Low[i];
            arr_148[1] = arr_148[3];
            arr_148[3] = i;
            arr_148[2] = Highest(NULL,0,MODE_HIGH,arr_148[1] - arr_148[3] - 1.0,arr_148[3] + 1.0);
            arr_144[2] = High[Highest(NULL,0,MODE_HIGH,arr_148[1] - arr_148[3] - 1.0,arr_148[3] + 1.0)];
            arr_148[4] = arr_148[3] - (arr_148[1] - arr_148[2]);
            if (arr_148[4] < 0.0) arr_148[4] = 0;
            arr_144[4] = arr_144[2];
            }
         }
      var_160 = arr_140[1];
      var_164 = arr_140[2];
      var_168 = arr_140[3];
      var_172 = arr_140[4];
      var_176 = arr_148[1];
      var_180 = arr_148[2];
      var_184 = arr_148[3];
      var_188 = arr_148[4];
      if ((arr_136[1] >= arr_136[3]) && (arr_136[1] > arr_136[2]))
         {
         ObjectDelete("HH0" + DoubleToStr(period, 0));
         ObjectDelete("LL0" + DoubleToStr(period, 0));
         ObjectDelete("HH1" + DoubleToStr(period, 0));
         ObjectDelete("HH2" + DoubleToStr(period, 0));
         ObjectDelete("HH3" + DoubleToStr(period, 0));
         ObjectDelete("LL1" + DoubleToStr(period, 0));
         ObjectDelete("LL2" + DoubleToStr(period, 0));
         ObjectDelete("LL3" + DoubleToStr(period, 0));
         ObjectDelete("EntryL" + DoubleToStr(period, 0));
         ObjectDelete("TargetL" + DoubleToStr(period, 0));
         ObjectDelete("EntryH" + DoubleToStr(period, 0)); 
         ObjectDelete("TargetH" + DoubleToStr(period, 0));
         ObjectDelete("TargetP" + DoubleToStr(period, 0));
         ObjectCreate("HH1" + DoubleToStr(period, 0) + var_start_20,OBJ_TREND,0,Time[var_160],arr_136[1],Time[var_164],arr_136[2]);
         ObjectCreate("HH2" + DoubleToStr(period, 0) + var_start_20,OBJ_TREND,0,Time[var_164],arr_136[2],Time[var_168],arr_136[3]);
         if ((High[Highest(NULL,0,MODE_HIGH,arr_140[1] - 1.0,1)] < arr_136[1]) && (arr_136[3] > Bid))
            {
            if (Fibo_Mode == 1) ObjectCreate("HH0" + DoubleToStr(period, 0),OBJ_FIBO,0,Time[var_164],arr_136[2],Time[var_160],arr_136[1]);
            if (Fibo_Mode == 2) ObjectCreate("HH0" + DoubleToStr(period, 0),OBJ_EXPANSION,0,Time[var_160],arr_136[1],Time[var_164],arr_136[2],Time[var_168],arr_136[3]);
            ObjectCreate("HH1" + DoubleToStr(period, 0),OBJ_TREND,0,Time[var_160],arr_136[1],Time[var_164],arr_136[2]);
            ObjectCreate("HH2" + DoubleToStr(period, 0),OBJ_TREND,0,Time[var_164],arr_136[2],Time[var_168],arr_136[3]);
            ObjectCreate("HH3" + DoubleToStr(period, 0),OBJ_TREND,0,Time[var_168],arr_136[3],Time[var_172],arr_136[4]);
            if (Fibo_Mode == 1)
               {
               var_start_8 = arr_136[1] - arr_136[2];
               if (arr_136[3] > NormalizeDouble(arr_136[2] + var_start_8 * 0.764,4))
                  {
                  var_228 = NormalizeDouble(arr_136[2] - var_start_8 * 0.0,4);
                  }
               if ((arr_136[3] <= NormalizeDouble(arr_136[2] + var_start_8 * 0.764,4)) && (arr_136[3] > NormalizeDouble(arr_136[2] + var_start_8 * 0.618,4)))
                  {
                  var_228 = NormalizeDouble(arr_136[2] - var_start_8 * 0.27,4);
                  }
               if (arr_136[3] <= NormalizeDouble(arr_136[2] + var_start_8 * 0.618,4))
                  {
                  var_228 = NormalizeDouble(arr_136[2] - var_start_8 * 0.618,4);
                  }
               }
            if (Fibo_Mode == 2) var_228 = MathAbs(Fibo_Target * (arr_136[1] - arr_136[2]) - arr_136[3]);
            var_236 = var_228 + (spread + 2.0) * Point;
            if ((var_228 < arr_136[2]) && (arr_136[2] - var_236 >= var_252 * Point) && (Enable_Target == 1))
               {
               ObjectCreate("EntryH" + DoubleToStr(period, 0),OBJ_HLINE,0,0,arr_136[2] - Point * 1.0);
               ObjectCreate("TargetH" + DoubleToStr(period, 0),OBJ_HLINE,0,0,var_236);
               ObjectCreate("TargetP" + DoubleToStr(period, 0),OBJ_TEXT,0,CurTime() + 100,0);
               ObjectSetText("TargetP" + DoubleToStr(period, 0),DoubleToStr((arr_136[2] - Point * 1.0 - var_236) / Point,0),10,"Arial",Blue);
               ObjectMove("TargetP" + DoubleToStr(period, 0),0,CurTime() + Period() * 100,var_236);
               }
            }
         }
      if ((arr_144[1] <= arr_144[3]) && (arr_144[1] < arr_144[2]))
         {
         ObjectDelete("HH0" + DoubleToStr(period, 0));
         ObjectDelete("LL0" + DoubleToStr(period, 0));
         ObjectDelete("HH1" + DoubleToStr(period, 0));
         ObjectDelete("HH2" + DoubleToStr(period, 0));
         ObjectDelete("HH3" + DoubleToStr(period, 0));
         ObjectDelete("LL1" + DoubleToStr(period, 0));
         ObjectDelete("LL2" + DoubleToStr(period, 0));
         ObjectDelete("LL3" + DoubleToStr(period, 0));
         ObjectDelete("EntryH" + DoubleToStr(period, 0));
         ObjectDelete("TargetH" + DoubleToStr(period, 0));
         ObjectDelete("EntryL" + DoubleToStr(period, 0));
         ObjectDelete("TargetL" + DoubleToStr(period, 0));
         ObjectDelete("TargetP" + DoubleToStr(period, 0));
         ObjectCreate("LL1" + DoubleToStr(period, 0) + var_start_20,OBJ_TREND,0,Time[var_176],arr_144[1],Time[var_180],arr_144[2]);
         ObjectCreate("LL2" + DoubleToStr(period, 0) + var_start_20,OBJ_TREND,0,Time[var_180],arr_144[2],Time[var_184],arr_144[3]);
         if ((Low[Lowest(NULL,0,MODE_LOW,arr_148[1] - 1.0,1)] > arr_144[1]) && (arr_144[3] < Bid))
            {
            if (Fibo_Mode == 1) ObjectCreate("LL0" + DoubleToStr(period, 0),OBJ_FIBO,0,Time[var_180],arr_144[2],Time[var_176],arr_144[1]);
            if (Fibo_Mode == 2) ObjectCreate("LL0" + DoubleToStr(period, 0),OBJ_EXPANSION,0,Time[var_176],arr_144[1],Time[var_180],arr_144[2]);
            ObjectCreate("LL1" + DoubleToStr(period, 0),OBJ_TREND,0,Time[var_176],arr_144[1],Time[var_180],arr_144[2]);
            ObjectCreate("LL2" + DoubleToStr(period, 0),OBJ_TREND,0,Time[var_180],arr_144[2],Time[var_184],arr_144[3]);
            ObjectCreate("LL3" + DoubleToStr(period, 0),OBJ_TREND,0,Time[var_184],arr_144[3],Time[var_188],arr_144[4]);
            if (Fibo_Mode == 1)
               {
               var_start_0 = (arr_144[2] - arr_144[1]) / 100.0;
               if (arr_144[3] < NormalizeDouble(arr_144[2] - var_start_0 * 76.4,4))
                  {
                  var_220 = NormalizeDouble(arr_144[2] + var_start_0 * 0.0,4);
                  }
               if ((arr_144[3] >= NormalizeDouble(arr_144[2] - var_start_0 * 76.4,4)) && (arr_144[3] < NormalizeDouble(arr_144[2] - var_start_0 * 61.8,4)))
                  {
                  var_220 = NormalizeDouble(arr_144[2] + var_start_0 * 27.0,4);
                  }
               if (arr_144[3] >= NormalizeDouble(arr_144[2] - var_start_0 * 61.8,4))
                  {
                  var_220 = NormalizeDouble(arr_144[2] + var_start_0 * 61.8,4);
                  }
               }
            if (Fibo_Mode == 2) var_220 = MathAbs(Fibo_Target * (arr_144[2] - arr_144[1]) + arr_144[3]);
            var_220 = var_220 - 2 * Point;
            var_244 = arr_144[2] + (spread + 1.0) * Point;
            if ((var_220 > var_244) && (var_220 - arr_144[2] >= var_252 * Point) && (Enable_Target == 1))
               {
               ObjectCreate("EntryL" + DoubleToStr(period, 0),OBJ_HLINE,0,0,var_244);
               ObjectCreate("TargetL" + DoubleToStr(period, 0),OBJ_HLINE,0,0,var_220);
               ObjectCreate("TargetP" + DoubleToStr(period, 0),OBJ_TEXT,0,CurTime() + 100,0);
               ObjectSetText("TargetP" + DoubleToStr(period, 0),DoubleToStr((var_220 - var_244) / Point,0),10,"Arial",Red);
               ObjectMove("TargetP" + DoubleToStr(period, 0),0,CurTime() + Period() * 200,var_220);
               }
            }
         }
      var_start_36 = ObjectGet("HH1" + DoubleToStr(period, 0),OBJPROP_PRICE1);
      var_start_44 = ObjectGet("HH1" + DoubleToStr(period, 0),OBJPROP_TIME1);
      var_start_48 = ObjectGet("HH1" + DoubleToStr(period, 0),OBJPROP_PRICE2);
      var_start_56 = ObjectGet("HH1" + DoubleToStr(period, 0),OBJPROP_TIME2);
      var_start_60 = ObjectGet("LL1" + DoubleToStr(period, 0),OBJPROP_PRICE1);
      var_start_68 = ObjectGet("LL1" + DoubleToStr(period, 0),OBJPROP_TIME1);
      var_start_72 = ObjectGet("LL1" + DoubleToStr(period, 0),OBJPROP_PRICE2);
      var_start_80 = ObjectGet("LL1" + DoubleToStr(period, 0),OBJPROP_TIME2);
      var_start_84 = ObjectGet("HH2" + DoubleToStr(period, 0),OBJPROP_PRICE2);
      var_start_92 = ObjectGet("LL2" + DoubleToStr(period, 0),OBJPROP_PRICE2);
      arr_260[i] = var_start_36;
      arr_264[i] = var_start_48;
      arr_272[i] = var_start_60;
      arr_276[i] = var_start_72;
      arr_284[i] = var_start_84;
      arr_288[i] = var_start_92;
      if ((var_start_44 > 0) && (var_start_56 > 0))
         {
         var_start_100 = (CurTime() - var_start_44) / 60 / Period();
         var_start_108 = arr_264[i] + (arr_264[i] - arr_260[i]) / 2;
         if (var_start_100 < 1.0) var_start_100 = 1;
         var_300 = High[Highest(NULL,0,MODE_HIGH,var_start_100,0)];
         var_292 = Low[Lowest(NULL,0,MODE_LOW,var_start_100,0)];
         }
            else
         {
         var_292 = 0;
         var_300 = 0;
         }
      if ((var_start_68 > 0) && (var_start_80 > 0))
         {
         var_start_116 = (CurTime() - var_start_68) / 60 / Period();
         var_start_124 = arr_276[i] + (arr_276[i] - arr_272[i]) / 2;
         if (var_start_116 < 1.0) var_start_116 = 1;
         var_316 = High[Highest(NULL,0,MODE_HIGH,var_start_116,0)];
         var_308 = Low[Lowest(NULL,0,MODE_LOW,var_start_116,0)];
         }
            else
         {
         var_308 = 0;
         var_316 = 0;
         }
      if ((var_292 <= arr_260[i]) && (var_300 >= arr_264[i]) && (arr_260[i] > 0) && (arr_264[i] > 0) && (var_292 > var_start_108))
         {
         arr_268[i] = 1;
         var_192 = 1;
         }
            else
         {
         arr_268[i] = 0;
         var_192 = 0;
         }
      if ((var_308 >= arr_272[i]) && (var_316 <= arr_276[i]) && (arr_272[i] > 0) && (arr_276[i] > 0) && (var_308 < var_start_124))
         {
         arr_280[i] = 1;
         var_196 = 1;
         }
            else
         {
         arr_280[i] = 0;
         var_196 = 0;
         }
      ObjectSet("HH0" + DoubleToStr(period, 0),OBJPROP_COLOR,Fibo);
      ObjectSet("LL0" + DoubleToStr(period, 0),OBJPROP_COLOR,Fibo);
      ObjectSet("HH0" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_DOT);
      ObjectSet("LL0" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_DOT);
      ObjectSet("HH0" + DoubleToStr(period, 0),OBJPROP_WIDTH,0);
      ObjectSet("LL0" + DoubleToStr(period, 0),OBJPROP_WIDTH,0);
      ObjectSet("HH1" + DoubleToStr(period, 0),OBJPROP_COLOR,Pattern_High);
      ObjectSet("HH2" + DoubleToStr(period, 0),OBJPROP_COLOR,Pattern_High);
      ObjectSet("HH3" + DoubleToStr(period, 0),OBJPROP_COLOR,TradeLine_High);
      ObjectSet("LL1" + DoubleToStr(period, 0),OBJPROP_COLOR,Pattern_Low);
      ObjectSet("LL2" + DoubleToStr(period, 0),OBJPROP_COLOR,Pattern_Low);
      ObjectSet("LL3" + DoubleToStr(period, 0),OBJPROP_COLOR,TradeLine_Low);
      ObjectSet("HH1" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_SOLID);
      ObjectSet("HH2" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_SOLID);
      ObjectSet("HH3" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_SOLID);
      ObjectSet("LL1" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_SOLID);
      ObjectSet("LL2" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_SOLID);
      ObjectSet("LL3" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_SOLID);
      ObjectSet("HH0" + DoubleToStr(period, 0),OBJPROP_RAY,0);
      ObjectSet("HH1" + DoubleToStr(period, 0),OBJPROP_RAY,0);
      ObjectSet("HH2" + DoubleToStr(period, 0),OBJPROP_RAY,0);
      ObjectSet("HH3" + DoubleToStr(period, 0),OBJPROP_RAY,1);
      ObjectSet("LL0" + DoubleToStr(period, 0),OBJPROP_RAY,0);
      ObjectSet("LL1" + DoubleToStr(period, 0),OBJPROP_RAY,0);
      ObjectSet("LL2" + DoubleToStr(period, 0),OBJPROP_RAY,0);
      ObjectSet("LL3" + DoubleToStr(period, 0),OBJPROP_RAY,1);
      ObjectSet("HH1" + DoubleToStr(period, 0),OBJPROP_WIDTH,LineWidth);
      ObjectSet("HH2" + DoubleToStr(period, 0),OBJPROP_WIDTH,LineWidth);
      ObjectSet("HH3" + DoubleToStr(period, 0),OBJPROP_WIDTH,LineWidth);
      ObjectSet("LL1" + DoubleToStr(period, 0),OBJPROP_WIDTH,LineWidth);
      ObjectSet("LL2" + DoubleToStr(period, 0),OBJPROP_WIDTH,LineWidth);
      ObjectSet("LL3" + DoubleToStr(period, 0),OBJPROP_WIDTH,LineWidth);
      ObjectSet("EntryH" + DoubleToStr(period, 0),OBJPROP_COLOR,Blue);
      ObjectSet("EntryL" + DoubleToStr(period, 0),OBJPROP_COLOR,Blue);
      ObjectSet("EntryH" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_DASHDOTDOT);
      ObjectSet("EntryL" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_DASHDOTDOT);
      ObjectSet("EntryH" + DoubleToStr(period, 0),OBJPROP_WIDTH,0);
      ObjectSet("EntryL" + DoubleToStr(period, 0),OBJPROP_WIDTH,0);
      ObjectSet("TargetH" + DoubleToStr(period, 0),OBJPROP_COLOR,Blue);
      ObjectSet("TargetL" + DoubleToStr(period, 0),OBJPROP_COLOR,Blue);
      ObjectSet("TargetH" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_DASHDOTDOT);
      ObjectSet("TargetL" + DoubleToStr(period, 0),OBJPROP_STYLE,STYLE_DASHDOTDOT);
      ObjectSet("TargetH" + DoubleToStr(period, 0),OBJPROP_WIDTH,0);
      ObjectSet("TargetL" + DoubleToStr(period, 0),OBJPROP_WIDTH,0);
      if (var_start_20 < 6)
         {
         ObjectDelete("HH1" + DoubleToStr(period, 0) + var_start_20);
         ObjectDelete("HH2" + DoubleToStr(period, 0) + var_start_20);
         ObjectDelete("HH3" + DoubleToStr(period, 0) + var_start_20);
         ObjectDelete("LL1" + DoubleToStr(period, 0) + var_start_20);
         ObjectDelete("LL2" + DoubleToStr(period, 0) + var_start_20);
         ObjectDelete("LL3" + DoubleToStr(period, 0) + var_start_20);
         }
      ObjectDelete("HH1" + DoubleToStr(period, 0) + var_start_20);
      ObjectDelete("HH2" + DoubleToStr(period, 0) + var_start_20);
      ObjectDelete("HH3" + DoubleToStr(period, 0) + var_start_20);
      ObjectDelete("LL1" + DoubleToStr(period, 0) + var_start_20);
      ObjectDelete("LL2" + DoubleToStr(period, 0) + var_start_20);
      ObjectDelete("LL3" + DoubleToStr(period, 0) + var_start_20);
      if ((var_120 > 0) || (var_128 > 0)) var_start_20++;
      }
   if (Seconds() < 10) var_256 = 0;
}

else if(period < Period() && period != 0)
{
   if(alertflag == 0) {Alert("Parameter \"period\" is less than period of current graph. Please enter different period"); alertflag = 1;}
   return(0);
}

else     //òóò íà÷èíàåòñÿ ÌÎÇà !
{
   alertflag = 0;
   
   datetime period_time_0;   
   int error = 0;
   static bool alerted = 0;

   period_time_0 = iTime(NULL, period, 0);
   error=GetLastError();
   if(alerted==0 && error==4066)
   {
      Alert("Error 4066: Data for period = ", period, " not loaded. Loading data... Indicator will be redrawn as soon as data is loaded.");
      alerted = 1;
   }
      
   iCustom(NULL, period, name, period, LineWidth, Hi_Low_Mode, Fibo_Mode, Enable_Target, Fibo_Target, 0, 0);  

}

}

Comments