[Lua] OOP example

oop.lua

function NewClass(baseClass)
    local newClass = {}
    if baseClass then
        setmetatable(newClass, {__index = baseClass})
    end
    function newClass:super(...)
        local newInst = {}
        if baseClass then
            newInst = baseClass:new(...)
        end
        setmetatable(newInst, {__index = newClass})
        return newInst
    end
    function newClass:new(...)
        return self:super(...)
    end
    return newClass
end

local EventFilter = NewClass()
function EventFilter:new(filterFunc)
    local obj = self:super()
    obj.enabled = false
    obj.filterFunc = filterFunc
    return obj
end
function EventFilter:enable()
    self.enabled = true
end
function EventFilter:disable()
    self.enabled = false
end
function EventFilter:apply(event)
    if self.enabled and self.filterFunc then
        self.filterFunc(event)
    end
end