Beiträge von HaPPySoNiC

Mafia3 = createObject ( 980, -758.53454589844, 726.58972167969, 20, 0, 0, -40)


TorReporterStatus = 1


function Gate (source)
    local playerx, playery = getElementPosition (source)
    if (getDistanceBetweenPoints2D(-758, 726, playerx, playery) < 100) then
        if TorReporterStatus == 1 then
            if getTeamName(getPlayerTeam(source))=="Mafia" then
                moveObject (Mafia3, 3500, -751.53454589844, 719.58972167969, 20, 0, 0, 0)
                TorReporterStatus = 0
            else
                outputChatBox("Du gehörst nicht zur Mafia!",source)
            end
        else
            if getTeamName(getPlayerTeam(source))=="Mafia" then
                moveObject (Mafia3, 3500, -758.53454589844, 726.58972167969, 20, 0, 0, 0)
                TorReporterStatus = 1
            else
                outputChatBox("Du gehörst nicht zur Mafia!",source)
            end
        end
    end
end
addCommandHandler ("mv", Gate,false,false)

function giveAdminRights (playerSource, commandName, accountName) --add the function giveAdminRights and specify its arguments
	if accountName then --if there was an accountName entered then
		aclGroupAddObject (aclGetGroup("Admin"), "user."..accountName) --add an ACL object using the form "user.[accountName]" to the ACL group "Admin"
		outputChatBox ("Account '"..accountName.."' succesfully added to the admin group", playerSource) --output a notification to the player who entered the command that the acocunt was successfully added
	else --else output an error message and the correct syntax of the command to the player who entered it
		outputChatBox ("No account name specified.", playerSource)
		outputChatBox ("Correct syntax: /giveAccountAdminRights [accountName]", playerSource)
	end
end
 
addCommandHandler ("giveAccountAdminRights", giveAdminRights) --add a command "giveAccountAdminRights" and attch the function "giveAdminRights" to it

------------
-- Events --
------------


function playerJoined()
	check(source)
end
addEventHandler("onPlayerJoin",getRootElement(),playerJoined)


function playerChangedNick(oldNick,newNick)
	-- Use timer to wait until the nick really has changed
	setTimer(check,1000,1,source)
end
addEventHandler("onPlayerChangeNick",getRootElement(),playerChangedNick)


function playerQuit()
	removePlayerFromTeam(source)
end
addEventHandler("onPlayerQuit",getRootElement(),playerQuit)


-- Check for ACL Groups on login/logout
function loggedIn()
	check(source)
end
addEventHandler("onPlayerLogin",getRootElement(),loggedIn)


function loggedOut()
	check(source)
end
addEventHandler("onPlayerLogout",getRootElement(),loggedOut)




-- Holds the teams as defined in the settings
local teams = {}


---
-- Reads the settings and creates the teams if enabled.
--
function initiate()
	local rootNode = getResourceConfig("config.xml")
	local children = xmlNodeGetChildren(rootNode)
	if children == false then
		return
	end
	for _,node in pairs(children) do
		local attributes = xmlNodeGetAttributes(node)
		local name = attributes.name
		local color = {getColorFromString(attributes.color)}
		if not color[1] then
			color = {255,255,255}
		end
		teams[name] = attributes
		teams[name].color = color
		if not toboolean(get("noEmptyTeams")) then
			teams[name].team = createTeam(name,unpack(color))
		end
	end
	for k,v in pairs(getElementsByType("player")) do
		check(v)
	end
end
addEventHandler("onResourceStart",getResourceRootElement(),initiate)


---------------
-- Functions --
---------------


---
-- Checks the player's nick and ACL Groups and sets his team if necessary.
--
-- @param   player   player: The player element
--
function check(player)
	if not isElement(player) or getElementType(player) ~= "player" then
		debug("No player")
		return
	end
	local nick = getPlayerName(player)
	local accountName = getAccountName(getPlayerAccount(player))
	for name,data in pairs(teams) do
		local tagMatch = false
		local aclGroupMatch = false
		if data.tag ~= nil and string.find(nick,data.tag,1,true) then
			tagMatch = true
		end
		if data.aclGroup ~= nil and accountName and isObjectInACLGroup("user."..accountName,aclGetGroup(data.aclGroup)) then
			aclGroupMatch = true
		end
		if data.required == "both" then
			if tagMatch and aclGroupMatch then
				addPlayerToTeam(player,name)
				return
			end
		else
			if tagMatch or aclGroupMatch then
				addPlayerToTeam(player,name)
				return
			end
		end
	end
	removePlayerFromTeam(player)
	setPlayerTeam(player,nil)
end


---
-- Adds a player to the team appropriate for the name.
-- It is not checked if the team is really defined in the table, since
-- it should only be called if it is.
--
-- Creates the team if it doesn't exist.
--
-- @param   player   player: The player element
-- @param   string   name: The name of the team
--
function addPlayerToTeam(player,name)
	local team = teams[name].team
	if not isElement(team) or getElementType(team) ~= "team" then
		team = createTeam(teams[name].name,unpack(teams[name].color))
		teams[name].team = FBI
	end
	setPlayerTeam(player,team)
	debug("Added player '"..getPlayerName(player).."' to team '"..name.."'")
end


---
-- Removes a player from a team. Also checks if any team
-- needs to be removed.
--
-- @param   player   player: The player element
--
function removePlayerFromTeam(player)
	setPlayerTeam(player,nil)
	debug("Removed player '"..getPlayerName(player).."' from team")
	if toboolean(get("noEmptyTeams")) then
		for k,v in pairs(teams) do
			local team = v.team
			if isElement(team) and getElementType(team) == "team" then
				if countPlayersInTeam(team) == 0 then
					destroyElement(team)
				end
			end
		end
	end
end


---
-- Converts a string-boolean into a boolean.
--
-- @param   string   string: The string (e.g. "false")
-- @return  true/false   	Returns false if the string is "false" or evaluates to false (nil/false), true otherwise
--
function toboolean(string)
	if string == "false" or not string then
		return false
	end
	return true
end


-----------
-- Debug --
-----------


-- Little debug function to turn on/off debug
setElementData(getResourceRootElement(),"debug",true)
function debug(string)
	if getElementData(getResourceRootElement(),"debug") then
		outputDebugString("autoteams: "..string)
	end
end