Исходный код · ID 4715

+JoGET+

+joget+_nrw.mq5

Похожие материалы по тегам

rsi linear regression.pineTradingView · 1 общих тегов +joget+.mq5MQL5 / MetaTrader 5 · 1 общих тегов fibochannel s&r.pineTradingView · 1 общих тегов marketstructure_rsi_validator.mq5MQL5 / MetaTrader 5 · 1 общих тегов xmc ea 1.02 d_grid_v1.mq5MQL5 / MetaTrader 5 · 1 общих тегов xmc ea 1.02 d_grid_v1.mq4MQL4 / MetaTrader 4 · 1 общих тегов

Вы автор или правообладатель?

Сообщите нам, если считаете, что материал размещён без разрешения.

Краткий обзор

О программе

Индикатор «+JoGET+» — это аналитический инструмент для MetaTrader 5, отображающий на графике информацию о ценовых данных и технических показателях. Он рассчитывает скользящие средние (MA1–MA5) и индекс относительной силы (RSI) на множестве таймфреймов — от M1 до D1 — и визуализирует их соотношения в виде цветовых сигналов.

Продукт формирует на графике текстовые метки с текущей ценой, спредом, количеством пунктов до открытия дня, диапазоном и средним диапазоном. Также отображаются уровни пивотов, линии открытия, поддержки и сопротивления для нескольких таймфреймов, а также мультитаймфреймный сигнал BUY/SELL/WAIT.

Индикатор использует системные функции через DLL для отображения локального и брокерного времени. Все графические объекты (линии, текстовые метки) создаются и обновляются автоматически при каждом пересчёте. Визуальные параметры настраиваются через цветовые и числовые настройки.

Настройки программы

Настройка	Описание
Pair_color	Цвет текстовой метки с названием торгового инструмента (символом) на графике.
CandleTime_color	Цвет текстовой метки с информацией о времени свечи на графике.
Label_color	Цвет текстовых меток с названиями информационных блоков (например, PIVOT, OPEN, BUYTP).
clockColor	Цвет текстовых меток с локальным и брокерным временем на графике.
MA1Period	Период первой скользящей средней, рассчитываемой на разных таймфреймах.
MA1_Shift	Сдвиг первой скользящей средней в барах.
MA1_Method	Метод расчёта первой скользящей средней (тип сглаживания).
MA1_Price_Type	Тип цены для расчёта первой скользящей средней (Close, Open, High, Low и др.).
MA2Period	Период второй скользящей средней, рассчитываемой на разных таймфреймах.
MA2_Shift	Сдвиг второй скользящей средней в барах.
MA2_Method	Метод расчёта второй скользящей средней (тип сглаживания).
MA2_Price_Type	Тип цены для расчёта второй скользящей средней.
MA3Period	Период третьей скользящей средней, рассчитываемой на разных таймфреймах.
MA3_Shift	Сдвиг третьей скользящей средней в барах.
MA3_Method	Метод расчёта третьей скользящей средней (тип сглаживания).
MA3_Price_Type	Тип цены для расчёта третьей скользящей средней.
MA4Period	Период четвёртой скользящей средней, рассчитываемой на разных таймфреймах.
MA4_Shift	Сдвиг четвёртой скользящей средней в барах.
MA4_Method	Метод расчёта четвёртой скользящей средней (тип сглаживания).
MA4_Price_Type	Тип цены для расчёта четвёртой скользящей средней.
MA5Period	Период пятой скользящей средней, рассчитываемой на разных таймфреймах.
MA5_Shift	Сдвиг пятой скользящей средней в барах.
MA5_Method	Метод расчёта пятой скользящей средней (тип сглаживания).
MA5_Price_Type	Тип цены для расчёта пятой скользящей средней.
RSI_Period	Период расчёта индекса относительной силы (RSI) на разных таймфреймах.
RSI_PRICE_TYPE	Тип цены для расчёта индекса относительной силы (RSI).
InpName1	Имя первой горизонтальной линии (уровень пивота) на графике.
InpName2	Имя второй горизонтальной линии (уровень открытия) на графике.
InpName3	Имя третьей горизонтальной линии (уровень цели при покупке или продаже) на графике.
InpName4	Имя четвёртой горизонтальной линии (дополнительный уровень цели) на графике.
InpName5	Имя пятой горизонтальной линии (дополнительный уровень цели) на графике.

Получить полный код

#property indicator_chart_window
extern color Pair_color = Silver;
extern color CandleTime_color = Aqua;
extern color Label_color = SlateGray;
extern color clockColor = RosyBrown;

extern int MA1Period = 4;
extern int MA1_Shift = 0;
extern int MA1_Method = 0;
extern int MA1_Price_Type = 0;
extern int MA2Period = 4;
extern int MA2_Shift = 0;
extern int MA2_Method = 0;
extern int MA2_Price_Type = 1;

