Pop.Box/main.moon

--- A demo program for Pop.Box.
--- @copyright Paul Liverman III (2016)
--- @license The MIT License (MIT)

import graphics from love

pop = require ""
debug = false

love.load = ->
    old_method = ->
        pop.text("Hello World!")\align "center", "center"
        testWindow = pop.window({windowBackground: {200, 200, 200}, closeable: true, maximizeable: true, minimizeable: true}, "Testing Window")\move(20, 20)\setSize(200, 100)\align "right", "top"
        print testWindow.window_area

        pop.window({maximizeable: true}, "Test Window #2")\align "center", "bottom"

        -- alignment testing
        centerBox = pop.box({w: 200, h: 200}, {255, 255, 0, 120})\align "center", "center"
        pop.box(centerBox, {w: 10, h: 20})\align "left", "top"
        pop.box(centerBox, {w: 30, h: 30})\align "center", "top"
        pop.box(centerBox, {w: 5, h: 40})\align "left", "center"
        pop.box(centerBox, {w: 50, h: 50})\align "right", "center"
        pop.box(centerBox)\align("left", "bottom")\setSize 5, 5
        pop.box(centerBox, {w: 25, h: 10})\align "center", "bottom"
        pop.text(centerBox, "Align me!")\align "right", "top"
        pop.window(centerBox)\align "right", "bottom"

        centerBox\setPadding 5

        pop.box(centerBox, {w: 10, h: 20, background: {0, 0, 255, 100}})\align "left", "top"
        pop.box(centerBox, {w: 30, h: 30, background: {0, 0, 255, 100}})\align "center", "top"
        pop.box(centerBox, {w: 5, h: 40, background: {0, 0, 255, 100}})\align "left", "center"
        pop.box(centerBox, {w: 50, h: 50, background: {0, 0, 255, 100}})\align "right", "center"
        pop.text(centerBox, {color: {0, 0, 255, 100}}, "Text!")\align("left", "bottom")--\setSize 5, 5
        pop.box(centerBox, {w: 25, h: 10, background: {0, 0, 255, 100}})\align "center", "bottom"
        pop.text(centerBox, {color: {0, 0, 255, 100}}, "Align me!")\align "right", "top"
        pop.window(centerBox, {titleColor: {0, 0, 0, 150}, titleBackground: {0, 0, 255, 100}, windowBackground: {200, 200, 255, 100}})\align "right", "bottom"

    new_method = ->
        partsGrid = pop.dynamicGrid!
        pop.window({w: graphics.getWidth!/2, h: graphics.getHeight!, titleBar: false})\add({
            pop.box({h: 17}) -- temporary height
            pop.scrollbox()\add(
                partsGrid
            )
            pop.grid()\add({
                pop.button()
                pop.button()
                pop.button()
            })
        })

    --old_method!
    new_method!

love.update = (dt) ->
    pop.update dt

love.draw = ->
    pop.draw!
    pop.debugDraw! if debug

love.mousemoved = (x, y, dx, dy) ->
    pop.mousemoved x, y, dx, dy

love.mousepressed = (x, y, button) ->
    pop.mousepressed x, y, button

love.mousereleased = (x, y, button) ->
    pop.mousereleased x, y, button

love.wheelmoved = (x, y) ->
    pop.wheelmoved x, y

love.keypressed = (key) ->
    if key == "escape"
        love.event.quit!
    elseif key == "d"
        debug = not debug

love.keyreleased = (key) ->
    pop.keyreleased key

love.textinput = (text) ->
    pop.textinput text



-- NOTE TEMPORARY
--inspect = require "lib/inspect/inspect"
--print inspect pop



return --this is to prevent default returning of last statement