Ладно, вот
```
function giveLoyalty(ply, cmd, args)
if not args[1] then return end -- если аргументы не указаны, выход из функции
local target = player.GetBySteamID(args[1]) -- получить целевого игрока по Steam ID
local amount = tonumber(args[2]) -- получить количество лояльности для зачисления
if not target or not amount then return end -- если игрок или количество не найдены, выход из функции
target:SetNWInt("loyaltyPoints", target:GetNWInt("loyaltyPoints") + amount) -- зачисление лояльности на счет игрока
end
concommand.Add("give_loyalty", giveLoyalty) -- добавить команду "give_loyalty" в консоль
```