cgexample

local map = {"-++-",
             "+--+",
             "+--+",
             "-++-"}

local function makeSprite(x, y, name, type)
    local typ = type
    local xsprite = { x ,x+1, x }
    local ysprite = { y ,y+1,y+1}
    local tsprite = {typ,typ,typ}
    local sprite = cge.createSprite(xsprite, ysprite, tsprite, name)
    cge.addSprite(sprite)
end

local interval = 0.5

local on = true
local timer = os.startTimer(0)

local cmap = cge.constructMap(map)
cge.setMap(cmap)
print(cmap[1])
makeSprite(2, 2, "sprite", "#")
makeSprite(2, 3, "sprite2", "@")

while on do
    local event, p1, p2 = os.pullEvent()
    if event == "timer" and p1 == timer then
        timer = os.startTimer(interval)
        term.clear()
        term.setCursorPos(1,1)
        cge.draw(4,2)
    elseif event == "key" then
        local key = p1
        if key == 1 then
            on = false
        end

    end
end