LÖVE

Code: Select all

 
class = require("bmclass")
 
a = class("a")
 
function a:init(attrs)
    self.x = attrs.x
    self.y = attrs.y
    
    print("for init")
end
 
function a:info()
    print(tostring(self) .. " : Hello!!!")
    print(self.x)
    print(self.y)
end
 
b = a("b", {x = 100, y = 200}) -- output "for init"
b:info()
-- output
-- b : Hello!!!
-- 100
-- 200

print(b.x) -- output "100"

Code: Select all

 
class = require("bmclass")
 
a = class("a")
b = class("b")
c = class("c", a, b) -- superclass a and b
 
function a:init() print("a init") end
function b:init() print("b init") end
function c:init()
    c:next(self, "init") -- next to the superclass
    print("c init")
end
 
function a:hello1() print("Hello1") end
function b:hello2() print("Hello2") end
function c:hello3() print("Hello3") end
 
d = c("d")
-- output
-- a init
-- b init
-- c init
 
d:hello1() -- output "Hello1"
d:hello2() -- output "Hello2"
d:hello3() -- output "Hello3"

Code: Select all

for k,v in pairs(parent)
   if type(v) == "number" or type(v) == "string" then
      child[k] = v
   end
end

Code: Select all

--includes go here
Widget = require "widget"

--declare type and metatable, both as local so they don't interfer with other things
local Lable = {}
local mt = {__index = Lable}

--inhertance goes here
setmetatable(Lable, {__index = Widget})

--cache any namespaces
local getColor = love.graphics.getColor
local setColor = love.graphics.setColor
local setFont = love.graphics.setFont
local drawRect = love.graphics.rectangle
local drawPrintf = love.graphics.printf
local getFont = love.graphics.getFont

--create the constructor here, organize the data members neatly somehow
function Lable:new(x,y,w,h,stext)
	return setmetatable( {x, y, w, h,
						 Handle = nil,
						 text = stext,
						 algin = "left",
						 font = getFont(),
						 color = {getColor()},
						 
	},mt)
end

--functions go here

function Lable:Draw()
	setColor(self.color)
	setFont(self.font)
	drawPrintf(self.text, self:GetX(), self:GetY(), self:GetW(), self.algin)
end

function Lable:__tostring()
	return self.text
end

function Lable:Type()
	return "Lable"
end

function Lable:SetText(text)
	self.text = text
end 

function Lable:SetColor(r, b, g, a)
	if type(r) == "table" then
		self.color = {unpack(r)}
	else
		self.color = {r, b, g, a}
	end
end

function Lable:GetFont()
	return self.font
end

function Lable:SetFont(font)
	self.font = font
end

function Lable:SetAlign(a)
	self.algin = a
end

function Lable:GetColor()
	return unpack(self.color)
end

function Lable:GetText()
	return self.text
end

--return the type that was created
return Lable