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

Nuevo comentario
 
Top2n:

¿Qué te parece esto?

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

 
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?

 
Top2n:

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

BarsCalculated().
 

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
 
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;
 
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.

 
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.
 

Aquí tienes, si no es mucha molestia

Archivos adjuntos:
lmdf9hx.mq4  10 kb
 
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.
 
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);
}
//------------------------------------------------------------
1...327328329330331332333334335336337338339340341...1954
Nuevo comentario