extern int MA3Period = 20;
extern int MA3_Shift = 0;
extern int MA3_Method = 0;
extern int MA3_Price_Type = 0;
extern int MA4Period = 20;
extern int MA4_Shift = 0;
extern int MA4_Method = 0;
extern int MA4_Price_Type = 1;

extern int MA5Period = 1;
extern int MA5_Shift = 0;
extern int MA5_Method = 0;
extern int MA5_Price_Type = 0;

extern int RSI_Period = 5;
extern int RSI_PRICE_TYPE = 0;

extern string          InpName1="Pivot";        // Line name
extern string          InpName2="Open";        // Line name
extern string          InpName3="T1";        // Line name
extern string          InpName4="T2";        // Line name
extern string          InpName5="T3";        // Line name

color           InpColor1=clrRed;     // Line color
color           InpColor2=clrBlue;     // Line color
color           InpColor3=clrDeepSkyBlue;     // Line color
ENUM_LINE_STYLE InpStyle=STYLE_DASH; // Line style
int             InpWidth=1;          // Line width
bool            InpBack=true;       // Background line
bool            InpSelection=false;   // Highlight to move
bool            InpHidden=true;      // Hidden in the object list
long            InpZOrder=0;         // Priority for mouse click

int window = 0;
int corner = 1;
color Line_color = Gold;

string joget="",jogetTP="",TP="";

#property indicator_buffers 1
#property indicator_color1 Red
double ExtMapBuffer1[];

#import "kernel32.dll"
void GetLocalTime(int& TimeArray[]);
void GetSystemTime(int& TimeArray[]);
int  GetTimeZoneInformation(int& TZInfoArray[]);
#import

double point;

