Fondo = image.load("Imagenes/Fondo.png")
	puntero = {img=image.load("Imagenes/icono_puntero.png"),x=5,y=5,w=21,h=21}
	barra = image.load("Imagenes/barra.png")
	salir = {img=image.load("Imagenes/icono_salir.png"),x=455,y=1,w=16,h=16}
	interrogante = {img=image.load("Imagenes/icono_interrogante.png"),x=410,y=0,w=20,h=19}
	Panel_escribir = {img=image.load("Imagenes/Panel_escribir.png"),x=35,y=-2,w=110,h=28}
	icono_usuario = {img=image.load("Imagenes/icono_usuario.png"),x=5,y=1,w=25,h=25}
 
	function colision(obj1, obj2) 
	if obj1.x+obj1.w>obj2.x 
	and obj1.x<obj2.x+obj2.w 
	and obj1.y+obj1.h>obj2.y 
	and obj1.y<obj2.y+obj2.h then 
		return true 
	end
	return false 
	end
 
	texto=""
 
 
while true do
	controls.read()
	image.blit(0,0,Fondo)
	image.blit(160,-9,barra)
	salir.img:blit(salir.x,salir.y)
	interrogante.img:blit(interrogante.x,interrogante.y)
	Panel_escribir.img:blit(Panel_escribir.x,Panel_escribir.y)
	icono_usuario.img:blit(icono_usuario.x,icono_usuario.y)
	screen.print(170,6,os.date("%H:%M:%S"))
	screen.print(270,6,os.date("%d/%m/%Y"))
	screen.print(40,8,texto)
	puntero.img:blit(puntero.x,puntero.y)
 
 
	if controls.up() then
		puntero.y=puntero.y-1
	elseif controls.down() then
		puntero.y=puntero.y+1
	elseif controls.right() then
		puntero.x=puntero.x+1
	elseif controls.left() then
		puntero.x=puntero.x-1
	end
 
	puntero.x = math.min(math.max(0,puntero.x), 480-puntero.w) 
	puntero.y = math.min(math.max(0,puntero.y), 272-puntero.h)
 
	if colision(puntero, salir) and controls.press("cross")  then
	os.message("Saliendo...")
	os.quit()
	end
	if colision(puntero, interrogante) and controls.press("cross")  then
	os.message("Facilitador 3.0 / V0.1")
	end
	if colision(puntero, Panel_escribir) and controls.press("cross")  then
	texto=os.osk ("Nombre De User","",10,1,3)
	end
	screen.flip()
end