blanco = Color.new(255,255,255)
System.usbDiskModeActivate()
 
y = 10
varscroll = 0
 
--Tabla
tabla = System.listDirectory("ms0:/PSP/GAME/directorio/") 
actual = 1 
tabladirectorio={}
tabladirectoriofull = true
 
for i=1,table.getn(tabla) do
	if string.sub(tabla[i].name,-4)==".txt" or string.sub(tabla[i].name,-4)==".TXT" then
		table.insert(tabladirectorio,tabla[i].name)
	end
end
 
if table.getn(tabladirectorio) == 0 then
	tabladirectoriofull = false
end
 
function LeerPulsacion()
pad = Controls.read()
 
		if pad:down() and oldpad ~= pad then
			actual = math.min(actual + 1, table.getn(tabladirectorio))
			varscroll=math.min(varscroll+15,(table.getn(tabladirectorio)*100)-310)	
		elseif 
			varscroll > (table.getn(tabladirectorio)*27)-27 then
			varscroll = varscroll - 27
		end
 
		if pad:up() and oldpad ~= pad then
			actual = math.max(actual - 1,1)
			varscroll=math.max(varscroll-15,0)
		end	
 
		if pad:square() and not oldpad:square() then
		file = io.open(tabladirectorio[actual]..".txt","r")
			for line in file:lines() do
				y = y + 10
				screen:print(100,y,line,blanco)
			end
		file:close() 
		end
 
 
oldpad = pad	
end
 
 
while true do
screen:clear()
LeerPulsacion()
 
if tabladirectoriofull then
screen:print(5,5,tabladirectorio[actual],blanco)
	for i=1,table.getn(tabladirectorio) do
		 screen:fontPrint(calli,135,((i-1)*15)+70-varscroll,string.sub(tabladirectorio[i],1,26),blanco)
 
	end
else
screen:print(10,10,"lol",blanco)
end	
screen.flip()
end