Account = {balance = }

 function Account.withdraw(v)

     Account.balance = Account.balance - v

 end

 --下面是测试调用函数

 Account.withdraw(100.00)

 function Account:withdraw(v)

     self.balance = self.balance - v

 end

 --调用代码可改为：

 a:withdraw(100.00）

--[[

在这段代码中，我们可以将Account视为class的声明，如Java中的：

public class Account

{

    public float balance = 0;

    public Account(Account o);

    public void deposite(float f);

}

--]]

--这里balance是一个公有的成员变量。

Account = {balance = }

--new可以视为构造函数

function Account:new(o)

    o = o or {} --如果参数中没有提供table，则创建一个空的。

    --将新对象实例的metatable指向Account表(类)，这样就可以将其视为模板了。

    setmetatable(o,self)

    --在将Account的__index字段指向自己，以便新对象在访问Account的函数和字段时，可被直接重定向。

    self.__index = self

    --最后返回构造后的对象实例

    return o

end

--deposite被视为Account类的公有成员函数

function Account:deposit(v)

    --这里的self表示对象实例本身

    self.balance = self.balance + v

end

--下面的代码创建两个Account的对象实例

--通过Account的new方法构造基于该类的示例对象。

a = Account:new()

--[[

这里需要具体解释一下，此时由于table a中并没有deposite字段，因此需要重定向到Account，

同时调用Account的deposite方法。在Account.deposite方法中，由于self(a对象)并没有balance

字段，因此在执行self.balance + v时，也需要重定向访问Account中的balance字段，其缺省值为0。

在得到计算结果后，再将该结果直接赋值给a.balance。此后a对象就拥有了自己的balance字段和值。

下次再调用该方法，balance字段的值将完全来自于a对象，而无需在重定向到Account了。

--]]

a:deposit(100.00)

print(a.balance) --输出100

b = Account:new()

b:deposit(200.00)

print(b.balance) --输出200

--需要说明的是，这段代码仅提供和继承相关的注释，和类相关的注释在上面的代码中已经给出。

Account = {balance = }

function Account:new(o)

    o = o or {}

    setmetatable(o,self)

    self.__index = self

    return o

end

function Account:deposit(v)

    self.balance = self.balance + v

end

function Account:withdraw(v)

    if v > self.balance then

        error("Insufficient funds")

    end

    self.balance = self.balance - v

end

--下面将派生出一个Account的子类，以使客户可以实现透支的功能。

SpecialAccount = Account:new()  --此时SpecialAccount仍然为Account的一个对象实例

--派生类SpecialAccount扩展出的方法。

--下面这些SpecialAccount中的方法代码(getLimit/withdraw)，一定要位于SpecialAccount被Account构造之后。

function SpecialAccount:getLimit()

    --此时的self将为对象实例。

    return self.limit or

end

--SpecialAccount将为Account的子类，下面的方法withdraw可以视为SpecialAccount

--重写的Account中的withdraw方法，以实现自定义的功能。

function SpecialAccount:withdraw(v)

    --此时的self将为对象实例。

    if v - self.balance >= self:getLimit() then

        error("Insufficient funds")

    end

    self.balance = self.balance - v

end

--在执行下面的new方法时，table s的元表已经是SpecialAccount了，而不再是Account。

s = SpecialAccount:new{limit = 1000.00}

--在调用下面的deposit方法时，由于table s和SpecialAccount均未提供该方法，因此访问的仍然是

--Account的deposit方法。

s:deposit()

--此时的withdraw方法将不再是Account中的withdraw方法，而是SpecialAccount中的该方法。

--这是因为Lua先在SpecialAccount(即s的元表)中找到了该方法。

s:withdraw(200.00)

print(s.balance) --输出-100

--这里我们需要一个闭包函数作为类的创建工厂

function newAccount(initialBalance)

    --这里的self仅仅是一个普通的局部变量，其含义完全不同于前面示例中的self。

    --这里之所以使用self作为局部变量名，也是为了方便今后的移植。比如，以后

    --如果改为上面的实现方式，这里应用了self就可以降低修改的工作量了。

    local self = {balance = initialBalance} --这里我们可以将self视为私有成员变量

    local withdraw = function(v) self.balance = self.balance - v end

    local deposit = function(v) self.balance = self.balance + v end

    local getBalance = function() return self.balance end

    --返回对象中包含的字段仅仅为公有方法。事实上，我们通过该种方式，不仅可以实现

    --成员变量的私有性，也可以实现方法的私有性，如：

    --local privateFunction = function() --do something end

    --只要我们不在输出对象中包含该方法的字段即可。

    return {withdraw = withdraw, deposit = deposit, getBalance = getBalance}

end

--和前面两个示例不同的是，在调用对象方法时，不再需要self变量，因此我们可以直接使用点(.)，

--而不再需要使用冒号(:)操作符了。

accl = newAccount(100.00)

--在函数newAccount返回之后，该函数内的“非局部变量”表self就不再能被外部访问了，只能通过

--该函数返回的对象的方法来操作它们。

accl.withdraw(40.00)

print(acc1.getBalance())