--[[
	NekeOS 1.0v
	Creado por NEKERAFA el vie 17 de feb de 2012, 10:38:02 (CEST)
	Licenciado por Creative Commons Reconocimiento-NoComercial-CompartirIgual 3.0 España, 2011 NEKERAFA (nekerafa [at] gmail [dot] com)
	http://creativecommons.org/licenses/by-nc-sa/3.0/es/legalcod...
 
	#	script.lua (Inicio y carga de NekeOS)
	#	Aquí se incia NekeOS y se carga, aparte de que si hay algún error inicia la ventana de recuperación.
]]--
 
controls.homepopup(0)
os.cpu(333)
 
-- ## Variables ##
	pvar = 0
	ptotal = 9
	value = 0
	logo = image.load("system/boot/icon.png"); logo:center()
	users = files.listdirs(string.sub(files.cdir(), 1, 4).."/NEKEOS/users")
	ptotal = ptotal + #users
 
function boot()
	-- ** Idioma de NekeOS **
	confboot = ini.load("system/boot/setting.ini")
	dofile("system/media/languages/"..confboot:read("language", "default")..".lang")
 
	-- ** Inicio del programa **
	for alpha = 0, 255, 1.5 do
		draw.gradrect(0, 0, 480, 272, color.new(255, 255, 255, alpha), color.new(255, 255, 255, alpha), color.new(200, 200, 200, alpha), color.new(200, 200, 200, alpha))
		screen.flip()
	end
 
	for alpha = 0, 255, 10 do
		draw.gradrect(0, 0, 480, 272, color.new(255, 255, 255), color.new(255, 255, 255) , color.new(200, 200, 200), color.new(200, 200, 200))
		logo:blend(240, 136+20-math.floor(alpha*20/255), alpha)
		screen.flip()
	end
 
	-- ** Carga del programa **
	draw.gradrect(0, 0, 480, 272, color.new(255, 255, 255), color.new(255, 255, 255) , color.new(200, 200, 200), color.new(200, 200, 200))
	logo:blit(240, 136)
	draw.gradrect(140, 202, 200, 14, color.new(220, 220, 220), color.new(220, 220, 220), color.new(255, 255, 255), color.new(255, 255, 255))
	screen.print(240, 204, loading, 0.6, color.new(0, 0, 0), color.new(0,0,0,100), "center")
	draw.line(140, 201, 339, 201, color.new(0,0,0, 200)); draw.line(139, 202, 139, 215, color.new(0,0,0, 200)); draw.line(140, 216, 339, 216, color.new(0,0,0, 200)); draw.line(340, 202, 340, 215, color.new(0,0,0, 200))
	screen.flip()
	dofile("loading.lua")
 
	-- ** Lanzando el login **
	for alpha = 255, 0, -10 do
		draw.gradrect(0, 0, 480, 272, color.new(255, 255, 255), color.new(255, 255, 255), color.new(200, 200, 200), color.new(200, 200, 200))
		logo:blend(240, 136+20-math.floor(alpha*20/255), alpha)
		screen.flip()
	end
 
	-- ** Limpiando **
	logo:free(); logo = nil; value = nil; pvar = nil; ptotal = nil; users = nil; x0 = nil
	collectgarbage()
	dofile("login.lua")
end
 
