Navigation:Home > Content >

ВЕЕР_ФИБОНАЧЧИ_АВТО_МОД__MTF.mq4

Time: 2013-06-23 | Download file:ВЕЕР_ФИБОНАЧЧИ_АВТО_МОД__MTF.mq4

//+------------------------------------------------------------------+
//|                                      ВЕЕР ФИБОНАЧЧИ_АВТО_МОД_mq4 |
//|                        Copyright 2013, MetaQuotes Software Corp_ |
//|                         yupyalta-ВЕЕР ФИБОНАЧЧИ_АВТО_МОД         |
//|                         mobidik -ВЕЕР ФИБОНАЧЧИ_АВТО_МОД__MTF    | 
//+------------------------------------------------------------------+
#property copyright "Copyright 2013, MetaQuotes Software Corp_"
#property link      "http://yupyalta-ВЕЕР ФИБОНАЧЧИ_АВТО_МОД"
 
#property indicator_chart_window
extern int   ТМФ     = 0;
extern int   ExtDepth     = 24;
extern int   ExtDeviation = 12;
extern int   ExtBackstep  = 5;//---
extern int   Стиль_f0    = 0;
extern int   шир_f0     = 1;
extern color цвет_f0    = Red;
extern int   Стиль_f0_001    = 0;
extern int   шир_f0_001     = 1;
extern color цвет_f0_001    = Red;
//---
//---
extern int   Стиль_f23    = 0;
extern int   шир_f23      = 1;
extern color цвет_f23     = Yellow;
//---
extern int   Стиль_f38    = 0;
extern int   шир_f38      = 1;
extern color цвет_f38     = Lime;
//---
extern int   Стиль_f50    = 0;
extern int   шир_f50      = 2;
extern color цвет_f50     = DarkOrange;
//---
extern int   Стиль_f61    = 0;
extern int   шир_f61      = 1;
extern color цвет_f61     = Lime;
//---
extern int   Стиль_f78    = 0;
extern int   шир_f78      = 1;
extern color цвет_f78     = Lime;
//---
extern int   Стиль_f100    = 0;
extern int   шир_f100      = 1;
extern color цвет_f100     = Yellow;
//---
extern int   Стиль_f161    = 0;
extern int   шир_f161      = 1;
extern color цвет_f161     = Red;
//---
extern int   Стиль_f2_618   = 0;
extern int   шир_f2_618     = 1;
extern color цвет_2_618     = Red;
//---
//---
extern bool   fon = false;
int rg,rd;
double f2_618, f161,f100,f78,f76, f61, f50, f38,f23, f0_001,f0,ext1, ext0;
//+------------------------------------------------------------------+
int deinit()
  {
//----
   ObjectDelete("("+ТМФ+")_Fibo0");    //ТМФ
   ObjectDelete("("+ТМФ+")_Fibo0_001");
   ObjectDelete("("+ТМФ+")_Fibo23");
   ObjectDelete("("+ТМФ+")_Fibo38");
   ObjectDelete("("+ТМФ+")_Fibo50");
   ObjectDelete("("+ТМФ+")_Fibo61");
   ObjectDelete("("+ТМФ+")_Fibo78");
   ObjectDelete("("+ТМФ+")_Fibo100");
   ObjectDelete("("+ТМФ+")_Fibo161");
   ObjectDelete("("+ТМФ+")_Fibo261");
   ObjectDelete("("+ТМФ+")_Fibo261_8");
   ObjectDelete("("+ТМФ+")_F0");
   ObjectDelete("("+ТМФ+")_F0_001");
   ObjectDelete("("+ТМФ+")_F23");
   ObjectDelete("("+ТМФ+")_F38");
   ObjectDelete("("+ТМФ+")_F50");
   ObjectDelete("("+ТМФ+")_F61");
   ObjectDelete("("+ТМФ+")_F78");
   ObjectDelete("("+ТМФ+")_F100");
   ObjectDelete("("+ТМФ+")_F161");
   ObjectDelete("("+ТМФ+")_F261_8");
//----
   return(0);
  }
