dofile("Funciones.lua")   
LightSkyBlue = color.new(135,206,250)
negro = color.new(0,0,0)
blanco = color.new(255,255,255)
red = color.new(255,0,0)
verde = color.new(0,128,0)
verde2 = color.new(0,128,0,150)
amarillo = color.new(255,255,0,150)
fl = files.list("ms0:/");
nav_off = false
selected = 1
selected2 = 230
disminuir = false
function listar()
tablaiso = {}
dimensiones = {x = 30,y = 25}
   for i=1, #fl do   
    table.insert(tablaiso,fl[i].name)    
       if VM == i then
          screen.print(dimensiones.x,dimensiones.y+selected,string.format("%.45s",files.nopath(tablaiso[i])),0.6,verde,blanco)                
       else              
          screen.print(dimensiones.x,dimensiones.y+selected,string.format("%.45s",files.nopath(tablaiso[i])),0.6,negro,0x0)      
       end
       if #fl < 1 then
       screen.print(dimensiones.x,dimensiones.y+selected,"La carpeta esta vacia",0.6,negro,0x0)     
       end        
      dimensiones.y = dimensiones.y + 10             
   end   
end
function pass()
user_pass = ini.read("conf.ini","Datos","pass","user")
pass2 = os.osk("Contraseña","","100","5")
   if pass2 == user_pass then
      os.message("hola")
   else
      pass()
    end
end  
function navegador()   
  if nav_off == false then
   if controls.press("down") and VM ~= #fl then
      VM = VM + 1
      VMVM = VMVM + 1
      if disminuir == false then
       if VMVM == 21 then
        disminuir = true
        selected = selected - selected2 + 23        
        disminuir = false
		VMVM = 1
       end
      end
    repro("sounds/Click.wav")
   elseif controls.press("down") and VM >= #fl then 
      VM = VM     
    repro("sounds/Click.wav")
   end
   if controls.press("up") and VM > 1 then  
      VM = VM - 1
      VMVM = VMVM - 1
      if disminuir == false then
       if VMVM == 1 then
        disminuir = true
        selected = selected + selected2 - 24
        VMVM = 21
        disminuir = false
       end
      end
    repro("sounds/Click.wav")
   elseif controls.press("up") and VM == 1 then 
      VM = VM
    repro("sounds/Click.wav")
   end
   if controls.press("cross") then
    if fl[VM].directory then
    fl = files.list(fl[VM].name);
    VM = 1
    VMVM = 1
    dimensiones.y = 25
    selected = 0
   else
    ext = files.ext(fl[VM].name)
    os.message("la extencion es "..ext.." "..files.nofile(files.nofile(fl[VM].name)))   
   end   
   end
   if controls.press("circle") then
    runFile(fl[VM].name)
   end
   if controls.press("triangle") then
    menu()
   end   	
   if controls.press("square") then
    fl = files.list(files.nofile(files.nofile(fl[VM].name)));
    VM = 1
	VMVM = 1
    dimensiones.y = 25
    selected = 0
   end
 else
 end
end   
function menu()
nav_off = true
minimenu = {}
minimenu[1] = "Mover"
minimenu[2] = "Borrar"
minimenu[3] = "Copiar"
minimenu[4] = "Renombrar"
draw.fillrect(150,50,160,150,amarillo)
y = 0
for i = 1, #minimenu do
  if vm1 == i then
    screen.print(160,90+y,minimenu[i],.9,verde,blanco)                
  else
    screen.print(160,90+y,minimenu[i],.9,negro,0x0)                
  end
  y = y + 15
end
--nav_off = false
screen.flip()   
end
VM = 1
vm1 = 1
VMVM = 1
Locked = ini.read("conf.ini","Datos","Lock","false")
if Locked == "Yes" then
pass()
end
function navegador2()   
   if controls.press("down") then --and vm1 ~= #minimenu then
      vm1 = vm1 + 1
   elseif controls.press("down") then --and vm1 >= #minimenu then 
      vm1 = 1
   end
   if controls.press("up") then --and vm1 > 1 then  
      vm1 = vm1 - 1
   elseif controls.press("up") then --and vm1 == 1 then 
      vm1 = 1
   end   
   if controls.press("square") then  
   if nav_off == true then
      os.message(vm1)
   end
   end   
end   
function statusbar()
draw.fillrect(0,250,480,22,verde2)
end
while true do      
   controls.read()
   if controls.press("r") then
   dofile("script.lua")   
   end
   if controls.press("l") then
   usb.on()
   end     
   navegador() 
   navegador2()         
   draw.gradrect(0,0,480,272,LightSkyBlue,LightSkyBlue,negro,LightSkyBlue)
   listar()
   statusbar()   
   if #fl > 1 then
   screen.print(5,255,"Tamaño "..files.sizeformat(fl[VM].size),0.6,verde,blanco)               
   end   
   screen.print(300,10,selected.." "..VM.." "..VMVM,0.6,verde,blanco)
   screen.flip()
end