Cualquier pregunta de los recién llegados sobre MQL4 y MQL5, ayuda y discusión sobre algoritmos y códigos

[Eliminado] 2017.10.10 11:48 #3331

Top2n:

¿Qué te parece esto?

if( número de barras del indicador == número de barras del EA )

Mikhail Toptunov 2017.10.10 12:55 #3332

Alexey Kozitsyn:

if( número de barras del indicador == número de barras del EA )

Entonces, ¿cómo puedo obtener el número de barras del indicador en el EA?

[Eliminado] 2017.10.10 12:56 #3333

Top2n:

Entonces, ¿cómo puedo obtener el número de barras del indicador en el EA?

BarsCalculated().

kirill1405 2017.10.10 14:21 #3334

Hola, ¿podríais decirme qué hay que escribir entre paréntesis para la función de retorno?

En la versión antigua puede que no escriba nada, pero en la versión más reciente tiene que escribir algo

Te enviaré una captura de pantalla de la parte del EA como ejemplo

Archivos adjuntos:

yzo9qp_ednv89_2017-10-10_3_18.20.04.png 26 kb

Obtención de valores de Preguntas de los principiantes Interfaz gráfica de usuario

[Eliminado] 2017.10.10 14:40 #3335

kirill1405:

Hola, ¿podríais decirme qué hay que escribir entre paréntesis para la función de retorno?

En la versión antigua puede que no escriba nada, pero en la versión más reciente tiene que escribir algo

Te enviaré una captura de pantalla de la parte del EA como ejemplo

Hay que escribir entre paréntesis el valor/variable que corresponde al tipo de función. Si la función es un bool, entonces entre paréntesis debe estar true o false, o una variable del tipo bool. Para otros tipos de funciones, lo mismo. Si la función es nula, sólo hay que devolverla;

Preguntas de los principiantes Una pregunta para los Funciones útiles de KimIV

kirill1405 2017.10.10 14:42 #3336

Alexey Kozitsyn:
El valor/variable correspondiente al tipo de función debe escribirse entre paréntesis. Si la función es un bool, debe ser verdadero o falso, o una variable del tipo bool entre paréntesis. Para otros tipos de funciones - de manera similar. Si la función es nula, sólo hay que devolverla;

¿Podría decirme, a partir de la imagen que he dejado caer, qué se necesita para la función de retorno?

para tener una mejor idea de cómo debería ser.

Gracias.

[Eliminado] 2017.10.10 14:44 #3337

kirill1405:

¿Podría decirme, a partir de la imagen que he dejado caer, qué se necesita para la función de retorno?

para tener una mejor idea de cómo debería ser.

Gracias.

Como he dicho antes, para devolver un valor correcto, es necesario conocer el tipo de función. Y la foto no lo muestra.

kirill1405 2017.10.10 14:55 #3338

Aquí tienes, si no es mucha molestia

Archivos adjuntos:

lmdf9hx.mq4 10 kb

[Eliminado] 2017.10.10 15:38 #3339

kirill1405:

Aquí tienes, si no es mucha molestia

Pega el código a través del botón SRC, no hay ganas de descargarlo, mirarlo y borrarlo.

kirill1405 2017.10.10 15:59 #3340

Alexey Kozitsyn:
Pega el código a través del botón SRC, no hay ganas de descargarlo, mirarlo y borrarlo.

extern double StopLoss = 100;
extern double TakeProfit = 400;
extern int Period_MA_1 = 100;
extern int Period_MA_2 = 150;
extern double  Rasst = 40;
extern double Lots = 0.5;


