//+------------------------------------------------------------------+
//|                                                   Scalping Robot |
//+------------------------------------------------------------------+
#property copyright "Copyright 2024, MetaQuotes Ltd."
#property link      "https://www.mql5.com"
#property version   "1.00"

#include <Trade/Trade.mqh>

CTrade trade;
CPositionInfo pos;
COrderInfo ord;

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
input group "*** Trading Inputs ***"
input double LotSize             = 0.01;  // Lot size for trading
input int    Tppoints            = 800;   // Take Profit (10 points = 1 pip)
input int    Slpoints            = 800;   // Stoploss Points (10 points = 1 pip)
input int    TslTriggerPoints    = 35;    // Points in profit before Trailing SL is activated (10 points = 1 pip)
input int    TslPoints           = 10;    // Trailing Stoploss (10 points = 1 pip)
input ENUM_TIMEFRAMES Timeframe  = PERIOD_CURRENT; // Time frame to run
input int    InpMagic            = 891245; // EA identification no
input string TradeComment        = "Wendel Cassiano";
input int    MaxSpread           = 100;   // Maximum spread allowed (in points)
input int    Slippage            = 50;    // Slippage in points
input int    MaxOrders           = 2;     // Máximo de ordens permitidas simultaneamente

enum StarHour { Inactive=0, _0100=1, _0200=2, _0300=3, _0400=4, _0500=5, _0600=6, _0700=7, _0800=8, _0900=9, _1000=10, _1100=11, _1200=12, _1300=13, _1400=14, _1500=15, _1600=16, _1700=17, _1800=18, _1900=19, _2000=20, _2100=21, _2200=22, _2300=23 };
input StarHour SHInput = 0; // Start Hour

enum EndHour { Inactive=0, _0100=1, _0200=2, _0300=3, _0400=4, _0500=5, _0600=6, _0700=7, _0800=8, _0900=9, _1000=10, _1100=11, _1200=12, _1300=13, _1400=14, _1500=15, _1600=16, _1700=17, _1800=18, _1900=19, _2000=20, _2100=21, _2200=22, _2300=23 };
input EndHour EHInput = 0; // End Hour

int SHChoice;
int EHChoice;

int BarsN            = 5;
int ExpirationBars   = 100;
int OrderDistPoints  = 100;

datetime lastUpdate = 0; // Última atualização das ordens pendentes

int OnInit()
{
    //---
    trade.SetExpertMagicNumber(InpMagic);
    ChartSetInteger(0, CHART_SHOW_GRID, false);

    return (INIT_SUCCEEDED);
}

//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
    //---
    TrailStop();

    // Atualiza ordens pendentes apenas em uma nova vela
    if (IsNewBar())
    {
        UpdatePendingOrders();
    }

    MqlDateTime time;
    TimeToStruct(TimeCurrent(), time);

    int Hournow = time.hour;

    SHChoice = SHInput;
    EHChoice = EHInput;

    if (Hournow < SHChoice) { CloseAllOrders(); return; }
    if (Hournow >= EHChoice && EHChoice != 0) { CloseAllOrders(); return; }

    double spread = (SymbolInfoDouble(_Symbol, SYMBOL_ASK) - SymbolInfoDouble(_Symbol, SYMBOL_BID)) / _Point;
    if (spread > MaxSpread) return;

    int BuyTotal = 0;
    int SellTotal = 0;

    for (int i = PositionsTotal() - 1; i >= 0; i--)
    {
        if (pos.SelectByIndex(i))
        {
            if (pos.PositionType() == POSITION_TYPE_BUY && pos.Symbol() == _Symbol && pos.Magic() == InpMagic) BuyTotal++;
            if (pos.PositionType() == POSITION_TYPE_SELL && pos.Symbol() == _Symbol && pos.Magic() == InpMagic) SellTotal++;
        }
    }

    for (int i = OrdersTotal() - 1; i >= 0; i--)
    {
        if (ord.SelectByIndex(i))
        {
            if (ord.OrderType() == ORDER_TYPE_BUY_STOP && ord.Symbol() == _Symbol && ord.Magic() == InpMagic) BuyTotal++;
            if (ord.OrderType() == ORDER_TYPE_SELL_STOP && ord.Symbol() == _Symbol && ord.Magic() == InpMagic) SellTotal++;
        }
    }

    int TotalOrders = BuyTotal + SellTotal;
    if (TotalOrders >= MaxOrders) return;

    if (BuyTotal <= 0)
    {
        double high = findHigh();
        if (high > 0)
        {
            SendBuyOrder(high);
        }
    }

    if (SellTotal <= 0)
    {
        double low = findLow();
        if (low > 0)
        {
            SendSellOrder(low);
        }
    }
}

