Shift+space allows to cycle through chat channels

git-svn-id: http://svn.net-core.org/repos/t-engine4@3578 51575b47-30f0-44d4-a5cc-537603b46e54

game/engines/default/data/keybinds/chat.lua

@@ -30,3 +30,10 @@ defineAction{
 	group = "user chat",
 	name = "Display chat log",
 }
+
+defineAction{
+	default = { "sym:32:false:true:false:false" },
+	type = "USERCHAT_SWITCH_CHANNEL",
+	group = "user chat",
+	name = "Cycle chat channels",
+}

game/engines/default/engine/UserChat.lua

@@ -45,6 +45,16 @@ function _M:setupOnGame()
 		USERCHAT_TALK = function()
 			self:talkBox()
 		end,
+		USERCHAT_SWITCH_CHANNEL = function()
+			if not self.display_chans then return end
+			for i = 1, #self.display_chans do
+				if self.display_chans[i].name == self.cur_channel then
+					self:selectChannel(self.display_chans[util.boundWrap(i + 1, 1, #self.display_chans)].name)
+					if game.logChat then game.logChat("Talking in channel: %s", self.cur_channel) end
+					break
+				end
+			end
+		end,
 	}
 
 	local ok, UC = pcall(require, "mod.class.UserChatExtension")

game/modules/tome/data/zones/arena/npcs.lua

@@ -911,6 +911,7 @@ newEntity{ name = "great gladiator",
 	base = "BASE_NPC_ARENA1",
 	type = "humanoid", subtype = "human",
 	color=colors.VERY_DARK_RED,
+	resolvers.nice_tile{image="invis.png", add_mos = {{image="npc/humanoid_human_great_gladiator.png", display_h=2, display_y=-1}}},
 
 	life_rating = 12,