----------------------------------------
-- # Módulo Principal - Sandwich OS # --
-- #  Versión Actual: Sandwich OS I # --
--------- # (c) 2012 Zuggry # ----------
----------------------------------------
 
-- // Tabla que almacena datos varios //
initModule = {
	loading = image.load("Image/Loading.png"),
	text1 = "Bienvenido a Sandwich OS."
	text2 = "Pulsa R para crear un usuario."
	text3 = "Pulsa L para salir."
	splash = {
		splash1 = os.luadevsplash(),
		splash2 = image.load("Image/Desktop.png"),
	}
}
 
-- // Función de inicio Sandwich OS //
function startSandwichOS()
	initModule.splash.splash1();
	for i = 0,255,10 do
		initModule.splash.splash2:blend(0,0,i);
		screen.flip();
	end
	for i = 255,0,-10 do
	initModule.splash.splash2:blend(0,0,i);
	screen.flip();
	end
end

----------------------------------------
-- // Módulo principal Sandwich OS // --
----------------------------------------
 
--// Carga Librerías //
dofile("./DragonSLib/DragonSLib.lua")
dofile("RGSplashLibLite.lua")
 
--// Carga Imágenes //
installModule = image.load("./Image/InstallationModule.png")
 
--// Splash LuaDEV //
os.luadevsplash()
 
--// Módulo Instalación //
function installSandwichOS()
installModule:blit(0,0);
screen.print(10,70,"Bienvenido a la instalación de Sandwich OS")
screen.print(10,85,"Pulsa R para continuar o L para salir")
if controls.r() then
screen.print(10,100,"Cargando módulos de instalación...")
screen.print(10,115,"Creando módulo de usuario...")
end 
if controls.l() then
os.quit()
end
end
 
--// Bucle principal del programa //
 
while true do
controls.read()
installSandwichOS()
screen.flip()
end