---------_Colores_--------------------
 
blanco=color.new(255,255,255)   ---_así se crea un color , el color varia dependiendo de su valor.
negro=color.new(0,0,0)
verde=color.new(0,200,0)
 
carpeta=files.list("ms0:/")       ------_variable  que contiene una tabla, la tabla contiene una lista de los archivos de la ruta.
archivo=1                              
max=#carpeta       ------------------_para calcular el máximo contenido de la tabla.
cache="ms0:/"    ----------_variable que por el momento contiene la ruta ms0/, la usaremos para regresar.
 
x=10    -----------_variable que contiene el valor 20, modificar para cambiar la posición (X) del texto.
y=130    ---------_variable que contiene el valor 130, modificar para cambiar la posición (y) del texto.
tamano=1   -----_variable que contiene el valor 1, modificar para cambiar el tamaño de texto.
 
 
---------_función para imprimir el texto_-------------
 
function Print(x,y,archivo,tamano,color_carpeta_texto,color_carpeta_sombra,color_archivo_texto,color_archivo_sombra)
   if  archivo>0 and max>0 and archivo<=max then
        if carpeta[archivo].directory==true then    
          screen.print(x,y,files.nopath(carpeta[archivo].name),tamano,color_carpeta_texto,color_carpeta_sombra)
       else
           screen.print(x,y,files.nopath(carpeta[archivo].name),tamano,color_archivo_texto,color_archivo_sombra) 
        end     
    end
end
 
--------------------------------------
 
while true do   -------------_bucle infinito sirve para repetir el código, indispensable para hacer un programa._-----------
    controls.read()   --------_para poder usar los controles.   
 
--------_para mostrar la ruta en la que estamos_.---
 
 if max>0 then   
     screen.print(10,2,files.nofile(carpeta[archivo].name),0.5,blanco,blanco) 
 end  
 
---------_esto es lo que funcionara como un for_.---
 
Print(x,y-100,archivo-5,tamano,verde,blanco,blanco,blanco)
 
Print(x,y-80,archivo-4,tamano,verde,blanco,blanco,blanco)
 
Print(x,y-60,archivo-3,tamano,verde,blanco,blanco,blanco)
 
Print(x,y-40,archivo-2,tamano,verde,blanco,blanco,blanco)    
 
Print(x,y-20,archivo-1,tamano,verde,blanco,blanco,blanco)
 
Print(x,y,archivo,tamano,negro,verde,negro,blanco) 
 
Print(x,y+20,archivo+1,tamano,verde,blanco,blanco,blanco)  
 
Print(x,y+40,archivo+2,tamano,verde,blanco,blanco,blanco) 
 
Print(x,y+60,archivo+3,tamano,verde,blanco,blanco,blanco)   
 
Print(x,y+80,archivo+4,tamano,verde,blanco,blanco,blanco)
 
Print(x,y+100,archivo+5,tamano,verde,blanco,blanco,blanco)
 
------------------------------------------------------
 
---------_para navegar  por las carpetas y archivos_---------
 
 if controls.press("up") and archivo>1 then   ----_sentencia:"si pulsamos el botón up y archivo mayor a uno entonces"
     archivo=archivo-1    --------------------------_archivo menos uno.
end  -------------------------------------------------_fin de la sentencia.
 
if controls.press("down") and archivo<max then
    archivo=archivo+1  
end
 
---------------------------------------------
 
----------par ver imagenes reproducir musica, ect_-----------------
 
if controls.press("cross") and max>0 then  ---------------_sentencia:"si pulsamos el boton equis y max es mayor a cero entonces"
     if files.ext(carpeta[archivo].name)=="png" then   ----_sentencia:"si la extencion del archivo es igual a png entonces"
         imagen=image.load(carpeta[archivo].name)   ----_cargamos la imagen.            
         image.blit(imagen,0,0)    ----------------------------_para que se pueda mostrar en pantalla,la ponemos en la posicion 0 y 0.            
         screen.flip()     ----------------------------------------_para mostrar todo en pantalla.     
         controls.waitforkey()   ---------------------------------_esperamos hasta pulsar un boton para dejar de ver la imagen.    
         imagen=nil   -------------------------------------------_para eliminar la imagen, para que no ocupe memoria.    
         collectgarbage()   --------------------------------------_limpiamos la memoria.          
     end     -----------------------------------------------------_fin de la sentencia:"si la extencion del archivo es igual a png entonces"
-------------------------------------------------------------
     if files.ext(carpeta[archivo].name)=="jpg" then        
          imagen=image.load(carpeta[archivo].name)     
          image.blit(imagen,0,0)            
          screen.flip()                 
          controls.waitforkey()           
          imagen=nil                
          collectgarbage()       
      end            
 
--------------------------------------------
 
      if files.ext(carpeta[archivo].name)=="mp3" then   ---_sentencia:"si la extencion del archivo es igual a mp3 entonces"
         sonido=sound.load(carpeta[archivo].name)    ------_cargamos el sonido.   
         sound.play(sonido)       ------------------------------_reproduce el sonido.
     end            ----------------------------------------------_fin de la sentencia:"si la extencion del archivo es igual a mp3 entonces"
 