//+------------------------------------------------------------------+ 
int start()
  {
//----
   rg=GetExtremumZZBar(0);
   rd=GetExtremumZZBar(1); 
//---- 
   ext0=GetExtremumZZPrice(0);
   ext1=GetExtremumZZPrice(1);
//---- 
   f0=ext1+((ext0-ext1)*0);
   f0_001=ext1+((ext1-ext0)*0.001);
   f23=ext1+((ext0-ext1)*0.236);
   f38=ext1+((ext0-ext1)*0.382); 
   f50=ext1+((ext0-ext1)*0.500);
   f61=ext1+((ext0-ext1)*0.618);
   f78=ext1+((ext0-ext1)*0.786); 
   f100=ext1+((ext0-ext1)*1);
   f161=ext1+((ext0-ext1)*1.618);
   f2_618=ext1+((ext0-ext1)*2.618);
   //----
   ObjectDelete("("+ТМФ+")_Fibo0");
   ObjectCreate("("+ТМФ+")_Fibo0", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f161);
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_STYLE, Стиль_f161);
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_WIDTH, шир_f161); 
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_COLOR, цвет_f161);
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_BACK,  fon);
   //----
   ObjectDelete("("+ТМФ+")_Fibo0");
   ObjectCreate("("+ТМФ+")_Fibo0", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f0_001);
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_STYLE, Стиль_f0_001);
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_WIDTH, шир_f0_001); 
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_COLOR, цвет_f0_001);
   ObjectSet("("+ТМФ+")_Fibo0", OBJPROP_BACK,  fon);
   //----
   ObjectDelete("("+ТМФ+")_Fibo23");
   ObjectCreate("("+ТМФ+")_Fibo23", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f23);
   ObjectSet("("+ТМФ+")_Fibo23", OBJPROP_STYLE, Стиль_f23);
   ObjectSet("("+ТМФ+")_Fibo23", OBJPROP_WIDTH, шир_f23); 
   ObjectSet("("+ТМФ+")_Fibo23", OBJPROP_COLOR, цвет_f23);
   ObjectSet("("+ТМФ+")_Fibo23", OBJPROP_BACK,  fon);
//----
   ObjectDelete("("+ТМФ+")_Fibo38");
   ObjectCreate("("+ТМФ+")_Fibo38", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f38);
   ObjectSet("("+ТМФ+")_Fibo38", OBJPROP_STYLE, Стиль_f38);
   ObjectSet("("+ТМФ+")_Fibo38", OBJPROP_WIDTH, шир_f38); 
   ObjectSet("("+ТМФ+")_Fibo38", OBJPROP_COLOR, цвет_f38);
   ObjectSet("("+ТМФ+")_Fibo38", OBJPROP_BACK,  fon);
//----    
   ObjectDelete("("+ТМФ+")_Fibo50");
   ObjectCreate("("+ТМФ+")_Fibo50", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f50);
   ObjectSet("("+ТМФ+")_Fibo50", OBJPROP_STYLE, Стиль_f50);
   ObjectSet("("+ТМФ+")_Fibo50", OBJPROP_WIDTH, шир_f50); 
   ObjectSet("("+ТМФ+")_Fibo50", OBJPROP_COLOR, цвет_f50);
   ObjectSet("("+ТМФ+")_Fibo50", OBJPROP_BACK,  fon);
