2013-02-11 21:15:40 +00:00
|
|
|
--[[------------------------------------------------
|
|
|
|
-- Love Frames - A GUI library for LOVE --
|
|
|
|
-- Copyright (c) 2013 Kenny Shields --
|
|
|
|
--]]------------------------------------------------
|
|
|
|
|
|
|
|
-- debug library
|
|
|
|
loveframes.debug = {}
|
|
|
|
|
|
|
|
local font = loveframes.basicfontsmall
|
|
|
|
local centerarea = {210, 5, 585, 590}
|
|
|
|
local loremipsum =
|
|
|
|
[[Lorem ipsum dolor sit amet, consectetur adipiscing elit. Aenean laoreet massa mattis tortor faucibus non congue mauris mattis. Aliquam ultricies scelerisque mi, sit amet tempor metus pharetra vel. Etiam eu arcu a dolor porttitor condimentum in malesuada urna. Mauris vel nulla mi, quis aliquet neque. In aliquet turpis eget purus malesuada tincidunt. Donec rutrum purus vel diam suscipit vehicula. Cras sem nibh, tempus at dictum non, consequat non justo. In sed tellus nec orci scelerisque scelerisque id vitae leo. Maecenas pharetra, nibh eget commodo gravida, augue nisl blandit dui, ut malesuada augue dui nec erat. Phasellus nec mauris pharetra metus iaculis viverra sit amet ut tortor. Duis et viverra magna. Nunc orci dolor, placerat a iaculis non, mattis sed nibh.
|
|
|
|
|
|
|
|
Mauris ac erat sit amet ante condimentum scelerisque. Cras eleifend lorem dictum mi euismod non placerat lorem gravida. Vestibulum sodales dapibus eros, non iaculis risus commodo eu. Maecenas dapibus purus accumsan metus euismod suscipit. Etiam eleifend lorem eget quam ornare interdum sed at nulla. Suspendisse viverra sapien ut felis viverra pellentesque. Ut convallis hendrerit est, in imperdiet purus placerat ut. Curabitur sapien nibh, molestie et elementum a, sagittis et tortor. Vestibulum sed quam eu velit euismod rutrum vitae et sem. Morbi accumsan quam vitae sapien scelerisque tincidunt. Nulla ipsum leo, scelerisque at consequat sit amet, venenatis eget mauris. Aliquam at nibh vel lorem hendrerit dignissim. Cras et risus sit amet est vehicula auctor at a leo. Curabitur euismod mi sit amet nunc consequat sed fringilla justo sagittis.
|
|
|
|
|
|
|
|
Nulla ut arcu felis, a laoreet tellus. Vivamus ligula nibh, bibendum ut ultrices sed, ullamcorper et est. Pellentesque nisi diam, sollicitudin lacinia fermentum quis, aliquam fermentum elit. Donec egestas vestibulum mollis. Vivamus sollicitudin nisl vestibulum nisi fermentum scelerisque. Nunc enim magna, posuere ornare faucibus a, bibendum vestibulum felis. Etiam laoreet molestie elit, vitae ultrices sem faucibus in. Fusce rutrum convallis lacus, vitae scelerisque eros tincidunt sed. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos himenaeos.
|
|
|
|
|
|
|
|
Quisque ornare arcu sed enim sodales dictum. Suspendisse at convallis mi. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos himenaeos. Maecenas et nibh odio, eu lacinia lacus. Mauris at pulvinar urna. Pellentesque vel justo erat, a congue nibh. Nunc tristique mattis euismod. Suspendisse potenti.
|
|
|
|
|
|
|
|
Sed dictum faucibus cursus. Integer nisi ipsum, dapibus vel blandit laoreet, bibendum congue massa. Vestibulum tincidunt vulputate nunc, facilisis consequat lacus posuere at. Aenean sed mollis urna. Vivamus congue neque non arcu malesuada lobortis. Curabitur suscipit pretium massa eu rutrum. Nulla vehicula imperdiet dui in blandit. Curabitur vitae felis ut massa scelerisque consequat. Nulla a magna quis risus consequat hendrerit. Maecenas quis lacus sit amet ipsum condimentum interdum. Proin condimentum erat id enim elementum ut tincidunt neque vulputate.
|
|
|
|
]]
|
|
|
|
|
|
|
|
--[[---------------------------------------------------------
|
|
|
|
- func: draw()
|
|
|
|
- desc: draws debug information
|
|
|
|
--]]---------------------------------------------------------
|
|
|
|
function loveframes.debug.draw()
|
|
|
|
|
|
|
|
-- get the current debug setting
|
|
|
|
local debug = loveframes.config["DEBUG"]
|
|
|
|
|
|
|
|
-- do not draw anthing if debug is off
|
|
|
|
if not debug then
|
|
|
|
return
|
|
|
|
end
|
|
|
|
|
|
|
|
local cols = loveframes.util.GetCollisions()
|
|
|
|
local topcol = {type = none, children = {}, x = 0, y = 0, width = 0, height = 0}
|
|
|
|
local objects = loveframes.util.GetAllObjects()
|
|
|
|
local author = loveframes.info.author
|
|
|
|
local version = loveframes.info.version
|
|
|
|
local stage = loveframes.info.stage
|
|
|
|
local basedir = loveframes.config["DIRECTORY"]
|
|
|
|
local loveversion = love._version
|
|
|
|
local fps = love.timer.getFPS()
|
|
|
|
local deltatime = love.timer.getDelta()
|
|
|
|
|
|
|
|
-- set the top most collision object
|
|
|
|
for k, v in ipairs(cols) do
|
|
|
|
if v:IsTopCollision() then
|
|
|
|
topcol = v
|
|
|
|
break
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
-- main font
|
|
|
|
love.graphics.setFont(font)
|
|
|
|
|
|
|
|
-- main box
|
|
|
|
love.graphics.setColor(0, 0, 0, 200)
|
|
|
|
love.graphics.rectangle("fill", 5, 30, 200, 220)
|
|
|
|
|
|
|
|
-------------------------------------------------------
|
|
|
|
-- library information section
|
|
|
|
-------------------------------------------------------
|
|
|
|
love.graphics.setColor(255, 0, 0, 255)
|
|
|
|
love.graphics.print("Library Information", 10, 35)
|
|
|
|
|
|
|
|
love.graphics.setColor(255, 255, 255, 255)
|
|
|
|
love.graphics.print("Author: " ..author, 15, 50)
|
|
|
|
love.graphics.print("Version: " ..version, 15, 60)
|
|
|
|
love.graphics.print("Stage: " ..stage, 15, 70)
|
|
|
|
love.graphics.print("Base Directory: " ..basedir, 15, 80)
|
|
|
|
|
|
|
|
-------------------------------------------------------
|
|
|
|
-- object information section
|
|
|
|
-------------------------------------------------------
|
|
|
|
love.graphics.setColor(255, 0, 0, 255)
|
|
|
|
love.graphics.print("Object Information", 10, 95)
|
|
|
|
|
|
|
|
love.graphics.setColor(255, 255, 255, 255)
|
|
|
|
|
|
|
|
if #cols > 0 then
|
|
|
|
love.graphics.print("Type: " ..topcol.type, 15, 110)
|
|
|
|
else
|
|
|
|
love.graphics.print("Type: none", 10, 120)
|
|
|
|
end
|
|
|
|
|
|
|
|
if topcol.children then
|
|
|
|
love.graphics.print("# of children: " .. #topcol.children, 15, 120)
|
|
|
|
else
|
|
|
|
love.graphics.print("# of children: 0", 15, 120)
|
|
|
|
end
|
|
|
|
|
|
|
|
if topcol.internals then
|
|
|
|
love.graphics.print("# of internals: " .. #topcol.internals, 15, 130)
|
|
|
|
else
|
|
|
|
love.graphics.print("# of internals: 0", 15, 130)
|
|
|
|
end
|
|
|
|
|
|
|
|
love.graphics.print("X: " ..topcol.x, 15, 140)
|
|
|
|
love.graphics.print("Y: " ..topcol.y, 15, 150)
|
|
|
|
love.graphics.print("Width: " ..topcol.width, 15, 160)
|
|
|
|
love.graphics.print("Height: " ..topcol.height, 15, 170)
|
|
|
|
|
|
|
|
-------------------------------------------------------
|
|
|
|
-- miscellaneous section
|
|
|
|
-------------------------------------------------------
|
|
|
|
love.graphics.setColor(255, 0, 0, 255)
|
|
|
|
love.graphics.print("Miscellaneous", 10, 185)
|
|
|
|
|
|
|
|
love.graphics.setColor(255, 255, 255, 255)
|
|
|
|
love.graphics.print("LOVE Version: " ..loveversion, 15, 200)
|
|
|
|
love.graphics.print("FPS: " ..fps, 15, 210)
|
|
|
|
love.graphics.print("Delta Time: " ..deltatime, 15, 220)
|
|
|
|
love.graphics.print("Total Objects: " ..#objects, 15, 230)
|
|
|
|
|
|
|
|
-- outline the object that the mouse is hovering over
|
|
|
|
love.graphics.setColor(255, 204, 51, 255)
|
|
|
|
love.graphics.setLine(2, "smooth")
|
|
|
|
love.graphics.rectangle("line", topcol.x - 1, topcol.y - 1, topcol.width + 2, topcol.height + 2)
|
|
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
--[[---------------------------------------------------------
|
|
|
|
- func: ExamplesMenu()
|
|
|
|
- desc: generates a list of examples of Love Frames
|
|
|
|
objects
|
|
|
|
--]]---------------------------------------------------------
|
|
|
|
function loveframes.debug.ExamplesMenu()
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- examples frame
|
|
|
|
------------------------------------
|
|
|
|
local examplesframe = loveframes.Create("frame")
|
|
|
|
examplesframe:SetName("Examples List")
|
|
|
|
examplesframe:SetSize(200, love.graphics.getHeight() - 325)
|
|
|
|
examplesframe:SetPos(5, 320)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- examples list
|
|
|
|
------------------------------------
|
|
|
|
local exampleslist = loveframes.Create("list", examplesframe)
|
|
|
|
exampleslist:SetSize(200, exampleslist:GetParent():GetHeight() - 25)
|
|
|
|
exampleslist:SetPos(0, 25)
|
|
|
|
exampleslist:SetPadding(5)
|
|
|
|
exampleslist:SetSpacing(5)
|
|
|
|
exampleslist:SetDisplayType("vertical")
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- button example
|
|
|
|
------------------------------------
|
|
|
|
local buttonexample = loveframes.Create("button")
|
|
|
|
buttonexample:SetText("Button")
|
|
|
|
buttonexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Button")
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local button1 = loveframes.Create("button", frame1)
|
|
|
|
button1:SetWidth(200)
|
|
|
|
button1:SetText("Button")
|
|
|
|
button1:Center()
|
|
|
|
button1.OnClick = function(object2, x, y)
|
|
|
|
object2:SetText("You clicked the button!")
|
|
|
|
end
|
|
|
|
button1.OnMouseEnter = function(object2)
|
|
|
|
object2:SetText("The mouse entered the button.")
|
|
|
|
end
|
|
|
|
button1.OnMouseExit = function(object2)
|
|
|
|
object2:SetText("The mouse exited the button.")
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(buttonexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- checkbox example
|
|
|
|
------------------------------------
|
|
|
|
local checkboxexample = loveframes.Create("button")
|
|
|
|
checkboxexample:SetText("Checkbox")
|
|
|
|
checkboxexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Checkbox")
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
frame1:SetHeight(85)
|
|
|
|
|
|
|
|
local checkbox1 = loveframes.Create("checkbox", frame1)
|
|
|
|
checkbox1:SetText("Checkbox 1")
|
|
|
|
checkbox1:SetPos(5, 30)
|
|
|
|
checkbox1.OnChanged = function(object2)
|
|
|
|
end
|
|
|
|
|
|
|
|
local checkbox2 = loveframes.Create("checkbox", frame1)
|
|
|
|
checkbox2:SetText("Checkbox 2")
|
|
|
|
checkbox2:SetPos(5, 60)
|
|
|
|
checkbox2.OnChanged = function(object3)
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(checkboxexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- collapsible category example
|
|
|
|
------------------------------------
|
|
|
|
local collapsiblecategoryexample = loveframes.Create("button")
|
|
|
|
collapsiblecategoryexample:SetText("Collapsible Category")
|
|
|
|
collapsiblecategoryexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Collapsible Category")
|
|
|
|
frame1:SetSize(500, 300)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local panel1 = loveframes.Create("panel")
|
|
|
|
panel1:SetHeight(230)
|
2013-02-25 10:28:14 +00:00
|
|
|
|
2013-02-11 21:15:40 +00:00
|
|
|
local collapsiblecategory1 = loveframes.Create("collapsiblecategory", frame1)
|
|
|
|
collapsiblecategory1:SetPos(5, 30)
|
|
|
|
collapsiblecategory1:SetSize(490, 265)
|
|
|
|
collapsiblecategory1:SetText("Category 1")
|
|
|
|
collapsiblecategory1:SetObject(panel1)
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(collapsiblecategoryexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- cloumnlist example
|
|
|
|
------------------------------------
|
|
|
|
local cloumnlistexample = loveframes.Create("button")
|
|
|
|
cloumnlistexample:SetText("Column List")
|
|
|
|
cloumnlistexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Column List")
|
|
|
|
frame1:SetSize(500, 300)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local list1 = loveframes.Create("columnlist", frame1)
|
|
|
|
list1:SetPos(5, 30)
|
|
|
|
list1:SetSize(490, 265)
|
|
|
|
list1:AddColumn("Column 1")
|
|
|
|
list1:AddColumn("Column 2")
|
|
|
|
list1:AddColumn("Column 3")
|
|
|
|
list1:AddColumn("Column 4")
|
|
|
|
|
|
|
|
for i=1, 20 do
|
|
|
|
list1:AddRow("Row " ..i.. ", column 1", "Row " ..i.. ", column 2", "Row " ..i.. ", column 3", "Row " ..i.. ", column 4")
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(cloumnlistexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- frame example
|
|
|
|
------------------------------------
|
|
|
|
local frameexample = loveframes.Create("button")
|
|
|
|
frameexample:SetText("Frame")
|
|
|
|
frameexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Frame")
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
2013-05-05 23:51:20 +00:00
|
|
|
frame1:SetIcon("resources/images/application.png")
|
2013-02-11 21:15:40 +00:00
|
|
|
|
|
|
|
local text1 = loveframes.Create("text", frame1)
|
|
|
|
text1:SetText("This is an example frame.")
|
|
|
|
text1.Update = function(object2, dt)
|
|
|
|
object2:CenterX()
|
|
|
|
object2:SetY(40)
|
|
|
|
end
|
|
|
|
|
|
|
|
local button1 = loveframes.Create("button", frame1)
|
|
|
|
button1:SetText("Modal")
|
|
|
|
button1:SetWidth(100)
|
|
|
|
button1:Center()
|
|
|
|
button1.Update = function(object2, dt)
|
|
|
|
local modal = object2:GetParent():GetModal()
|
|
|
|
|
|
|
|
if modal then
|
|
|
|
object2:SetText("Remove Modal")
|
|
|
|
object2.OnClick = function()
|
|
|
|
object2:GetParent():SetModal(false)
|
|
|
|
end
|
|
|
|
else
|
|
|
|
object2:SetText("Set Modal")
|
|
|
|
object2.OnClick = function()
|
|
|
|
object2:GetParent():SetModal(true)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(frameexample)
|
|
|
|
|
2013-05-05 23:51:20 +00:00
|
|
|
------------------------------------
|
|
|
|
-- grid example
|
|
|
|
------------------------------------
|
|
|
|
|
|
|
|
local gridexample = loveframes.Create("button")
|
|
|
|
gridexample:SetText("Grid")
|
|
|
|
gridexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame = loveframes.Create("frame")
|
|
|
|
frame:SetName("Grid")
|
|
|
|
frame:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
--local panel = loveframes.Create("panel")
|
|
|
|
--panel:SetSize(500, 300)
|
|
|
|
--panel:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local grid = loveframes.Create("grid", frame)
|
|
|
|
grid:SetPos(5, 30)
|
|
|
|
grid:SetRows(5)
|
|
|
|
grid:SetColumns(5)
|
|
|
|
grid:SetCellWidth(25)
|
|
|
|
grid:SetCellHeight(25)
|
|
|
|
grid:SetCellPadding(5)
|
|
|
|
grid:SetItemAutoSize(true)
|
|
|
|
|
|
|
|
local id = 1
|
|
|
|
|
|
|
|
for i=1, 5 do
|
|
|
|
for n=1, 5 do
|
|
|
|
local button = loveframes.Create("button")
|
|
|
|
button:SetSize(15, 15)
|
|
|
|
button:SetText(id)
|
|
|
|
grid:AddItem(button, i, n)
|
|
|
|
id = id + 1
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
grid.OnSizeChanged = function(object)
|
|
|
|
frame:SetSize(object:GetWidth() + 10, object:GetHeight() + 35)
|
|
|
|
frame:CenterWithinArea(unpack(centerarea))
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(gridexample)
|
|
|
|
|
2013-02-11 21:15:40 +00:00
|
|
|
------------------------------------
|
|
|
|
-- image example
|
|
|
|
------------------------------------
|
|
|
|
local imageexample = loveframes.Create("button")
|
|
|
|
imageexample:SetText("Image")
|
|
|
|
imageexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Image")
|
|
|
|
frame1:SetSize(138, 315)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local image1 = loveframes.Create("image", frame1)
|
|
|
|
image1:SetImage("resources/images/carlsagan.png")
|
|
|
|
image1:SetPos(5, 30)
|
|
|
|
|
|
|
|
local panel1 = loveframes.Create("panel", frame1)
|
|
|
|
panel1:SetPos(5, 160)
|
|
|
|
panel1:SetSize(128, 150)
|
|
|
|
|
|
|
|
local text1 = loveframes.Create("text", panel1)
|
|
|
|
text1:SetPos(5, 5)
|
|
|
|
text1:SetText("Orientation: ")
|
|
|
|
|
|
|
|
local slider1 = loveframes.Create("slider", panel1)
|
|
|
|
slider1:SetPos(5, 20)
|
|
|
|
slider1:SetWidth(118)
|
|
|
|
slider1:SetMinMax(0, 360)
|
|
|
|
slider1:SetDecimals(0)
|
|
|
|
slider1.OnValueChanged = function(object)
|
|
|
|
image1:SetOrientation(object:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
text1.Update = function(object, dt)
|
|
|
|
object:SetText("Orientation: " ..slider1:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
local text2 = loveframes.Create("text", panel1)
|
|
|
|
text2:SetPos(5, 40)
|
|
|
|
text2:SetText("Scale")
|
|
|
|
|
|
|
|
local slider2 = loveframes.Create("slider", panel1)
|
|
|
|
slider2:SetPos(5, 55)
|
|
|
|
slider2:SetWidth(118)
|
|
|
|
slider2:SetMinMax(1, 2)
|
|
|
|
slider2:SetDecimals(5)
|
|
|
|
slider2.OnValueChanged = function(object)
|
|
|
|
image1:SetScale(object:GetValue(), object:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
text2.Update = function(object, dt)
|
|
|
|
object:SetText("Scale: " ..slider2:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
local text3 = loveframes.Create("text", panel1)
|
|
|
|
text3:SetPos(5, 75)
|
|
|
|
text3:SetText("Offset")
|
|
|
|
|
|
|
|
local slider3 = loveframes.Create("slider", panel1)
|
|
|
|
slider3:SetPos(5, 90)
|
|
|
|
slider3:SetWidth(118)
|
|
|
|
slider3:SetMinMax(1, 50)
|
|
|
|
slider3:SetDecimals(5)
|
|
|
|
slider3.OnValueChanged = function(object)
|
|
|
|
image1:SetOffset(object:GetValue(), object:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
text3.Update = function(object, dt)
|
|
|
|
object:SetText("Offset: " ..slider3:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
local text4 = loveframes.Create("text", panel1)
|
|
|
|
text4:SetPos(5, 110)
|
|
|
|
text4:SetText("Shear")
|
|
|
|
|
|
|
|
local slider4 = loveframes.Create("slider", panel1)
|
|
|
|
slider4:SetPos(5, 125)
|
|
|
|
slider4:SetWidth(118)
|
|
|
|
slider4:SetMinMax(0, 10)
|
|
|
|
slider4:SetDecimals(5)
|
|
|
|
slider4.OnValueChanged = function(object)
|
|
|
|
image1:SetShear(object:GetValue(), object:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
text4.Update = function(object, dt)
|
|
|
|
object:SetText("Shear: " ..slider4:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(imageexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- image button example
|
|
|
|
------------------------------------
|
|
|
|
local imagebuttonexample = loveframes.Create("button")
|
|
|
|
imagebuttonexample:SetText("Image Button")
|
|
|
|
imagebuttonexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Image Button")
|
|
|
|
frame1:SetSize(138, 163)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local imagebutton1 = loveframes.Create("imagebutton", frame1)
|
|
|
|
imagebutton1:SetImage("resources/images/carlsagan.png")
|
|
|
|
imagebutton1:SetPos(5, 30)
|
|
|
|
imagebutton1:SizeToImage()
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(imagebuttonexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- list example
|
|
|
|
------------------------------------
|
|
|
|
local listexample = loveframes.Create("button")
|
|
|
|
listexample:SetText("List")
|
|
|
|
listexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("List")
|
|
|
|
frame1:SetSize(500, 455)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local list1 = loveframes.Create("list", frame1)
|
|
|
|
list1:SetPos(5, 30)
|
|
|
|
list1:SetSize(490, 300)
|
|
|
|
list1:SetPadding(5)
|
|
|
|
list1:SetSpacing(5)
|
|
|
|
|
|
|
|
local panel1 = loveframes.Create("panel", frame1)
|
|
|
|
panel1:SetPos(5, 335)
|
|
|
|
panel1:SetSize(490, 115)
|
|
|
|
|
|
|
|
local slider1 = loveframes.Create("slider", panel1)
|
|
|
|
slider1:SetPos(5, 20)
|
|
|
|
slider1:SetWidth(480)
|
|
|
|
slider1:SetMinMax(0, 100)
|
|
|
|
slider1:SetValue(5)
|
|
|
|
slider1:SetText("Padding")
|
|
|
|
slider1:SetDecimals(0)
|
|
|
|
slider1.OnValueChanged = function(object2, value)
|
|
|
|
list1:SetPadding(value)
|
|
|
|
end
|
|
|
|
|
|
|
|
local text1 = loveframes.Create("text", panel1)
|
|
|
|
text1:SetPos(5, 5)
|
|
|
|
text1:SetFont(love.graphics.newFont(10))
|
|
|
|
text1:SetText(slider1:GetText())
|
|
|
|
|
|
|
|
local text2 = loveframes.Create("text", panel1)
|
|
|
|
text2:SetFont(love.graphics.newFont(10))
|
|
|
|
text2.Update = function(object, dt)
|
|
|
|
object:SetPos(slider1:GetWidth() - object:GetWidth(), 5)
|
|
|
|
object:SetText(slider1:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
local slider2 = loveframes.Create("slider", panel1)
|
|
|
|
slider2:SetPos(5, 60)
|
|
|
|
slider2:SetWidth(480)
|
|
|
|
slider2:SetMinMax(0, 100)
|
|
|
|
slider2:SetValue(5)
|
|
|
|
slider2:SetText("Spacing")
|
|
|
|
slider2:SetDecimals(0)
|
|
|
|
slider2.OnValueChanged = function(object2, value)
|
|
|
|
list1:SetSpacing(value)
|
|
|
|
end
|
|
|
|
|
|
|
|
local text3 = loveframes.Create("text", panel1)
|
|
|
|
text3:SetPos(5, 45)
|
|
|
|
text3:SetFont(love.graphics.newFont(10))
|
|
|
|
text3:SetText(slider2:GetText())
|
|
|
|
|
|
|
|
local text4 = loveframes.Create("text", panel1)
|
|
|
|
text4:SetFont(love.graphics.newFont(10))
|
|
|
|
text4.Update = function(object, dt)
|
|
|
|
object:SetPos(slider2:GetWidth() - object:GetWidth(), 45)
|
|
|
|
object:SetText(slider2:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
local button1 = loveframes.Create("button", panel1)
|
|
|
|
button1:SetPos(5, 85)
|
|
|
|
button1:SetSize(237, 25)
|
|
|
|
button1:SetText("Change List Type")
|
|
|
|
button1.OnClick = function(object2, x, y)
|
|
|
|
if list1:GetDisplayType() == "vertical" then
|
|
|
|
list1:SetDisplayType("horizontal")
|
|
|
|
else
|
|
|
|
list1:SetDisplayType("vertical")
|
|
|
|
end
|
|
|
|
list1:Clear()
|
|
|
|
for i=1, 100 do
|
|
|
|
local button = loveframes.Create("button")
|
|
|
|
button:SetText(i)
|
|
|
|
list1:AddItem(button)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
local button2 = loveframes.Create("button", panel1)
|
|
|
|
button2:SetPos(247, 85)
|
|
|
|
button2:SetSize(237, 25)
|
|
|
|
button2:SetText("Toggle Horizontal Stacking")
|
|
|
|
button2.OnClick = function(object2, x, y)
|
|
|
|
local enabled = list1:GetHorizontalStacking()
|
|
|
|
list1:EnableHorizontalStacking(not enabled)
|
|
|
|
list1:Clear()
|
|
|
|
for i=1, 100 do
|
|
|
|
local button = loveframes.Create("button")
|
|
|
|
button:SetSize(100, 25)
|
|
|
|
button:SetText(i)
|
|
|
|
list1:AddItem(button)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
button2.Update = function(object)
|
|
|
|
local displaytype = list1:GetDisplayType()
|
|
|
|
if displaytype ~= "vertical" then
|
|
|
|
object:SetEnabled(false)
|
|
|
|
object:SetClickable(false)
|
|
|
|
else
|
|
|
|
object:SetEnabled(true)
|
|
|
|
object:SetClickable(true)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
for i=1, 100 do
|
|
|
|
local button = loveframes.Create("button")
|
|
|
|
button:SetText(i)
|
|
|
|
list1:AddItem(button)
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(listexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- multichoice example
|
|
|
|
------------------------------------
|
|
|
|
local multichoiceexample = loveframes.Create("button")
|
|
|
|
multichoiceexample:SetText("Multichoice")
|
|
|
|
multichoiceexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Multichoice")
|
|
|
|
frame1:SetSize(210, 60)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local multichoice1 = loveframes.Create("multichoice", frame1)
|
|
|
|
multichoice1:SetPos(5, 30)
|
|
|
|
|
|
|
|
for i=1, 20 do
|
|
|
|
multichoice1:AddChoice(i)
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(multichoiceexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- numberbox example
|
|
|
|
------------------------------------
|
|
|
|
local numberboxexample = loveframes.Create("button")
|
|
|
|
numberboxexample:SetText("Numberbox")
|
|
|
|
numberboxexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Numberbox")
|
|
|
|
frame1:SetSize(210, 60)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local numberbox1 = loveframes.Create("numberbox", frame1)
|
|
|
|
numberbox1:SetPos(5, 30)
|
|
|
|
numberbox1:SetSize(200, 25)
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(numberboxexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- panel example
|
|
|
|
------------------------------------
|
|
|
|
local panelexample = loveframes.Create("button")
|
|
|
|
panelexample:SetText("Panel")
|
|
|
|
panelexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Panel")
|
|
|
|
frame1:SetSize(210, 85)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local panel1 = loveframes.Create("panel", frame1)
|
|
|
|
panel1:SetPos(5, 30)
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(panelexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- progressbar example
|
|
|
|
------------------------------------
|
|
|
|
local progressbarexample = loveframes.Create("button")
|
|
|
|
progressbarexample:SetText("Progress Bar")
|
|
|
|
progressbarexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Progress Bar")
|
|
|
|
frame1:SetSize(500, 160)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local progressbar1 = loveframes.Create("progressbar", frame1)
|
|
|
|
progressbar1:SetPos(5, 30)
|
|
|
|
progressbar1:SetWidth(490)
|
2013-02-17 18:18:25 +00:00
|
|
|
progressbar1:SetLerpRate(10)
|
2013-02-11 21:15:40 +00:00
|
|
|
|
|
|
|
local button1 = loveframes.Create("button", frame1)
|
|
|
|
button1:SetPos(5, 60)
|
|
|
|
button1:SetWidth(490)
|
|
|
|
button1:SetText("Change bar value")
|
|
|
|
button1.OnClick = function(object2, x, y)
|
|
|
|
progressbar1:SetValue(math.random(progressbar1:GetMin(), progressbar1:GetMax()))
|
|
|
|
end
|
|
|
|
|
|
|
|
local button2 = loveframes.Create("button", frame1)
|
|
|
|
button2:SetPos(5, 90)
|
|
|
|
button2:SetWidth(490)
|
|
|
|
button2:SetText("Toggle bar lerp")
|
|
|
|
button2.OnClick = function(object2, x, y)
|
|
|
|
if progressbar1:GetLerp() == true then
|
|
|
|
progressbar1:SetLerp(false)
|
|
|
|
else
|
|
|
|
progressbar1:SetLerp(true)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
local slider1 = loveframes.Create("slider", frame1)
|
|
|
|
slider1:SetPos(5, 135)
|
|
|
|
slider1:SetWidth(490)
|
|
|
|
slider1:SetText("Progressbar lerp rate")
|
|
|
|
slider1:SetMinMax(0, 50)
|
|
|
|
slider1:SetDecimals(0)
|
2013-02-17 18:18:25 +00:00
|
|
|
slider1:SetValue(10)
|
2013-02-11 21:15:40 +00:00
|
|
|
slider1.OnValueChanged = function(object2, value)
|
|
|
|
progressbar1:SetLerpRate(value)
|
|
|
|
end
|
|
|
|
|
|
|
|
local text1 = loveframes.Create("text", frame1)
|
|
|
|
text1:SetPos(5, 120)
|
|
|
|
text1:SetText("Lerp Rate")
|
|
|
|
text1:SetFont(love.graphics.newFont(10))
|
|
|
|
|
|
|
|
local text2 = loveframes.Create("text", frame1)
|
|
|
|
text2:SetFont(love.graphics.newFont(10))
|
|
|
|
text2.Update = function(object, dt)
|
|
|
|
object:SetPos(slider1:GetWidth() - object:GetWidth(), 120)
|
|
|
|
object:SetText(slider1:GetValue())
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(progressbarexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- slider example
|
|
|
|
------------------------------------
|
|
|
|
local sliderexample = loveframes.Create("button")
|
|
|
|
sliderexample:SetText("Slider")
|
|
|
|
sliderexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Slider")
|
|
|
|
frame1:SetSize(300, 275)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local slider1 = loveframes.Create("slider", frame1)
|
|
|
|
slider1:SetPos(5, 30)
|
|
|
|
slider1:SetWidth(290)
|
|
|
|
slider1:SetMinMax(0, 100)
|
|
|
|
|
|
|
|
local slider2 = loveframes.Create("slider", frame1)
|
|
|
|
slider2:SetPos(5, 60)
|
|
|
|
slider2:SetHeight(200)
|
|
|
|
slider2:SetMinMax(0, 100)
|
|
|
|
slider2:SetButtonSize(20, 10)
|
|
|
|
slider2:SetSlideType("vertical")
|
|
|
|
slider2.Update = function(object, dt)
|
|
|
|
object:CenterX()
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(sliderexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- tabs example
|
|
|
|
------------------------------------
|
|
|
|
local tabsexample = loveframes.Create("button")
|
|
|
|
tabsexample:SetText("Tabs")
|
|
|
|
tabsexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Tabs")
|
|
|
|
frame1:SetSize(500, 300)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local tabs1 = loveframes.Create("tabs", frame1)
|
|
|
|
tabs1:SetPos(5, 30)
|
|
|
|
tabs1:SetSize(490, 265)
|
|
|
|
|
|
|
|
local images = {"accept.png", "add.png", "application.png", "building.png", "bin.png", "database.png", "box.png", "brick.png"}
|
|
|
|
|
|
|
|
for i=1, 20 do
|
|
|
|
local image = "resources/images/" .. images[math.random(1, #images)]
|
|
|
|
local panel1 = loveframes.Create("panel")
|
|
|
|
panel1.Draw = function()
|
|
|
|
end
|
|
|
|
local text1 = loveframes.Create("text", panel1)
|
|
|
|
text1:SetText("Tab " ..i)
|
|
|
|
text1:SetAlwaysUpdate(true)
|
|
|
|
text1.Update = function(object, dt)
|
|
|
|
object:Center()
|
|
|
|
end
|
|
|
|
tabs1:AddTab("Tab " ..i, panel1, "Tab " ..i, image)
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(tabsexample)
|
|
|
|
|
|
|
|
------------------------------------
|
|
|
|
-- text example
|
|
|
|
------------------------------------
|
|
|
|
local textexample = loveframes.Create("button")
|
|
|
|
textexample:SetText("Text")
|
|
|
|
textexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Text")
|
|
|
|
frame1:SetSize(500, 330)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local list1 = loveframes.Create("list", frame1)
|
|
|
|
list1:SetPos(5, 30)
|
|
|
|
list1:SetSize(490, 265)
|
|
|
|
list1:SetPadding(5)
|
|
|
|
list1:SetSpacing(5)
|
|
|
|
|
|
|
|
local text1 = loveframes.Create("text")
|
|
|
|
text1:SetText(loremipsum)
|
|
|
|
text1:SetShadowColor(200, 200, 200, 255)
|
|
|
|
list1:AddItem(text1)
|
|
|
|
|
|
|
|
local shadowbutton = loveframes.Create("button", frame1)
|
|
|
|
shadowbutton:SetSize(490, 25)
|
|
|
|
shadowbutton:SetPos(5, 300)
|
|
|
|
shadowbutton:SetText("Toggle Text Shadow")
|
|
|
|
shadowbutton.OnClick = function()
|
|
|
|
text1:SetShadow(not text1:GetShadow())
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(textexample)
|
|
|
|
|
|
|
|
------------------------------------
|
2013-02-17 18:18:25 +00:00
|
|
|
-- textinput example
|
2013-02-11 21:15:40 +00:00
|
|
|
------------------------------------
|
|
|
|
local textinputexample = loveframes.Create("button")
|
|
|
|
textinputexample:SetText("Text Input")
|
|
|
|
textinputexample.OnClick = function(object1, x, y)
|
|
|
|
|
|
|
|
local frame1 = loveframes.Create("frame")
|
|
|
|
frame1:SetName("Text Input")
|
|
|
|
frame1:SetSize(500, 90)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
|
|
|
|
local textinput1 = loveframes.Create("textinput", frame1)
|
|
|
|
textinput1:SetPos(5, 30)
|
|
|
|
textinput1:SetWidth(490)
|
|
|
|
textinput1.OnEnter = function(object)
|
|
|
|
if not textinput1.multiline then
|
|
|
|
object:Clear()
|
|
|
|
end
|
|
|
|
end
|
|
|
|
textinput1:SetFont(love.graphics.newFont(12))
|
|
|
|
|
|
|
|
local togglebutton = loveframes.Create("button", frame1)
|
|
|
|
togglebutton:SetPos(5, 60)
|
|
|
|
togglebutton:SetWidth(490)
|
|
|
|
togglebutton:SetText("Toggle Multiline")
|
|
|
|
togglebutton.OnClick = function(object)
|
|
|
|
if textinput1.multiline then
|
|
|
|
frame1:SetHeight(90)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
togglebutton:SetPos(5, 60)
|
|
|
|
textinput1:SetMultiline(false)
|
|
|
|
textinput1:SetHeight(25)
|
|
|
|
textinput1:SetText("")
|
|
|
|
else
|
|
|
|
frame1:SetHeight(365)
|
|
|
|
frame1:CenterWithinArea(unpack(centerarea))
|
|
|
|
togglebutton:SetPos(5, 335)
|
|
|
|
textinput1:SetMultiline(true)
|
|
|
|
textinput1:SetHeight(300)
|
|
|
|
textinput1:SetText("")
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
exampleslist:AddItem(textinputexample)
|
|
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
--[[---------------------------------------------------------
|
|
|
|
- func: SkinSelector()
|
|
|
|
- desc: opens a skin selector menu
|
|
|
|
--]]---------------------------------------------------------
|
|
|
|
function loveframes.debug.SkinSelector()
|
|
|
|
|
|
|
|
local skins = loveframes.skins.available
|
|
|
|
|
|
|
|
local frame = loveframes.Create("frame")
|
|
|
|
frame:SetName("Skin Selector")
|
|
|
|
frame:SetSize(200, 60)
|
|
|
|
frame:SetPos(5, 255)
|
|
|
|
|
|
|
|
local skinslist = loveframes.Create("multichoice", frame)
|
|
|
|
skinslist:SetPos(5, 30)
|
|
|
|
skinslist:SetWidth(190)
|
|
|
|
skinslist:SetChoice("Choose a skin")
|
|
|
|
skinslist.OnChoiceSelected = function(object, choice)
|
|
|
|
loveframes.util.SetActiveSkin(choice)
|
|
|
|
end
|
|
|
|
|
|
|
|
for k, v in pairs(skins) do
|
|
|
|
skinslist:AddChoice(v.name)
|
|
|
|
end
|
|
|
|
|
2013-02-17 18:18:25 +00:00
|
|
|
skinslist:Sort()
|
|
|
|
|
2012-05-06 00:24:42 +00:00
|
|
|
end
|