Скачать MetaTrader 5
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий
Нужен программист? Оставь заказ и он сам тебя найдет!
PyhnetMozg
54
PyhnetMozg 2014.04.11 06:58 
//+------------------------------------------------------------------+
//| Графический пробник.mq4 |
//| Copyright 2014, MetaQuotes Software Corp. |
//| https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2014, MetaQuotes Software Corp."
#property link "https://www.mql5.com"
#property version "1.00"
#property strict
input bool Linia_ili_NOL = True;

void OnTick()
{
double MACD_Gistograma_W,MACD_Liniya_W,MACD_Gistograma_D,MACD_Liniya_D,MACD_Gistograma_H4,
MACD_Liniya_H4,MACD_Gistograma_H4_1,MACD_Gistograma_W_1;
string chto_seichas,chto_seichas_nedeli;
color cvet_nedeli,cvet;
datetime time=Time[0];
string name = "Linia";
string name1 = "Linia1";
int a,b;
//---------------------------------------------------------------------------------------------------------------------------
//---------------------------------------------------------------------------------------------------------------------------
MACD_Gistograma_W = iMACD(Symbol(),PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
MACD_Gistograma_W_1 = iMACD(Symbol(),PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_MAIN,2);
MACD_Liniya_W = iMACD(Symbol(),PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
MACD_Gistograma_D = iMACD(Symbol(),PERIOD_D1,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
MACD_Liniya_D = iMACD(Symbol(),PERIOD_D1,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
MACD_Gistograma_H4= iMACD(Symbol(),PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
MACD_Liniya_H4 = iMACD(Symbol(),PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
MACD_Gistograma_H4_1= iMACD(Symbol(),PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_MAIN,2);
if( MACD_Gistograma_W>0 && MACD_Gistograma_W_1<0)
{
chto_seichas = "Тренд вверх";
cvet = Green;
for(int i=0; i<ObjectsTotal(); i++)
{
string nameTY1 = ObjectName(i);
if(name==nameTY1)
{
name1=nameTY1+IntegerToString(i);
}
if(ObjectCreate(name1,OBJ_VLINE,0,time,0))
{
ObjectSet(name1, OBJPROP_COLOR, LimeGreen);
ObjectSet(name1,OBJPROP_STYLE,STYLE_SOLID);
ObjectSet(name1,OBJPROP_TIME1,time);
ChartRedraw(0);
PrintFormat("Двигаемся ",name1);
}
}
}
if(MACD_Gistograma_W<0 && MACD_Gistograma_W_1>0)
{
chto_seichas = "Тpенд вниз";
cvet = Red;
for(int i=0; i<ObjectsTotal(); i++)
{
string nameTY = ObjectName(i);
if(!(name==nameTY))
{
ObjectCreate(name,OBJ_VLINE,0,time,0);
ObjectSet(name, OBJPROP_COLOR, Red);
ObjectSet(name,OBJPROP_STYLE,STYLE_SOLID);
ObjectSet(name,OBJPROP_TIME1,time);
PrintFormat("Двигаемся ",name);
ChartRedraw(0);
}
else name=nameTY+IntegerToString(i);
}
}
ObjectCreate("induk",OBJ_LABEL,0,0,0,0,0);
ObjectSet("induk",OBJPROP_XDISTANCE,1200);
ObjectSet("induk",OBJPROP_YDISTANCE,290);
ObjectSetText("induk",chto_seichas,10,"Tahoma",cvet);
if(Linia_ili_NOL)
{
if(MACD_Gistograma_W>MACD_Liniya_W)
{
chto_seichas_nedeli = "НЕДЕЛЯ ВОСХОДА";
cvet_nedeli = Green;
}
if(MACD_Gistograma_W<MACD_Liniya_W)
{
chto_seichas_nedeli = "НЕДЕЛЯ ПАДЕНИЯ";
cvet_nedeli = Red;
}
}
if(!Linia_ili_NOL)
{
if(MACD_Gistograma_W>0)
{
chto_seichas_nedeli = "НЕДЕЛЯ ВОСХОДА";
cvet_nedeli = Green;
}
if(MACD_Gistograma_W<0)
{
chto_seichas_nedeli = "НЕДЕЛЯ ПАДЕНИЯ";
cvet_nedeli = Red;
}
}
ObjectCreate("induk_2",OBJ_LABEL,0,0,0,0,0);
ObjectSet("induk_2",OBJPROP_XDISTANCE,1200); //X
ObjectSet("induk_2",OBJPROP_YDISTANCE,300); //Y
ObjectSetText("induk_2",chto_seichas_nedeli,10,"Tahoma",cvet_nedeli);


}
Файлы:
Alekseu Fedotov
731
Alekseu Fedotov 2014.04.11 10:25  
Myltiplaz:


//+------------------------------------------------------------------+
//| Script program start function                                    |
//+------------------------------------------------------------------+
void OnStart()
  {

SetVLine(clrRed,"Тpенд вниз"+(string)TimeCurrent(),Time[10]);


   
  }
//+------------------------------------------------------------------+
//+----------------------------------------------------------------------------+
//|  Автор    : Ким Игорь В. aka KimIV,  http://www.kimiv.ru                   |
//+----------------------------------------------------------------------------+
//|  Версия   : 02.07.2008                                                     |
//|  Описание : Установка объекта OBJ_VLINE вертикальная линия                 |
//+----------------------------------------------------------------------------+
//|  Параметры:                                                                |
//|    cl - цвет линии                                                         |
//|    nm - наименование               ("" - время открытия текущего бара)     |
//|    t1 - время                      (0  - время открытия текущего бара)     |
//|    st - стиль линии                (0  - простая линия)                    |
//|    wd - ширина линии               (1  - по умолчанию)                     |
//+----------------------------------------------------------------------------+
void SetVLine(color cl, string nm="", datetime t1=0, int st=0, int wd=1) {
  if (nm=="") nm=DoubleToStr(Time[0], 0);
  if (t1<=0) t1=Time[0];
  if (ObjectFind(nm)<0) ObjectCreate(nm, OBJ_VLINE, 0, 0,0);
  ObjectSet(nm, OBJPROP_TIME1, t1);
  ObjectSet(nm, OBJPROP_COLOR, cl);
  ObjectSet(nm, OBJPROP_STYLE, st);
  ObjectSet(nm, OBJPROP_WIDTH, wd);
}
Комбинатор
15653
Комбинатор 2014.04.11 12:22  
добавляйте время в название линии
Александр
287
Александр 2014.04.11 14:57  
И что могут дать эти вертикальные линии для торговли?Я как то вертикальными линиями отмечал выход новости и реакцию на рынке на эту новость,а вы для каких целей используете?
/
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий