搜索
开启左侧

这是我esx框架转换成qbcore框架之后的代码行,帮我检查看.....

[复制链接]
ketk0429 发表于 2025-2-20 13:40:49 | 显示全部楼层 |阅读模式

QBCore = exports['qb-core']:GetCoreObject()

RegisterServerEvent("d-farmingzone:server:additem")
AddEventHandler("d-farmingzone:server:additem", function(r)
    local src = source
    local Player = QBCore.Functions.GetPlayer(src)
    local item = r.item
    local amount = r.amount
    local success = false
    local nospace = false

    local itemData = QBCore.Shared.Items[item]
    if itemData then
        if Player.Functions.CanCarryItem(item, amount) then
            success = true
        else
            nospace = true
        end

        if success then
            Notify(src, _U('success', amount, itemData.label), 5000, "success")
            Player.Functions.AddItem(item, amount)
            TriggerClientEvent('inventory:client:ItemBox', src, QBCore.Shared.Items[item], "add")
        elseif nospace then
            Notify(src, _U('nospace'), 5000, "error")
        end
    else
        Notify(src, _U('itemdoenstexist'), 5000, "error")
    end
end)

RegisterServerEvent("d-farmingzone:server:prop:start")
AddEventHandler("d-farmingzone:server:prop:start", function(requireditem, item, amount)
    local src = source
    local Player = QBCore.Functions.GetPlayer(src)
    local canfarm = true

    if requireditem then
        local needItemData = Player.Functions.GetItemByName(requireditem)
        if not needItemData then
            Notify(src, _U('itemdoenstexist'), 5000, "error")
            TriggerClientEvent('d-farmingzone:props:cantfarm', src)
            canfarm = false
        else
            if needItemData.amount == 0 then
                local itemLabel = QBCore.Shared.Items[requireditem].label
                Notify(src, _U('needitem', itemLabel), 5000, "error")
                TriggerClientEvent('d-farmingzone:props:cantfarm', src)
                canfarm = false
            end
        end
    end

    local itemData = QBCore.Shared.Items[item]
    if itemData and canfarm then
        local success = false
        local nospace = false
        if Player.Functions.CanCarryItem(item, amount) then
            success = true
        else
            nospace = true
        end

        if success then
            TriggerClientEvent('d-farmingzone:props:start', src)
        elseif nospace then
            TriggerClientEvent('d-farmingzone:props:cantfarm', src)
            Notify(src, _U('nospace'), 5000, "error")
        end
    elseif not itemData then
        TriggerClientEvent('d-farmingzone:props:cantfarm', src)
        Notify(src, _U('itemdoenstexist'), 5000, "error")
    end
end)

Notify = function(source, text, length, type)
    TriggerClientEvent('d-farming:notify', source, text, length, type)
end
Keys = {
  ["ESC"] = 322, ["F1"] = 288, ["F2"] = 289, ["F3"] = 170, ["F5"] = 166, ["F6"] = 167, ["F7"] = 168, ["F8"] = 169,
  ["F9"] = 56, ["F10"] = 57,
  ["~"] = 243, ["1"] = 157, ["2"] = 158, ["3"] = 160, ["4"] = 164, ["5"] = 165, ["6"] = 159, ["7"] = 161, ["8"] = 162,
  ["9"] = 163, ["-"] = 84, ["="] = 83, ["BACKSPACE"] = 177,
  ["TAB"] = 37, ["Q"] = 44, ["W"] = 32, ["E"] = 38, ["R"] = 45, ["T"] = 245, ["Y"] = 246, ["U"] = 303, ["P"] = 199,
  ["["] = 39, ["]"] = 40, ["ENTER"] = 18,
  ["CAPS"] = 137, ["A"] = 34, ["S"] = 8, ["D"] = 9, ["F"] = 23, ["G"] = 47, ["H"] = 74, ["K"] = 311, ["L"] = 182,
  ["LEFTSHIFT"] = 21, ["Z"] = 20, ["X"] = 73, ["C"] = 26, ["V"] = 0, ["B"] = 29, ["N"] = 249, ["M"] = 244, [","] = 82,
  ["."] = 81,
  ["LEFTCTRL"] = 36, ["LEFTALT"] = 19, ["SPACE"] = 22, ["RIGHTCTRL"] = 70,
  ["HOME"] = 213, ["PAGEUP"] = 10, ["PAGEDOWN"] = 11, ["DELETE"] = 178,
  ["LEFT"] = 174, ["RIGHT"] = 175, ["TOP"] = 27, ["DOWN"] = 173,
  ["NENTER"] = 201, ["N4"] = 108, ["N5"] = 60, ["N6"] = 107, ["N+"] = 96, ["N-"] = 97, ["N7"] = 117, ["N8"] = 61,
  ["N9"] = 118
}

QBCore = exports['qb-core']:GetCoreObject()
Source = GetPlayerServerId(PlayerId())

Citizen.CreateThread(function()
  while QBCore.Functions.GetPlayerData().job == nil do
    Citizen.Wait(100)
  end
  QBCore.PlayerData = QBCore.Functions.GetPlayerData()
end)