bool Work = true;
string Symb;
//------------------------------------------------2
int start()
{
int
Total,     //количество ордеров в окне
Tip = -1,
Ticket;    // тип выбранного ордера 
double
MA_1_t,    // текущее значение средней №1 
MA_2_t,    // текущее значение средней №2
Lot,       // количество лотов в выбранном ордере
Lts,       // Количество лотов в открыв. ордере 
Min_Lot,   // минимальное количество лотов
Step,      // шаг изменения размера лота
Free,     // текущие свободные средства
One_Lot,  // стоимость одного лота
Price,    // цена выбранного ордера
SL,      // стоплосс выбранного ордера 
TP;      // тейкпрофит выбранного ордера 
bool
Ans = false,
Cls_B = false,
Cls_S = false,
Opn_B = false,
Opn_S = false;
//----------------------------------------------  3
// предварительная обработка
if (Bars < Period_MA_2)
{
Alert ("Недостаточно баров в окне. Эксперт не работает");
}
return;
if (Work==false)
{
Alert ("Критическая ошибка. Эксперт не работает");
}
return;
//здесь можно указать разные параметры например задать время работы эксперта
//----------------------------------------------  4
// учет ордеров
Symb = Symbol();
Total =0;
for (int i=1;i<=OrdersTotal();i++)
{
if (OrderSelect(i-1,SELECT_BY_POS)==true)
{
if (OrderSymbol()!= Symb) continue;
if ( OrderType()>1)
{
Alert ("Обнаружен отложенный ордер. Эксперт не работает");
return  ;
}
Total++;     //счетчик рыночных ордеров
if (Total>1)
{
Alert ("Несколько рыночных ордеров. Эксперт не работает.");
return ;
}
Ticket=OrderTicket();
Tip=OrderType();
Price=OrderOpenPrice();
SL=OrderStopLoss();
TP=OrderTakeProfit();
Lot=OrderLots();
}
}
// Торговые критерии
MA_1_t=iMA(NULL,0,Period_MA_1,0,MODE_EMA,PRICE_CLOSE,0);
MA_2_t=iMA(NULL,0,Period_MA_2,0,MODE_EMA,PRICE_CLOSE,0);
if (MA_1_t>MA_2_t+Rasst*Point)
{
Opn_B=true;
Cls_S=true;
}
if (MA_1_t<MA_2_t-Rasst*Point)
{
Opn_S=true;
Cls_B=true;
}
//--------------------------------------------
// закрытие ордеров
while (true)
{
if (Tip==0 && Cls_B==true)
{
Alert ("Попытка закрыть Buy ",Ticket,"ожидание ответа..");
RefreshRates();
Ans=OrderClose(Ticket,Lot,Bid,2);
if (Ans==true)
{
Alert ("Закрыт ордер Buy" ,Ticket);
break;
}
if  (Fun_Error(GetLastError())==1)
continue;
return;
}
if (Tip==1 && Cls_S==true)
{
Alert ("Попытка закрыть Sell ",Ticket,"ожидание ответа..");
RefreshRates();
Ans=OrderClose(Ticket,Lot,Ask,2);
if (Ans==true)
{
Alert ("Закрыт ордер Sell" ,Ticket);
break;
}
if (Fun_Error(GetLastError())==1)
continue;
return;
}
break;
}
//-------------------------------------------------
// расчет размера позиций
RefreshRates();
Min_Lot=MarketInfo(Symb,MODE_MINLOT);
Free = AccountFreeMargin();
One_Lot = MarketInfo(Symb,MODE_MARGINREQUIRED);
Step = MarketInfo(Symb,MODE_LOTSTEP);
if (Lots>0)
Lts=Lots;
if (Lts<Min_Lot)
Lts=Min_Lot;
if (Lts*One_Lot<Free)
{
Alert ("Не хватает денежных средств на ",Lts," лотов");
return;
}
//--------------------------------------------
// блок открытия ордеров
while (true)
{
if (Total==0 && Opn_B==true)
{
RefreshRates();
SL=Bid-New_Stop(StopLoss)*Point;
TP=Bid+New_Stop(TakeProfit)*Point;
Alert ("Попытка открыть ордер BUY. Ожидаем ответа..");
Ticket = OrderSend(Symb,OP_BUY,Lts,Ask,2,SL,TP);
if (Ticket>0)
{
Alert (" Открыт ордер BUY" ,Ticket);
return ;
}
if (Fun_Error(GetLastError())==1)
continue;
return ;
}
if (Total==0 && Opn_S==true)
{
RefreshRates();
SL=Ask-New_Stop(StopLoss)*Point;
TP=Ask+New_Stop(TakeProfit)*Point;
Alert ("Попытка открыть ордер Sell. Ожидаем ответа..");
Ticket = OrderSend(Symb,OP_SELL,Lts,Bid,2,SL,TP);
if (Ticket>0)
{
Alert (" Открыт ордер Sell" ,Ticket);
return ;
}
if (Fun_Error(GetLastError())==1)
continue;
return ;
}
break;
}
//-----------------------------------------------------------
return;
}
//---------------------------------------------------------
int Fun_Error (int Error)
{
switch (Error)
{
default : Alert ("Возникла ошибка ",Error);
return(0);
}
}
//-------------------------------------------------------------
int New_Stop (int Parametr)
{
int Min_Dist=MarketInfo(Symb,MODE_STOPLEVEL);
if (Parametr<Min_Dist)
{
Parametr=Min_Dist;
Alert ("Увеличена дистанция стоп приказа");
}
return(Parametr);
}
//------------------------------------------------------------

Cualquier pregunta de los recién llegados sobre MQL4 y MQL5, ayuda y discusión sobre algoritmos y códigos - página 334