LuaCsForBarotraumaEP/docs/manual/lua-examples.md

Lua Examples

Hook.Add('chatMessage', 'suicide_mod', function(msg, client)
    if msg == '!suicide' and client.Character ~= nil then
        client.Character.Kill(CauseOfDeathType.Unknown)
        Game.SendMessage(client.name .. ' killed himself!', ChatMessageType.Server)
        return true -- hide message
    end
end)

local characters = Character.CharacterList
local biteWoundsPrefab

for k, v in pairs(AfflictionPrefab.ListArray) do
    if v.name == "Bite wounds" then 
       biteWoundsPrefab = v 
       break
    end
end

for k, v in pairs(characters) do
   v.CharacterHealth.ApplyAffliction(v.AnimController.MainLimb, biteWoundsPrefab.Instantiate(100));
end

Hook.Add("itemApplyTreatment", "testItemApplyTreatment", function (item, user, character, targetlimb)
    if item.name == "Bandage" then
        local pos = character.WorldPosition
        Game.Explode(pos, 1, 500, 5000, 5000, 5000)

        Game.RemoveItem(item)
    end
end)

-- for example: create an item in xml named RandomComponent and add the wiring inputs/outputs trigger_random and random_out
Hook.Add("signalReceived", "signalReceivedTest", function (signal, connection)
    if connection.Item.name == "RandomComponent" and connection.Name == "trigger_random" then
        connection.Item.SendSignal(tostring(Random.Range(0, 100)), "random_out")
    end
end)

local discordWebHook = "your discord webhook here"

local function escapeQuotes(str)
    return str:gsub("\"", "\\\"")
end

Hook.Add("chatMessage", "discordIntegration", function (msg, client)
    local escapedName = escapeQuotes(client.name)
    local escapedMessage = escapeQuotes(msg)

    Networking.RequestPostHTTP(discordWebHook, function(result) end, '{\"content\": \"'..escapedMessage..'\", \"username\": \"'..escapedName..'\"}')
end)

-- by jimmyl
Hook.Add("chatMessage","controlhuskcommand",function(msg, client)
    if msg == "!controlhusk" then
        if client.Character ~= nil then
            if not client.Character.IsDead then
                return true
            end
        end
        if not client.InGame then
            return true
        end
        
        local chars = Character.CharacterList
        local suitablechars = {}
        for i = 1, #chars, 1 do
            local charat = chars[i]
            if not charat.IsDead and string.match(string.lower(charat.SpeciesName), "husk") and not charat IsRemotelyControlled then
                table.insert(suitablechars, charat)
            end
        end

        if #suitablechars >= 1 then
            Player.SetClientCharacter(client, suitablechars[Random.Range(1, #suitablechars)])
        end

        return true -- hide message
    end
end)