int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
  {
      // код доступен только после оплаты
   }   
   if ( !IsDllsAllowed() ) 
   {
      Alert( "Clock : DLLs are disabled.  To enable tick the checkbox in the Common Tab of indicator" );
      return(0);
   }
   int    counted_bars=IndicatorCounted();

   int    TimeArray[4];
   int    TZInfoArray[43];
   int    nYear,nMonth,nDay,nHour,nMin,nSec,nMilliSec;

   GetLocalTime(TimeArray);

   nYear=TimeArray[0]&0x0000FFFF;
   nMonth=TimeArray[0]>>16;
   nDay=TimeArray[1]>>16;
   nHour=TimeArray[2]&0x0000FFFF;
   nMin=TimeArray[2]>>16;
   nSec=TimeArray[3]&0x0000FFFF;
   nMilliSec=TimeArray[3]>>16;
   string LocalTimeS = FormatDateTime(nYear,nMonth,nDay,nHour,nMin,nSec);
   datetime localTime = StrToTime( LocalTimeS );

   int gmt_shift=0;
   int dst=GetTimeZoneInformation(TZInfoArray);
   if(dst!=0) gmt_shift=TZInfoArray[0];
   if(dst==2) gmt_shift+=TZInfoArray[42];

   datetime brokerTime = TimeCurrent();
   datetime WIB = localTime + gmt_shift * 60;

   string WIBs = TimeToString( WIB,TIME_MINUTES  );
   string brokers = TimeToString(TimeCurrent(),TIME_MINUTES );
   string bars = TimeToStr( TimeCurrent() - Time[0], TIME_MINUTES );

   ObjectSetText( "wibl", "Gresik:", 7, "Arial", Label_color );
   ObjectSetText( "wibt", WIBs, 9, "Arial", clockColor );
   ObjectSetText( "brol", "Broker:", 7, "Arial", Label_color );
   ObjectSetText( "brot", brokers, 9, "Arial", clockColor );
   ObjectSetText( "barl", "Bar:", 7, "Arial", Label_color );
   ObjectSetText( "bart", bars, 9, "Arial", clockColor );

   double MA3_M1 = iMA(Symbol(),1,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_M1 = iMA(Symbol(),1,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);
   double MA3_M5 = iMA(Symbol(),5,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_M5 = iMA(Symbol(),5,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);
   double MA3_M15 = iMA(Symbol(),15,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_M15 = iMA(Symbol(),15,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);
   double MA3_M30 = iMA(Symbol(),30,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_M30 = iMA(Symbol(),30,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);
   double MA3_H1 = iMA(Symbol(),60,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_H1 = iMA(Symbol(),60,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);
   double MA3_H4 = iMA(Symbol(),240,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_H4 = iMA(Symbol(),240,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);
   double MA3_D1 = iMA(Symbol(),1440,MA3Period,MA3_Shift,MA3_Method,MA3_Price_Type,0);
   double MA4_D1 = iMA(Symbol(),1440,MA4Period,MA4_Shift,MA4_Method,MA4_Price_Type,0);

   double MA1_M1 = iMA(Symbol(),1,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_M1 = iMA(Symbol(),1,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);
   double MA1_M5 = iMA(Symbol(),5,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_M5 = iMA(Symbol(),5,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);
   double MA1_M15 = iMA(Symbol(),15,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_M15 = iMA(Symbol(),15,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);
   double MA1_M30 = iMA(Symbol(),30,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_M30 = iMA(Symbol(),30,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);
   double MA1_H1 = iMA(Symbol(),60,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_H1 = iMA(Symbol(),60,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);
   double MA1_H4 = iMA(Symbol(),240,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_H4 = iMA(Symbol(),240,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);
   double MA1_D1 = iMA(Symbol(),1440,MA1Period,MA1_Shift,MA1_Method,MA1_Price_Type,0);
   double MA2_D1 = iMA(Symbol(),1440,MA2Period,MA2_Shift,MA2_Method,MA2_Price_Type,0);

   string S_m1 = "", S_m5 = "", S_m15 = "", S_m30 = "", S_h1 = "", S_h4 = "", S_d1 = "", S_w1 = "", S_mn1 = "";
   color  clr_m1, clr_m5, clr_m15, clr_m30, clr_h1, clr_h4;

   if (MA1_M1 < MA4_M1) { S_m1 = "-"; clr_m1 = FireBrick; }
   if (MA1_M1 > MA4_M1) { S_m1 = "-"; clr_m1 = SeaGreen; }
   if (MA1_M1 < MA2_M1) { S_m1 = "-"; clr_m1 = Red; }
   if (MA1_M1 > MA2_M1) { S_m1 = "-"; clr_m1 = Lime; }

   if (MA1_M5 < MA4_M5) { S_m5 = "-"; clr_m5 = FireBrick; }
   if (MA1_M5 > MA4_M5) { S_m5 = "-"; clr_m5 = SeaGreen; }
   if (MA1_M5 < MA2_M5) { S_m5 = "-"; clr_m5 = Red; }
   if (MA1_M5 > MA2_M5) { S_m5 = "-"; clr_m5 = Lime; }

   if (MA1_M15 <MA4_M15) { S_m15 = "-"; clr_m15 = FireBrick; }
   if (MA1_M15 >MA4_M15) { S_m15 = "-"; clr_m15 = SeaGreen; }
   if (MA1_M15 < MA2_M15) { S_m15 = "-"; clr_m15 = Red; }
   if (MA1_M15 > MA2_M15) { S_m15 = "-"; clr_m15 = Lime; }

   if (MA1_M30 < MA4_M30) { S_m30 = "-"; clr_m30 = FireBrick; }
   if (MA1_M30 > MA4_M30) { S_m30 = "-"; clr_m30 = SeaGreen; }
   if (MA1_M30 < MA2_M30) { S_m30 = "-"; clr_m30 = Red; }
   if (MA1_M30 > MA2_M30) { S_m30 = "-"; clr_m30 = Lime; }

   if (MA1_H1 < MA4_H1) { S_h1 = "-"; clr_h1 = FireBrick; }
   if (MA1_H1 > MA4_H1) { S_h1 = "-"; clr_h1 = SeaGreen; }
   if (MA1_H1 < MA2_H1) { S_h1 = "-"; clr_h1 = Red; }
   if (MA1_H1 > MA2_H1) { S_h1 = "-"; clr_h1 = Lime; }

   if (MA1_H4 < MA4_H4) { S_h4 = "-"; clr_h4 = FireBrick; }
   if (MA1_H4 > MA4_H4) { S_h4 = "-"; clr_h4 = SeaGreen; }  
   if (MA1_H4 < MA2_H4) { S_h4 = "-"; clr_h4 = Red; }
   if (MA1_H4 > MA2_H4) { S_h4 = "-"; clr_h4 = Lime; }  

   double MA5_M1 = iMA(Symbol(),1,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);
   double MA5_M5 = iMA(Symbol(),5,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);
   double MA5_M15 = iMA(Symbol(),15,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);
   double MA5_M30 = iMA(Symbol(),30,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);
   double MA5_H1 = iMA(Symbol(),60,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);
   double MA5_H4 = iMA(Symbol(),240,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);
   double MA5_D1 = iMA(Symbol(),1440,MA5Period,MA5_Shift,MA5_Method,MA5_Price_Type,0);

   string bs_m1 = "", bs_m5 = "", bs_m15 = "", bs_m30 = "", bs_h1 = "", bs_h4 = "", bs_d1 = "", bs_w1 = "", bs_mn1 = "";
   color  warna_m1, warna_m5, warna_m15, warna_m30, warna_h1, warna_h4;

   if (MA1_M1 < MA5_M1) { bs_m1 = "-"; warna_m1 = Lime; }
   if (MA1_M1 > MA5_M1) { bs_m1 = "-"; warna_m1 = Red; }
   if (MA3_M1 < MA5_M1) { bs_m1 = "-"; warna_m1 = SeaGreen; }
   if (MA3_M1 > MA5_M1) { bs_m1 = "-"; warna_m1 = FireBrick; }

   if (MA1_M5 < MA5_M5) { bs_m5 = "-"; warna_m5 = Lime; }
   if (MA1_M5 > MA5_M5) { bs_m5 = "-"; warna_m5 = Red; }
   if (MA3_M5 < MA5_M5) { bs_m5 = "-"; warna_m5 = SeaGreen; }
   if (MA3_M5 > MA5_M5) { bs_m5 = "-"; warna_m5 = FireBrick; }

   if (MA1_M15 < MA5_M15) { bs_m15 = "-"; warna_m15 = Lime; }
   if (MA1_M15 > MA5_M15) { bs_m15 = "-"; warna_m15 = Red; }
   if (MA3_M15 < MA5_M15) { bs_m15 = "-"; warna_m15 = SeaGreen; }
   if (MA3_M15 > MA5_M15) { bs_m15 = "-"; warna_m15 = FireBrick; }

   if (MA1_M30 < MA5_M30) { bs_m30 = "-"; warna_m30 = Lime; }
   if (MA1_M30 > MA5_M30) { bs_m30 = "-"; warna_m30 = Red; }
   if (MA3_M30 < MA5_M30) { bs_m30 = "-"; warna_m30 = SeaGreen; }
   if (MA3_M30 > MA5_M30) { bs_m30 = "-"; warna_m30 = FireBrick; }

   if (MA1_H1 < MA5_H1) { bs_h1 = "-"; warna_h1 = Lime; }
   if (MA1_H1 > MA5_H1) { bs_h1 = "-"; warna_h1 = Red; }
   if (MA3_H1 < MA5_H1) { bs_h1 = "-"; warna_h1 = SeaGreen; }
   if (MA3_H1 > MA5_H1) { bs_h1 = "-"; warna_h1 = FireBrick; }

   if (MA1_H4 < MA5_H4) { bs_h4 = "-"; warna_h4 = Lime; }
   if (MA1_H4 > MA5_H4) { bs_h4 = "-"; warna_h4 = Red; }  
   if (MA3_H4 < MA5_H4) { bs_h4 = "-"; warna_h4 = SeaGreen; }
   if (MA3_H4 > MA5_H4) { bs_h4 = "-"; warna_h4 = FireBrick; }  

   double rsi_d1 = iRSI(NULL, PERIOD_D1, RSI_Period , RSI_PRICE_TYPE, 0);
   double rsi_h4 = iRSI(NULL, PERIOD_H4, RSI_Period , RSI_PRICE_TYPE, 0);
   double rsi_h1 = iRSI(NULL, PERIOD_H1, RSI_Period , RSI_PRICE_TYPE, 0);
   double rsi_m30 = iRSI(NULL, PERIOD_M30, RSI_Period , RSI_PRICE_TYPE, 0);
   double rsi_m15 = iRSI(NULL, PERIOD_M15, RSI_Period , RSI_PRICE_TYPE, 0);
   double rsi_m5 = iRSI(NULL, PERIOD_M5, RSI_Period , RSI_PRICE_TYPE, 0);
   double rsi_m1 = iRSI(NULL, PERIOD_M1, RSI_Period , RSI_PRICE_TYPE, 0);

   string Teks="", Teks_Menit, Teks_Detik;
   double d_A, d_B;

   d_B = (Time[4]-Time[5])-MathMod(TimeCurrent(),Time[4]-Time[5]);
   d_A = d_B/60;
   d_B = (d_A-MathFloor(d_A))*60;
   d_A = MathFloor(d_A);
   Teks_Menit = DoubleToStr(d_A,0);
   Teks_Detik = DoubleToStr(d_B,0);
   Teks=Teks_Menit+":"+Teks_Detik;

   double Price1 = iMA(Symbol(),0,1,0,MODE_EMA,PRICE_CLOSE,0);   
    Teks=DoubleToStr(Price1,Digits);

   int R1=0,R5=0,R10=0,R20=0,RAvg=0,i=0;
   R1 =  (iHigh(NULL,PERIOD_D1,1)-iLow(NULL,PERIOD_D1,1))/point;
   for(i=1;i<=5;i++)
      R5    =    R5  +  (iHigh(NULL,PERIOD_D1,i)-iLow(NULL,PERIOD_D1,i))/point;
   for(i=1;i<=10;i++)
      R10   =    R10 +  (iHigh(NULL,PERIOD_D1,i)-iLow(NULL,PERIOD_D1,i))/point;
   for(i=1;i<=20;i++)
      R20   =    R20 +  (iHigh(NULL,PERIOD_D1,i)-iLow(NULL,PERIOD_D1,i))/point;

   R5 = R5/5;
   R10 = R10/10;
   R20 = R20/20;
   RAvg  =  (R1+R5+R10+R20)/4;    

   string HI="",LO="",SPREAD="",PIPS="",DAV="",HILO="",Pips="",Av="",AV_Yest="";
   string OPEN="";
   color color_pip,color_av;
   double Open_Today = iOpen(NULL,1440,0);
   double CLOSE = iClose(NULL,1440,0);
   double SPRD = (Ask - Bid)/point;
   double High_Today = iHigh(NULL,1440,0);
   double Low_Today = iLow(NULL,1440,0);
   PIPS =  DoubleToStr((CLOSE-Open_Today)/point,0);
   SPREAD = (DoubleToStr(SPRD,Digits-4));
   DAV = (DoubleToStr(RAvg,Digits-4));
   AV_Yest =  (iHigh(NULL,PERIOD_D1,1)-iLow(NULL,PERIOD_D1,1))/point;
   HILO = DoubleToStr((High_Today-Low_Today)/point,0);
   OPEN =  (DoubleToStr(Open_Today,Digits));
   HI =  (DoubleToStr(High_Today,Digits));
   LO =  (DoubleToStr(Low_Today,Digits));

     if (CLOSE >= Open_Today) {Pips= "-";color_pip = LimeGreen; }
     if (CLOSE < Open_Today) {Pips= "-";color_pip = DarkOrange; }
     if (DAV > AV_Yest) {Av= "-";color_av = LimeGreen; }
     if (DAV < AV_Yest) {Av= "-";color_av = DarkOrange; }

   string D1Mid="",D1Pivot="",D1OPEN="";
   color color_d1op,color_d1mid,color_MTD1,clr_TdD1,color_BuyTPD1,color_SellTPD1;
   double Open_D1 = iOpen(NULL,1440,0);
   D1OPEN =  (DoubleToStr(Open_D1,Digits));
   double D1r = iHigh(NULL,PERIOD_D1,1) - iLow(NULL,PERIOD_D1,1);
   double D1R = (iHigh(NULL,PERIOD_D1,1) + iLow(NULL,PERIOD_D1,1))/2;
   double D1P = (iHigh(NULL,PERIOD_D1,1) + iLow(NULL,PERIOD_D1,1) + iClose(NULL,PERIOD_D1,1))/3;
   D1Mid = DoubleToStr(D1R,Digits);
   D1Pivot = DoubleToStr(D1P,Digits);

   string  D1TProfit1="",D1TProfit2="",D1TargetBUY1="",D1TargetBUY2="",D1TargetBUY3="",
           D1_Trend="",D1_Today="",D1TargetSELL1="",D1TargetSELL2="",D1TargetSELL3="";
   double D1TB1 = D1P + (D1r * 0.382);
   D1TargetBUY1 = DoubleToStr(D1TB1,Digits);
   double D1TS1 = D1P - (D1r * 0.382);
   D1TargetSELL1 = DoubleToStr(D1TS1,Digits);
   double D1TB2 = D1P + (D1r * 0.618);
   D1TargetBUY2 = DoubleToStr(D1TB2,Digits);
   double D1TS2 = D1P - (D1r * 0.618);
   D1TargetSELL2 = DoubleToStr(D1TS2,Digits);
   double D1TB3 = D1P + (D1r * 1.236);
   D1TargetBUY3 = DoubleToStr(D1TB3,Digits);
   double D1TS3 = D1P - (D1r * 1.236);
   D1TargetSELL3 = DoubleToStr(D1TS3,Digits);

     if (D1OPEN > D1Pivot) {color_d1op=Lime;}
     if (D1OPEN < D1Pivot) {color_d1op=Red;}
     if (D1OPEN == D1Pivot) {color_d1op=Gray;}
     if (D1Mid > D1Pivot) {color_d1mid=Lime; D1TProfit2=D1TargetBUY1;}
     if (D1Mid < D1Pivot) {color_d1mid=Red; D1TProfit2=D1TargetSELL1;}
     if (D1Mid == D1Pivot) {color_d1mid=Gray; D1TProfit2="---------";}

     if (Teks > D1OPEN) D1_Trend = "p";
     if (Teks > D1OPEN) D1TProfit1 = D1TargetBUY1;
     if (Teks < D1Pivot) D1_Trend = "q";
     if (Teks < D1Pivot) D1TProfit1 = D1TargetSELL1;
     if ((Teks <= D1OPEN) && (Teks >= D1Pivot)) D1_Trend = "n";
     if ((Teks <= D1OPEN) && (Teks >= D1Pivot)) D1TProfit1 = "---------";
     if ((Teks <= D1OPEN) && (Teks >= D1Pivot)) {color_MTD1 = Gray; color_BuyTPD1 = Gray; color_SellTPD1 = Gray;}
     if (Teks > D1OPEN) {color_MTD1 = Lime; color_BuyTPD1 = Lime; color_SellTPD1 = Gray;}
     if (Teks < D1Pivot) {color_MTD1 = Red; color_BuyTPD1 = Gray; color_SellTPD1 = Red;}

     if ((Teks > D1OPEN) && (MA1_D1 > MA2_D1) && (MA1_D1 < MA5_D1)) {D1_Today = "p"; clr_TdD1 = Lime;}
     if ((Teks < D1OPEN) && (MA1_D1 < MA2_D1) && (MA1_D1 > MA5_D1)) {D1_Today = "q"; clr_TdD1 = Red;}

           ObjectCreate("OPD1", OBJ_LABEL, window, 0, 0);
   ObjectSet("OPD1", OBJPROP_CORNER, corner);
   ObjectSetText("OPD1", "OPEN", 7, "Arial Bold", Label_color);
   ObjectSet("OPD1", OBJPROP_XDISTANCE, 55);
   ObjectSet("OPD1", OBJPROP_YDISTANCE, 228); 
           ObjectCreate("OPD1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("OPD1a", OBJPROP_CORNER, corner);
   ObjectSetText("OPD1a", D1OPEN, 9, "Arial", color_d1op);
   ObjectSet("OPD1a", OBJPROP_XDISTANCE, 55);
   ObjectSet("OPD1a", OBJPROP_YDISTANCE, 215); 

           ObjectCreate("BuyTP1D1", OBJ_LABEL, window, 0, 0);
   ObjectSet("BuyTP1D1", OBJPROP_CORNER, corner);
   ObjectSetText("BuyTP1D1", "BuyTP1", 7, "Arial Bold", Label_color);
   ObjectSet("BuyTP1D1", OBJPROP_XDISTANCE, 55);
   ObjectSet("BuyTP1D1", OBJPROP_YDISTANCE, 303); 
           ObjectCreate("BuyTP1D1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("BuyTP1D1a", OBJPROP_CORNER, corner);
   ObjectSetText("BuyTP1D1a", D1TargetBUY1, 9, "Arial", color_BuyTPD1);
   ObjectSet("BuyTP1D1a", OBJPROP_XDISTANCE, 55);
   ObjectSet("BuyTP1D1a", OBJPROP_YDISTANCE, 290); 

           ObjectCreate("SellTP1D1", OBJ_LABEL, window, 0, 0);
   ObjectSet("SellTP1D1", OBJPROP_CORNER, corner);
   ObjectSetText("SellTP1D1", "SellTP1", 7, "Arial Bold", Label_color);
   ObjectSet("SellTP1D1", OBJPROP_XDISTANCE, 5);
   ObjectSet("SellTP1D1", OBJPROP_YDISTANCE, 303); 
           ObjectCreate("SellTP1D1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("SellTP1D1a", OBJPROP_CORNER, corner);
   ObjectSetText("SellTP1D1a", D1TargetSELL1, 9, "Arial", color_SellTPD1);
   ObjectSet("SellTP1D1a", OBJPROP_XDISTANCE, 5);
   ObjectSet("SellTP1D1a", OBJPROP_YDISTANCE, 290); 

           ObjectCreate("MToday", OBJ_LABEL, window, 0, 0);
   ObjectSet("MToday", OBJPROP_CORNER, corner);
   ObjectSetText("MToday", "MToday", 12, "Arial Narrow", Pair_color);
   ObjectSet("MToday", OBJPROP_XDISTANCE, 27);
   ObjectSet("MToday", OBJPROP_YDISTANCE, 315); 
           ObjectCreate("MToday1", OBJ_LABEL, window, 0, 0);
   ObjectSet("MToday1", OBJPROP_CORNER, corner);
   ObjectSetText("MToday1", "g", 11, "Webdings",Gray);
   ObjectSet("MToday1", OBJPROP_XDISTANCE, 7);
   ObjectSet("MToday1", OBJPROP_YDISTANCE, 317); 
           ObjectCreate("MToday2", OBJ_LABEL, window, 0, 0);
   ObjectSet("MToday2", OBJPROP_CORNER, corner);
   ObjectSetText("MToday2", D1_Trend, 9, "Wingdings 3",color_MTD1);
   ObjectSet("MToday2", OBJPROP_XDISTANCE, 8);
   ObjectSet("MToday2", OBJPROP_YDISTANCE, 320); 

           ObjectCreate("BuyTP2D1", OBJ_LABEL, window, 0, 0);
   ObjectSet("BuyTP2D1", OBJPROP_CORNER, corner);
   ObjectSetText("BuyTP2D1", "BuyTP2", 7, "Arial Bold", Label_color);
   ObjectSet("BuyTP2D1", OBJPROP_XDISTANCE, 55);
   ObjectSet("BuyTP2D1", OBJPROP_YDISTANCE, 278); 
           ObjectCreate("BuyTP2D1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("BuyTP2D1a", OBJPROP_CORNER, corner);
   ObjectSetText("BuyTP2D1a", D1TargetBUY2, 9, "Arial", color_BuyTPD1);
   ObjectSet("BuyTP2D1a", OBJPROP_XDISTANCE, 55);
   ObjectSet("BuyTP2D1a", OBJPROP_YDISTANCE, 265); 

           ObjectCreate("SellTP2D1", OBJ_LABEL, window, 0, 0);
   ObjectSet("SellTP2D1", OBJPROP_CORNER, corner);
   ObjectSetText("SellTP2D1", "SellTP1", 7, "Arial Bold", Label_color);
   ObjectSet("SellTP2D1", OBJPROP_XDISTANCE, 5);
   ObjectSet("SellTP2D1", OBJPROP_YDISTANCE, 278); 
           ObjectCreate("SellTP2D1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("SellTP2D1a", OBJPROP_CORNER, corner);
   ObjectSetText("SellTP2D1a", D1TargetSELL2, 9, "Arial", color_SellTPD1);
   ObjectSet("SellTP2D1a", OBJPROP_XDISTANCE, 5);
   ObjectSet("SellTP2D1a", OBJPROP_YDISTANCE, 265); 

           ObjectCreate("PVD1", OBJ_LABEL, window, 0, 0);
   ObjectSet("PVD1", OBJPROP_CORNER, corner);
   ObjectSetText("PVD1", "PIVOT", 7, "Arial Bold", Label_color);
   ObjectSet("PVD1", OBJPROP_XDISTANCE, 5);
   ObjectSet("PVD1", OBJPROP_YDISTANCE, 228); 
           ObjectCreate("PVD1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("PVD1a", OBJPROP_CORNER, corner);
   ObjectSetText("PVD1a", D1Pivot, 9, "Arial", White);
   ObjectSet("PVD1a", OBJPROP_XDISTANCE, 5);
   ObjectSet("PVD1a", OBJPROP_YDISTANCE, 215); 

           ObjectCreate("BuyTP3D1", OBJ_LABEL, window, 0, 0);
   ObjectSet("BuyTP3D1", OBJPROP_CORNER, corner);
   ObjectSetText("BuyTP3D1", "BuyTP3", 7, "Arial Bold", Label_color);
   ObjectSet("BuyTP3D1", OBJPROP_XDISTANCE, 55);
   ObjectSet("BuyTP3D1", OBJPROP_YDISTANCE, 253); 
           ObjectCreate("BuyTP3D1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("BuyTP3D1a", OBJPROP_CORNER, corner);
   ObjectSetText("BuyTP3D1a", D1TargetBUY3, 9, "Arial", color_BuyTPD1);
   ObjectSet("BuyTP3D1a", OBJPROP_XDISTANCE, 55);
   ObjectSet("BuyTP3D1a", OBJPROP_YDISTANCE, 240); 

           ObjectCreate("SellTP3D1", OBJ_LABEL, window, 0, 0);
   ObjectSet("SellTP3D1", OBJPROP_CORNER, corner);
   ObjectSetText("SellTP3D1", "SellTP3", 7, "Arial Bold", Label_color);
   ObjectSet("SellTP3D1", OBJPROP_XDISTANCE, 5);
   ObjectSet("SellTP3D1", OBJPROP_YDISTANCE, 253); 
           ObjectCreate("SellTP3D1a", OBJ_LABEL, window, 0, 0);
   ObjectSet("SellTP3D1a", OBJPROP_CORNER, corner);
   ObjectSetText("SellTP3D1a", D1TargetSELL3, 9, "Arial", color_SellTPD1);
   ObjectSet("SellTP3D1a", OBJPROP_XDISTANCE, 5);
   ObjectSet("SellTP3D1a", OBJPROP_YDISTANCE, 240); 

   if(!HLineMove(0,InpName1,DS(D1Pivot)))
      return(2);

   if(!HLineMove(0,InpName2,DS(D1OPEN)))
      return(2);
   if(joget=="BUY")
   {

		if(!HLineMove(0,InpName3,DS(D1TargetBUY1)))
		   return(2);

		if(!HLineMove(0,InpName4,DS(D1TargetBUY2)))
			return(2);

		if(!HLineMove(0,InpName5,DS(D1TargetBUY3)))
			return(2);	   
   } else
   {
      if(joget=="SELL")
      {

		   if(!HLineMove(0,InpName3,DS(D1TargetSELL1)))
			  return(2);

		   if(!HLineMove(0,InpName4,DS(D1TargetSELL2)))
			  return(2);

		   if(!HLineMove(0,InpName5,DS(D1TargetSELL3)))
			  return(2);	  
      } else
      {
         if(D1OPEN>D1Pivot)
         {

		      if(!HLineMove(0,InpName3,DS(D1TargetBUY1)))
			      return(2);

		      if(!HLineMove(0,InpName4,DS(D1TargetBUY2)))
			      return(2);

		      if(!HLineMove(0,InpName5,DS(D1TargetBUY3)))
			      return(2);	  
         }	
         if(D1OPEN<D1Pivot)
         {

		      if(!HLineMove(0,InpName3,DS(D1TargetSELL1)))
			      return(2);

		      if(!HLineMove(0,InpName4,DS(D1TargetSELL2)))
			      return(2);

		      if(!HLineMove(0,InpName5,DS(D1TargetSELL3)))
			      return(2);	  
   } 
   }  
   }

   string H4Mid="",H4Pivot="",H4OPEN="";
   color color_h4op,color_h4mid,color_MTH4,clr_TdH4;
   double Open_H4 = iOpen(NULL,240,0);
   H4OPEN =  (DoubleToStr(Open_H4,Digits));
   double H4r = iHigh(NULL,PERIOD_H4,1) - iLow(NULL,PERIOD_H4,1);
   double H4R = (iHigh(NULL,PERIOD_H4,1) + iLow(NULL,PERIOD_H4,1))/2;
   double H4P = (iHigh(NULL,PERIOD_H4,1) + iLow(NULL,PERIOD_H4,1) + iClose(NULL,PERIOD_H4,1))/3;
   H4Mid = DoubleToStr(H4R,Digits);
   H4Pivot = DoubleToStr(H4P,Digits);

   string  H4TProfit1="",H4TProfit2="",H4TargetBUY1="",H4TargetSELL1="",
           H4_Trend="",H4_Today="";
   double H4TB1 = H4P + (H4r * 1.236);
   H4TargetBUY1 = DoubleToStr(H4TB1,Digits);
   double H4TS1 = H4P - (H4r * 1.236);
   H4TargetSELL1 = DoubleToStr(H4TS1,Digits);

     if (H4OPEN > H4Pivot) {color_h4op=Lime;}
     if (H4OPEN < H4Pivot) {color_h4op=Red;}
     if (H4OPEN == H4Pivot) {color_h4op=Gray;}
     if (H4Mid > H4Pivot) {color_h4mid=Lime; H4TProfit2=H4TargetBUY1;}
     if (H4Mid < H4Pivot) {color_h4mid=Red; H4TProfit2=H4TargetSELL1;}
     if (H4Mid == H4Pivot) {color_h4mid=Gray; H4TProfit2="---------";}

     if (Teks > H4OPEN) H4_Trend = "UP";
     if (Teks > H4OPEN) H4TProfit1 = H4TargetBUY1;
     if (Teks < H4Pivot) H4_Trend = "DN";
     if (Teks < H4Pivot) H4TProfit1 = H4TargetSELL1;
     if ((Teks <= H4OPEN) && (Teks >= H4Pivot)) H4_Trend = "sw";
     if ((Teks <= H4OPEN) && (Teks >= H4Pivot)) H4TProfit1 = "---------";
     if ((Teks <= H4OPEN) && (Teks >= H4Pivot)) color_MTH4 = Gray;
     if (Teks > H4OPEN) color_MTH4 = Lime;
     if (Teks < H4Pivot) color_MTH4 = Red;

     if ((Teks > H4OPEN) && (MA1_H4 > MA2_H4) && (MA1_H4 < MA5_H4) && (rsi_h4 > 50)) {H4_Today = "p"; clr_TdH4 = Lime;}
     if ((Teks < H4OPEN) && (MA1_H4 < MA2_H4) && (MA1_H4 > MA5_H4) && (rsi_h4 < 50)) {H4_Today = "q"; clr_TdH4 = R

Показано первые 50% кода (символов: 37287)

Открыть по тарифу

Купите тариф с пакетом открытий или войдите, если тариф уже есть. Открытый файл останется в вашем кабинете навсегда.

Выбрать тариф Войти и открыть по тарифу

Разовая покупка файла

На этой странице откроется полный исходный код файла вместо ознакомительного фрагмента.

Зачем нужен email? После подтверждения оплаты файл сохранится в кабинете на этот email. Если аккаунта ещё нет, мы создадим его и пришлём ссылку для задания пароля. Если аккаунт уже есть, покупка добавится в него. Укажите адрес, к которому у вас есть доступ.

Чтобы оформить заказ, введите email и перейдите к оплате.

Стоимость полного кода

3 731₽ ≈ $46