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

JoGET

+joget+.mq5

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

rsi linear regression.pineTradingView · 1 общих тегов +joget+_nrw.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, отображающий комплексный рыночный анализ прямо на графике. Он показывает информацию о времени (локальное, брокерное, время свечи), текущую цену, спред, пипсы и статистику дневного диапазона, а также рисует текстовые метки и уровни прямо на окне графика.

Индикатор рассчитывает несколько групп скользящих средних и индикатор RSI на различных таймфреймах (от M1 до D1), отображая точки разворота, уровни поддержки и сопротивления, а также целевые уровни для покупок и продаж. На основе совокупности условий по скользящим средним и RSI формируется сводный сигнал BUY/SELL/WAIT.

Для работы индикатора требуется разрешение на использование DLL (для функций определения времени). В качестве визуального элемента используется один индикаторный буфер. Все данные выводятся в виде графических объектов-меток на графике.

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

Настройка	Описание
Pair_color	Цвет текста названия текущего инструмента (пары), отображаемого на графике.
CandleTime_color	Цвет отображения времени до закрытия текущей свечи.
Label_color	Цвет текстовых меток и заголовков информационных панелей на графике.
clockColor	Цвет отображения брокерного времени и информации о времени на графике.
MA1Period	Период первой группы скользящей средней.
MA1_Shift	Сдвиг первой группы скользящей средней.
MA1_Method	Метод расчёта первой группы скользящей средней.
MA1_Price_Type	Тип цены, используемый для расчёта первой группы скользящей средней.
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.

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

#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;

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

#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 start()
  {
      // код доступен только после оплаты
   }    
  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); 

   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) H4TP

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

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

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

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

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

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

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

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

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

3 326₽ ≈ $41