//+------------------------------------------------------------------+
//| Atualiza ordens pendentes caso os pontos de abertura mudem       |
//+------------------------------------------------------------------+
void UpdatePendingOrders()
{
    double high = findHigh();
    double low = findLow();

    for (int i = OrdersTotal() - 1; i >= 0; i--)
    {
        if (ord.SelectByIndex(i))
        {
            if (ord.Symbol() == _Symbol && ord.Magic() == InpMagic)
            {
                // Atualiza ordem BuyStop
                if (ord.OrderType() == ORDER_TYPE_BUY_STOP)
                {
                    if (MathAbs(ord.PriceOpen() - high) > 2 * OrderDistPoints * _Point)
                    {
                        ulong ticket = ord.Ticket();
                        trade.OrderDelete(ticket); // Deleta ordem antiga
                        SendBuyOrder(high);        // Cria nova ordem
                    }
                }

                // Atualiza ordem SellStop
                if (ord.OrderType() == ORDER_TYPE_SELL_STOP)
                {
                    if (MathAbs(ord.PriceOpen() - low) > 2 * OrderDistPoints * _Point)
                    {
                        ulong ticket = ord.Ticket();
                        trade.OrderDelete(ticket); // Deleta ordem antiga
                        SendSellOrder(low);        // Cria nova ordem
                    }
                }
            }
        }
    }
}

//+------------------------------------------------------------------+

double findHigh()
{
    double highestHigh = 0;
    double averageHigh = 0;

    for (int i = 0; i < BarsN; i++)
    {
        double high = iHigh(_Symbol, Timeframe, i);
        highestHigh = MathMax(highestHigh, high);
        averageHigh += high;
    }

    averageHigh /= BarsN;
    return MathMax(highestHigh, averageHigh); // Retorna o maior entre o máximo e a média
}

double findLow()
{
    double LowestLow = DBL_MAX;
    double averageLow = 0;

    for (int i = 0; i < BarsN; i++)
    {
        double low = iLow(_Symbol, Timeframe, i);
        LowestLow = MathMin(LowestLow, low);
        averageLow += low;
    }

    averageLow /= BarsN;
    return MathMin(LowestLow, averageLow); // Retorna o menor entre o low mínimo e a média
}

bool IsNewBar()
{
    static datetime previousTime = 0;
    datetime currentTime = iTime(_Symbol, Timeframe, 0);
    if (previousTime != currentTime)
    {
        previousTime = currentTime;
        return true;
    }
    return false;
}

void SendBuyOrder(double entry)
{
    double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);

    if (ask > entry - OrderDistPoints * _Point) return;

    double tp = entry + Tppoints * _Point;
    double sl = entry - Slpoints * _Point;

    double lots = LotSize;

    datetime expiration = iTime(_Symbol, Timeframe, 0) + ExpirationBars * PeriodSeconds(Timeframe);

    trade.BuyStop(lots, entry, _Symbol, sl, tp, ORDER_TIME_SPECIFIED, expiration, Slippage);
}

void SendSellOrder(double entry)
{
    double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);

    if (bid < entry + OrderDistPoints * _Point) return;

    double tp = entry - Tppoints * _Point;
    double sl = entry + Slpoints * _Point;

    double lots = LotSize;

    datetime expiration = iTime(_Symbol, Timeframe, 0) + ExpirationBars * PeriodSeconds(Timeframe);

    trade.SellStop(lots, entry, _Symbol, sl, tp, ORDER_TIME_SPECIFIED, expiration, Slippage);
}

