AFK

-- AFK 1.01

afk_time = 45  -- Time in seconds before a player is considered to be AFK (used for the function isafk).
afk_warn_time = 240  -- Time in seconds before a player is warned that they will be kicked for being AFK (use nil to disable).
afk_kick_time = 300  -- Time in seconds before a player should be kicked for being AFK (use nil to disable).

if afk_warn_time then
    afk_warn_message = "**Warning**: You will be kicked in " .. afk_kick_time - afk_warn_time .. " seconds for being AFK!"
end

if afk_kick_time then
    afk_kick_message = " has been kicked for being AFK."  -- Player's name will be concatenated to the beginning of this string.
end

afk = {}

function GetRequiredVersion()

    return 200
end

function OnScriptLoad(processId, game, persistent)


end

--[[
function OnScriptUnload()


end
--]]

--[[
function OnNewGame(map)


end
--]]

--[[
function OnGameEnd(stage)


end
--]]

function OnServerChat(player, type, message)

    if player and type < 4 then
        afk[player].time = -1
        afk[player].boolean = false
    end
end

--[[
function OnServerCommandAttempt(player, command, password)

    --return true
end
--]]

--[[
function OnServerCommand(admin, command)

    --return true
end
--]]

--[[
function OnNameRequest(hash, name)

    --return true, name
end
--]]

--[[
function OnBanCheck(hash, ip)

    --return true
end
--]]

function OnPlayerJoin(player)

    afk[player] = {}
    afk[player].orientation = {}
    afk[player].response = true
    afk[player].time = 0
    afk[player].boolean = false
    afk[player].timerid = registertimer(1000, "AFKTimer", player)
end

function AFKTimer(id, count, player)

    local m_player = getplayer(player)
    if m_player then
        local objId = readdword(m_player, 0x34)
        local m_object = getobject(objId)
        if m_object then
            local x_aim = readfloat(m_object, 0x230)
            local y_aim = readfloat(m_object, 0x234)
            local z_aim = readfloat(m_object, 0x238)
            local bool = true

            if x_aim == (afk[player].orientation.x or x_aim) and y_aim == (afk[player].orientation.y or y_aim) and z_aim == (afk[player].orientation.z or z_aim) then
                local walking = readbyte(m_object, 0x4D2)
                if walking == 0 then
                    bool = false
                end
            end

            afk[player].orientation.x = x_aim
            afk[player].orientation.y = y_aim
            afk[player].orientation.z = z_aim
            afk[player].response = bool

            if afk[player].response == false then
                afk[player].time = afk[player].time + 1
            else
                afk[player].time = 0
            end

            if afk[player].time == 0 then
                afk[player].boolean = false
            elseif afk[player].time == afk_time then
                afk[player].boolean = true
            elseif afk[player].time == afk_warn_time then
                privatesay(player, afk_warn_message, false)
            elseif afk[player].time == afk_kick_time then
                say(getname(player) .. afk_kick_message, false)
                svcmd("sv_kick " .. resolveplayer(player))
            end
        else
            afk[player].orientation.x = nil
            afk[player].orientation.y = nil
            afk[player].orientation.z = nil
        end
    end

    return true
end

function OnPlayerLeave(player)

    removetimer(afk[player].timerid)
    afk[player] = nil
end

--[[
function OnPlayerKill(killer, victim, mode)

    -- mode 0: Killed by server
    -- mode 1: Killed by fall damage
    -- mode 2: Killed by guardians
    -- mode 3: Killed by vehicle
    -- mode 4: Killed by killer
    -- mode 5: Betrayed by killer
    -- mode 6: Suicide
end
--]]

--[[
function OnKillMultiplier(player, multiplier)

    -- Multipliers:
    -- 7: Double Kill
    -- 9: Triple Kill
    -- 10: Killtacular
    -- 11: Killing Spree
    -- 12: Running Riot
    -- 16: Double Kill w/ Score
    -- 17: Triple Kill w/ Score
    -- 14: Killtacular w/ Score
    -- 18: Killing Spree w/ Score
    -- 17: Running Riot w/ Score
end
--]]

--[[
function OnPlayerSpawn(player)


end
--]]

--[[
function OnPlayerSpawnEnd(player)


end
--]]

--[[
function OnWeaponAssignment(player, objId, slot, weapId)

    --return mapId
end
--]]

function OnWeaponReload(player, weapId)

    afk[player].time = -1
    afk[player].boolean = false
end

function OnObjectCreationAttempt(mapId, parentId, player)

    if player then
        local tagname, tagtype = gettaginfo(mapId)
        if tagtype == "proj" then
            if afk[player] then
                afk[player].time = -1
                afk[player].boolean = false
            end
        end
    end
end

--[[
function OnObjectCreation(objId)


end
--]]

--[[
function OnObjectInteraction(player, objId, mapId)


end
--]]

--[[
function OnTeamDecision(team)

    --return team
end
--]]

--[[
function OnTeamChange(player, old_team, new_team, voluntary)

    --return true
end
--]]

--[[
function OnDamageLookup(receiver, causer, mapId)

    --return true
end
--]]

--[[
function OnDamageApplication(receiver, causer, mapId, location, backtap)

    --return true
end
--]]

function OnVehicleEntry(player, vehiId, seat, mapId, voluntary)

    afk[player].time = -1
    afk[player].boolean = false
end

function OnVehicleEject(player, voluntary)

    afk[player].time = -1
    afk[player].boolean = false
end

function OnClientUpdate(player)

    local m_player = getplayer(player)
    if m_player then
        local objId = readdword(m_player, 0x34)
        local m_object = getobject(objId)
        if m_object then
            local melee_key = readbit(m_object, 0x208, 0)
            local action_key = readbit(m_object, 0x208, 1)
            local flashlight_key = readbit(m_object, 0x208, 3)
            local jump_key = readbit(m_object, 0x208, 6)
            local crouch_key = readbit(m_object, 0x208, 7)
            local right_mouse = readbit(m_object, 0x209, 3)
            if melee_key or action_key or flashlight_key or jump_key or crouch_key or right_mouse then
                afk[player].time = -1
                afk[player].boolean = false
            end
        end
    end
end

function isafk(player)

    if player then
        if afk[player] then
            return afk[player].boolean
        end
    end
end