function inRoomPlayers()

openUserWindow("Players In Room")

oldRoomID = oldRoomID or 0
	if tonumber(gmcp.Room.Info.num)  ~= oldRoomID then

	playersInRoom = {}
		for k,v in pairs(gmcp.Room.Players) do
			if v.name ~= gmcp.Char.Status.name then
				if not table.contains(playersInRoom, v.name) then
					table.insert(playersInRoom, v.name) --all the names go into this table
				end
			end
		end
	end
		oldRoomID = tonumber(gmcp.Room.Info.num)

	clearWindow("Players In Room")
	cecho("Players In Room", "<PowderBlue>\n           Players Here\n          -------------")
		for k, v in ipairs(playersInRoom) do
			cecho("Players In Room", "\n    "..v)
		end
end
inRoomPlayers()