RegisterNetEvent('QBCore:Client:OnJobUpdate')
AddEventHandler('QBCore:Client:OnJobUpdate', function(jobInfo)
  QBCore.PlayerData.job = jobInfo
  Citizen.Wait(5000)
end)

AddEventHandler('onResourceStop', function(resource)
  if resource == GetCurrentResourceName() then
    SetNuiFocus(false, false)
  end
end)

HelpNotificationState = false

ShowHelpNotificaiton = function(label)
  HelpNotificationState = true
  QBCore.Functions.Notify(label, 'primary')
end

HideHelpNotificaiton = function()
  if HelpNotificationState == true then
    HelpNotificationState = false
  end
end

function StartFarm()
  local playerPed = PlayerPedId()

  exports.rprogress:Custom({
    Async = true,
    Duration = Activ.v.farmtime,
    Label = Activ.v.barlabel,
    Animation = {
      scenario = Activ.v.anim.task,
      animationDictionary = Activ.v.anim.animDict,
      animationName = Activ.v.anim.anim
    },
    DisableControls = {
      Mouse = true,
      Player = true,
      Vehicle = true
    },
    onStart = function()
    end,
    onComplete = function(cancelled)
      if not cancelled then
        TriggerServerEvent("d-farmingzone:server:additem", Activ.rewards)
      end
      FinishedFrarming()
    end
  })
end

RegisterNetEvent('d-farming:notify')
AddEventHandler('d-farming:notify', function(text, length, type)
  Notify(text, length, type)
end)

function Notify(text, length, type)
  QBCore.Functions.Notify(text, type, length)
end




回复 论坛版权

使用道具 举报

ChatGPT 发表于 2025-2-20 13:41:03 | 显示全部楼层
在你提供的代码中,有几个地方需要修正和优化。以下是针对代码的逐行检查和修改建议:

1. **获取 QBCore 对象**:
  
QBCore = exports['qb-core']:GetCoreObject()

2. **修复数组索引引用**:
   你在访问 `QBCore.Shared.Items` 的方式不正确,应该使用方括号而非 `item`,正确的写法应该是:
  
local itemData = QBCore.Shared.Items[item]

3. **Notification 函数的定义重复**:
   `Notify` 函数被定义了两次,第二次定义会覆盖第一次,建议只保留一个版本。

4. **Keys 表中的格式问题**:
    `Keys` 表的定义有几个地方语法错误,比如缺少左引号(`"`),应修改为:
  
Keys = {
        ["ESC"] = 322, 
        ["F1"] = 288, 
        -- 继续按此格式修改剩余项
    }

5. **“数值”引用和 “字符串”引用的格式问题**:
   在 `Keys` 和其他地方使用字符串时,都应确保用相同的方式来保持一致性。

6. **地方变量名称的统一性**:
   确保所有局部变量如 `src`, `Player`, `item`, `amount`, 等名称在整个代码中一致。

7. **通知函数的使用**:
   确保只有一个 `Notify` 函数,并且在 `RegisterServerEvent` 和 `RegisterNetEvent` 的事件处理程序中都只调用一次。

8. **整体结构组织**:
   给每个主要部分(如事件处理、功能定义等)添加注释,以提高代码可读性。例如:
-- 添加物品事件
   RegisterServerEvent("d-farmingzone:server:additem")

这是经过修改后的代码片段示例:
QBCore = exports['qb-core']:GetCoreObject()

-- 添加物品事件
RegisterServerEvent("d-farmingzone:server:additem")
AddEventHandler("d-farmingzone:server:additem", function(r)
    local src = source
    local Player = QBCore.Functions.GetPlayer(src)
    local item = r.item
    local amount = r.amount
    local success = false
    local nospace = false

    local itemData = QBCore.Shared.Items[item]
    if itemData then
        if Player.Functions.CanCarryItem(item, amount) then
            success = true
        else
            nospace = true
        end

        if success then
            Notify(src, _U('success', amount, itemData.label), 5000, "success")
            Player.Functions.AddItem(item, amount)
            TriggerClientEvent('inventory:client:ItemBox', src, QBCore.Shared.Items[item], "add")
        elseif nospace then
            Notify(src, _U('nospace'), 5000, "error")
        end
    else
        Notify(src, _U('itemdoenstexist'), 5000, "error")
    end
end)

-- 通知函数
function Notify(source, text, length, type)
    TriggerClientEvent('d-farming:notify', source, text, length, type)
end

-- 其他代码...

请根据这些建议对你的代码进行相应的调整。保持一致的风格和清晰的注释会使代码更加易于维护和理解。如果需要进一步的帮助,请告诉我!
回复

使用道具 举报

文明发言,和谐互动
文明发言,和谐互动
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|首页 ( 冀ICP备2021005225号-1 ) |网站地图

GMT+8, 2025-3-13 02:18 , Processed in 0.094564 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2013 ELITE论坛【技术无价-分享快乐】

快速回复 返回顶部 返回列表