32 lines of goodness (日本語)

このライブラリは同じ基底クラスからクラスを二つ継承した場合に問題が発生します。詳細はスレッドを確認してください。

ライブラリについて

local mt_class = {}

function mt_class:extends(parent)
   self.super = parent
   setmetatable(mt_class, {__index = parent})
   parent.__members__ = parent.__members__ or {}
   return self
end

local function define(class, members)
   class.__members__ = class.__members__ or {}
   for k, v in pairs(members) do
      class.__members__[k] = v
   end
   function class:new(...)
      local newvalue = {}
      for k, v in pairs(class.__members__) do
         newvalue[k] = v
      end
      setmetatable(newvalue, {__index = class})
      if newvalue.__init then
         newvalue:__init(...)
      end
      return newvalue
   end
end

function class(name)
    local newclass = {}
   _G[name] = newclass
   return setmetatable(newclass, {__index = mt_class, __call = define})
end

そしてすべてがここにある！ なんと 32 行です！

使用方法

選択したファイル (恐らく "32log.lua") へ上記のライブラリを打ち込み、あなたのコードにて require 関数を使用してインクルードしてください。

基本的な構文は下記の通りです:

class "ClassName" : extends(BaseClassName) {
    memberName = nonNilValue;
}

いったんクラスが作成されたならば下記のようにクラスの新しいインスタンスを作成することができます:

local myInstance = ClassName:new()

__init という名称のメソッドを作成すると、それを new によりコンストラクタとして使用することができます:

class "Vector" {
    x = 0;
    y = 0;
    z = 0;
}
function Vector:__init(x, y, z)
    self.x = x
    self.y = y
    self.z = z
end
function Vector:print()
    print(self.x, self.y, self.z)
end
local vec = Vector:new(1, 0.5, 0.25)
vec:print()

定義内において任意の値をメンバへ設定すると、それはメンバに対する標準値の振る舞いをします。それらは常に値により複製されますがテーブルは少し技巧的な場合は、この動作は数値や文字列の値に相当します:

class "Foo" {
   bar = {};
}
local foo = Foo:new()
foo.bar["foobar"] = 10;
local foo2 = Foo:new()
print(foo2.bar["foobar"])

クラスは親の標準メンバとメタ・メソッドを継承します。super (上位) メンバを使用して派生したクラスにてオーバーロードをすることで親のメソッドを呼び出すこともできます:

class "Base" {}
function Base:foobar()
    print("foo")
end
class "Derived" : extends(Base) {} 
function Derived:foobar()
   self.super.foobar(self)
   print("bar")
end

関連

何か質問があれば出典元の投稿へ投稿してください。