Особенности языка mql4, тонкости и приёмы работы - страница 21

[Artyom Trishkin]

fxsaber:

Вычисление профитности.

Применение

Результат

ЗЫ Не знаю, как от крякозябр избавиться (копировал из вкладки Эксперты MT4).

Терминал на русский язык переключить.

[fxsaber]

Artyom Trishkin:
Терминал на русский язык переключить.

Терминал и все в нем на русском языке. Крякозябры при копировании.

[Artyom Trishkin]

fxsaber:

Терминал и все в нем на русском языке. Крякозябры при копировании.

Раскладка клавиатуры при копировании на русском должна быть.

[fxsaber]

Artyom Trishkin:

Раскладка клавиатуры при копировании на русском должна быть.

Спасибо, получилось.

[Maxim Kuznetsov]

Artyom Trishkin:

Раскладка клавиатуры при копировании на русском должна быть.

Артём, а каким образом это вообще может влиять ? это БАГ

[Artyom Trishkin]

Maxim Kuznetsov:
Артём, а каким образом это вообще может влиять ? это БАГ

Такое было сколько себя тут и на mql4.com помню.

[Maxim Kuznetsov]

Artyom Trishkin:

Такое было сколько себя тут и на mql4.com помню.

то есть стало ФИЧЕЙ :-)

ну как блин, как, состояние переключателя языка ввода может влиять на результат Copy-Paste ??

[Artyom Trishkin]

Yurij Kozhevnikov:
Это в "Особенности" надо. Я бы не отказался узнать об этом на несколько лет раньше.

Оно и так тут - в особенностях.

[Yurij Kozhevnikov]

Artyom Trishkin:
Оно и так тут - в особенностях.

Потом заметил :D

Потому и удалил.

[fxsaber]

Вычисление риска.

// Вычисляет риск для заданной максимальной просадки.
double GetRisk( const double NewMaxDD, const double Alpha, const string Symb, const int Magic = -1  )
{
  double RiskLeft = 0;
  double RiskRight = 10;
  
  double Risk, SumGain, MaxDD, RF;
    
  do
  {
    Risk = (RiskLeft + RiskRight) / 2;
        
    if (!GetSumGain(Risk, SumGain, MaxDD, RF, Symb, Magic)) // https://www.mql5.com/ru/forum/170953/page20#comment_13432058
    {
      MaxDD = DBL_MAX;

      RiskRight = Risk;      
    }
    else if (MaxDD > NewMaxDD)
      RiskRight = Risk;
    else
      RiskLeft = Risk;
  }
  while (!IsStopped() && (MathAbs(MaxDD - NewMaxDD) > Alpha));
  
  return(Risk);  
}

Применение.

#property strict
#property show_inputs

input double inMaxDD = 0.3; // Для какой максимальной просадки вычислить риск?
input int MagicNumber = 1;

#define D(A) DoubleToString(A, 2)

void OnStart()
{
  double SumGain, MaxDD, RF;
  
  const double Risk = GetRisk(inMaxDD, 0.01, _Symbol, MagicNumber);
  
  if (GetSumGain(Risk, SumGain, MaxDD, RF, _Symbol, MagicNumber))   
    Print((string)MagicNumber + ": при риске " + D(Risk) +
                                " увеличение было бы в " + D(SumGain) + " раза" +
                                " с максимальной относительной просадкой по балансу " + D(MaxDD) + 
                                ", фактор восстановления = " + D(RF));  
}

Результат

1: при риске 0.51 увеличение было бы в 3.82 раза с максимальной относительной просадкой по балансу 0.30, фактор восстановления = 3.20