Любой вопрос новичка, чтоб не захламлять форум. Профи, не проходите мимо. Без вас никуда - 6. - страница 1089

 

ещё такой вопрос как отсекать лишние нули?

 

double a = 0.20000;

что бы получилось 0,2
ps количество цифр после запятой будет использоваться всегда разное
 
Money_Maker:

ещё такой вопрос как отсекать лишние нули?

 что бы получилось 0,2
ps количество цифр после запятой будет использоваться всегда разное

Здесь до 8 дробных десятичных цифр, поправьте, как Вам нужно.

// Переводит в строку курс
string KursS(double Ku) {
int k, i;
string S; // 8 дробных цифр для составного курса открытия позиции в MT5
S=DoubleToString(NormalizeDouble(Ku,8),8); // Уберем концевые нули
i=StringLen(S)-1;
if (StringSubstr(S,i,1)!="0") return(S); // Их нет
for (k=i-1;k>0;k--) if (StringSubstr(S,k,1)!="0") {S=StringSubstr(S,0,k+1); break;}
i=StringLen(S)-1; // Уберем концевую точку
if (StringSubstr(S,i,1)==".") S=StringSubstr(S,0,i);
return (S);
} // KursS
 
Money_Makerспасибо) жаль что нельзя время сохранять(
Время можно сохранить в имени горизонтальной линии
 
boing9267:    Добрый вечер, при запуске скрипта в логах ошибка: uninit reason 0 ...  Подскажите, пожалуйста, что не так?    

Переделал так - все идет

void OnStart()
{
   ObjectCreate(ChartID(),"HLine",OBJ_HLINE,0,0,iHigh(NULL,PERIOD_W1,0));
   ObjectSetInteger(ChartID(),"HLine",OBJPROP_COLOR, Yellow); // Желтый виднее 
   ObjectSetInteger(ChartID(),"HLine",OBJPROP_STYLE,0);   // стиль отображения
   ObjectSetInteger(ChartID(),"HLine",OBJPROP_WIDTH,1);   // толщина линии 
   ObjectSetInteger(ChartID(),"HLine",OBJPROP_BACK,true); // на передний план 

   ObjectCreate(ChartID(),"LLine",OBJ_HLINE,0,0,iLow(NULL,PERIOD_W1,0));
   ObjectSetInteger(ChartID(),"LLine",OBJPROP_COLOR,Blue); 
   ObjectSetInteger(ChartID(),"LLine",OBJPROP_STYLE,0); 
   ObjectSetInteger(ChartID(),"LLine",OBJPROP_WIDTH,1); 
   ObjectSetInteger(ChartID(),"LLine",OBJPROP_BACK,true); 
}
 
Vlad143:    Здесь до 8 дробных десятичных цифр, поправьте, как Вам нужно.
// Переводит в строку курс    Вот так короче!!!  Строк меньше и в каждой строке прозрачнее
string Kurs(double Ku)
{
  string S="0";   int n=8;     // Количество знаков дробной части
  while(S[StringLen(S)-1]=='0'  && n>=0)
  {
    S=DoubleToString(Ku,n); // n дробных цифр
    n--;
  }
  return (S);
} // Kurs
 
LRA:


В исходном коде короче, в исполнении длиннее. Я за быстродействие исполнения. Запустите скрипт сравнения, у меня вышло 6 секунд и 11 секунд. Виновата операция перевода числа в строку, ее лучше делать один раз.

#property copyright "Copyright 2016, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict

// Переводит в строку курс
string KursS(double Ku) {
int k, i;
string S; // 8 дробных цифр для составного курса открытия позиции в MT5
S=DoubleToString(NormalizeDouble(Ku,8),8); // Уберем концевые нули
i=StringLen(S)-1;
if (StringSubstr(S,i,1)!="0") return(S); // Их нет
for (k=i-1;k>0;k--) if (StringSubstr(S,k,1)!="0") {S=StringSubstr(S,0,k+1); break;}
i=StringLen(S)-1; // Уберем концевую точку
if (StringSubstr(S,i,1)==".") S=StringSubstr(S,0,i);
return (S);
} // KursS

// Переводит в строку курс    Вот так короче!!!  Строк меньше и в каждой строке прозрачнее
string Kurs(double Ku)
{
  string S="0";   int n=8;     // Количество знаков дробной части
  while(S[StringLen(S)-1]=='0'  && n>=0)
  {
    S=DoubleToString(Ku,n); // n дробных цифр
    n--;
  }
  return (S);
} // Kurs   

void OnStart() {
  string S;
  datetime TBeg,T1, T2;
  double x;
  int N,i;
  N=10000000; x=0.2;
  TBeg=TimeLocal();
  for (i=0;i<N;i++) S=KursS(x);
  T1=TimeLocal()-TBeg;
  TBeg=TimeLocal();
  for (i=0;i<N;i++) S=Kurs(x);
  T2=TimeLocal()-TBeg;
  Alert ("KursS -",(long)(T1),"сек   Kurs - ",(long)(T2),"сек");
  }
 
LRA:

Переделал так - все идет

Как понять все идет? Создаются две горизонтальные линии? У меня в журнале сейчас ошибок нет но линии после запуска скрипта не появляются

Хотя как то странно, на AUDCAD отработал, создал линии, а на AUDCHF и EURUSD нет... 

 

Кажется понял... Не отображается на тех графиках где уже есть горизонтальные линии. Если их удалить и выполнить скрипт то линии появляются. Но почему так происходит? Вопрос. 

 
LRA:
Повторное создание линии и даже другого объекта с тем же именем запрещено
неее... линии эти я руками наносил, имен у них нет
 

Любой объект имеет имя. Правой кнопкой по графику --> Список объектов


 
LRA:
Время можно сохранить в имени горизонтальной линии
спасибо, но имя занято комментарием , трендовая линия лучше подошла обе цены ставлю одинаковые первое время в 0 а второе то которое нужно .. это наверно самое разумное получилось