--[[Código fuente de Nekeshell
Creado por NEKERAFA.
Este archivo solo lee el archivo de configuración y inicia la configuracion inicial (Lo que solo funciona ahora).
EMPECEMOS!!]]--
 
--Colores--
Blanco = Do.Color(255,255,255)--Color blanco xdd--
 
--Fuentes--
liberationsans = Font.load( "Sistema/Fuentes/LiberationSans(Normal).ttf" )
 
--Imagenes--
img1 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/screen1.png")
img2 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/screen2.png")
img3 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/screen3.png")
img4 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/screen4.png")
img5 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/imagenes.png")
img6 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/codigo.png")
img7 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/sonidos.png")
img8 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/configuracion.png")
img9 = Print.ImageLoad("Sisistema/Imagenes/configuracioninicial/reiniciando.png")
 
--Controles--
Boton = Ctrl.Read()
 
--Limpiamos pantalla y comenzamos a imprimir--
Print.ClearScreen()
Print.Image(0,0,img1)
if Boton:cross() then screen:fontPrint( liberationsans, 30,130, "Corecto", blanco )
Print.Image(0,0,img2)
Print.ClearScreen()
if Boton:circle() then 
	Sys.Exit()
	end
end
 
--Ahora la TV--
if Boton:cross() then--si pulso x en este nivel--
	Sys.MakeDir("ms0:/PSP/GAME/.../Nekeshellmoderation/Sistema/Documentos")--Creo una carpeta donde meto la configuracion--
	archivo = io.open("ms0:/PSP/GAME/.../Nekeshellmoderation/Sistema/Documentos/configuracion.lua","w")--Creo el archivo--
	archivo:write("\n,Tele=1")
	screen:fontPrint( liberationsans, 30,130, "Corecto", blanco )
	Print.Image(0,0,img4)
if Boton:down()--Si pulso abajo me sale la 3 imagen--
then Print.Image(0,0,img3) 
if Boton:cross() then--Y si pulso x...--
	Documentos = Sys.MakeDir("ms0:/PSP/GAME/.../Nekeshellmoderation/Sistema/Documentos")--Cero una carpeta donde meto la configuracion--
	archivo = io.open("ms0:/PSP/GAME/.../Nekeshellmoderation/Sistema/Documentos/configuracion.lua","w")--Creo el archivo--
	archivo:write("\n,Tele=0")
	screen:fontPrint( liberationsans, 30,130, "Corecto", blanco )
	Print.Image(0,0,img4)
if Boton:up()--Si pulso arriba me sale la 2 imagen--
then Print.Image(0,0,img2) 
if Boton:cross() then --Y si pulso x..--
	Documentos = Sys.MakeDir("ms0:/PSP/GAME/.../Nekeshellmoderation/Sistema/Documentos")--Cero una carpeta donde meto la configuracion--
	archivo = io.open("ms0:/PSP/GAME/.../Nekeshellmoderation/Sistema/Documentos/configuracion.lua","w")--Creo el archivo--
	archivo:write("\n,Tele=1")
	screen:fontPrint( liberationsans, 30,130, "Corecto", blanco )
	Print.Image(0,0,img4)
if Boton:circle() then
	Sys.Exit()
	Print.ClearScreen()
					end
				end
			end
		end
	end
end
 
--Info de la PSP--
screen:fontPrint( liberationsans, 80,101,"Version de la psp: "..System.cfwVersion(), blanco )
screen:fontPrint( liberationsans, 80,103, "Modelo de la psp: "..System.getModel(1), blanco )
screen:fontPrint( liberationsans, 80,105, "Hora de la psp: "..System.getTime(1).." : "..System.getTime(2).." : "..System.getTime(3).."\"  "System.getTime(5).., blanco )
if Boton:cross() or Boton:circle() then  
	Sys.Exit()
end
 
Print.FlipScreen()
Print.BufferScreen() 
 
while true do
screen.waitVblankStart()
end