Отображение в окне индикаторов для другой пары.

 

В программировании разбираюсь ровно настолько, чтобы индикатор из главного окошка перепрограммировать в отдельное. :) Никак, то бишь.

Но все же вопрос: насколько сложно написать так, чтобы какой-нибудь индикатор (RSI, например) показывал бы в окне для одной валюты параметры другой. Скажем, на графике евро-йены снизу был бы RSI для фунто-йены.

Ну, то есть можно ли просто объявить с самого начала индикатору, чтоб он просто брал при расчете котировки для другой валюты, есть ли такая стандартная формула, не требующая знания программирования, которую можно просто записать в начале индюка? Или же каждый раз нужны особенные танцы с бубном и общей формулы не существует? Спасибо.

 
Goose писал(а) >>

В программировании разбираюсь ровно настолько, чтобы индикатор из главного окошка перепрограммировать в отдельное. :) Никак, то бишь.

Но все же вопрос: насколько сложно написать так, чтобы какой-нибудь индикатор (RSI, например) показывал бы в окне для одной валюты параметры другой. Скажем, на графике евро-йены снизу был бы RSI для фунто-йены.

Ну, то есть можно ли просто объявить с самого начала индикатору, чтоб он просто брал при расчете котировки для другой валюты, есть ли такая стандартная формула, не требующая знания программирования, которую можно просто записать в начале индюка? Или же каждый раз нужны особенные танцы с бубном и общей формулы не существует? Спасибо.

Проще ничего нет. Это даже ты можешь зделать. Чаще всего надо заменить NULL и Symbol() на нужную тебе пару, скажем "EURUSD". А лучше выложи сюда

 
Goose >>:

Ну, интересует сам общий принцип, вариант, который я мог бы использовать для разных индюков, но вот, например этот (угол машки показывает палочкой, MA Angle) 


#property copyright "MrPip and jpkfox"
//---- indicator settings
#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 LimeGreen
#property indicator_color2 Yellow
#property indicator_color3 FireBrick
#property indicator_width1 2
#property indicator_width2 2
#property indicator_width3 2

//---- indicator parameters
extern int MAPeriod=34;
extern string m = "--Moving Average Types--";
extern string m0 = " 0 = SMA";
extern string m1 = " 1 = EMA";
extern string m2 = " 2 = SMMA";
extern string m3 = " 3 = LWMA";
extern string m4 = " 4 = LSMA";
extern int MA_Type = 1; //0=SMA, 1=EMA, 2=SMMA, 3=LWMA, 4=LSMA
extern string p = "--Applied Price Types--";
extern string p0 = " 0 = close";
extern string p1 = " 1 = open";
extern string p2 = " 2 = high";
extern string p3 = " 3 = low";
extern string p4 = " 4 = median(high+low)/2";
extern string p5 = " 5 = typical(high+low+close)/3";
extern string p6 = " 6 = weighted(high+low+close+close)/4";
extern int MA_AppliedPrice = 0;//0=close, 1=open, 2=high, 3=low, 4=median(high+low)/2, 5=typical(high+low+close)/3, 6=weighted(high+low+close+close)/4
extern double AngleTreshold=8;
extern int PrevMAShift=1;
extern int CurMAShift=0;

int MA_Mode;
string strMAType;

//---- indicator buffers
double UpBuffer[];
double DownBuffer[];
double ZeroBuffer[];

//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- 2 additional buffers are used for counting.
  IndicatorBuffers(3);
//---- drawing settings
  SetIndexStyle(0,DRAW_HISTOGRAM,STYLE_SOLID);
  SetIndexStyle(1,DRAW_HISTOGRAM,STYLE_SOLID);
  SetIndexStyle(2,DRAW_HISTOGRAM,STYLE_SOLID);

  IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS)+2);

//---- 3 indicator buffers mapping
  if(!SetIndexBuffer(0,UpBuffer) &&
  !SetIndexBuffer(1,DownBuffer) &&
  !SetIndexBuffer(2,ZeroBuffer))
  Print("cannot set indicator buffers!");
switch (MA_Type)
  {
  case 1: strMAType="EMA"; MA_Mode=MODE_EMA; break;
  case 2: strMAType="SMMA"; MA_Mode=MODE_SMMA; break;
  case 3: strMAType="LWMA"; MA_Mode=MODE_LWMA; break;
  case 4: strMAType="LSMA"; break;
  default: strMAType="SMA"; MA_Mode=MODE_SMA; break;
  }
//---- name for DataWindow and indicator subwindow label
  IndicatorShortName("MA_" + strMAType+"_Angle("+MAPeriod+","+AngleTreshold+","+PrevMAShift+","+CurMAShift+")");