void CloseAllOrders()
{
    for (int i = OrdersTotal() - 1; i >= 0; i--)
    {
        if (ord.SelectByIndex(i))
        {
            ulong ticket = ord.Ticket();
            if (ord.Symbol() == _Symbol && ord.Magic() == InpMagic)
            {
                trade.OrderDelete(ticket);
            }
        }
    }
}

void TrailStop()
{
    double sl = 0;
    double tp = 0;

    double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
    double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);

    for (int i = PositionsTotal() - 1; i >= 0; i--)
    {
        if (pos.SelectByIndex(i))
        {
            ulong ticket = pos.Ticket();

            if (pos.Magic() == InpMagic && pos.Symbol() == _Symbol)
            {
                if (pos.PositionType() == POSITION_TYPE_BUY)
                {
                    if (bid - pos.PriceOpen() > TslTriggerPoints * _Point)
                    {
                        tp = pos.TakeProfit();
                        sl = bid - (TslPoints * _Point);

                        if (sl > pos.StopLoss() && sl != 0)
                        {
                            trade.PositionModify(ticket, sl, tp);
                        }
                    }
                }
                else if (pos.PositionType() == POSITION_TYPE_SELL)
                {
                    if (ask + (TslTriggerPoints * _Point) < pos.PriceOpen())
                    {
                        tp = pos.TakeProfit();
                        sl = ask + (TslPoints * _Point);

                        if (sl < pos.StopLoss() && sl != 0)
                        {
                            trade.PositionModify(ticket, sl, tp);
                        }
                    }
                }
            }
        }
    }
}


coloque a rede neural do codigo abaixo no meu codigo acima para melhorar a assertividade e mantenha a estrategia original do codigo acima e me entregue ocodigo completo:

//+------------------------------------------------------------------+
//|                                                   Scalping Robot |
//+------------------------------------------------------------------+
#property copyright "Copyright 2024, MetaQuotes Ltd."
#property link      "https://www.mql5.com"
#property version   "1.01"

#include <Trade/Trade.mqh>

#define NumNodes 20 // Number of network nodes
CTrade           trade;
CPositionInfo    pos;
COrderInfo       ord;

// Neural Network Parameters
input double Coefficient           = 0.1;
input double LearningRate          = 0.1;

double          Weight[NumNodes];        // Neural network node weights
double          NormalizedInputs[NumNodes];
double          NNOutput            = 0;

//+------------------------------------------------------------------+
//|                                              Inputs and Settings |
//+------------------------------------------------------------------+
input group "*** Trading Inputs ***"
input double LotSize             = 0.01;  // Lot size for trading
input int    Tppoints            = 800;   // Take Profit (10 points = 1 pip)
input int    Slpoints            = 800;   // Stop Loss Points (10 points = 1 pip)
input int    TslTriggerPoints    = 35;    // Points in profit before Trailing SL is activated (10 points = 1 pip)
input int    TslPoints           = 10;    // Trailing Stoploss (10 points = 1 pip)
input ENUM_TIMEFRAMES Timeframe  = PERIOD_CURRENT; // Time frame to run
input int    InpMagic            = 891245; // EA identification no
input string TradeComment        = "Wendel Cassiano";
input int    MaxSpread           = 100;   // Maximum spread allowed (in points)
input int    Slippage            = 50;    // Slippage in points
input int    MaxOrders           = 2;     // Max simultaneous orders

int BarsN            = 5;
int ExpirationBars   = 100;
int OrderDistPoints  = 100;

//+------------------------------------------------------------------+
//| Initialization                                                   |
//+------------------------------------------------------------------+
int OnInit()
{
    trade.SetExpertMagicNumber(InpMagic);
    ChartSetInteger(0, CHART_SHOW_GRID, false);

    // Initialize Neural Network Weights
    for (int i = 0; i < NumNodes; i++)
        Weight[i] = 0.5; // Arbitrary initial weights for the neural network

    return (INIT_SUCCEEDED);
}

