求助：编写MQL5代码实现零盈利时平仓以避免亏损

原代码的核心问题 #

• 循环逻辑完全错误：CloseZeroProfit里的for (int i = 0; i < PositionsTotal(); i--)从0开始递减，会直接跳出循环，根本不会遍历任何持仓，自然无法触发平仓。
• 重复开仓风险：定义了hasOpenBuyPosition却没用来限制开仓，每次满足价格条件就会开新仓，多仓位叠加会放大亏损。
• 利润判断冗余：profit <= 0 || profit == 0里的profit == 0是多余的，<=0已经包含了利润为0和亏损的情况。
• 开仓逻辑不严谨：没检查账户是否允许交易、是否有足够保证金，也没处理开仓失败的情况。

修正后的完整代码 #

#include <Trade\Trade.mqh>

CTrade trade;

// 检查当前品种是否存在多单持仓
bool HasOpenBuyPosition()
{
    for(int i = 0; i < PositionsTotal(); i++)
    {
        if(PositionSelectByTicket(PositionGetTicket(i)))
        {
            if(PositionGetString(POSITION_SYMBOL) == _Symbol && PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_BUY)
            {
                return true;
            }
        }
    }
    return false;
}

// 平仓利润为0或亏损的持仓
void CloseZeroOrLossProfit()
{
    // 倒序遍历持仓，避免删除持仓后索引错位
    for(int i = PositionsTotal() - 1; i >= 0; i--)
    {
        ulong ticket = PositionGetTicket(i);
        if(PositionSelectByTicket(ticket))
        {
            // 只处理当前品种的持仓
            if(PositionGetString(POSITION_SYMBOL) != _Symbol) continue;
            
            double profit = PositionGetDouble(POSITION_PROFIT);
            // 利润<=0时平仓（包含0和亏损）
            if(profit <= 0.0)
            {
                if(!trade.PositionClose(ticket))
                {
                    Print("平仓失败，错误码：", GetLastError());
                }
            }
        }
    }
}

void OnTick()
{
    double ask = NormalizeDouble(SymbolInfoDouble(_Symbol, SYMBOL_ASK), _Digits);
    MqlRates rates[];
    
    // 仅复制需要的2根K线数据，减少资源消耗
    if(CopyRates(_Symbol, _Period, 0, 2, rates) != 2)
    {
        Print("获取K线数据失败，错误码：", GetLastError());
        return;
    }
    ArraySetAsSeries(rates, true);
    
    // 无持仓且满足开仓条件时开仓
    if(!HasOpenBuyPosition() && rates[1].close < ask)
    {
        // 开仓前检查交易权限
        if(!trade.IsTradeAllowed())
        {
            Print("当前账户禁止交易");
            return;
        }
        // 设置滑点容忍，避免因滑点导致开仓价格不利
        if(!trade.Buy(0.1, _Symbol, ask, ask - 2*_Point, 0, "无亏损多单"))
        {
            Print("开仓失败，错误码：", GetLastError());
        }
    }
    
    // 每次Tick检查并平仓符合条件的持仓
    CloseZeroOrLossProfit();
}

关键修改说明 #

1. 修复持仓遍历逻辑：采用倒序遍历持仓（从PositionsTotal()-1到0），删除持仓后不会影响剩余未遍历的索引，避免漏判或越界。
2. 新增持仓检查：HasOpenBuyPosition函数专门限制当前品种的多单数量，杜绝重复开仓。
3. 完善错误处理：添加错误码打印，方便调试开仓、平仓失败的具体原因。
4. 优化资源使用：仅复制必要的K线数据，避免复制全量K线浪费内存。
5. 严谨开仓判断：开仓前检查交易权限，设置滑点容忍，降低不必要的交易风险。

内容的提问来源于stack exchange，提问作者Daniel Khozaie