Check guild members online, talkction

[mamon_2]

I have this idea, make a comand like !guildmembers and check all players of your guild online...

Maybe here can have an idea, is for get Staff online:

function onSay(cid, words, param)
	local staffList = {}
	for _, name in ipairs(getOnlinePlayers()) do
		if getPlayerGroupId(getPlayerByName(name)) >= 2 then
			table.insert(staffList, name)
		end
	end
	if #staffList == 0 then
		doPlayerSendTextMessage(cid, 24, "No hay nadie del Staff conectado..")
	else
		doPlayerSendTextMessage(cid, 24, "Staff Conectado: " .. table.concat(staffList, ", ") .. ".")
	end
	return LUA_NO_ERROR
end

 

[slaw]

function onSay(cid, words, param)
	local onlineMembers = {}
	local playerGuild = getPlayerGuildId(cid)
	
	if playerGuild == 0 then
		return TRUE
	end

	for _, name in ipairs(getOnlinePlayers()) do
		if getPlayerGuildId(getPlayerByName(name)) == playerGuild then
			table.insert(onlineMembers, name)
		end
	end

	if #onlineMembers == 0 then
		doPlayerSendTextMessage(cid, 24, "There are no players online from your guild..")
	else
		local playersOnline = #onlineMembers
		local tmp = ""
		if(playersOnline > 1) then
			local tmp = "(s)"
		end

		local header = playersOnline .. " player" .. tmp .. " online from your guild."
		local header = 
		local str = ""
		for i, string in ipairs(onlineMembers) do
			str = "\n" .. str .. string
		end
		doPlayerPopupFYI(cid, header .. ".\n " .. str)
	end
	return LUA_NO_ERROR
end

[info]not tested[/info]

 

[mamon_2]

[26/11/2008 23:12:30] data/talkactions/scripts/mtibia/guildmembers.lua:26: unexpected symbol near 'local'

 

[slaw]

remove this line:
local header =

 

[mamon_2]

Thanks it is working now.

 

[mamon_2]

It works, but when are 2 members or more online, it says like

Member1Memeber2Member3

Could you make it separate like this:

Member1
Memeber2
Member3

 

[jo3bingham]

Try changing

str = "\n" .. str .. string

to

str = str .. string .. "\n"

I don't know if that'll work or not, but it looks like it will.

Jo3

 

[mamon_2]

[27/11/2008 03:23:52] Warning: [Event::loadScript] Can not load script. data/talkactions/scripts/mtibia/guildmembers.lua
[27/11/2008 03:23:52] data/talkactions/scripts/mtibia/guildmembers.lua:27: unexpected symbol near '..'

 

[mamon_2]

I made it works, dont wry, thx.

 

[Syntax]

function onSay(cid, words, param)
	local onlineMembers = {}
	local playerGuild = getPlayerGuildId(cid)
	
	if playerGuild == 0 then
		return TRUE
	end

	for _, name in ipairs(getOnlinePlayers()) do
		if getPlayerGuildId(getPlayerByName(name)) == playerGuild then
			table.insert(onlineMembers, name)
		end
	end

	if #onlineMembers == 0 then
		doPlayerSendTextMessage(cid, 24, "There are no players online from your guild..")
	else
		local playersOnline = #onlineMembers
		local tmp = ""
		if(playersOnline > 1) then
			local tmp = "(s)"
		end

		local header = playersOnline .. " player" .. tmp .. " online from your guild."
		local str = ""
		for i, string in ipairs(onlineMembers) do
			str = "\n" .. str .. string .. "\n"
		end
		doPlayerPopupFYI(cid, header .. ".\n " .. str)
	end
	return LUA_NO_ERROR
end

Thats the fixed version if anyone needed this as well. (If you find out a way to fix a code, please post it...)

 

[Colandus]

I have this idea, make a comand like !guildmembers and check all players of your guild online...

Maybe here can have an idea, is for get Staff online:

function onSay(cid, words, param)
	local staffList = {}
	for _, name in ipairs(getOnlinePlayers()) do
		if getPlayerGroupId(getPlayerByName(name)) >= 2 then
			table.insert(staffList, name)
		end
	end
	if #staffList == 0 then
		doPlayerSendTextMessage(cid, 24, "No hay nadie del Staff conectado..")
	else
		doPlayerSendTextMessage(cid, 24, "Staff Conectado: " .. table.concat(staffList, ", ") .. ".")
	end
	return LUA_NO_ERROR
end

Why did you remove the damn credits? I'll never help someone like you but well just because it was my script:

-- BY COLANDUS
-- and little by slawkens

function onSay(cid, words, param)
	local playerGuild = getPlayerGuildId(cid)
	if playerGuild == FALSE then
		return doPlayerSendTextMessage(cid, 24, "You are no member of a guild.")
	end
	
	local onlineMembers = {}
	for _, name in ipairs(getOnlinePlayers()) do
		if getPlayerGuildId(getPlayerByName(name)) == playerGuild then
			table.insert(onlineMembers, name)
		end
	end

	if #onlineMembers == 0 then
		doPlayerSendTextMessage(cid, 24, "There are no players online from your guild.")
	else
		local header = playersOnline .. " player(s) online from your guild."
		doPlayerPopupFYI(cid, header .. ".\n " .. table.concat(onlineMembers, "\n")
	end
	return LUA_NO_ERROR
end

 

[Syntax]

sorry didn't know who made it, I just fixed the one slawkens posted.

 

[Colandus]

sorry didn't know who made it, I just fixed the one slawkens posted.

I was referring to the main post...

 

[Syntax]

Ok, well, I put credits in the script I have, Incase my server gets stolen one day, they will know...lmao