Cualquier pregunta de novato, para no saturar el foro. Profesionales, no pasen de largo. En ninguna parte sin ti - 6. - página 1089

Nuevo comentario
 

Otra cuestión es cómo cortar los ceros sobrantes.

double a = 0.20000;

para obtener 0,2
ps el número de dígitos después del punto decimal siempre se utilizará de forma diferente
 
Money_Maker:

Otra cuestión es cómo cortar los ceros sobrantes.

para que sea 0,2.
ps el número de dígitos después del punto decimal siempre se utilizará de forma diferente

Hay hasta 8 dígitos decimales fraccionarios, corrige lo que necesites. 

// Переводит в строку курс
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:  Gracias) Lástima que no se pueda ahorrar el tiempo(
El tiempo se puede guardar en un nombre de línea horizontal
 
boing9267:    Buenas noches, al ejecutar el script aparece un error en los logs: uninit reason 0 ... ¿Pueden decirme qué ocurre?

Rehecho así - todo va

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:    Aquí hay hasta 8 dígitos decimales fraccionarios, corrige como quieras. 
// Переводит в строку курс    Вот так короче!!!  Строк меньше и в каждой строке прозрачнее
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:


Más corto en el código fuente, más largo en la ejecución. Estoy a favor de la ejecución rápida. Ejecute el script de comparación, obtuve 6 segundos y 11 segundos. La culpa de la operación de número a cadena, es mejor hacerla una vez.

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

Lo he rehecho así - va a

¿Cómo entiendes que va? ¿Se crean las dos líneas horizontales? No hay errores en mi registro, pero las líneas no aparecen después del inicio del script

Es extraño, sin embargo - funcionó y creó líneas en AUDCAD, pero no en AUDCHF y EURUSD...

Creo que lo entiendo... No aparece en los gráficos que ya tienen líneas horizontales. Si los quito y ejecuto el script, aparecen las líneas. Pero, ¿por qué aparecen? Pregunta.

 
LRA:
Está prohibido volver a crear una línea o incluso otro objeto con el mismo nombre
No... Dibujé a mano esas líneas, no tienen nombre.
 

Cualquier objeto tiene un nombre. Clic derecho en el gráfico --> Lista de objetos


 
LRA:
El tiempo se puede guardar en el nombre de la línea horizontal
Gracias, pero el nombre está ocupado por un comentario , la línea de tendencia es más adecuado ambos precios son el mismo tiempo el primer tiempo es 0 y el segundo es el derecho ... este es probablemente el más razonable
1...108210831084108510861087108810891090109110921093109410951096...1179
Nuevo comentario