• installAdvancedGuildSystem()

Cria as colunas e tabelas necessárias para o pleno funcionamento do sistema. Além disso, muda o valor do global storage 50050 para 1 e envia uma mensagem sobre o status da atualização.

• updateGuildColumn()

Força a atualização da coluna guild_id da tabela players e envia uma mensagem com o status da atualização

• isAGSInstalled

Uma variável que retorna verdadeiro se o sistema tiver sido instalado corretamente

• getGuildPoints(guild_id)

Retorna a quantidade de pontos de uma guilda

• doGuildAddPoints(guild_id, value)

Adiciona ou subtrai pontos de uma guilda (para subtrair, basta usar um valor negativo)

• hasGuild(cid)

Retorna verdadeiro caso o jogador esteja em uma guilda

• isInGuild(cid, guildId)

Retorna verdadeiro caso o jogador esteja na guilda especificada

• getGuildName(guild_id)

Retorna o nome de uma guilda pelo seu id

• getGuildMembersGUID(guild_id)

Retorna uma tabela com os ids(GUIDs) de todos os jogadores em uma guilda

• getPlayerGuildIdByGUID(guid)

Retorna o Id da guilda de um jogador pelo seu Id(GUID)

• getOnlineGuildMembersByRank(guildId[, rank[, selectLowerRanks]])

Retorna uma tabela com os cids de todos os jogadores online de uma guilda por um certo rank. Ambos os parâmetros são opcionais: caso o rank não seja especificado, retornará todos os jogadores online de uma guilda. O parâmetro selectLowerRanks indica se a função deverá retornar os jogadores com rank abaixo também e tem valor padrão falso

• doFunctionOnGuildMembers(guildId, func)

Executa a função especificada em todos os jogadores online de uma guilda. A função especificada deve conter apenas um parâmetro(cid). Pode ser usada para, por exemplo, enviar uma mensagem para todos os jogadores de uma guild:

doFunctionOnGuildMembers(guild, function(cid)	doPlayerSendTextMessage(cid, 27, "Um grande ola a todos os membros da guilda!")end)

• setGuildStorageValue(guild_id, key, value)

Essa função introduz o sistema de guild storages, funciona igual aos player storages, mas é específico para uma guilda. Essa função muda o valor de uma storage especificada por key

• getGuildStorageValue(guild_id, key)

Retorna o valor de uma guild storage especificada por key

• getGuildBalance(guild_id)

Retorna o balanço(saldo) bancário de uma guilda

• setGuildBalance(guild_id, value)

Modifica o balanço bancário de uma guilda

• doGuildAddBalance(guild_id, value)

Adiciona ao balanço bancário de uma guilda

Basta chamar a função installAdvancedGuildSystem em qualquer script. Por exemplo, use a talkaction abaixo, salvando-a como installAGS.lua:

function onSay(cid, words, param)	installAdvancedGuildSystem()end

Registre em talkactions.xml:
Verifique se o sitema foi instalado corretamente na janela do executável

--[[ Queries:
		CREATE TABLE `guild_storages` (
		`guild_id` int NOT NULL default 0,
		`key` int NOT NULL default 0,
		`value` varchar(255) NOT NULL default 0
		);
		
		CREATE TRIGGER `guilds_update`
			AFTER UPDATE OF rank_id ON players
		BEGIN
			UPDATE players
			   SET guild_id = IFNULL( ( 
					   SELECT guild_id
						 FROM guild_ranks
						WHERE id = rank_id 
				   ) 
				   , 0 );
		END;
		
		ALTER TABLE guilds ADD points INT DEFAULT 0 NOT NULL
		ALTER TABLE guilds ADD balance BIGINT default 0 NOT NULL
		ALTER TABLE players ADD guild_id INT DEFAULT 0 NOT NULL
		UPDATE players SET guild_id = IFNULL((SELECT guild_id FROM guild_ranks WHERE id = rank_id), 0)
]]

