local followedPlayer = "Pan Tadeusz"

local function f()
    local followed = getCreatureByName(followedPlayer)
    mapClickChase(followed)
end

autoRun(20, f)
                    

local SIO_FRIEND_NAME = "MyFriend"
local SIO_HPPC = 80

local function heal()
    local friend = getCreatureByName(SIO_FRIEND_NAME)
    if friend == nil then
        return
    end
    if getCreatureHppc(friend) <= SIO_HPPC then
        talk('exura sio "' .. SIO_FRIEND_NAME)
    end
end

autoRun(500, heal)
                    

local UH_RUNE_ID = 3160
local UH_HPPC = 40

local FRIEND_LIST = {
    "FRIEND1",
    "FRIEND2",
}

local function isFriend(creature)
    for _, friend in ipairs(FRIEND_LIST) do
        if friend == getCreatureName(creature) then
            return true
        end
    end
    return false
end

local function autoUh()
    for _, friend in ipairs(getScreenPlayers()) do
        if isFriend(friend) and getCreatureHppc(friend) <= UH_HPPC then
            useItemFromOpenContainerOnThing(UH_RUNE_ID, friend)
            sleep(1000)
            return
        end
    end
end

autoRun(300, autoUh)
                    

local MANA_PERCENT = 60  -- change
local MANA_TRAIN_SPELL = "utevo lux" -- change

local function manaTrain()
    if getPlayerMppc() >= MANA_PERCENT then
        talk(MANA_TRAIN_SPELL)
    end
end

autoRun(2000, manaTrain)
                    

local CUSTOM_MANA_FLUID_ID = 7480
local CUSTOM_MANA_FLUID_SUBTYPE = 0
local MANA_PERCENT = 60

local function useCustomManaFluid()
    if getPlayerMppc() <= MANA_PERCENT then
        useItemWithSubtypeFromOpenContainerOnSelf(CUSTOM_MANA_FLUID_ID, CUSTOM_MANA_FLUID_SUBTYPE)
        sleep(2000)
    end
end

autoRun(500, useCustomManaFluid)
                    

local PLAYER_TO_SEND_MSG = "Papryka" -- edit this name to character which should receive msgs
local EXHAUST = 4000 -- milliseconds delay for each reported player that comes on screen

local EXHAUST_TABLE = {}

local function shouldReportPlayer(playerName)
    return EXHAUST_TABLE[playerName] == nil or EXHAUST_TABLE[playerName] < nowMs()
end

local function reportPlayersOnPriv()
    local selfName = getSelfName()
    if selfName == nil then
        return
    end
    for index, player in ipairs(getScreenPlayers()) do
        local playerName = getCreatureName(player)
        if playerName ~= selfName then
            if shouldReportPlayer(playerName) then
                talkPrivate(PLAYER_TO_SEND_MSG, playerName)
                EXHAUST_TABLE[playerName] = nowMs() + EXHAUST
            end
        end
    end
end


autoRun(500, reportPlayersOnPriv)
                    

local LOOT_BACKPACK_ID = 2853
local LOOT_BAG_CAPACITY = 8
local ITEMS_TO_PUSH = {
    3264, -- sword
    3286, -- mace
}

local function collectFromGround()
    for i, v in ipairs(ITEMS_TO_PUSH) do
        collectNearbyGroundItem(LOOT_BACKPACK_ID, v)
        sleep(300)
    end
end

local function openNextBackpack()
    for index, container in ipairs(getOpenContainers()) do
        if getId(getContainerItem(container)) == LOOT_BACKPACK_ID then
            local items = getItems(container)
            if #items >= LOOT_BAG_CAPACITY then
                for index, item in ipairs(items) do
                    if getId(item) == LOOT_BACKPACK_ID then
                        open(item, container)
                        sleep(500)
                        return
                    end
                end
            end
        end
    end
end

autoRun(500, openNextBackpack)
autoRun(500, collectFromGround)
                    

local LOOT_BAG_ID = 2853

local function getItemsAroundPlayer(x, y, z)
	return {
		getTopUseItem(x - 1, y - 1, z),
		getTopUseItem(x, y - 1, z),
		getTopUseItem(x + 1, y - 1, z),
		getTopUseItem(x - 1, y, z),
		getTopUseItem(x + 1, y, z),
		getTopUseItem(x - 1, y + 1, z),
		getTopUseItem(x, y + 1, z),
		getTopUseItem(x + 1, y + 1, z),
	}
end

local function f()
	local pos = getSelfPosition()
	for _, item in ipairs(getItemsAroundPlayer(pos.x, pos.y, pos.z)) do
		if getId(item) == LOOT_BAG_ID then
			moveItem(item, pos.x, pos.y, pos.z)
			return
		end
	end
end

autoRun(100, f)
                    

local SKIN_CORPSE_IDS = { -- Add new ids that should be skinned
    4272,
    4057,
}

local SKIN_ITEM_ID = 5942

local function skin()
    for _, id in ipairs(SKIN_CORPSE_IDS) do
        local used = useInventoryItemOnNearbyGroundItems(SKIN_ITEM_ID, id)
        if used then
            sleep(300)
        end
    end
end

autoRun(300, skin)