//+------------------------------------------------------------------+
//| Expert Tick Function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
    // Apply trailing stop logic
    TrailStop();

    // Check if the new bar is available
    if (!IsNewBar()) return;

    // Check spread
    double spread = (SymbolInfoDouble(_Symbol, SYMBOL_ASK) - SymbolInfoDouble(_Symbol, SYMBOL_BID)) / _Point;
    if (spread > MaxSpread) return;

    // Count active Buy and Sell positions/orders
    int BuyTotal = 0, SellTotal = 0;
    for (int i = PositionsTotal() - 1; i >= 0; i--)
    {
        pos.SelectByIndex(i);
        if (pos.PositionType() == POSITION_TYPE_BUY && pos.Symbol() == _Symbol && pos.Magic() == InpMagic)
            BuyTotal++;
        if (pos.PositionType() == POSITION_TYPE_SELL && pos.Symbol() == _Symbol && pos.Magic() == InpMagic)
            SellTotal++;
    }
    for (int i = OrdersTotal() - 1; i >= 0; i--)
    {
        ord.SelectByIndex(i);
        if (ord.OrderType() == ORDER_TYPE_BUY_STOP && ord.Symbol() == _Symbol && ord.Magic() == InpMagic)
            BuyTotal++;
        if (ord.OrderType() == ORDER_TYPE_SELL_STOP && ord.Symbol() == _Symbol && ord.Magic() == InpMagic)
            SellTotal++;
    }

    // Limit maximum orders
    int TotalOrders = BuyTotal + SellTotal;
    if (TotalOrders >= MaxOrders) return;

    // Neural network prediction
    NormalizingInputs();
    OutputLayerCalculation();

    // Determine Buy and Sell Signals from Neural Network
    bool buySignal = (BuyTotal == 0 && NNOutput > 0);
    bool sellSignal = (SellTotal == 0 && NNOutput < 0);

    if (buySignal)
    {
        double high = findHigh();
        if (high > 0)
            SendBuyOrder(high);
    }
    if (sellSignal)
    {
        double low = findLow();
        if (low > 0)
            SendSellOrder(low);
    }
}

//+------------------------------------------------------------------+
//| Helper Functionality                                             |
//+------------------------------------------------------------------+
double findHigh()
{
    double highestHigh = 0;
    for (int i = 0; i < 200; i++)
    {
        double high = iHigh(_Symbol, Timeframe, i);
        if (i > BarsN && iHighest(_Symbol, Timeframe, MODE_HIGH, BarsN * 2 + 1, i - BarsN) == i)
        {
            if (high > highestHigh) return high;
        }
        highestHigh = MathMax(high, highestHigh);
    }
    return -1;
}

double findLow()
{
    double lowestLow = DBL_MAX;
    for (int i = 0; i < 200; i++)
    {
        double low = iLow(_Symbol, Timeframe, i);
        if (i > BarsN && iLowest(_Symbol, Timeframe, MODE_LOW, BarsN * 2 + 1, i - BarsN) == i)
        {
            if (low < lowestLow) return low;
        }
    }
    return -1;
}

//+------------------------------------------------------------------+
//| Calculate RSI Value                                              |
//+------------------------------------------------------------------+
double RSIValue(int shift)
{
    int rsiPeriod = 14; // Período padrão do RSI
    double rsi[];       // Array para armazenar os valores do RSI

    // Handle do indicador RSI
    int rsiHandle = iRSI(_Symbol, Timeframe, rsiPeriod, PRICE_CLOSE);

    // Verifique se o handle foi criado corretamente
    if (rsiHandle == INVALID_HANDLE)
    {
        Print("Erro ao criar o indicador RSI!");
        return 0.0;
    }

    // Copiar os valores do RSI para o array a partir do buffer
    if (CopyBuffer(rsiHandle, 0, shift, 1, rsi) <= 0)
    {
        Print("Erro ao copiar os valores do RSI!");
        return 0.0;
    }

    // Liberar recursos do handle do indicador
    IndicatorRelease(rsiHandle);

    // Retornar o valor do RSI desejado
    return rsi[0];
}