//---- initialization done
  return(0);
}

//+------------------------------------------------------------------+
//| LSMA with PriceMode |
//| PrMode 0=close, 1=open, 2=high, 3=low, 4=median(high+low)/2, |
//| 5=typical(high+low+close)/3, 6=weighted(high+low+close+close)/4 |
//+------------------------------------------------------------------+

double LSMA(int Rperiod, int prMode, int shift)
{
  int i, mshift;
  double sum, pr;
  int length;
  double lengthvar;
  double tmp;
  double wt;

  length = Rperiod;
 
  sum = 0;
  for(i = length; i >= 1 ; i--)
  {
  lengthvar = length + 1;
  lengthvar /= 3;
  tmp = 0;
  mshift = length-i+shift;
  switch (prMode)
  {
  case 0: pr = Close[mshift];break;
  case 1: pr = Open[mshift];break;
  case 2: pr = High[mshift];break;
  case 3: pr = Low[mshift];break;
  case 4: pr = (High[mshift] + Low[mshift])/2;break;
  case 5: pr = (High[mshift] + Low[mshift] + Close[mshift])/3;break;
  case 6: pr = (High[mshift] + Low[mshift] + 2 * Close[mshift])/4;break;
  }
  tmp = ( i - lengthvar)*pr;
  sum+=tmp;
  }
  wt = MathFloor(sum*6/(length*(length+1))/Point)*Point;
   
  return(wt);
}

//+------------------------------------------------------------------+
//| The angle for MA |
//+------------------------------------------------------------------+
int start()
{
  double fCurMA, fPrevMA;
  double fAngle, mFactor, dFactor;
  int nLimit, i;
  int nCountedBars;
  double angle;
  int ShiftDif;
  string Sym;
 
  if(CurMAShift >= PrevMAShift)
  {
  Print("Error: CurMAShift >= PrevMAShift");
  PrevMAShift = 6;
  CurMAShift = 0;  
  }  
   
  nCountedBars = IndicatorCounted();
//---- check for possible errors
  if(nCountedBars<0) 
  return(-1);
//---- last counted bar will be recounted
  if(nCountedBars>0) 
  nCountedBars--;
  nLimit = Bars-nCountedBars;
// dFactor = 2*3.14159/180.0;
  dFactor = 3.14159/180.0;
// mFactor = 100000.0;
  mFactor = 1000.0;
  Sym = StringSubstr(Symbol(),3,3);
// if (Sym == "JPY") mFactor = 1000.0;
  if (Sym == "JPY") mFactor = 10.0;
  ShiftDif = PrevMAShift-CurMAShift;
// mFactor /= ShiftDif; 
//---- main loop
  for(i=0; i<nLimit; i++)
  {
  if (MA_Type == 4)
  {
  fCurMA=LSMA(MAPeriod,MA_AppliedPrice, i+CurMAShift);
  fPrevMA=LSMA(MAPeriod,MA_AppliedPrice, i+PrevMAShift);
  }
  else
  {
  fCurMA=iMA(NULL,0,MAPeriod,0,MA_Mode,MA_AppliedPrice,i+CurMAShift);
  fPrevMA=iMA(NULL,0,MAPeriod,0,MA_Mode,MA_AppliedPrice,i+PrevMAShift);
  }
// fAngle = mFactor * (fCurMA - fPrevMA)/2.0;
// calculate tan(angle) = opposite / adjacent
  fAngle = (fCurMA - fPrevMA)/ShiftDif;
  // 10000.0 : Multiply by 10000 so that the fAngle is not too small
  // for the indicator Window.
  // take ArcTan of value to get the angle in radians and convert to degrees
  fAngle = mFactor * MathArctan(fAngle)/dFactor;

  DownBuffer[i] = 0.0;
  UpBuffer[i] = 0.0;
  ZeroBuffer[i] = 0.0;
   
  if(fAngle > AngleTreshold)
  {
  UpBuffer[i] = fAngle;
  }
  else if (fAngle < -AngleTreshold)
  {
  DownBuffer[i] = fAngle;
  }
  else ZeroBuffer[i] = fAngle;
  }

  return(0);
  }
//+------------------------------------------------------------------+



 
Goose писал(а) >>

#property copyright "MrPip and jpkfox"
//---- indicator settings
#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 LimeGreen
#property indicator_color2 Yellow
#property indicator_color3 FireBrick
#property indicator_width1 2
#property indicator_width2 2
#property indicator_width3 2

