--- Menú de imagenes, usando tablas.
--- (copyleft) 2010 - psp.scenebeta.com
--- By: DeViaNTe
 
--- Menú simple usando imágenes a modo de "pantallas".
--- Número de opciones: Las que la RAM permita (este hm...).
 
-- Opcion por defecto, la primera.
menu_actual = 1;
 
-- Si menu_increment == 1, al presionar abajo, INCREMENTAREMOS en la tabla, y al presionar arriba DECREMENTAREMOS.
-- Si menu_increment == -1, al presionar arriba, INCREMENTAREMOS en la tabla, y al presionar abajo DECREMENTAREMOS.
-- (Sirve para elegir la dirección del menú, arriba o abajo)
menu_increment = 1;
 
-- Si menu_loop == 1, estando en la ultima opcion y avanzando una más, volverá a la inicial.
-- Si menu_loop == 0, estando en la ultima opcion y avanzando una más, se estancará en esa opción.
menu_loop = 0;
 
-- Rellenar aquí con vuestras rutas de las imágenes a utilizar para las distintas "opciones".
menu = { };                                               -- menú vacío
table.insert(menu,Image.load("ms0:/PSP/GAME/LuaPlayerHM7/menu.png")); -- Primera opción.
table.insert(menu,Image.load("ms0:/PSP/GAME/LuaPlayerHM7/tema1.png")); -- Segunda opción.
table.insert(menu,Image.load("ms0:/PSP/GAME/LuaPlayerHM7/tema2.png")); -- Tercera opción.
table.insert(menu,Image.load("ms0:/PSP/GAME/LuaPlayerHM7/tema3.png")); -- Cuarta opción.
 
acciones = { };												-- acciones para las opciones del menú
table.insert(acciones,function () dofile("script1.lua") end);	--primera opción
table.insert(acciones,function () dofile("script2.lua") end);	--segunda opción
table.insert(acciones,function () dofile("script3.lua") end);	--tercera opción
table.insert(acciones,function () dofile("script4.lua") end);	--cuarta opción
 
 
-- A partir de aquí no tocar nada, pues es el menú
--------------------------------------------------
pad = Controls.read();
oldpad = pad;
 while true do
	pad = Controls.read();
 
	-- manejar controles, hemos pulsado qué?
	if pad:down() and not oldpad:down() then
		menu_actual = menu_actual + menu_increment;	-- cambiar de opción.
		if menu_actual > table.maxn(menu) then if menu_loop > 0 then menu_actual = 1; else menu_actual = table.maxn(menu); end end
		if menu_actual < 1 then if menu_loop > 0 then menu_actual = table.maxn(menu); else menu_actual = 1; end end
	end
 
	if pad:up() and not oldpad:up() then
		menu_actual = menu_actual - menu_increment;	-- cambiar de opción.
		if menu_actual > table.maxn(menu) then if menu_loop > 0 then menu_actual = 1; else menu_actual = table.maxn(menu); end end
		if menu_actual < 1 then if menu_loop > 0 then menu_actual = table.maxn(menu); else menu_actual = 1; end end
	end
 
	-- opción cambiada. mostrar menú.
 
	screen:clear();
	screen:blit(0,0,menu[menu_actual]);
	screen.waitVblankStart();
	screen.flip();
 
	-- hemos entrado en la opción?
	if pad:cross() and not oldpad:cross() then
		acciones[menu_actual]();	-- ejecutar acción.
	end
 
	oldpad = pad;
 end