LÖVE

Code: Select all

TimedBox = class('TimedBox')
TimedBox:subclass('MessageBox')

Code: Select all

TimedBox = class('TimedBox', MessageBox)

-- or --

TimedBox = MessageBox:subclass('TimedBox')

Code: Select all

function MessageBox:initialize()

end

Code: Select all

function MessageBox:initialize()
  super.initialize(self) -- always, always do this.
end

Code: Select all

MessageBox = class('MessageBox')
MessageBox.DEFAULT_TEXT = "Default"
function MessageBox:initialize(text)
  super.initialize(self) -- always, always do this.
  self.text  = text or self.class.DEFAULT_TEXT -- I prefer this, but you can (for now) do self.DEFAULT_TEXT instead of self.class.DEFAULT_TEXT
end

TimedBox = class('TimedBox', MessageBox) -- subclass
function TimedBox:initialize(text)
  super.initialize(self, text)
end

StayBox = class('StayBox', MessageBox) -- subclass
StayBox.DEFAULT_TEXT = "StayBox" -- I changed the default text for StayBox here
function StayBox:initialize(text)
  super.initialize(self, text)
end

ChoiceBox = class('ChoiceBox', MessageBox) -- subclass
function ChoiceBox:initialize(text)
  super.initialize(self, text)
end

Code: Select all

function love.load()
  msg = MessageBox:new()
  print(msg.text)
  timed = TimedBox:new("Parameter")
  print(timed.text)
  stay = StayBox:new()
  print(stay.text)
end

Code: Select all

Default
Parameter
StayBox

Code: Select all

Object = class('Object')
function Object:initialize(fnct)
  super.initialize(self)
  defaultFnct = function() return "default" end
  self:fnct() = fnct or defaultFnct
end

Code: Select all

Syntax error: unexpected symbol near '='

Code: Select all

self:fnct() = fnct or defaultFnct

Code: Select all

"default" = fnct or defaultFnct -- assuming that the function returned "default" when invoked