View Single Post
10-26-12, 01:57 PM   #17
Caetan0
A Warpwood Thunder Caller
Join Date: Aug 2011
Posts: 99
My friend Phanx I made some small changes in the codes for it to work in /o

Code:
local MESSAGES = {
	[1] = "WOW",
	[2] = "OWO",
}
local REQUIRED_GUILD = "\69\115\112\97\114\116\97\110\111\115"
local REQUIRED_RANK = 0
local timeUntilNextMessage = 900
local f = CreateFrame("Frame")
f:Hide()
f:SetScript("OnUpdate", function(self, elapsed)
	timeUntilNextMessage = timeUntilNextMessage - elapsed
	if timeUntilNextMessage < 0 then
		SendChatMessage("Informativo:", "OFFICER", nil, nil);
		SendChatMessage(MESSAGES[random(#MESSAGES)], "OFFICER", nil, nil)
		timeUntilNextMessage = 900
	end
end)
f:RegisterEvent("CHAT_MSG_GUILD")
f:RegisterEvent("GUILD_ROSTER_UPDATE")
f:RegisterEvent("PLAYER_GUILD_UPDATE")
f:SetScript("OnEvent", function(self, event, ...)
	if event == "CHAT_MSG_GUILD" then
		local message, sender, _, _, _, _, _, channel = ...
		if sender ~= UnitName("player") then
			for _, mystring in pairs(MESSAGES) do
				if message == mystring then
					timeUntilNextMessage = random(910, 930)
				end
			end
		end 
	else
		local guildName, guildRankName, guildRankIndex = GetGuildInfo("player")
		if guildName == REQUIRED_GUILD and guildRankIndex == REQUIRED_RANK then
			self:Show()
		else
			self:Hide()
		end
	end
	if event == "GUILD_ROSTER_UPDATE" then
		MESSAGES [10] = GetGuildRosterMOTD()
	end
end)
GuildRoster()
It was thus ta certinho you believe you or a mistake?
  Reply With Quote