-- Advanced Guild System maintenance functions

function installAdvancedGuildSystem()
    local func = db.query or db.executeQuery
    local query = db.getResult("SELECT balance FROM guilds")
    if query:getID() == -1 then
        func("ALTER TABLE guilds ADD balance INT default 0 NOT NULL")
    else
        query:free()
    end
    local query2 = db.getResult("SELECT points FROM guilds;")
    if query:getID() == -1 then
        func("ALTER TABLE guilds ADD points INT DEFAULT 0 NOT NULL")
    else
        query2:free()
    end
    if func("ALTER TABLE players ADD guild_id INT DEFAULT 0 NOT NULL") then
        if func("UPDATE players SET guild_id = IFNULL((SELECT guild_id FROM guild_ranks WHERE `id` = rank_id), 0)") then
            if func("CREATE TABLE `guild_storages` (`guild_id` INT NOT NULL DEFAULT 0, `key` INT NOT NULL DEFAULT 0, `value` VARCHAR(255) NOT NULL DEFAULT 0);") then
                if func("CREATE TRIGGER [`rank_id update`] AFTER UPDATE OF rank_id ON players BEGIN UPDATE players SET guild_id = IFNULL((SELECT guild_id FROM guild_ranks WHERE `id` = rank_id), 0); END;") then
                    setGlobalStorageValue(50050, 1)
                    print("Advanced Guild System installation successful.")
                    return true
                end
            end
        end
    end
    print("Advanced Guild System could NOT be installed.")
    return false
end

function updateGuildColumn()
	print("Updating guild column in players table...")
	local func = db.query or db.executeQuery
	local str = "failure."
	if func("UPDATE players SET guild_id = IFNULL((SELECT guild_id FROM guild_ranks WHERE `id` = rank_id),0)") then
		str = "success!"
	end
	print("Update was a "..str)
end

isAGSInstalled = getGlobalStorageValue(50050) == 1

-- Guild Points functions

function getGuildPoints(guild_id)
	local ret = db.getResult("SELECT points FROM guilds WHERE id = " .. guild_id)
	if ret:getID() == -1 then
		return -1
	end
	return ret:getDataInt("points")
end

function doGuildAddPoints(guild_id, value)
	local func = db.executeQuery or db.query
	return func("UPDATE guilds SET points = ("..value.." + (SELECT points FROM guilds WHERE id = "..guild_id..")) WHERE id = "..guild_id)
end

-- General guild functions

function hasGuild(cid)
	return getPlayerGuildId(cid) > 0
end

function isInGuild(cid, guildId)
	return getPlayerGuildId(cid) == guildId
end

function getGuildName(guild_id)
	local query = db.getResult("SELECT name FROM guilds WHERE id = "..guild_id)
	local ret = query:getID() == -1 and false or query:getDataString("name")
	query:free()
	return ret
end

function getGuildMembersGUID(guild_id)
	if db.getResult("SELECT ownerid FROM guilds WHERE id = "..guild_id):getID() > -1 then
		local members = {}
		local query = db.getResult("SELECT `id` FROM players WHERE guild_id = "..guild_id)
		if query:getID() == -1 then
			return false
		end
		repeat
			local member = query:getDataInt("id")
			table.insert(members, member)
		until not query:next()
		query:free()
		return members
	end
	return false
end

function getPlayerGuildIdByGUID(guid)
	local query = db.getResult("SELECT guild_id FROM players WHERE id = "..guid)
	return query:getDataInt("guild_id")
end

function getOnlineGuildMembersByRank(guildId, rank, selectLowerRanks)
	if not rank then
		rank = 3
		selectLowerRanks = true
	end
	local list = {}
	for _, pid in pairs(getPlayersOnline()) do
		if getPlayerGuildId(pid) == guildId then
			local playerRank = getPlayerGuildLevel(pid)
			if playerRank == rank or (selectLowerRanks and playerRank <= rank) then
				table.insert(list, pid)
			end
		end
	end
	return list
