【LUA】3.3.5a随机属性LUA脚本

xuheng12

-- 修复版：随机附魔核心脚本
function RollEnchant(item)
    local rarityRoll = math.random(100)  -- 补local，规范变量作用域
    local itemClass = ""
    if (item:GetClass() == 2) then
        itemClass = "WEAPON"
    elseif (item:GetClass() == 4) then
        itemClass = "ARMOR"
    else
        return nil  -- 非武器/护甲直接返回，避免无效查询
    end

    -- 修复MYSQL判断NULL的语法：NULL不能用=，必须用IS NULL；增加括号保证逻辑优先级
    local tier = 1
    if rarityRoll <= 44 then
        tier = 1
    elseif rarityRoll <= 64 then
        tier = 2
    elseif rarityRoll <= 79 then
        tier = 3
    elseif rarityRoll <= 92 then
        tier = 4
    else
        tier = 5
    end
    -- 重构查询语句：修复NULL判断+括号分组逻辑+拼接itemSubClass
    local itemSubClass = item:GetSubClass()
    local queryStr = string.format(
        "SELECT enchantID FROM item_enchantment_random_tiers WHERE tier=%d AND ( (exclusiveSubClass IS NULL AND class='%s') OR exclusiveSubClass=%d OR class='ANY' ) ORDER BY RAND() LIMIT 1",
        tier, itemClass, itemSubClass
    )
    local query = WorldDBQuery(queryStr)
    if query then  -- 增加空判断，避免查询无结果时报错
        return query:GetUInt32(0)
    else
        return nil
    end
end

function OnLoot(event, player, item, count)
    local slotBools = {}
    local slotIDs = {}
    local its = 0  -- 附魔槽位ID（服务端附魔槽位对应不同数值）

    -- 修复：后续判断统一用对应roll变量，原脚本错误用boolRoll2判断3/4槽位
    local boolRoll1 = math.random(100)
    if boolRoll1 >= 60 then
        slotBools[1] = true
        slotIDs[1] = RollEnchant(item)
    else
        slotBools[1] = false
    end

    local boolRoll2 = math.random(100)
    if boolRoll2 >= 65 and slotBools[1] then
        slotBools[2] = true
        slotIDs[2] = RollEnchant(item)
    else
        slotBools[2] = false
    end

    local boolRoll3 = math.random(100)
    if boolRoll3 >= 70 and slotBools[2] then  -- 修复：用boolRoll3而非boolRoll2
        slotBools[3] = true
        slotIDs[3] = RollEnchant(item)
    else
        slotBools[3] = false
    end

    local boolRoll4 = math.random(100)
    if boolRoll4 >= 75 and slotBools[3] then  -- 修复：用boolRoll4而非boolRoll2
        slotBools[4] = true
        slotIDs[4] = RollEnchant(item)
    else
        slotBools[4] = false
    end

    -- 给物品添加附魔：仅武器/护甲生效，遍历有效槽位
    if slotBools[1] and (item:GetClass() == 2 or item:GetClass() == 4) then
        for i, id in ipairs(slotIDs) do
            if id then  -- 过滤无效的附魔ID
                if its == 2 then
                    its = its + 3  -- 槽位间隔（服务端定制逻辑，保留）
                end
                if slotBools[i] then
                    item:SetEnchantment(id, its)  -- SetEnchantment(附魔ID, 槽位ID)
                    its = its + 1
                end
            end
        end
    end
end

-- 注册拾取事件：32 = PLAYER_EVENT_ON_LOOT_ITEM（玩家拾取物品时触发）
RegisterPlayerEvent(32, OnLoot)
复制代码

xuheng12

xuheng12 发表于 2026-2-5 09:22

2个核心问题 修复了下