---esto va debajo del magic number------
extern bool compuesto     = true;
double capitalToCompuesto ;




---Esto va debajo del for en OrderSend------

if(compuesto && capitalToCompuesto > 0) amount = Entry_Amount*(AccountEquity()/ capitalToCompuesto);





---Esto va en el init---
capitalToCompuesto  = AccountEquity();

Input parameters section:

input int           Maximum_Spread_Points = 5;


----Esto va en OpenPosition Function ------


  if (!IsWithinMaxSpread())
        return;


-----Esto va debajo de todo el codigo es una funcion para el spread -----MT4-----

bool IsWithinMaxSpread()
{
    bool WithinMaxSpread = true;

    if (Maximum_Spread_Points > 0)
    {
        double spread = NormalizeDouble(((Ask - Bid) / _Point), 0);
        //Need NormalizeDouble here because of rounding errors in MT4 that otherwise occur (confirmed in several backtests).

        if (spread > Maximum_Spread_Points)
        {
            Print("El spread actual es de ", DoubleToString(spread, 0), " puntos, es mas alto del permitido que es ", DoubleToString(Maximum_Spread_Points, 0), " puntos. No realizara este trade!");
            WithinMaxSpread = false;
        }
    }

    return(WithinMaxSpread);
}
-------Funcion en MT5---------

bool IsWithinMaxSpread()
{
    bool WithinMaxSpread = true;

    if (Maximum_Spread_Points > 0)
{
    double spread = NormalizeDouble(((SymbolInfoDouble(_Symbol, SYMBOL_ASK) - SymbolInfoDouble(_Symbol, SYMBOL_BID)) / _Point), 0);
    // Es necesario utilizar NormalizeDouble aquí debido a errores de redondeo en MT4 que de otra manera ocurren (confirmado en varios backtests).

    if (spread > Maximum_Spread_Points)
    {
        Print("El spread actual es de ", DoubleToString(spread, 0), " puntos, es más alto del permitido que es ", DoubleToString(Maximum_Spread_Points, 0), " puntos. No se realizará este trade!");
        WithinMaxSpread = false;
    }
}

return WithinMaxSpread;
}