plop

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

game/engine/Game.lua

+require "engine.class"
+module(..., package.seeall, class.make)
+
+function _M:init(keyhandler)
+	self.key = keyhandler
+	self.level = nil
+end
+
+function _M:setLevel(level)
+	self.level = level
+end

game/engine/KeyCommand.lua

@@ -3,6 +3,7 @@ require "engine.Key"
 module(..., package.seeall, class.inherit(engine.Key))
 
 function _M:init()
+	engine.Key.init(self)
 	self.commands = {}
 end
 

game/engine/Level.lua

+require "engine.class"
+module(..., package.seeall, class.make)
+
+function _M:init(map)
+	self.map = map
+	self.entities = {}
+end
+
+function _M:activate()
+	self.map:setCurrent()
+end
+
+function _M:addEntity(e)
+	if self.entities[e.uid] then error("Entity "..e.uid.." already present on the level") end
+	self.entities[e.uid] = e
+end