Lua实现类和其继承

--[[
 file name : lua_class.lua
 author  :  Clark/陈泽丹
 created :  5:8:2011
 purpose :  lua类探索

--]]

 

 

function newMap(mapName, mapID) --newMap类
 local obj = { m_mapName = mapName, m_mapID = mapID }
 function obj:SetName(mapName)
  self.m_mapName = mapName
 end
 function obj:GetName()
  return self.m_mapName
 end
 function obj:SetID(mapID)
  self.m_mapID = mapID
 end
 function obj:GetID()
  return self.m_mapID
 end
 return obj
end

map1 = newMap("Map001",1)
map100 = newMap("Map100",100)
print(map1:GetName(),map1:GetID())
print(map100:GetName(),map100:GetID())

map1:SetName("Map001+")
map1:SetID(1.5)
print(map1:GetName(),map1:GetID())
print(map100:GetName(),map100:GetID())

function newSuperMap(mapName, mapID, mapSize) --newSuperMap类
 local obj = newMap(mapName, mapID)  --继承于newMap类
 obj.m_mapSize = mapSize
 function obj:SetSize(mapSize)
  self.m_mapSize = mapSize
 end
 function obj:GetSize()
  return self.m_mapSize
 end
 return obj
end

super_map1 = newSuperMap("super_map1", 10000, 512)
print(map1:GetName(),map1:GetID())
print(map100:GetName(),map100:GetID())
print(super_map1:GetName(),super_map1:GetID(),super_map1:GetSize())