draw_data = function(data)
	-- assume data is in middle column, bottom half
	local left, top, panel_width, panel_height = panel_bounds(2, 2)
	App.color{r=0.5,g=0.5,b=0.5}
	love.graphics.rectangle('line', left, top, panel_width, panel_height, 5,5)
	local x = Margin + panel_width + Margin
	local y = Margin + panel_height + Margin
	y = draw_title(Data_title_text, left, top, panel_width)
	x = x + 20
	for i,d in ipairs(data) do
		if i == data.p then
			App.color{r=0.7,g=0.7,b=0.7}
			love.graphics.rectangle('fill', x,y, 60, 30, 2,2)
		else
			App.color{r=0.5,g=0.5,b=0.5}
			love.graphics.rectangle('line', x,y, 60, 30, 2,2)
		end
		App.color{r=0,g=0,b=0}
		love.graphics.print(d, x+2,y)
		x = x+80
		if i%5 == 0 then
			y = y + 40
			x = Margin + panel_width + Margin + 20
		end
	end
end