extern string PARA = "EURUSD";
//---- indicator parameters
extern int MAPeriod=34;
extern string m = "--Moving Average Types--";
extern string m0 = " 0 = SMA";
extern string m1 = " 1 = EMA";
extern string m2 = " 2 = SMMA";
extern string m3 = " 3 = LWMA";
extern string m4 = " 4 = LSMA";
extern int MA_Type = 1; //0=SMA, 1=EMA, 2=SMMA, 3=LWMA, 4=LSMA
extern string p = "--Applied Price Types--";
extern string p0 = " 0 = close";
extern string p1 = " 1 = open";
extern string p2 = " 2 = high";
extern string p3 = " 3 = low";
extern string p4 = " 4 = median(high+low)/2";
extern string p5 = " 5 = typical(high+low+close)/3";
extern string p6 = " 6 = weighted(high+low+close+close)/4";
extern int MA_AppliedPrice = 0;//0=close, 1=open, 2=high, 3=low, 4=median(high+low)/2, 5=typical(high+low+close)/3, 6=weighted(high+low+close+close)/4
extern double AngleTreshold=8;
extern int PrevMAShift=1;
extern int CurMAShift=0;

int MA_Mode;
string strMAType;

//---- indicator buffers
double UpBuffer[];
double DownBuffer[];
double ZeroBuffer[];

//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- 2 additional buffers are used for counting.
IndicatorBuffers(3);
//---- drawing settings
SetIndexStyle(0,DRAW_HISTOGRAM,STYLE_SOLID);
SetIndexStyle(1,DRAW_HISTOGRAM,STYLE_SOLID);
SetIndexStyle(2,DRAW_HISTOGRAM,STYLE_SOLID);

IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS)+2);

//---- 3 indicator buffers mapping
if(!SetIndexBuffer(0,UpBuffer) &&
!SetIndexBuffer(1,DownBuffer) &&
!SetIndexBuffer(2,ZeroBuffer))
Print("cannot set indicator buffers!");
switch (MA_Type)
{
case 1: strMAType="EMA"; MA_Mode=MODE_EMA; break;
case 2: strMAType="SMMA"; MA_Mode=MODE_SMMA; break;
case 3: strMAType="LWMA"; MA_Mode=MODE_LWMA; break;
case 4: strMAType="LSMA"; break;
default: strMAType="SMA"; MA_Mode=MODE_SMA; break;
}
//---- name for DataWindow and indicator subwindow label
IndicatorShortName("MA_" + strMAType+"_Angle("+MAPeriod+","+AngleTreshold+","+PrevMAShift+","+CurMAShift+") " + PARA);
//---- initialization done
return(0);
}

//+------------------------------------------------------------------+
//| LSMA with PriceMode |
//| PrMode 0=close, 1=open, 2=high, 3=low, 4=median(high+low)/2, |
//| 5=typical(high+low+close)/3, 6=weighted(high+low+close+close)/4 |
//+------------------------------------------------------------------+

double LSMA(int Rperiod, int prMode, int shift)
{
int i, mshift;
double sum, pr;
int length;
double lengthvar;
double tmp;
double wt;

length = Rperiod;

sum = 0;
for(i = length; i >= 1 ; i--)
{
lengthvar = length + 1;
lengthvar /= 3;
tmp = 0;
mshift = length-i+shift;
switch (prMode)
{
case 0: pr = iClose(PARA, 0, mshift);break;
case 1: pr = iOpen(PARA, 0, mshift);break;
case 2: pr = iHigh(PARA, 0, mshift);break;
case 3: pr = iLow(PARA, 0, mshift);break;
case 4: pr = (iHigh(PARA, 0, mshift) + iLow(PARA, 0, mshift))/2;break;
case 5: pr = (iHigh(PARA, 0, mshift) + iLow(PARA, 0, mshift) + iClose(PARA, 0, mshift))/3;break;
case 6: pr = (iHigh(PARA, 0, mshift) + iLow(PARA, 0, mshift) + 2 * iClose(PARA, 0, mshift))/4;break;
}
tmp = ( i - lengthvar)*pr;
sum+=tmp;
}
wt = MathFloor(sum*6/(length*(length+1))/MarketInfo( PARA, MODE_POINT))*MarketInfo( PARA, MODE_POINT);

return(wt);
}

