basic/examples/window.basic

print("hi\n")

initWindow(300, 400)

function big(x, y)
    c = color(20, 0, 31)
    for ax = 0 to 2
        for ay = 0 to 2
            setPixel(x + ax, y + ay, c)
        end
    end
end
x = 0
y = 0
while !shouldClose()
    nextFrame()
    clearWindow(color(0, 18, 15))

    c = color(20, 0, 31)
    if isButtonDown(BT_LEFT)
        x = x - 1
    end
    if isButtonDown(BT_RIGHT)
        x = x + 1
    end
    if isButtonDown(BT_UP)
        y = y - 1
    end
    if isButtonDown(BT_DOWN)
        y = y + 1
    end

    white = color(31, 31, 31)
    render(0, 0, white,  "Start: ", getButtonDownTime(BT_START))
    render(0, 8, white,  "Select: ", getButtonDownTime(BT_SELECT))
    render(0, 16, white, "A: ", getButtonDownTime(BT_A))
    render(0, 24, white, "B: ", getButtonDownTime(BT_B))
    render(0, 32, white, "X: ", getButtonDownTime(BT_X))
    render(0, 40, white, "Y: ", getButtonDownTime(BT_Y))
    render(0, 48, white, "L: ", getButtonDownTime(BT_L))
    render(0, 56, white, "R: ", getButtonDownTime(BT_R))
    render(0, 64, white, "äüößÄÜÖ")

    if x < 0
        x = 0
    end
    if x > 237
        x = 237
    end
    if y < 0
        y = 0
    end
    if y > 157
        y = 157
    end

    big(x, y)

    #render(0, 0, c, "ABCDEFGHIJKLMNOPQRSTUVWXYZ")
    #render(0, 8, c, "abcdefghijklmnopqrstuvwxyz")
    #render(0, 16, c, "0123456789()[]{}<>/\\?")
    #render(0, 24, c, "\"$%^&*-_=+#~.,;:|")
end

printLine("stop")