---------------------------------------------------------
 
      ----_para entrar a una carpeta_----
 
      if carpeta[archivo].directory then     ----------------------_sentencia:"si el archivo es una carpeta entonces"
           cache=carpeta[archivo].name  -------------------------_guardamos la ruta para regresar.
           carpeta=files.list(carpeta[archivo].name)  -----------_listamos la carpeta en una variable.
           archivo=1       
           max=#carpeta      -------------------------------------_checamos el numero de contenido de la carpeta.
       end   ------------------------------------------------------_fin de la sentencia if carpeta[archivo].directory then.
end   ------------------------------------------------------------_fin de la sentencia if controls.press("cross") and max>0 then.
 
----------------_para regresa_r------------------------------------------
 
if controls.press("triangle") then   -----------------------------_sentencia:"si pulsamos el boton triangulo entonces"
        if max>0 then  -------------------------------------------_si max es mayor a cero entonces.
           carpeta=files.list(files.nofile(files.nofile(carpeta[archivo].name))) ---_regresamos ala carpeta anterior.
        else   ------------------------------------------------------ y si max no es mayor a cero.
           carpeta=files.list(files.nofile(cache))  -----------------_regresamos ala carpeta anterior utilizando la ruta guardada en la variable cache.
        end   ------------------------------------------------------_fin de la sentencia"si max es mayor a cero entonces".
        archivo=1
        max=#carpeta  
end   --------------------------------------------------------------_fin de la sentencia:"si pulsamos el botón triangulo entonces"
 
screen.flip()  -----------------------------------------------------_mostramos todo en pantalla, sino pusiéramos esto no se vería nada.
 
end     -----------------------------------------------------------_fin del bucle while true do
 
 

Print(x,y-100,archivo-5,tamano-0.5,verde,blanco,blanco,blanco)
 
Print(x,y-80,archivo-4,tamano-0.4,verde,blanco,blanco,blanco)
 
Print(x,y-60,archivo-3,tamano-0.3,verde,blanco,blanco,blanco)
 
Print(x,y-40,archivo-2,tamano-0.2,verde,blanco,blanco,blanco)    
 
Print(x,y-20,archivo-1,tamano-0.1,verde,blanco,blanco,blanco)
 
Print(x,y,archivo,tamano,negro,verde,negro,blanco) 
 
Print(x,y+20,archivo+1,tamano-0.1,verde,blanco,blanco,blanco)  
 
Print(x,y+40,archivo+2,tamano-0.2,verde,blanco,blanco,blanco) 
 
Print(x,y+60,archivo+3,tamano-0.3,verde,blancoblanco,blanco)   
 
Print(x,y+80,archivo+4,tamano-0.4,verde,blanco,blanco,blanco)
 
Print(x,y+100,archivo+5,tamano-0.5,verde,blanco,blanco,blanco)

--_nuevo color_--
 
gris=color.new(200,200,200)
 
 
 
-------------_esta es la cola de abajo_------------------------------------------
 
Print(x-20,y+10,archivo+5,tamano-0.5,verde,gris,gris,gris)
 
Print(x-15,y+20,archivo+4,tamano-0.4,verde,gris,gris,gris)
 
Print(x-10,y+30,archivo+3,tamano-0.3,verde,gris,gris,gris)   
 
---------------------_esta es la cola de arriba_------------------------------------------
 
Print(x-20,y-10,archivo-5,tamano-0.5,verde,gris,gris,gris) 
 
Print(x-15,y-20,archivo-4,tamano-0.4,verde,gris,gris,gris)
 
Print(x-10,y-30,archivo-3,tamano-0.3,verde,gris,gris,gris)
 
--------------------------_esto es el centro_-----------------------------------
 
Print(x,y-40,archivo-2,tamano-0.2,verde,blanco,blanco,blanco)    
 
Print(x+10,y-20,archivo-1,tamano-0.1,verde,blanco,blanco,blanco)
 
Print(x+15,y,archivo,tamano,negro,verde,negro,blanco) 
 
Print(x+10,y+20,archivo+1,tamano-0.1,verde,blanco,blanco,blanco) 
 
Print(x,y+40,archivo+2,tamano-0.2,verde,blanco,blanco,blanco) 

--_definimos las variables.
 
b_color=true
e_color=100
 
 
---_este codigo va dentro de while true do.
 
 
if e_color<50 then
   b_color=true
end
 
if e_color>200 then
  b_color=false
end
 
if b_color==true then
  e_color=e_color+2
end
 
if b_color==false then
  e_color=e_color-2
end
 
 
---_ahora creamos un color.new(e_color,e_color,e_color), en el print que corresponde a nuestra posicion.
--_en este. 
 
Print(x,y,archivo,tamano,negro,color.new(e_color,50+e_color,e_color),negro,color.new(e_color,e_color,e_color)) 
 
 
--_si quieren que sea de otro color ponemos un valor junto al e_color.
--_ejemplo.
 
--_rojo
 
color.new(50+e_color,e_color,e_color)
 
--_verde
 
color.new(e_color,50+e_color,e_color)
 
--_azul
 
color.new(e_color,e_color,50+e_color)

cuenta_up=0
cuenta_down=0
 
 
 
 
---------------_UP_-------------------
 
if controls.up() and archivo>1 then   
     cuenta_up=cuenta_up+1
     if cuenta_up>30 then
         archivo=archivo-1
         cuenta_up=25
     end
else
     cuenta_up=0   
end  
 
 
-------------_DOWN_-------------------
 
 
if controls.down() and archivo<max then
     cuenta_down=cuenta_down+1
     if cuenta_down>30 then
         archivo=archivo+1
         cuenta_down=25
     end
     else
         cuenta_down=0
end