_Account = {}
--创建一张借记卡
function _Account:new( tb )
local _Tb = tb or {}
_Tb._mBalance = _Tb._mBalance or 0
setmetatable(_Tb, self)
self.__index = self
return _Tb
end
--借记卡取款
function _Account:desposit( value )
if value > self._mBalance then
print(string.format("取款"..value .. "失败, 剩余存款" .. self._mBalance))
return
end
self._mBalance = self._mBalance - value
print(string.format("取款"..value .. ", 剩余存款" .. self._mBalance))
end
--存钱
function _Account:addBalance(val)
local num = val or 0
self._mBalance = self._mBalance + num
print("存钱"..val)
end
--[[
信用卡也具备储蓄卡的存取功能,所以直接继承储蓄卡,复用储蓄卡的存钱功能。
我们在访问一个表不存在的域时,lua解释器会去查找metatable中是否有__index方法(metamethod),如果不存在则返回nil。
_Credit是_Account:new出来的,metatable是_Account,__index也是_Account,所以当_Credit对象访问addBalance的时候,
会到_Account中找。
]]
_Credit = _Account:new({_mLimit = 1000})
--信用卡取款
function _Credit:desposit( value )
if value > self._mBalance + self._mLimit then
print(string.format("取款"..value .. "失败, 剩余额度" .. self._mLimit .. ", 剩余存款"..self._mBalance))
return
end
if self._mBalance >= value then
self._mBalance = self._mBalance - value
else
self._mLimit = self._mLimit - (value - self._mBalance)
self._mBalance = 0
end
print(string.format("取款"..value .. ", 剩余额度" .. self._mLimit .. ", 剩余存款"..self._mBalance))
end
print(" --储蓄卡--")
local myAccount_2 = _Account:new()
myAccount_2:addBalance(1000)
myAccount_2:desposit(200)
myAccount_2:desposit(2000)
print("\n --信用卡--")
local cyCredit = _Credit:new()
cyCredit:addBalance(600)
cyCredit:desposit(500)
cyCredit:desposit(500)
cyCredit:desposit(1000)
--[[结果
--储蓄卡--
存钱1000
取款200, 剩余存款800
取款2000失败, 剩余存款800
--信用卡--
存钱600
取款500, 剩余额度1000, 剩余存款100
取款500, 剩余额度600, 剩余存款0
取款1000失败, 剩余额度600, 剩余存款0
]]