end

function doFunctionOnGuildMembers(guildId, func)
	local players = getPlayersOnline()
	local count = 0
	for _, pid in pairs(players) do
		if getPlayerGuildId(pid) == guildId then
			func(pid)
			count = count + 1
		end
	end
	return count
end

-- Guild Storage functions

function setGuildStorageValue(guild_id, key, value)
	local func = db.executeQuery or db.query
	local query = db.getResult("SELECT `value` FROM guild_storages WHERE `key` = "..key.." AND guild_id = "..guild_id)
	if query:getID() == -1 then
		return func("INSERT INTO guild_storages (guild_id, `key`, `value`) VALUES ("..guild_id..", "..key..", "..value..")")
	end
	return func("UPDATE guild_storages SET `value` = "..value.." WHERE `key` = "..key.." AND guild_id = "..guild_id)
end

function getGuildStorageValue(guild_id, key)
	local ret = db.getResult("SELECT `value` FROM guild_storages WHERE guild_id = "..guild_id.." AND `key` = "..key)
	if ret:getID() == -1 then
		return -1
	end
	return ret:getDataInt("value") or ret:getDataString("value")
end

-- Guild Balance functions

function getGuildBalance(guild_id)
	local balance = db.getResult("SELECT balance FROM guilds WHERE `id` = "..guild_id)
	local ret = balance:getID() >= 0 and balance:getDataInt("balance") or false
	balance:free()
	return ret
end

function setGuildBalance(guild_id, value)
	local func = db.executeQuery or db.query
	func("UPDATE guilds SET balance = "..value.." WHERE `id` = "..guild_id)
	return true
end

function doGuildAddBalance(guild_id, value)
	local func = db.executeQuery or db.query
	func("UPDATE guilds SET balance = (SELECT balance FROM guilds WHERE `id` = "..guild_id..") + "..value.." WHERE `id` = "..guild_id)
	return true
end

[14/02/2014 22:08:50] [Error - TalkAction Interface]
[14/02/2014 22:08:50] data/talkactions/scripts/installAGS.lua:onSay
[14/02/2014 22:08:50] Description:
[14/02/2014 22:08:50] data/lib/004-database.lua:100: [Result:free] Result not set!
[14/02/2014 22:08:50] stack traceback:
[14/02/2014 22:08:50] [C]: in function 'error'
[14/02/2014 22:08:50] data/lib/004-database.lua:100: in function 'free'
[14/02/2014 22:08:50] data/lib/guildlib.lua:34: in function 'installAdvancedGuildSystem'
[14/02/2014 22:08:50] data/talkactions/scripts/installAGS.lua:2: in function
[14/02/2014 22:09:18] mysql_real_query(): ALTER TABLE guilds ADD balance BIGINT default 0 NOT NULL - MYSQL ERROR: Duplicate column name 'balance' (1060)

[14/02/2014 22:09:18] [Error - TalkAction Interface]
[14/02/2014 22:09:18] data/talkactions/scripts/installAGS.lua:onSay
[14/02/2014 22:09:18] Description:
[14/02/2014 22:09:18] data/lib/004-database.lua:100: [Result:free] Result not set!
[14/02/2014 22:09:18] stack traceback:
[14/02/2014 22:09:18] [C]: in function 'error'
[14/02/2014 22:09:18] data/lib/004-database.lua:100: in function 'free'
[14/02/2014 22:09:18] data/lib/guildlib.lua:34: in function 'installAdvancedGuildSystem'
[14/02/2014 22:09:18] data/talkactions/scripts/installAGS.lua:2: in function
[14/02/2014 22:09:29] Leoo has logged in.
[14/02/2014 22:09:38] [Error - MoveEvent::executeStep] Call stack overflow.
[14/02/2014 22:09:38] [Error - MoveEvent::executeStep] Call stack overflow.