//+------------------------------------------------------------------+
//| Neural Network Implementation                                    |
//+------------------------------------------------------------------+
void NormalizingInputs()
{
    double LowerNormRange = -1;
    double UpperNormRange = 1;

    for (int i = 0; i < NumNodes; i++)
    {
        double currentRSI = RSIValue(i); // Obtém o valor do RSI
        NormalizedInputs[i] = (((currentRSI - 0) * (UpperNormRange - LowerNormRange)) / (100 - 0)) + LowerNormRange;
    }
}

void OutputLayerCalculation()
{
    NNOutput = HiddenLayerCalculation(NormalizedInputs, Weight);
}

double HiddenLayerCalculation(double &inputs[], double &Weights[])
{
    double TotalWeightedInputs = 0.0;
    for (int i = 0; i < ArraySize(inputs); i++)
        TotalWeightedInputs += inputs[i] * Weights[i];
    TotalWeightedInputs *= Coefficient;
    return TanHActivationFunction(TotalWeightedInputs);
}

double TanHActivationFunction(double WeightedInputs)
{
    return ((exp(WeightedInputs) - exp(-WeightedInputs)) / (exp(WeightedInputs) + exp(-WeightedInputs)));
}

//+------------------------------------------------------------------+
//| Place Orders                                                     |
//+------------------------------------------------------------------+
void SendBuyOrder(double entry)
{
    double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
    if (ask > entry - OrderDistPoints * _Point) return;

    double tp = entry + Tppoints * _Point;
    double sl = entry - Slpoints * _Point;

    trade.BuyStop(LotSize, entry, _Symbol, sl, tp, ORDER_TIME_SPECIFIED, iTime(_Symbol, Timeframe, 0) + ExpirationBars * PeriodSeconds(Timeframe), Slippage);
}

void SendSellOrder(double entry)
{
    double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);
    if (bid < entry + OrderDistPoints * _Point) return;

    double tp = entry - Tppoints * _Point;
    double sl = entry + Slpoints * _Point;

    trade.SellStop(LotSize, entry, _Symbol, sl, tp, ORDER_TIME_SPECIFIED, iTime(_Symbol, Timeframe, 0) + ExpirationBars * PeriodSeconds(Timeframe), Slippage);
}

//+------------------------------------------------------------------+
//| Trailing Stop                                                   |
//+------------------------------------------------------------------+
void TrailStop()
{
    double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
    double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);

    for (int i = PositionsTotal() - 1; i >= 0; i--)
    {
        if (pos.SelectByIndex(i) && pos.Magic() == InpMagic && pos.Symbol() == _Symbol)
        {
            double sl = 0;
            double tp = pos.TakeProfit();
            if (pos.PositionType() == POSITION_TYPE_BUY)
            {
                if (bid - pos.PriceOpen() >= TslTriggerPoints * _Point)
                {
                    sl = bid - TslPoints * _Point;
                    if (sl > pos.StopLoss() || pos.StopLoss() == 0)
                        trade.PositionModify(pos.Ticket(), sl, tp);
                }
            }
            if (pos.PositionType() == POSITION_TYPE_SELL)
            {
                if (pos.PriceOpen() - ask >= TslTriggerPoints * _Point)
                {
                    sl = ask + TslPoints * _Point;
                    if (sl < pos.StopLoss() || pos.StopLoss() == 0)
                        trade.PositionModify(pos.Ticket(), sl, tp);
                }
            }
        }
    }
}

//+------------------------------------------------------------------+
//| Detect New Bar                                                   |
//+------------------------------------------------------------------+
bool IsNewBar()
{
    static datetime previousTime = 0;
    datetime currentTime = iTime(_Symbol, Timeframe, 0);
    if (previousTime != currentTime)
    {
        previousTime = currentTime;
        return true;
    }
    return false;
}