Pop.Box/demo/main.lua

local pop = require "pop"

local lg = love.graphics

local visualTestsShown = false
local testsRun = false
local debugDrawEnabled = false

function love.load()
    pop.text(nil, "Press \"s\" to show objects for visual testing/demo.\nPress \"t\" to run tests.\nPress \"d\" to toggle debug draw."):move(2, 2)
    --TODO correct the fact that the size is wrong here! (height doesn't take into account \n)
    --NOTE width? Is width calculated correctly when \n's exist? TEST THIS (also test tabs)
    pop.text(nil, "This is a test\ncollection of strings to see how width is determined.\nLooks like it takes width of widest line!"):move(30, 120)
    pop.element():align("right", "bottom"):setSize(25, 25):move(-5, -5)
end

function love.update(dt)
    pop.update(dt)
end

function love.draw()
    pop.draw()

    if debugDrawEnabled then
        pop.debugDraw()
    end
end

function love.textinput(text)
    pop.textinput(text)
end

function love.mousepressed(button, x, y)
    pop.mousepressed(button, x, y)
end

function love.mousereleased(button, x, y)
    pop.mousereleased(button, x, y)
end

function love.keypressed(key)
    if key == "escape" then
        love.event.quit()
    else
        if (key == "s") and (not visualTestsShown) then
            -- old visual tests
            local align = pop.box():align("center", "center"):setSize(200, 200)
            pop.box(align):align("left", "top"):setSize(75, 10):setColor(255, 0, 255, 255)
            pop.box(align):align("center", "top"):setColor(100, 100, 100)
            pop.box(align, {0, 255, 0, 255}):setSize(20, 5):align("right", "top")
            pop.box(align):align("left", "center"):setColor(0, 0, 255)
            pop.box(align):align("center", "center"):setSize(90, 90):setColor(255, 255, 255)
            pop.box(align):align("right", "center"):setColor(255, 0, 0)
            pop.box(align):align("left", "bottom"):setColor(0, 255, 0):setSize(nil, 40)
            pop.box(align):align("center", "bottom"):setColor(255, 255, 0)
            pop.box(align):align("right", "bottom"):setColor(0, 255, 255):setSize(40, 40)
            --pop.box(nil, {255, 0, 0, 255}):align("left", "top"):setSize(50, 50) --TODO adjust z-height of elements
            pop.text(nil, "Hello World!"):align("center"):setText("Hey, I've been modified!")--:move(0, 18)
            pop.text(nil, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890!@#$%^&*()-=_+[]{}\\|:;\"',./<>?`~"):align("center", "bottom")

            visualTestsShown = true
        elseif (key == "t") and (not testsRun) then
            require "test"
        elseif key == "d" then
            debugDrawEnabled = not debugDrawEnabled
        end

        pop.keypressed(key)
    end
end

function love.keyreleased(key)
    pop.keyreleased(key)
end