//----
   ObjectDelete("("+ТМФ+")_Fibo61");
   ObjectCreate("("+ТМФ+")_Fibo61", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f61);
   ObjectSet("("+ТМФ+")_Fibo61", OBJPROP_STYLE, Стиль_f61);
   ObjectSet("("+ТМФ+")_Fibo61", OBJPROP_WIDTH, шир_f61); 
   ObjectSet("("+ТМФ+")_Fibo61", OBJPROP_COLOR, цвет_f61);
   ObjectSet("("+ТМФ+")_Fibo61", OBJPROP_BACK,  fon); 
    //----
   ObjectDelete("("+ТМФ+")_Fibo78");
   ObjectCreate("("+ТМФ+")_Fibo78", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f78);
   ObjectSet("("+ТМФ+")_Fibo78", OBJPROP_STYLE, Стиль_f78);
   ObjectSet("("+ТМФ+")_Fibo78", OBJPROP_WIDTH, шир_f78); 
   ObjectSet("("+ТМФ+")_Fibo78", OBJPROP_COLOR, цвет_f78);
   ObjectSet("("+ТМФ+")_Fibo78", OBJPROP_BACK,  fon);
   //----
   ObjectDelete("("+ТМФ+")_Fibo100");
   ObjectCreate("("+ТМФ+")_Fibo100", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f100);
   ObjectSet("("+ТМФ+")_Fibo100", OBJPROP_STYLE, Стиль_f100);
   ObjectSet("("+ТМФ+")_Fibo100", OBJPROP_WIDTH, шир_f100); 
   ObjectSet("("+ТМФ+")_Fibo100", OBJPROP_COLOR, цвет_f100);
   ObjectSet("("+ТМФ+")_Fibo100", OBJPROP_BACK,  fon);
   //----
   ObjectDelete("("+ТМФ+")_Fibo161");
   ObjectCreate("("+ТМФ+")_Fibo161", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg), f161);
   ObjectSet("("+ТМФ+")_Fibo161", OBJPROP_STYLE, Стиль_f161);
   ObjectSet("("+ТМФ+")_Fibo161", OBJPROP_WIDTH, шир_f161); 
   ObjectSet("("+ТМФ+")_Fibo161", OBJPROP_COLOR, цвет_f161);
   ObjectSet("("+ТМФ+")_Fibo161", OBJPROP_BACK,  fon);
   //----
   ObjectDelete("("+ТМФ+")_Fibo261");
   ObjectCreate("("+ТМФ+")_Fibo261", OBJ_TREND, 0, iTime(NULL, ТМФ, rd), ext1, iTime(NULL, ТМФ, rg),f2_618);   //     //   iTime(NULL, ТМФ, rd)
   ObjectSet("("+ТМФ+")_Fibo2_618", OBJPROP_STYLE, Стиль_f2_618);
   ObjectSet("("+ТМФ+")_Fibo161", OBJPROP_WIDTH, шир_f2_618); 
   ObjectSet("("+ТМФ+")_Fibo261", OBJPROP_COLOR, цвет_f0);
   ObjectSet("("+ТМФ+")_Fibo261", OBJPROP_BACK,  fon);
   //----
   double CP=5*Point;
   ObjectDelete("("+ТМФ+")_F0");
   ObjectCreate("("+ТМФ+")_F0",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f0-CP);
   ObjectSetText("("+ТМФ+")_F0","",8,"Arial",цвет_f0);
   //----
   
   ObjectDelete("("+ТМФ+")_F0");
   ObjectCreate("("+ТМФ+")_F0",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f0_001-CP);
   ObjectSetText("("+ТМФ+")_F0","",8,"Arial",цвет_f0_001);
   //----
   
   ObjectDelete("("+ТМФ+")_F23");
   ObjectCreate("("+ТМФ+")_F23",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f23-CP);
   ObjectSetText("("+ТМФ+")_F23","("+ТМФ+")_F23_6",8,"Arial",цвет_f23);
   //----  
   ObjectDelete("("+ТМФ+")_F38");
   ObjectCreate("("+ТМФ+")_F38",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f38-CP);
   ObjectSetText("("+ТМФ+")_F38","("+ТМФ+")_F38_2",8,"Arial",цвет_f38);
//----  
   ObjectDelete("("+ТМФ+")_F50");
   ObjectCreate("("+ТМФ+")_F50",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f50-CP);
   ObjectSetText("("+ТМФ+")_F50","("+ТМФ+")_F50_0",8,"Arial",цвет_f50);

   //----
   
   ObjectDelete("("+ТМФ+")_F61");
   ObjectCreate("("+ТМФ+")_F61",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f61-CP);
   ObjectSetText("("+ТМФ+")_F61","("+ТМФ+")_F61_8",8,"Arial",цвет_f61);
   //----
   
   ObjectDelete("("+ТМФ+")_F78");
   ObjectCreate("("+ТМФ+")_F78",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f78-CP);
   ObjectSetText("("+ТМФ+")_F78","("+ТМФ+")_F78_6",8,"Arial",цвет_f78);
   //----
   
   ObjectDelete("("+ТМФ+")_F100");
   ObjectCreate("("+ТМФ+")_F100",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f100-CP);
   ObjectSetText("("+ТМФ+")_F100","("+ТМФ+")_F100",8,"Arial",цвет_f100);
   //----
   
   ObjectDelete("("+ТМФ+")_F161");
   ObjectCreate("("+ТМФ+")_F161",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f161-CP);
   ObjectSetText("("+ТМФ+")_F161","("+ТМФ+")_F161_8",8,"Arial",цвет_f161);
   //----
   
   ObjectDelete("("+ТМФ+")_Ff2_618 ");
   ObjectCreate("("+ТМФ+")_Ff2_618",OBJ_TEXT,0,iTime(NULL, ТМФ, rg),f2_618-CP);        //   iTime(NULL, ТМФ, rg)
   ObjectSetText("("+ТМФ+")_Ff2_618","("+ТМФ+")_F261",8,"Arial",цвет_f0);
//----
   return(0);
  }
//+------------------------------------------------------------------+
int GetExtremumZZBar(int ne) {
  double zz;
  int i, k=iBars(NULL, ТМФ)-ExtDepth, ke=0;   //   (NULL,ТМФ)-ExtDepth
  for (i=0; ine) return(i);
    }
  }
  return(-1);
}
//+------------------------------------------------------------------+
double GetExtremumZZPrice(int ne) {
  double zz;
  int    i, k=iBars(NULL, ТМФ)-ExtDepth, ke=0;  // iBars(NULL,tf)
  for (i=0; ine) return(zz);
    }
  }
  return(0);
}
//+------------------------------------------------------------------+

Recommend