require "ui"

update = nil
protofont_surface = nil

function mini.init()
    surf.cls(0)
    update = any_update
    ui.filedialog.show(select_file);
end

function select_file(filename)
    if protofont_surface then surf.free(protofont_surface) end
    protofont_surface = surf.loadex(filename)
end

function mini.update()
    view.origin(0,0)
    for i=0,15 do
        draw.rectf(i*8, 0, 8, 8, i)
    end
    update()
end

function any_update()
    surf.cls(0)

    view.origin(4,4)
    draw.rrectf(0,0,136,132,3,15)
    if protofont_surface then
        local w,h = surf.size(protofont_surface)
        local x,y = (136-w)/2,(132-h)/2
        surf.source(protofont_surface)
        draw.surf(0,0,w,h,x,y,w,h)
        draw.text(tostring(w)..","..tostring(h), 10, 100, 3)
    end


    view.origin(4,140)
    draw.rrectf(0,0,136,68,3,15)
    view.origin(8,144)
    local x,y=0,0
    for c=32,127 do
        draw.rectf(x,y,7,9,12)
        draw.rect(x,y,7,9,0)
        draw.text(string.char(c),x+2,y+2,0)
        x=x+8
        if x>=128 then
            x=0
            y=y+10
        end
    end
    draw.text("ÁÄÉÍÓÚáéíóúÀÈÌÒÙàèìòùñÑçÇ", x, y+8, 12)

    view.origin(144,4)
    draw.rrectf(0,0,21,12,3,14)
    draw.text("BASE",3,2,12)

    draw.rrectf(22,0,45,12,3,15)
    draw.text("DIACRITICS",25,2,0)
    -- acute(Á), grave(À); diaeresis(Ä), circumflex(Â); cedilla(Ç), tilde(Ñ)

    draw.rrectf(68,0,49,12,3,15)
    draw.text("PRECOMPOSED",71,2,0)

    draw.rrectf(0,8,140,140,3,14)

end