jim-consumables/server/server.lua

local Consumables = Config.Consumables
local Emotes = Config.Emotes

for k, v in pairs(Config.Consumables) do
	createUseableItem(k, function(source, item) TriggerClientEvent(getScript()..':Consume', source, item.name) end)
	if not Items[k] then print("^1Debug^7: ^2Item check ^7- '^1"..k.."^7' ^2not found in the shared lua^7") end
	if not Config.Emotes[v.emote] then print("^1Debug^7: ^2Emote check ^7- '^1"..k.."^7' ^2requested emote ^7'^6"..v.emote.."^7' - ^2not found in config^7.^2lua^7") end
end

RegisterNetEvent(getScript()..':server:addNeed', function(amount, type)
    local Player = Core.Functions.GetPlayer(source) if not Player then return end
	if type == "thirst" then
		Player.Functions.SetMetaData('thirst', amount)
		TriggerClientEvent('hud:client:UpdateNeeds', source, Player.PlayerData.metadata.hunger, amount)
	elseif type == "hunger" then
		Player.Functions.SetMetaData('hunger', amount)
		TriggerClientEvent('hud:client:UpdateNeeds', source, amount, Player.PlayerData.metadata.thirst)
	end
end)

--Export Import System--
createCallback(getScript()..':server:syncConsumables', function(source) return Consumables end)
createCallback(getScript()..':server:syncEmotes', function(source) return Emotes end)

local syncScheduled = false
function syncConsumables()
	if Config.System.Debug then print("^5Debug^7: ^2Sending ^6"..countTable(Consumables).." ^3Consumables ^2to all clients^7") end
    TriggerClientEvent(getScript()..":client:syncConsumables", -1, Consumables)
    syncScheduled = false
end
local emoteSyncScheduled = false
function syncEmotes()
	if Config.System.Debug then print("^5Debug^7: ^2Sending ^6"..countTable(Emotes).." ^3Emotes to all clients^7") end
    TriggerClientEvent(getScript()..":client:syncEmotes", -1, Emotes)
    emoteSyncScheduled = false
end

RegisterNetEvent(getScript()..':server:syncAddItem', function(itemName, data)
    if not Consumables[itemName] then
        Consumables[itemName] = data
        createUseableItem(itemName, function(source, item) TriggerClientEvent(getScript()..':Consume', source, itemName) end)
        if Config.System.Debug then print("^5Debug^7: "..GetInvokingResource().." ^2is sending new ^3Item^7: '"..itemName.."'") end
        if not syncScheduled then
            syncScheduled = true
            Citizen.SetTimeout(5000, syncConsumables)
        end
    else
        if Config.System.Debug then print("^1Debug^7: "..GetInvokingResource().." ^2is sending ^1duplicate ^3Item^7: '"..itemName.."'") end
    end
end)

RegisterNetEvent(getScript()..':server:syncAddEmote', function(emoteName, data)
    if not Emotes[emoteName] then
        Emotes[emoteName] = data
        if Config.System.Debug then print("^5Debug^7: "..GetInvokingResource().." ^2is sending new ^3Emote^7: '"..emoteName.."'") end
        if not emoteSyncScheduled then
            emoteSyncScheduled = true
            Citizen.SetTimeout(5000, syncEmotes)
        end
    else
        if Config.System.Debug then print("^1Debug^7: "..GetInvokingResource().." ^2is sending ^1duplicate ^3Emote^7: '"..emoteName.."'") end
    end
end)

RegisterNetEvent(getScript()..":server:syncConsumables", function()
    TriggerClientEvent(getScript()..':client:syncConsumables', -1, Consumables)
end)
RegisterNetEvent(getScript()..":server:syncEmotes", function()
    TriggerClientEvent(getScript()..':client:syncEmotes', -1, Emotes)
end)

Core.Commands.Add('consumableCreator', "Create consumables (admin only)", {}, false, function(source)
    if source > 0 then return TriggerClientEvent(getScript()..":client:consumableCreator", source) end
end, 'admin')

Core.Commands.Add('testConsumableEmotes', "Test consumables Emotes (admin only)", {}, false, function(source)
    if source > 0 then return TriggerClientEvent(getScript()..":client:testEmotes", source) end
end, 'admin')