--Negro--
negro=Color.new(0,0,0)
 
--Imagen--
image=Image.load("./images/PSP.png")
 
--Variables--
nick=System.nickName()
CF=System.cfwVersion()
modelo=System.getModel(1)
modelo2=System.getModel(0)
mac=Adhoc.getMac()
cpu=System.getCpuSpeed()
bus=System.getBusSpeed()
memoria1=System.getTotalSize("ms0:/")
memoria2=System.getFreeSpace("ms0:/")
umd=UMD.checkDisk()
 
--Bucle
while true do
pad=Controls.read()
screen:clear()
 
--Escribimos--
screen:blit(0,0,image) 
screen:print(30, 90, "Hola: "..nick, negro)
screen:print(30, 110, "Modelo: "..modelo,negro)
screen:print(30, 120, "Modelo numerico: "..modelo2, negro)
screen:print(30, 130, "Tu CF es: "..CF, negro)
screen:print(30, 140, "Tu Mac es: "..mac, negro)
screen:print(30, 150, "Velocidad CPU: "..cpu, negro)
screen:print(30, 160, "Velocidad BUS: "..bus, negro)
screen:print(30, 170, "Memoria total de la memory stick: "..memoria1.." bytes",negro)
screen:print(30, 180, "Espacio libre: "..memoria2.." bytes", negro)
 
--Pulsaciones--
if pad:circle() then
dofile("./System/system2.lua")
end
 
--Terminamos--
screen.flip()
screen.waitVblankStart()
oldpad=pad
end

--Colores--
negro=Color.new(0,0,0)
 
--Imagenes--
image=Image.load("./images/Bateria.png")
 
--Variables--
nick=System.nickName()
bateria1=System.powerIsBatteryExist()
bateria2=System.powerIsBatteryCharging()
bateria3=System.powerGetBatteryLifePercent()
bateria4=System.powerGetBatteryLifeTime()
bateria5=System.powerIsLowBattery()
bateria6=System.powerGetBatteryTemp()
bateria7=System.powerGetBatteryVolt()
 
--Bucle--
while true do
pad = Controls.read()
screen:clear()
 
--Escribimos--
screen:blit(0,0,image) 
screen:print(30, 90, "Hola: "..nick, negro)
screen:print(30, 90, "Bateria conectada: "..bateria1, negro)
screen:print(30, 110, "Bateria cargando: "..bateria2, negro)
screen:print(30, 120, "Porcentaje de la bateria: "..bateria3.."%", negro)
screen:print(30, 130, "Tiempo restante: "..bateria4, negro)
screen:print(30, 140, "Bateria baja: "..bateria5, negro)
screen:print(30, 150, "Temperatura: "..bateria6.."º", negro)
screen:print(30, 160, "Voltaje de la bateria:"..bateria7, negro)
 
--Pulsaciones--
if pad:circle() then
dofile("./System/system2.lua")
end
 
--Terminamos--
screen.flip()
screen.waitVblankStart()
oldpad=pad
end