-- save 4 cell widths for the legend
lg = 4

  side = min(W/(lw+2+lg), H/(lh+2))

  side = min(W/(lw+2), H/(lh+2))

  g.print(curr_level, left,top)
  draw_legend()

  g.print(curr_level, left-side,top)

      draw_sprite(cell, left+(lg+c-1)*side, top+(r-1)*side)

      draw_sprite(cell, left+(c-1)*side, top+(r-1)*side)

function draw_legend()
  draw_sprite(7, left, top+side)
  draw_sprite(4, left+side*2, top+side)
  draw_sprite(0, left, top+side*3)
  draw_sprite(1, left+side*2, top+side*3)
  draw_sprite(2, left, top+side*5)
  draw_sprite(3, left+side*2, top+side*5)
  draw_sprite(6, left+side, top+side*7)
  draw_sprite(5, left+side, top+side*9)
--for i=0,6 do draw_sprite(i, 100, 100*(i+2)) end
end

    g.print('success!', left+2*side, top)

    g.print('success!', left-2*side, top+side)