-- ##  Con esta función mostraremos un pantallazo rojo si hay errores en el sistema ## --
function showerr()
	function loadcallback() end
	screen.clip()
	os.autofps(30)
	-- ** Cargamos algunas cosillas **
	pos = string.find(err, ":"); pos1 = string.find(err, ":", pos+1)
	wave = image.load("system/boot/wave.png")
	x0 = 480; x1 = -480
	msg = errorfile.." "..string.sub(err, 1, (pos1 or pos)-1).."\nError: "..string.sub(err, (pos1 or pos)+2)..".\n"..errorcontrols
	errlog = io.open("system/err.log", "a+")
	errlog:write(os.date("%I:%M:%S").." "..os.date("%p")..": "..err.."\n")
	errlog:close(); errlog = nil
 
	-- ** Mostramos el fondo de error **
	for colours = 255, 0, -3 do
		draw.gradrect(0, 0, 480, 272, color.new(255, math.min(colours*200/255+200, 255), colours), color.new(255, math.min(colours*200/255+200, 255), colours), color.new((255-colours)*55/255+200, colours*200/255, colours*200/255), color.new((255-colours)*55/255+200, colours*200/255, colours*200/255))
		screen.flip()
	end
 
	-- ** Bucle infinito, mostramos el mensaje de error
	while true do
		controls.read()
		draw.gradrect(0, 0, 480, 272, color.new(255, 200, 0), color.new(255, 200, 0), color.new(255, 0, 0), color.new(255, 0, 0))
		image.fxtint(x0, 0, wave, color.new(255, 0, 0, 60)); image.fxtint(x0-480, 0, wave, color.new(255, 0, 0, 60))
		image.fxtint(x1, 0, wave, color.new(255, 0, 0, 100)); image.fxtint(x1+480, 0, wave, color.new(255, 0, 0, 100))
		draw.fillrect(0, 0, 480, 20, color.new(255, 255, 255, 128))
		screen.print(3, 7, errortitle, 1, color.new(255, 10, 10), color.new(0, 0, 0, 60))
		screen.print(478, 5, batt.percent().."%   "..os.date("%I:%M").." "..os.date("%p"), 0.9, color.new(255,255,255), color.new(0,0,0, 60), "right")
		draw.line(0, 20, 480, 20, color.new(0, 0, 0, 128))
		draw.fillrect(30, 21, 420, 230, color.new(255, 255, 255, 80))
		screen.print(40, 31, msg, 0.7, color.new(255, 255, 255), color.new(0,0,0,60), "full", 400)
		screen.flip()
		if controls.start() then os.quit() elseif controls.select() then os.runeboot(files.cdir().."/EBOOT.PBP") end
		x0 = x0-2; if x0 < 0 then x0 = 480 end
		x1 = x1+1; if x1 > 0 then x1 = -480 end
		collectgarbage("collect")
	end
end
 
-- ## Función para mostrar la barra de progreso ##
function loadcallback()
	draw.gradrect(0, 0, 480, 272, color.new(255, 255, 255), color.new(255, 255, 255) , color.new(200, 200, 200), color.new(200, 200, 200))
	logo:blit(240, 136)
	draw.gradrect(140, 202, 200, 14, color.new(220, 220, 220), color.new(220, 220, 220), color.new(255, 255, 255), color.new(255, 255, 255))
	if math.floor(value) == 0 then screen.print(240, 204, loading, 0.6, color.new(0, 0, 0), color.new(0,0,0,100), "center")
	elseif math.floor(value) == 1 then screen.print(240, 204, loading..".", 0.6, color.new(0, 0, 0), color.new(0,0,0,100), "center")
	elseif math.floor(value) == 2 then screen.print(240, 204, loading.."..", 0.6, color.new(0, 0, 0), color.new(0,0,0,100), "center")
	elseif math.floor(value) == 3 then screen.print(240, 204, loading.."...", 0.6, color.new(0, 0, 0), color.new(0,0,0,100), "center") end
	screen.clip(140, 202, math.floor(pvar*200/ptotal), 14)
	draw.gradrect(140, 202, 200, 14, color.new(128, 128, 128), color.new(128, 128, 128) , color.new(80, 80, 80), color.new(80, 80, 80))
	if math.floor(value) == 0 then screen.print(240, 204, loading, 0.6, color.new(255, 255, 255), color.new(255, 255, 255, 100), "center")
	elseif math.floor(value) == 1 then screen.print(240, 204, loading..".", 0.6, color.new(255, 255, 255), color.new(255, 255, 255, 100), "center")
	elseif math.floor(value) == 2 then screen.print(240, 204, loading.."..", 0.6, color.new(255, 255, 255), color.new(255, 255, 255 ,100), "center")
	elseif math.floor(value) == 3 then screen.print(240, 204, loading.."...", 0.6, color.new(255, 255, 255), color.new(255, 255, 255 ,100), "center") end
	screen.clip()
	draw.line(140, 201, 340, 201, color.new(0,0,0, 200)); draw.line(139, 202, 139, 216, color.new(0,0,0, 200)); draw.line(140, 216, 340, 216, color.new(0,0,0, 200)); draw.line(340, 202, 340, 216, color.new(0,0,0, 200))
	screen.flip()
	pvar = pvar+1
	value = value+0.3; if math.floor(value) == 4 then value=0 end
end
 
-- ** Llamamos a boot() **
status, err = pcall(boot)
if not status then pcall(showerr) end