[lua] ulx warn

function ulx.warn(calling_ply, target_ply,reason)
        ulx.fancyLogAdmin( calling_ply, "#A warned #T for #s" , target_ply,reason )
        target_ply:SetPData("Watched","true")
        target_ply:SetPData("WatchReason",reason)
        target_ply:SetPData("warnings",target_ply:GetPData("warnings",0)+1)
        if tonumber(target_ply:GetPData("warnings",0)) >= Warnings_for_kick then
        ulx.kick( calling_ply, target_ply, "Exceeded maximum warnings" )
        target_ply:SetPData("warnings",0)
        end
end
local warn = ulx.command("Extended", "ulx warn", ulx.warn, "!warn",true)
warn:addParam{ type=ULib.cmds.PlayerArg }
warn:addParam{ type=ULib.cmds.StringArg, hint="reason", ULib.cmds.takeRestOfLine }
warn:defaultAccess( ULib.ACCESS_ADMIN )
warn:help( "Warn a player." )