//+------------------------------------------------------------------+
//| The angle for MA |
//+------------------------------------------------------------------+
int start()
{
double fCurMA, fPrevMA;
double fAngle, mFactor, dFactor;
int nLimit, i;
int nCountedBars;
double angle;
int ShiftDif;
string Sym;

if(CurMAShift >= PrevMAShift)
{
Print("Error: CurMAShift >= PrevMAShift");
PrevMAShift = 6;
CurMAShift = 0;
}

nCountedBars = IndicatorCounted();
//---- check for possible errors
if(nCountedBars<0)
return(-1);
//---- last counted bar will be recounted
if(nCountedBars>0)
nCountedBars--;
nLimit = Bars-nCountedBars;
dFactor = 3.14159/180.0;
mFactor = 1000.0;
Sym = StringSubstr(PARA,3,3);
if (Sym == "JPY") mFactor = 10.0;
ShiftDif = PrevMAShift-CurMAShift;
for(i=0; i<nLimit; i++)
{
if (MA_Type == 4)
{
fCurMA=LSMA(MAPeriod,MA_AppliedPrice, i+CurMAShift);
fPrevMA=LSMA(MAPeriod,MA_AppliedPrice, i+PrevMAShift);
}
else
{
fCurMA=iMA(PARA,0,MAPeriod,0,MA_Mode,MA_AppliedPrice,i+CurMAShift);
fPrevMA=iMA(PARA,0,MAPeriod,0,MA_Mode,MA_AppliedPrice,i+PrevMAShift);
}
fAngle = (fCurMA - fPrevMA)/ShiftDif;
fAngle = mFactor * MathArctan(fAngle)/dFactor;

DownBuffer[i] = 0.0;
UpBuffer[i] = 0.0;
ZeroBuffer[i] = 0.0;

if(fAngle > AngleTreshold)
{
UpBuffer[i] = fAngle;
}
else if (fAngle < -AngleTreshold)
{
DownBuffer[i] = fAngle;
}
else ZeroBuffer[i] = fAngle;
}

return(0);
}
//+------------------------------------------------------------------+
/

/

/

/

/

Вроде так. Хотя есть один кривой момент, но ты его не заметишь. (nLimit = Bars-nCountedBars;)

 
В настройках индикатора (когда перебрасываешь) установи первый параметр PARA на нужную пару. Сейчас это EURUSD.
 
infinum13 >>:
В настройках индикатора (когда перебрасываешь) установи первый параметр PARA на нужную пару. Сейчас это EURUSD.

Спасибо большое, сейчас посмотрю.Но я так понимаю, что если уже в теле, так сказать, индикатора нужно упоминать нужную пару (fCurMA=iMA(PARA,0,MAPeriod,0,MA_Mode,MA_AppliedPrice,i+CurMAShift);), то самому для других индюков мне это не осилить. Ведь нужно же знать, когда ее вставлять. Или это не так сложно понять?

Ну, то есть вначале мы объясняем, что у нас есть extern string PARA = "EURUSD";

А когда еще нужно ссылаться и упоминать этот параметр PARA, это как-то в общем виде для чайника можно объяснить?

Не сочтите за наглость, не могли бы вы еще дать пример для обычной машки или RSI? 

За индюк спасибо еще раз, я его буду использовать для коррелируемых пар, которые ходят вместе, но иногда нет - тогда по ним лучше не торговать.

 
Goose писал(а) >>

Спасибо большое, сейчас посмотрю.Но я так понимаю, что если уже в теле, так сказать, индикатора нужно упоминать нужную пару (fCurMA=iMA(PARA,0,MAPeriod,0,MA_Mode,MA_AppliedPrice,i+CurMAShift);), то самому для других индюков мне это не осилить. Ведь нужно же знать, когда ее вставлять. Или это не так сложно понять?

Ну, то есть вначале мы объясняем, что у нас есть extern string PARA = "EURUSD";

А когда еще нужно ссылаться и упоминать этот параметр PARA, это как-то в общем виде для чайника можно объяснить?

Не сочтите за наглость, не могли бы вы еще дать пример для обычной машки или RSI?

За индюк спасибо еще раз, я его буду использовать для коррелируемых пар, которые ходят вместе, но иногда нет - тогда по ним лучше не торговать.

С машкой сложнее. Если её надо отобразить в отдельном окне, то просто. А если в основном, то нужен поправочный коэфициент вводить и т.д.

RSI тоже просто, но времени, ей богу, нет. Извини. Обратись к другим, может они помогут.

 
infinum13 >>:

С машкой сложнее. Если её надо отобразить в отдельном окне, то просто. А если в основном, то нужен поправочный коэфициент вводить и т.д.

RSI тоже просто, но времени, ей богу, нет. Извини. Обратись к другим, может они помогут.

Ничего, буду учиться потихоньку. Спасибо еще раз за помощь.

 
https://www.mql5.com/ru/code/8638
 
.
Файлы:
 
satop >>:
https://www.mql5.com/ru/code/8638

Спасибо. 

Вот эти корелляции-то и интересуют. Наверняка ведь это самый лучший фильтр - пара скажем идет вверх, а другая, обычно хорошо кореллируемая пара - нет или в другую сторону. Значит, надо подождать.

Я вот тут смотрю http://www.mataf.net/en/tools/correlation-currency 

Причина обращения: