Comparar texto

Encontre a diferença entre dois arquivos de texto

Editor live

Ocultar espaços em branco

Recolher inalteradas

Sem quebra de linha

Layout

Nível de detalhe

Estilos de texto

Realce de sintaxe

Diffchecker Desktop A maneira mais segura de usar o Diffchecker. Obtenha o aplicativo Diffchecker Desktop: seus diffs nunca saem do seu computador!Obter Desktop

Untitled diff

Criado há 10 anosO diff nunca expira

25 remoções

Linhas
Total
Removido

Caracteres
Total
Removido

Para continuar usando este recurso, atualize para Diffchecker Pro Ver preços

751 linhas

33 adições

Linhas
Total
Adicionado

Caracteres
Total
Adicionado

Para continuar usando este recurso, atualize para Diffchecker Pro Ver preços

759 linhas

local APP_DIR = "/Yuki FM"

local APP_THEME_DIR = APP_DIR.."/Themes"

local APP_CONFIG = APP_DIR.."/config.yuki"

local default_config = [[

LoadTheme("Path of Theme")

]]

local function defaultTheme()

rawset(_G, "bg", Graphics.convertFrom(Screen.createImage(1,1, Color.new(0,0,0))))

rawset(_G, "selected_item", Color.new(255,0,0))

rawset(_G, "menu_color", Color.new(255,255,255))

rawset(_G, "selected_color", Color.new(0,255,0))

end

update_bottom_screen = true

System.setCpuSpeed(804)

Graphics.init()

function LoadTheme(theme)

old = System.currentDirectory()

System.currentDirectory(System.currentDirectory().."ORG_Themes/"..theme)

System.currentDirectory(APP_THEME_DIR.."/"..theme)

dofile(System.currentDirectory().."/theme.lua")

if System.doesFileExist(APP_THEME_DIR.."/"..theme.."/theme.lua") then

dofile(System.currentDirectory().."/theme.lua")

else

defaultTheme()

end

System.currentDirectory(old)

end

dofile(System.currentDirectory().."ORG_CONFIG.txt")

System.createDirectory(APP_DIR)

System.createDirectory(APP_THEME_DIR)

if not System.doesFileExist(APP_CONFIG) then

local f = io.open(APP_CONFIG, FCREATE)

io.write(f, 0, default_config, default_config:len())

io.close(f)

end

dofile(APP_CONFIG)

Sound.init()

white = Color.new(255,255,255)

black = Color.new(0,0,0)

ctrlTimer = Timer.new()

timeSlap = 200

red = Color.new(255,0,0)

green = Color.new(0,255,0)

copy_or_move = false

is_fullscreen = false

oldpad = Controls.read()

function TableConcat(t1,t2)

for i=1,#t2 do

t1[#t1+1] = t2[i]

end

return t1

end

function SortDirectory(dir)

folders_table = {}

files_table = {}

for i,file in pairs(dir) do

if file.directory then

table.insert(folders_table,file)

else

table.insert(files_table,file)

end

table.sort(files_table, function (a, b) return (a.name:lower() < b.name:lower() ) end)

table.sort(folders_table, function (a, b) return (a.name:lower() < b.name:lower() ) end)

return_table = TableConcat(folders_table,files_table)

return return_table

end

files_table = SortDirectory(System.listDirectory("/"))

mode = "SDMC"

System.currentDirectory("/")

p = 1

current_file = nil

current_type = nil

big_image = false

master_index = 0

sm_index = 1

build = System.checkBuild()

if build == 0 then

build = "NH1"

elseif build == 1 then

build = "CFW"

else

build = "NH2"

end

if build == "NH1" then

sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","3DSX Launcher","CIA Installer","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}

sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","3DSX","CIA","SMDH","ZIP","INFO","TTF"}

elseif build == "NH2" then

sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","3DSX Launcher","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}

sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","3DSX","SMDH","ZIP","INFO","TTF"}

else

sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","CIA Installer","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}

sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","CIA","SMDH","ZIP","INFO","TTF"}

end

hex_values = {}

hex_text = {}

updateTXT = false

select_mode = false

update_main_extdata = true

delete_mode = false

move_base = nil

theme_name = "NONAME"

author = "NONAME"

copy_base = nil

x_print = 0

y_print = 0

copy_type = 0

move_type = 0

txt_index = 0

txt_words = 0

txt_i = 0

old_indexes = {}

MAX_RAM_ALLOCATION = 10485760

function FormatTime(seconds)

minute = math.floor(seconds/60)

seconds = seconds%60

hours = math.floor(minute/60)

minute = minute%60

if minute < 10 then

minute = "0"..minute

end

if seconds < 10 then

seconds = "0"..seconds

end

if hours == 0 then

return minute..":"..seconds

else

return hours..":"..minute..":"..seconds

end

function DumpFile(input,archive)

inp = io.open(extdata_directory..input,FREAD,archive)

if System.doesFileExist("/"..input) then

System.deleteFile("/"..input)

end

out = io.open("/"..string.format('%02X',archive).."_"..input,FCREATE)

size = io.size(inp)

index = 0

while (index+(MAX_RAM_ALLOCATION/2) < size) do

io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))

index = index + (MAX_RAM_ALLOCATION/2)

end

if index < size then

io.write(out,index,io.read(inp,index,size-index),(size-index))

end

io.close(inp)

io.close(out)

end

function RestoreFile(input,archive)

inp = io.open("/"..string.format('%02X',archive).."_"..input,FREAD)

out = io.open(extdata_directory..input,FWRITE,archive)

if io.size(inp) <= io.size(out) then

size = io.size(inp)

index = 0

while (index+(MAX_RAM_ALLOCATION/2) < size) do

io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))

index = index + (MAX_RAM_ALLOCATION/2)

end

if index < size then

io.write(out,index,io.read(inp,index,size-index),(size-index))

end

io.close(inp)

io.close(out)

end

function RestoreFolder(input,archive)

files = System.listDirectory("/"..string.format('%02X',archive).."_"..input)

for z, file in pairs(files) do

if (file.directory) then

RestoreFolder(input.."/"..file.name,archive)

else

RestoreFile(input.."/"..file.name,archive)

end

function DumpFolder(input,archive)

files = System.listExtdataDir(extdata_directory..input,archive)

System.createDirectory("/"..string.format('%02X',archive).."_"..input)

for z, file in pairs(files) do

if (file.directory) then

DumpFolder(input.."/"..file.name,archive)

else

DumpFile(input.."/"..file.name,archive)

end

function CopyFile(input,output)

inp = io.open(input,FREAD)

if System.doesFileExist(output) then

System.deleteFile(output)

end

out = io.open(output,FCREATE)

size = io.size(inp)

index = 0

while (index+(MAX_RAM_ALLOCATION/2) < size) do

io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))

index = index + (MAX_RAM_ALLOCATION/2)

end

if index < size then

io.write(out,index,io.read(inp,index,size-index),(size-index))

end

io.close(inp)

io.close(out)

end

function CopyDir(input,output)

files = System.listDirectory(input)

System.createDirectory(output)

for z, file in pairs(files) do

if (file.directory) then

CopyDir(input.."/"..file.name,output.."/"..file.name)

else

CopyFile(input.."/"..file.name,output.."/"..file.name)

end

function OpenExtdataFile(text, archive)

GarbageCollection()

current_file = io.open(extdata_directory..text,FREAD,archive)

current_type = "HEX"

txt_index = 0

updateTXT = true

end

function ForceOpenFile(text, size, mode)

if mode == "SMDH" then

GarbageCollection()

current_type = "SMDH"

current_file = System.extractSMDH(System.currentDirectory()..text)

smdh_show = Console.new(TOP_SCREEN)

Console.append(smdh_show,"Title: "..current_file.title.."\n\n")

Console.append(smdh_show,"Description: "..current_file.desc.."\n\n")

Console.append(smdh_show,"Author: "..current_file.author)

elseif mode == "3DSX" and not build == "CFW" then

GarbageCollection()

Graphics.freeImage(bg)

Sound.term()

System.launch(System.currentDirectory()..text)

elseif mode == "JPGV" then

GarbageCollection()

current_file = JPGV.load(System.currentDirectory()..text)

current_type = "JPGV"

JPGV.start(current_file,NO_LOOP)

elseif mode == "WAV" then

GarbageCollection()

current_file = io.open(System.currentDirectory()..text,FREAD)

magic = io.read(current_file,8,4)

io.close(current_file)

if magic == "AIFF" then

current_file = Sound.openAiff(System.currentDirectory()..text, true)

current_type = "WAV"

Sound.play(current_file,NO_LOOP)

elseif magic == "RIFF" then

current_file = Sound.openWav(System.currentDirectory()..text, true)

current_type = "WAV"

Sound.play(current_file,NO_LOOP)

else

current_file = Sound.openOgg(System.currentDirectory()..text, true)

current_type = "WAV"

Sound.play(current_file,NO_LOOP)

end

elseif mode == "IMG" then

GarbageCollection()

current_type = "IMG"

current_file = Graphics.loadImage(System.currentDirectory()..text)

width = Graphics.getImageWidth(current_file)

height = Graphics.getImageHeight(current_file)

if Graphics.getImageWidth(current_file) > 400 then

width = 400

big_image = true

end

if Graphics.getImageHeight(current_file) > 240 then

height = 240

big_image = true

end

elseif mode == "LUA" then

GarbageCollection()

Graphics.freeImage(bg)

Sound.term()

reset_dir = System.currentDirectory()

System.currentDirectory(string.sub(System.currentDirectory(),1,-2))

dofile(System.currentDirectory().."/"..text)

System.currentDirectory(reset_dir)

current_type = "LUA"

Sound.init()

elseif mode == "TXT" then

GarbageCollection()

current_file = io.open(System.currentDirectory()..text,FREAD)

text_console = Console.new(TOP_SCREEN)

current_type = "TXT"

txt_index = 0

txt_words = 0

updateTXT = true

elseif mode == "HEX" then

GarbageCollection()

current_file = io.open(System.currentDirectory()..text,FREAD)

current_type = "HEX"

txt_index = 0

updateTXT = true

elseif mode == "INFO" then

GarbageCollection()

current_file = io.open(System.currentDirectory()..text,FREAD)

current_type = "INFO"

f_size = io.size(current_file)

f = "Bytes"

if (f_size > 1024) then

f_size = f_size / 1024

f = "KBs"

end

if (f_size > 1024) then

f_size = f_size / 1024

f = "MBs"

end

io.close(current_file)

text_console = Console.new(TOP_SCREEN)

Console.append(text_console,"Filename: "..text.."\n")

i = -1

while string.sub(text,i,i) ~= "." do

i = i - 1

end

i = i + 1

Console.append(text_console,"Format: "..string.upper(string.sub(text,i)).."\n")

Console.append(text_console,"Size: "..f_size.." "..f.."\n")

elseif mode == "ZIP" then

GarbageCollection()

pass = System.startKeyboard("")

System.extractZIP(System.currentDirectory()..text,System.currentDirectory()..string.sub(text,1,-5),pass)

files_table = System.listDirectory(System.currentDirectory())

if System.currentDirectory() ~= "/" then

local extra = {}

extra.name = ".."

extra.size = 0

extra.directory = true

table.insert(files_table,extra)

end

files_table = SortDirectory(files_table)

elseif mode == "TTF" then

GarbageCollection()

current_file = Font.load(System.currentDirectory()..text)

current_type = "TTF"

elseif mode == "CIA" then

GarbageCollection()

sm_index = 1

cia_data = System.extractCIA(System.currentDirectory()..text)

oldpad = KEY_A

while true do

Screen.refresh()

Screen.waitVblankStart()

Screen.clear(TOP_SCREEN)

Screen.debugPrint(0,0,"Title: "..cia_data.title,white,TOP_SCREEN)

Screen.debugPrint(0,15,"Unique ID: 0x"..string.sub(string.format('%02X',cia_data.unique_id),1,-3),white,TOP_SCREEN)

Screen.debugPrint(0,30,"Size to install: "..cia_data.install_size,white,TOP_SCREEN)

Screen.debugPrint(0,45,"Version: "..cia_data.version,white,TOP_SCREEN)

if not cia_data.icon == nil then

Screen.debugPrint(0,30,"Name: "..cia_data.name,white,TOP_SCREEN)

Screen.debugPrint(0,45,"Author: "..cia_data.author,white,TOP_SCREEN)

Screen.debugPrint(0,60,"Desc: "..cia_data.desc,white,TOP_SCREEN)

Screen.drawImage(5, 85, cia_data.icon, TOP_SCREEN)

end

pad = Controls.read()

Screen.fillEmptyRect(60,260,50,95,black,BOTTOM_SCREEN)

Screen.fillRect(61,259,51,96,white,BOTTOM_SCREEN)

if (sm_index == 1) then

Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)

Screen.debugPrint(63,53,"Install to SDMC",red,BOTTOM_SCREEN)

Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)

Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)

if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then

sm_index = 2

elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then

System.installCIA(System.currentDirectory()..text, SDMC)

break

end

elseif (sm_index == 2) then

Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)

Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)

Screen.debugPrint(63,68,"Install to NAND",red,BOTTOM_SCREEN)

Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)

if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then

sm_index = 3

elseif (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then

sm_index = 1

elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then

System.installCIA(System.currentDirectory()..text, NAND)

break

end

else

Screen.fillRect(61,259,81,96,green,BOTTOM_SCREEN)

Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)

Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)

Screen.debugPrint(63,83,"Cancel",red,BOTTOM_SCREEN)

if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then

sm_index = 2

elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then

break

end

oldpad = pad

Screen.flip()

end

update_bottom_screen = true

end

function DeleteDir(dir)

files = System.listDirectory(dir)

for z, file in pairs(files) do

if (file.directory) then

DeleteDir(dir.."/"..file.name)

else

System.deleteFile(dir.."/"..file.name)

end

System.deleteDirectory(dir)

end

function OpenFile(text, size)

if string.upper(string.sub(text,-5)) == ".SMDH" then

GarbageCollection()

current_type = "SMDH"

current_file = System.extractSMDH(System.currentDirectory()..text)

smdh_show = Console.new(TOP_SCREEN)

Console.append(smdh_show,"Title: "..current_file.title.."\n\n")

Console.append(smdh_show,"Description: "..current_file.desc.."\n\n")

Console.append(smdh_show,"Author: "..current_file.author)

elseif string.upper(string.sub(text,-4)) == ".ZIP" then

GarbageCollection()

pass = System.startKeyboard("PASSWORD")

System.extractZIP(System.currentDirectory()..text,System.currentDirectory()..string.sub(text,1,-5),pass)

files_table = System.listDirectory(System.currentDirectory())

if System.currentDirectory() ~= "/" then

local extra = {}

extra.name = ".."

extra.size = 0

extra.directory = true

table.insert(files_table,extra)

end

files_table = SortDirectory(files_table)

elseif (string.upper(string.sub(text,-5)) == ".3DSX") and not build == "CFW" then

GarbageCollection()

Graphics.freeImage(bg)

Sound.term()

Graphics.term()

System.launch(System.currentDirectory()..text)

elseif string.upper(string.sub(text,-5)) == ".JPGV" then

GarbageCollection()

current_file = JPGV.load(System.currentDirectory()..text)

current_type = "JPGV"

JPGV.start(current_file,NO_LOOP)

elseif string.upper(string.sub(text,-4)) == ".TTF" then

GarbageCollection()

current_file = Font.load(System.currentDirectory()..text)

current_type = "TTF"

elseif string.upper(string.sub(text,-4)) == ".WAV" then

GarbageCollection()

current_file = Sound.openWav(System.currentDirectory()..text, true)

current_type = "WAV"

Sound.play(current_file,NO_LOOP)

elseif string.upper(string.sub(text,-4)) == ".OGG" then

GarbageCollection()

current_file = Sound.openOgg(System.currentDirectory()..text,true)

current_type = "WAV"

Sound.play(current_file,NO_LOOP)

elseif string.upper(string.sub(text,-4)) == ".AIF" or string.upper(string.sub(text,-5)) == ".AIFF" then

GarbageCollection()

current_file = Sound.openAiff(System.currentDirectory()..text, true)

current_type = "WAV"

Sound.play(current_file,NO_LOOP)

elseif string.upper(string.sub(text,-4)) == ".PNG" or string.upper(string.sub(text,-4)) == ".BMP" or string.upper(string.sub(text,-4)) == ".JPG" then

GarbageCollection()

current_type = "IMG"

current_file = Graphics.loadImage(System.currentDirectory()..text)

width = Graphics.getImageWidth(current_file)

height = Graphics.getImageHeight(current_file)

if width > 400 then

width = 400

big_image = true

end

if height > 240 then

height = 240

big_image = true

end

elseif string.sub(text,-4) == ".lua" or string.sub(text,-4) == ".LUA" then

GarbageCollection()

Graphics.freeImage(bg)

Sound.term()

reset_dir = System.currentDirectory()

System.currentDirectory(string.sub(System.currentDirectory(),1,-2))

dofile(System.currentDirectory().."/"..text)

System.currentDirectory(reset_dir)

current_type = "LUA"

Sound.init()

elseif string.sub(text,-4) == ".txt" or string.sub(text,-4) == ".TXT" then

GarbageCollection()

current_file = io.open(System.currentDirectory()..text,FREAD)

text_console = Console.new(TOP_SCREEN)

current_type = "TXT"

txt_index = 0

txt_words = 0

updateTXT = true

elseif string.upper(string.sub(text,-4)) == ".CIA" and build ~= "NH2" then

GarbageCollection()

sm_index = 1

cia_data = System.extractCIA(System.currentDirectory()..text)

oldpad = KEY_A

while true do

Screen.refresh()

Screen.waitVblankStart()

Screen.clear(TOP_SCREEN)

Screen.debugPrint(0,0,"Title: "..cia_data.title,white,TOP_SCREEN)

Screen.debugPrint(0,15,"Unique ID: 0x"..string.sub(string.format('%02X',cia_data.unique_id),1,-3),white,TOP_SCREEN)

Screen.debugPrint(0,30,"Size to install: "..cia_data.install_size,white,TOP_SCREEN)

Screen.debugPrint(0,45,"Version: "..cia_data.version,white,TOP_SCREEN)

if not cia_data.icon == nil then

Screen.debugPrint(0,30,"Name: "..cia_data.name,white,TOP_SCREEN)

Screen.debugPrint(0,45,"Author: "..cia_data.author,white,TOP_SCREEN)

Screen.debugPrint(0,60,"Desc: "..cia_data.desc,white,TOP_SCREEN)

Screen.drawImage(5, 85, cia_data.icon, TOP_SCREEN)

end

pad = Controls.read()

Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)

Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)

if (sm_index == 1) then

Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)

Screen.debugPrint(63,53,"Install to SDMC",red,BOTTOM_SCREEN)

Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)

Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)

if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then

sm_index = 2

elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then

System.installCIA(System.currentDirectory()..text, SDMC)

break

end

elseif (sm_index == 2) then

Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)

Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)

Screen.debugPrint(63,68,"Install to NAND",red,BOTTOM_SCREEN)

Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)

if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then

sm_index = 3

elseif (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then

sm_index = 1

elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then

System.installCIA(System.currentDirectory()..text, NAND)

break

end

else

Screen.fillRect(61,259,81,96,green,BOTTOM_SCREEN)

Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)

Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)

Screen.debugPrint(63,83,"Cancel",red,BOTTOM_SCREEN)

if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then

sm_index = 2

elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then

break

end

oldpad = pad

Screen.flip()

end

update_bottom_screen = true

end

function OpenDirectory(text,archive_id)

i=0

if mode == "SDMC" then

if text == ".." then

j=-2

while string.sub(System.currentDirectory(),j,j) ~= "/" do

j=j-1

end

System.currentDirectory(string.sub(System.currentDirectory(),1,j))

else

System.currentDirectory(System.currentDirectory()..text.."/")

end

else

if text == ".." then

j=-2

while string.sub(extdata_directory,j,j) ~= "/" do

j=j-1

end

extdata_directory = string.sub(extdata_directory,1,j)

else

extdata_directory = extdata_directory..text.."/"

end

if mode == "SDMC" then

files_table = System.listDirectory(System.currentDirectory())

if System.currentDirectory() ~= "/" then

local extra = {}

extra.name = ".."

extra.size = 0

extra.directory = true

table.insert(files_table,extra)

end

files_table = SortDirectory(files_table)

else

if extdata_directory == "/" then

files_table = extdata_backup

else

files_table = System.listExtdataDir(extdata_directory,archive_id)

local extra = {}

extra.name = ".."

extra.size = 0

extra.directory = true

extra.archive = archive_id

table.insert(files_table,extra)

end

function GarbageCollection()

if current_type == "SMDH" then

Console.destroy(smdh_show)

Screen.freeImage(current_file.icon)

elseif current_type == "TTF" then

Font.unload(current_file)

elseif current_type == "JPGV" then

if JPGV.isPlaying(current_file) then

JPGV.pause(current_file)

end

JPGV.unload(current_file)

is_fullscreen = false

fullscreen_check = nil

elseif current_type == "WAV" then

if Sound.isPlaying(current_file) then

Sound.pause(current_file)

end

Sound.close(current_file)

elseif current_type == "IMG" then

Graphics.freeImage(current_file)

big_image = false

y_print = 0

x_print = 0

elseif current_type == "TXT" then

io.close(current_file)

Console.destroy(text_console)

old_indexes = {}

txt_i = 0

elseif current_type == "INFO" then

Console.destroy(text_console)

elseif current_type == "CIA" then

if not cia_data.icon == nil then

Screen.freeImage(cia_data.icon)

end

elseif current_type == "HEX" then

io.close(current_file)

old_indexes = {}

txt_i = 0

elseif current_type == "LUA" then

theme_name = "NONAME"

author = "NONAME"

end

current_type = nil

end

function CropPrint(x, y, text, color, screen)

if string.len(text) > 25 then

Screen.debugPrint(x, y, string.sub(text,1,25) .. "...", color, screen)

else

Screen.debugPrint(x, y, text, color, screen)

end

function ThemePrint(x, y, text, color, screen)

if string.len(text) > 40 then

Screen.debugPrint(x, y, string.sub(text,1,40) .. "...", color, screen)

else

Screen.debugPrint(x, y, text, color, screen)

end

function BuildLines(file, index)

MAX_LENGTH = 1200

SIZE = io.size(file)

if ((index + MAX_LENGTH) < SIZE) then

READ_LENGTH = MAX_LENGTH

else

READ_LENGTH = SIZE - index

end

if (index < SIZE) then

Console.clear(text_console)

Console.append(text_console,io.read(file,index,READ_LENGTH))

txt_words = Console.show(text_console)

else

txt_words = 0

end

if (txt_words > 0) then

table.insert(old_indexes, index)

index = index + txt_words

txt_i = txt_i + 1

end

return index

end

function BuildHex(file, index)

MAX_LENGTH = 120

SIZE = io.size(file)

if ((index + MAX_LENGTH) < SIZE) then

READ_LENGTH = MAX_LENGTH

else

READ_LENGTH = SIZE - index

end

if (index < SIZE) then

hex_text = {}

hex_values = {}

text = io.read(file,index,READ_LENGTH)

t = 1

while (t <= 15) do

if ((t*8) > string.len(text)) then

temp = string.sub(text,1+(t-1)*8,-1)

else

temp = string.sub(text,1+(t-1)*8,t*8)

end

t2 = 1

while t2 <= string.len(temp) do

table.insert(hex_values,string.byte(temp,t2))

t2 = t2 + 1

end

table.insert(hex_text,temp)

t = t + 1

end

table.insert(old_indexes, index)

index = index + READ_LENGTH

txt_i = txt_i + 1

end

return index

end

while true do

base_y = 0

i = 1

Screen.refresh()

if current_type ~= "JPGV" then

Screen.clear(TOP_SCREEN)

end

pad = Controls.read()

if (current_type == "SMDH") then

Console.show(smdh_show)

Screen.debugPrint(0,170,"Icon:",white,TOP_SCREEN)

Screen.drawImage(0,185,current_file.icon,TOP_SCREEN)

elseif (current_type == "TTF") then

Font.setPixelSizes(current_file,8)

Font.print(current_file,0,5,"8: The quick brown fox",white,TOP_SCREEN)

Font.print(current_file,10,13,"jumps over the lazy dog",white,TOP_SCREEN)

Font.setPixelSizes(current_file,12)

Font.print(current_file,0,25,"12: The quick brown fox",white,TOP_SCREEN)

Font.print(current_file,10,37,"jumps over the lazy dog",white,TOP_SCREEN)

Font.setPixelSizes(current_file,18)

Font.print(current_file,0,54,"18: The quick brown fox",white,TOP_SCREEN)

Font.print(current_file,10,72,"jumps over the lazy dog",white,TOP_SCREEN)

Font.setPixelSizes(current_file,24)

Font.print(current_file,0,95,"24: The quick brown fox",white,TOP_SCREEN)

Font.print(current_file,10,119,"jumps over the lazy dog",white,TOP_SCREEN)

Font.setPixelSizes(current_file,30)

Font.print(current_file,0,149,"30: The quick brown fox",white,TOP_SCREEN)

Font.print(current_file,10,179,"jumps over the lazy dog",white,TOP_SCREEN)

elseif (current_type == "JPGV") then

if fullscreen_check == nil then

Screen.drawPixel(399,239,0xDEADBEFF, TOP_SCREEN)

tmp = Screen.getPixel(399,239,TOP_SCREEN)

end

if is_fullscreen then

JPGV.drawFast(current_file,TOP_SCREEN)

else

JPGV.draw(0,0,current_file,TOP_SCREEN)

end

if fullscreen_check == nil then

if tmp == Screen.getPixel(399,239,TOP_SCREEN) then

is_fullscreen = true

end

fullscreen_check = true

end

elseif (current_type == "WAV") then

Sound.updateStream()

Screen.debugPrint(0,0,"Title: ",white,TOP_SCREEN)

ThemePrint(0,15,Sound.getTitle(current_file),white,TOP_SCREEN)

Screen.debugPrint(0,40,"Author: ",white,TOP_SCREEN)

ThemePrint(0,55,Sound.getAuthor(current_file),white,TOP_SCREEN)

Screen.debugPrint(0,80,"Time: "..FormatTime(Sound.getTime(current_file)).." / "..FormatTime(Sound.getTotalTime(current_file)),white,TOP_SCREEN)

Screen.debugPrint(0,95,"Samplerate: "..Sound.getSrate(current_file),white,TOP_SCREEN)

if Sound.getType(current_file) == 1 then

stype = "Mono"

else

stype = "Stereo"

end

Screen.debugPrint

Diferenças salvas

Texto original

Abrir arquivo

update_bottom_screen = true
System.setCpuSpeed(804)
Graphics.init()
function LoadTheme(theme)
	old = System.currentDirectory()
	System.currentDirectory(System.currentDirectory().."ORG_Themes/"..theme)
	dofile(System.currentDirectory().."/theme.lua")
	System.currentDirectory(old)
end
dofile(System.currentDirectory().."ORG_CONFIG.txt")
Sound.init()
white = Color.new(255,255,255)
black = Color.new(0,0,0)
ctrlTimer = Timer.new()
timeSlap = 200
red = Color.new(255,0,0)
green = Color.new(0,255,0)
copy_or_move = false
is_fullscreen = false
oldpad = Controls.read()
function TableConcat(t1,t2)
    for i=1,#t2 do
        t1[#t1+1] = t2[i]
    end
    return t1
end
function SortDirectory(dir)
	folders_table = {}
	files_table = {}
	for i,file in pairs(dir) do
		if file.directory then
			table.insert(folders_table,file)
		else
			table.insert(files_table,file)
		end
	end
	table.sort(files_table, function (a, b) return (a.name:lower() < b.name:lower() ) end)
	table.sort(folders_table, function (a, b) return (a.name:lower() < b.name:lower() ) end)
	return_table = TableConcat(folders_table,files_table)
	return return_table
end
files_table = SortDirectory(System.listDirectory("/"))
mode = "SDMC"
System.currentDirectory("/")
p = 1
current_file = nil
current_type = nil
big_image = false
master_index = 0
sm_index = 1
build = System.checkBuild()
if build == 0 then
	build = "NH1"
elseif build == 1 then
	build = "CFW"
else
	build = "NH2"
end
if build == "NH1" then
	sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","3DSX Launcher","CIA Installer","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}
	sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","3DSX","CIA","SMDH","ZIP","INFO","TTF"}
elseif build == "NH2" then
	sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","3DSX Launcher","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}
	sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","3DSX","SMDH","ZIP","INFO","TTF"}
else
	sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","CIA Installer","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}
	sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","CIA","SMDH","ZIP","INFO","TTF"}
end
hex_values = {}
hex_text = {}
updateTXT = false
select_mode = false
update_main_extdata = true
delete_mode = false
move_base = nil
theme_name = "NONAME"
author = "NONAME"
copy_base = nil
x_print = 0
y_print = 0
copy_type = 0
move_type = 0
txt_index = 0
txt_words = 0
txt_i = 0
old_indexes = {}
MAX_RAM_ALLOCATION = 10485760
function FormatTime(seconds)
	minute = math.floor(seconds/60)
	seconds = seconds%60
	hours = math.floor(minute/60)
	minute = minute%60
	if minute < 10 then
		minute = "0"..minute
	end
	if seconds < 10 then
		seconds = "0"..seconds
	end
	if hours == 0 then
		return minute..":"..seconds
	else
		return hours..":"..minute..":"..seconds
	end
end
function DumpFile(input,archive)
	inp = io.open(extdata_directory..input,FREAD,archive)
	if System.doesFileExist("/"..input) then
		System.deleteFile("/"..input)
	end
	out = io.open("/"..string.format('%02X',archive).."_"..input,FCREATE)
	size = io.size(inp)
	index = 0
	while (index+(MAX_RAM_ALLOCATION/2) < size) do
		io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))
		index = index + (MAX_RAM_ALLOCATION/2)
	end
	if index < size then
		io.write(out,index,io.read(inp,index,size-index),(size-index))
	end
	io.close(inp)
	io.close(out)
end
function RestoreFile(input,archive)
	inp = io.open("/"..string.format('%02X',archive).."_"..input,FREAD)
	out = io.open(extdata_directory..input,FWRITE,archive)
	if io.size(inp) <= io.size(out) then
		size = io.size(inp)
		index = 0
		while (index+(MAX_RAM_ALLOCATION/2) < size) do
			io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))
			index = index + (MAX_RAM_ALLOCATION/2)
		end
		if index < size then
			io.write(out,index,io.read(inp,index,size-index),(size-index))
		end
	end
	io.close(inp)
	io.close(out)
end
function RestoreFolder(input,archive)
	files = System.listDirectory("/"..string.format('%02X',archive).."_"..input)
	for z, file in pairs(files) do
		if (file.directory) then
			RestoreFolder(input.."/"..file.name,archive)
		else
			RestoreFile(input.."/"..file.name,archive)
		end
	end
end
function DumpFolder(input,archive)
	files = System.listExtdataDir(extdata_directory..input,archive)
	System.createDirectory("/"..string.format('%02X',archive).."_"..input)
	for z, file in pairs(files) do
		if (file.directory) then
			DumpFolder(input.."/"..file.name,archive)
		else
			DumpFile(input.."/"..file.name,archive)
		end
	end
end
function CopyFile(input,output)
	inp = io.open(input,FREAD)
	if System.doesFileExist(output) then
		System.deleteFile(output)
	end
	out = io.open(output,FCREATE)
	size = io.size(inp)
	index = 0
	while (index+(MAX_RAM_ALLOCATION/2) < size) do
		io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))
		index = index + (MAX_RAM_ALLOCATION/2)
	end
	if index < size then
		io.write(out,index,io.read(inp,index,size-index),(size-index))
	end
	io.close(inp)
	io.close(out)
end
function CopyDir(input,output)
	files = System.listDirectory(input)
	System.createDirectory(output)
	for z, file in pairs(files) do
		if (file.directory) then
			CopyDir(input.."/"..file.name,output.."/"..file.name)
		else
			CopyFile(input.."/"..file.name,output.."/"..file.name)
		end
	end
end
function OpenExtdataFile(text, archive)
	GarbageCollection()
	current_file = io.open(extdata_directory..text,FREAD,archive)
	current_type = "HEX"
	txt_index = 0
	updateTXT = true
end
function ForceOpenFile(text, size, mode)
	if mode == "SMDH" then
		GarbageCollection()
		current_type = "SMDH"
		current_file = System.extractSMDH(System.currentDirectory()..text)
		smdh_show = Console.new(TOP_SCREEN)
		Console.append(smdh_show,"Title: "..current_file.title.."\n\n")
		Console.append(smdh_show,"Description: "..current_file.desc.."\n\n")
		Console.append(smdh_show,"Author: "..current_file.author)
	elseif mode == "3DSX" and not build == "CFW" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		System.launch(System.currentDirectory()..text)
	elseif mode == "JPGV" then
		GarbageCollection()
		current_file = JPGV.load(System.currentDirectory()..text)
		current_type = "JPGV"
		JPGV.start(current_file,NO_LOOP)
	elseif mode == "WAV" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		magic = io.read(current_file,8,4)
		io.close(current_file)
		if magic == "AIFF" then
			current_file = Sound.openAiff(System.currentDirectory()..text, true)
			current_type = "WAV"
			Sound.play(current_file,NO_LOOP)
		elseif magic == "RIFF" then
			current_file = Sound.openWav(System.currentDirectory()..text, true)
			current_type = "WAV"
			Sound.play(current_file,NO_LOOP)
		else
			current_file = Sound.openOgg(System.currentDirectory()..text, true)
			current_type = "WAV"
			Sound.play(current_file,NO_LOOP)
		end
	elseif mode == "IMG" then
		GarbageCollection()
		current_type = "IMG"
		current_file = Graphics.loadImage(System.currentDirectory()..text)
		width = Graphics.getImageWidth(current_file)
		height = Graphics.getImageHeight(current_file)
		if Graphics.getImageWidth(current_file) > 400 then
			width = 400
			big_image = true
		end
		if Graphics.getImageHeight(current_file) > 240 then
			height = 240
			big_image = true
		end
	elseif mode == "LUA" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		reset_dir = System.currentDirectory()
		System.currentDirectory(string.sub(System.currentDirectory(),1,-2))
		dofile(System.currentDirectory().."/"..text)
		System.currentDirectory(reset_dir)
		current_type = "LUA"
		Sound.init()
	elseif mode == "TXT" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		text_console = Console.new(TOP_SCREEN)
		current_type = "TXT"
		txt_index = 0
		txt_words = 0
		updateTXT = true
	elseif mode == "HEX" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		current_type = "HEX"
		txt_index = 0
		updateTXT = true
	elseif mode == "INFO" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		current_type = "INFO"
		f_size = io.size(current_file)
		f = "Bytes"
		if (f_size > 1024) then
			f_size = f_size / 1024
			f = "KBs"
		end
		if (f_size > 1024) then
			f_size = f_size / 1024
			f = "MBs"
		end
		io.close(current_file)
		text_console = Console.new(TOP_SCREEN)
		Console.append(text_console,"Filename: "..text.."\n")
		i = -1
		while string.sub(text,i,i) ~= "." do
			i = i - 1
		end
		i = i + 1
		Console.append(text_console,"Format: "..string.upper(string.sub(text,i)).."\n")
		Console.append(text_console,"Size: "..f_size.." "..f.."\n")
	elseif mode == "ZIP" then
		GarbageCollection()
		pass = System.startKeyboard("")
		System.extractZIP(System.currentDirectory()..text,System.currentDirectory()..string.sub(text,1,-5),pass)
		files_table = System.listDirectory(System.currentDirectory())
		if System.currentDirectory() ~= "/" then
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			table.insert(files_table,extra)
		end
		files_table = SortDirectory(files_table)
	elseif mode == "TTF" then
		GarbageCollection()
		current_file = Font.load(System.currentDirectory()..text)
		current_type = "TTF"
	elseif mode == "CIA" then
		GarbageCollection()
		sm_index = 1
		cia_data = System.extractCIA(System.currentDirectory()..text)
		oldpad = KEY_A
		while true do
			Screen.refresh()
			Screen.waitVblankStart()
			Screen.clear(TOP_SCREEN)
			Screen.debugPrint(0,0,"Title: "..cia_data.title,white,TOP_SCREEN)
			Screen.debugPrint(0,15,"Unique ID: 0x"..string.sub(string.format('%02X',cia_data.unique_id),1,-3),white,TOP_SCREEN)
			Screen.debugPrint(0,30,"Size to install: "..cia_data.install_size,white,TOP_SCREEN)
			Screen.debugPrint(0,45,"Version: "..cia_data.version,white,TOP_SCREEN)
			if not cia_data.icon == nil then
				Screen.debugPrint(0,30,"Name: "..cia_data.name,white,TOP_SCREEN)
				Screen.debugPrint(0,45,"Author: "..cia_data.author,white,TOP_SCREEN)
				Screen.debugPrint(0,60,"Desc: "..cia_data.desc,white,TOP_SCREEN)
				Screen.drawImage(5, 85, cia_data.icon, TOP_SCREEN)
			end
			pad = Controls.read()
			Screen.fillEmptyRect(60,260,50,95,black,BOTTOM_SCREEN)
			Screen.fillRect(61,259,51,96,white,BOTTOM_SCREEN)
			if (sm_index == 1) then
				Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, SDMC)
					break
				end
			elseif (sm_index == 2) then
				Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 3
				elseif (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 1
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, NAND)
					break
				end
			else
				Screen.fillRect(61,259,81,96,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",red,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					break
				end
			end
			oldpad = pad
			Screen.flip()
		end
		update_bottom_screen = true
	end
end
function DeleteDir(dir)
	files = System.listDirectory(dir)
	for z, file in pairs(files) do
		if (file.directory) then
			DeleteDir(dir.."/"..file.name)
		else
			System.deleteFile(dir.."/"..file.name)
		end
	end
	System.deleteDirectory(dir)
end
function OpenFile(text, size)
	if string.upper(string.sub(text,-5)) == ".SMDH" then
		GarbageCollection()
		current_type = "SMDH"
		current_file = System.extractSMDH(System.currentDirectory()..text)
		smdh_show = Console.new(TOP_SCREEN)
		Console.append(smdh_show,"Title: "..current_file.title.."\n\n")
		Console.append(smdh_show,"Description: "..current_file.desc.."\n\n")
		Console.append(smdh_show,"Author: "..current_file.author)
	elseif string.upper(string.sub(text,-4)) == ".ZIP" then
		GarbageCollection()
		pass = System.startKeyboard("PASSWORD")
		System.extractZIP(System.currentDirectory()..text,System.currentDirectory()..string.sub(text,1,-5),pass)
		files_table = System.listDirectory(System.currentDirectory())
		if System.currentDirectory() ~= "/" then
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			table.insert(files_table,extra)
		end
		files_table = SortDirectory(files_table)
	elseif (string.upper(string.sub(text,-5)) == ".3DSX") and not build == "CFW" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		Graphics.term()
		System.launch(System.currentDirectory()..text)
	elseif string.upper(string.sub(text,-5)) == ".JPGV" then
		GarbageCollection()
		current_file = JPGV.load(System.currentDirectory()..text)
		current_type = "JPGV"
		JPGV.start(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".TTF" then
		GarbageCollection()
		current_file = Font.load(System.currentDirectory()..text)
		current_type = "TTF"
	elseif string.upper(string.sub(text,-4)) == ".WAV" then
		GarbageCollection()
		current_file = Sound.openWav(System.currentDirectory()..text, true)
		current_type = "WAV"
		Sound.play(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".OGG" then
		GarbageCollection()
		current_file = Sound.openOgg(System.currentDirectory()..text,true)
		current_type = "WAV"
		Sound.play(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".AIF" or string.upper(string.sub(text,-5)) == ".AIFF" then
		GarbageCollection()
		current_file = Sound.openAiff(System.currentDirectory()..text, true)
		current_type = "WAV"
		Sound.play(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".PNG" or string.upper(string.sub(text,-4)) == ".BMP" or string.upper(string.sub(text,-4)) == ".JPG" then
		GarbageCollection()
		current_type = "IMG"
		current_file = Graphics.loadImage(System.currentDirectory()..text)
		width = Graphics.getImageWidth(current_file)
		height = Graphics.getImageHeight(current_file)
		if width > 400 then
			width = 400
			big_image = true
		end
		if height > 240 then
			height = 240
			big_image = true
		end
	elseif string.sub(text,-4) == ".lua" or string.sub(text,-4) == ".LUA" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		reset_dir = System.currentDirectory()
		System.currentDirectory(string.sub(System.currentDirectory(),1,-2))
		dofile(System.currentDirectory().."/"..text)
		System.currentDirectory(reset_dir)
		current_type = "LUA"
		Sound.init()
	elseif string.sub(text,-4) == ".txt" or string.sub(text,-4) == ".TXT" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		text_console = Console.new(TOP_SCREEN)
		current_type = "TXT"
		txt_index = 0
		txt_words = 0
		updateTXT = true
	elseif string.upper(string.sub(text,-4)) == ".CIA" and build ~= "NH2" then
		GarbageCollection()
		sm_index = 1
		cia_data = System.extractCIA(System.currentDirectory()..text)
		oldpad = KEY_A
		while true do
			Screen.refresh()
			Screen.waitVblankStart()
			Screen.clear(TOP_SCREEN)
			Screen.debugPrint(0,0,"Title: "..cia_data.title,white,TOP_SCREEN)
			Screen.debugPrint(0,15,"Unique ID: 0x"..string.sub(string.format('%02X',cia_data.unique_id),1,-3),white,TOP_SCREEN)
			Screen.debugPrint(0,30,"Size to install: "..cia_data.install_size,white,TOP_SCREEN)
			Screen.debugPrint(0,45,"Version: "..cia_data.version,white,TOP_SCREEN)
			if not cia_data.icon == nil then
				Screen.debugPrint(0,30,"Name: "..cia_data.name,white,TOP_SCREEN)
				Screen.debugPrint(0,45,"Author: "..cia_data.author,white,TOP_SCREEN)
				Screen.debugPrint(0,60,"Desc: "..cia_data.desc,white,TOP_SCREEN)
				Screen.drawImage(5, 85, cia_data.icon, TOP_SCREEN)
			end
			pad = Controls.read()
			Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)
			Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)
			if (sm_index == 1) then
				Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, SDMC)
					break
				end
			elseif (sm_index == 2) then
				Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 3
				elseif (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 1
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, NAND)
					break
				end
			else
				Screen.fillRect(61,259,81,96,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",red,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					break
				end
			end
			oldpad = pad
			Screen.flip()
		end
		update_bottom_screen = true
	end
end
function OpenDirectory(text,archive_id)
	i=0
	if mode == "SDMC" then
		if text == ".." then
			j=-2
			while string.sub(System.currentDirectory(),j,j) ~= "/" do
				j=j-1
			end
			System.currentDirectory(string.sub(System.currentDirectory(),1,j))
		else
			System.currentDirectory(System.currentDirectory()..text.."/")
		end
	else
		if text == ".." then
			j=-2
			while string.sub(extdata_directory,j,j) ~= "/" do
				j=j-1
			end
			extdata_directory = string.sub(extdata_directory,1,j)
		else
			extdata_directory = extdata_directory..text.."/"
		end
	end
	if mode == "SDMC" then
		files_table = System.listDirectory(System.currentDirectory())
		if System.currentDirectory() ~= "/" then
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			table.insert(files_table,extra)
		end
		files_table = SortDirectory(files_table)
	else
		if extdata_directory == "/" then
			files_table = extdata_backup
		else
			files_table = System.listExtdataDir(extdata_directory,archive_id)
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			extra.archive = archive_id
			table.insert(files_table,extra)
		end
	end
end
function GarbageCollection()
	if current_type == "SMDH" then
		Console.destroy(smdh_show)
		Screen.freeImage(current_file.icon)
	elseif current_type == "TTF" then
		Font.unload(current_file)
	elseif current_type == "JPGV" then
		if JPGV.isPlaying(current_file) then
			JPGV.pause(current_file)
		end
		JPGV.unload(current_file)
		is_fullscreen = false
		fullscreen_check = nil
	elseif current_type == "WAV" then
		if Sound.isPlaying(current_file) then
			Sound.pause(current_file)
		end
		Sound.close(current_file)
	elseif current_type == "IMG" then
		Graphics.freeImage(current_file)
		big_image = false
		y_print = 0
		x_print = 0
	elseif current_type == "TXT" then
		io.close(current_file)
		Console.destroy(text_console)
		old_indexes = {}
		txt_i = 0
	elseif current_type == "INFO" then
		Console.destroy(text_console)
	elseif current_type == "CIA" then
		if not cia_data.icon == nil then
			Screen.freeImage(cia_data.icon)
		end
	elseif current_type == "HEX" then
		io.close(current_file)
		old_indexes = {}
		txt_i = 0
	elseif current_type == "LUA" then
		theme_name = "NONAME"
		author = "NONAME"
	end
	current_type = nil
end
function CropPrint(x, y, text, color, screen)
	if string.len(text) > 25 then
		Screen.debugPrint(x, y, string.sub(text,1,25) .. "...", color, screen)
	else
		Screen.debugPrint(x, y, text, color, screen)
	end
end
function ThemePrint(x, y, text, color, screen)
	if string.len(text) > 40 then
		Screen.debugPrint(x, y, string.sub(text,1,40) .. "...", color, screen)
	else
		Screen.debugPrint(x, y, text, color, screen)
	end
end
function BuildLines(file, index)
	MAX_LENGTH = 1200
	SIZE = io.size(file)
	if ((index + MAX_LENGTH) < SIZE) then
		READ_LENGTH = MAX_LENGTH
	else
		READ_LENGTH = SIZE - index
	end
	if (index < SIZE) then
		Console.clear(text_console)
		Console.append(text_console,io.read(file,index,READ_LENGTH))
		txt_words = Console.show(text_console)
	else
		txt_words = 0
	end
	if (txt_words > 0) then
		table.insert(old_indexes, index)
		index = index + txt_words
		txt_i = txt_i + 1
	end
	return index
end
function BuildHex(file, index)
	MAX_LENGTH = 120
	SIZE = io.size(file)
	if ((index + MAX_LENGTH) < SIZE) then
		READ_LENGTH = MAX_LENGTH
	else
		READ_LENGTH = SIZE - index
	end
	if (index < SIZE) then
		hex_text = {}
		hex_values = {}
		text = io.read(file,index,READ_LENGTH)
		t = 1
		while (t <= 15) do
			if ((t*8) > string.len(text)) then
				temp = string.sub(text,1+(t-1)*8,-1)
			else
				temp = string.sub(text,1+(t-1)*8,t*8)
			end
			t2 = 1
			while t2 <= string.len(temp) do
				table.insert(hex_values,string.byte(temp,t2))
				t2 = t2 + 1
			end
			table.insert(hex_text,temp)
			t = t + 1
		end
		table.insert(old_indexes, index)
		index = index + READ_LENGTH
		txt_i = txt_i + 1
	end
	return index
end
while true do
	base_y = 0
	i = 1
	Screen.refresh()
	if current_type ~= "JPGV" then
		Screen.clear(TOP_SCREEN)
	end
	pad = Controls.read()
	if (current_type == "SMDH") then
		Console.show(smdh_show)
		Screen.debugPrint(0,170,"Icon:",white,TOP_SCREEN)
		Screen.drawImage(0,185,current_file.icon,TOP_SCREEN)
	elseif (current_type == "TTF") then
		Font.setPixelSizes(current_file,8)
		Font.print(current_file,0,5,"8: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,13,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,12)
		Font.print(current_file,0,25,"12: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,37,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,18)
		Font.print(current_file,0,54,"18: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,72,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,24)
		Font.print(current_file,0,95,"24: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,119,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,30)
		Font.print(current_file,0,149,"30: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,179,"jumps over the lazy dog",white,TOP_SCREEN)
	elseif (current_type == "JPGV") then
		if fullscreen_check == nil then
			Screen.drawPixel(399,239,0xDEADBEFF, TOP_SCREEN)
			tmp = Screen.getPixel(399,239,TOP_SCREEN)
		end
		if is_fullscreen then
			JPGV.drawFast(current_file,TOP_SCREEN)
		else
			JPGV.draw(0,0,current_file,TOP_SCREEN)
		end
		if fullscreen_check == nil then
			if tmp == Screen.getPixel(399,239,TOP_SCREEN) then
				is_fullscreen = true
			end
			fullscreen_check = true
		end
	elseif (current_type == "WAV") then
		Sound.updateStream()
		Screen.debugPrint(0,0,"Title: ",white,TOP_SCREEN)
		ThemePrint(0,15,Sound.getTitle(current_file),white,TOP_SCREEN)
		Screen.debugPrint(0,40,"Author: ",white,TOP_SCREEN)
		ThemePrint(0,55,Sound.getAuthor(current_file),white,TOP_SCREEN)
		Screen.debugPrint(0,80,"Time: "..FormatTime(Sound.getTime(current_file)).." / "..FormatTime(Sound.getTotalTime(current_file)),white,TOP_SCREEN)
		Screen.debugPrint(0,95,"Samplerate: "..Sound.getSrate(current_file),white,TOP_SCREEN)
		if Sound.getType(current_file) == 1 then
			stype = "Mono"
		else
			stype = "Stereo"
		end
		Screen.debugPrint(0,110,"Audiotype: "..stype,white,TOP_SCREEN)
	elseif (current_type == "IMG") then
		Graphics.initBlend(TOP_SCREEN)
		if big_image then
			Graphics.drawPartialImage(0,0,x_print,y_print,width,height,current_file)
			x,y = Controls.readCirclePad()
			if (x < - 100) and (x_print > 0) then
				x_print = x_print - 5
				if x_print < 0 then
					x_print = 0
				end
			end
			if (y > 100) and (y_print > 0) then
				y_print = y_print - 5
				if y_print < 0 then
					y_print = 0
				end
			end
			if (x > 100) and (x_print + width < Graphics.getImageWidth(current_file)) then
				x_print = x_print + 5
			end
			if (y < - 100) and (y_print + height < Graphics.getImageHeight(current_file)) then
				y_print = y_print + 5
			end
			if x_print + width > Graphics.getImageWidth(current_file) then
				x_print = Graphics.getImageWidth(current_file) - width
			end
			if y_print + height > Graphics.getImageHeight(current_file) then
				y_print = Graphics.getImageHeight(current_file) - height
			end
		else
			Graphics.drawImage(0,0,current_file)
		end
		Graphics.termBlend()
	elseif (current_type == "INFO") then
		Console.show(text_console)
	elseif (current_type == "TXT") then
		if (updateTXT) then
			txt_index = BuildLines(current_file,txt_index)
			updateTXT = false
		end
		Console.show(text_console)
	elseif (current_type == "LUA") then
		Screen.debugPrint(0,0,"ORGANIZ3D theme recognized...",white,TOP_SCREEN)
		Screen.debugPrint(0,15,"---------------------------------",white,TOP_SCREEN)
		Screen.debugPrint(0,30,"Theme Name: ",white,TOP_SCREEN)
		ThemePrint(0,45,theme_name,white,TOP_SCREEN)
		ThemePrint(0,75,"Author: " .. author,white,TOP_SCREEN)
	elseif (current_type == "HEX") then
		if (updateTXT) then
			txt_index = BuildHex(current_file,txt_index)
			updateTXT = false
		end
		for l, line in pairs(hex_text) do
			Screen.debugPrint(280,(l-1)*15,string.gsub(line,"\0"," "),white,TOP_SCREEN)
			temp = 1
			while (temp <= string.len(line)) do
				if (temp % 2 == 0) then
					Screen.debugPrint(0+(temp-1)*30,(l-1)*15,string.format('%02X', hex_values[(l-1)*8+temp]),white,TOP_SCREEN)
				else
					Screen.debugPrint(0+(temp-1)*30,(l-1)*15,string.format('%02X', hex_values[(l-1)*8+temp]),red,TOP_SCREEN)
				end
				temp = temp + 1
			end
		end
		Screen.debugPrint(0,225,"Offset: 0x" .. string.format('%X', old_indexes[#old_indexes]) .. " (" .. (old_indexes[#old_indexes]) .. ")",white,TOP_SCREEN)
	else
		Screen.debugPrint(0,0,"Welcome to ORGANIZ3D!",white,TOP_SCREEN)
		Screen.debugPrint(0,15,"---------------------------------",white,TOP_SCREEN)
		Screen.debugPrint(0,30,"You're using v.1.1.",white,TOP_SCREEN)
		Screen.debugPrint(0,45,"---------------------------------",white,TOP_SCREEN)
		Screen.debugPrint(0,60,"Press START for a Controls List",white,TOP_SCREEN)
	end
	if update_bottom_screen then
		Graphics.initBlend(BOTTOM_SCREEN)
		Graphics.drawImage(0,0,bg)
		Graphics.termBlend()
		for l, file in pairs(files_table) do
			if (base_y > 226) then
				break
			end
			if (l >= master_index) then
				if (l==p) then
					base_y2 = base_y
					if (base_y) == 0 then
						base_y = 2
					end
					Screen.fillRect(0,319,base_y-2,base_y2+12,selected_item,BOTTOM_SCREEN)
					color = selected_color
					if (base_y) == 2 then
						base_y = 0
					end
				else
					color = menu_color
				end
				if mode == "SDMC" then
					CropPrint(0,base_y,file.name,color,BOTTOM_SCREEN)
				else
					if file.name == ".." then
						CropPrint(0,base_y,file.name,color,BOTTOM_SCREEN)
					else
						CropPrint(0,base_y,file.name.." ["..string.format('%02X',file.archive).."]",color,BOTTOM_SCREEN)
					end
				end
				base_y = base_y + 15
			end
		end
		if move_base ~= nil then
			Screen.debugPrint(300,0,"M",selected_color,BOTTOM_SCREEN)
		elseif copy_base ~= nil then
			Screen.debugPrint(300,0,"C",selected_color,BOTTOM_SCREEN)
		end
		update_bottom_screen = false
	end
	-- Select Mode Controls Functions
	if (select_mode) then
		Screen.fillEmptyRect(60,260,20,22 + #sm_voices * 15,black,BOTTOM_SCREEN)
		Screen.fillRect(61,259,21,21 + #sm_voices * 15,white,BOTTOM_SCREEN)
		for l, voice in pairs(sm_voices) do
			if (l == sm_index) then
				Screen.fillRect(61,259,21+(l-1)*15,21+l*15,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,23+(l-1)*15,voice,red,BOTTOM_SCREEN)
			else
				Screen.debugPrint(63,23+(l-1)*15,voice,black,BOTTOM_SCREEN)
			end
		end
		if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
			sm_index = sm_index - 1
		elseif (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
			sm_index = sm_index + 1
		elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
			if (sm_index < #sm_voices) then
				ForceOpenFile(files_table[p].name,files_table[p].size,sm_funcs[sm_index])
			end
			sm_index = 1
			select_mode = false
			update_bottom_screen = true
		end
		if (sm_index < 1) then
			sm_index = #sm_voices
		elseif (sm_index > #sm_voices) then
			sm_index = 1
		end
	-- Security Deletion Check Screen
	elseif (delete_mode) then
		Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)
		Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)
		if (sm_index == 1) then
			Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Confirm",red,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Cancel",black,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
				sm_index = 2
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				update_bottom_screen = true
				if (files_table[p].directory) then
					if (files_table[p].name ~= "..") then
						DeleteDir(System.currentDirectory()..files_table[p].name)
					end
				else
					System.deleteFile(System.currentDirectory()..files_table[p].name)
				end
				while (#files_table > 0) do
					table.remove(files_table)
				end
				files_table = System.listDirectory(System.currentDirectory())
				if System.currentDirectory() ~= "/" then
					local extra = {}
					extra.name = ".."
					extra.size = 0
					extra.directory = true
					table.insert(files_table,extra)
				end
				files_table = SortDirectory(files_table)
				if (p > #files_table) then
					p = p - 1
				end
				delete_mode = false
			end
		else
			Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Confirm",black,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Cancel",red,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
				sm_index = 1
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				update_bottom_screen = true
				sm_index = 1
				delete_mode = false
			end
		end
	-- Copy/Move selection
	elseif (copy_or_move) then
		Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)
		Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)
		if (sm_index == 1) then
			Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Move",red,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Copy",black,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
				sm_index = 2
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				if (files_table[p].name ~= "..") then
					update_bottom_screen = true
					move_base = System.currentDirectory() .. files_table[p].name
					move_name = files_table[p].name
					if (files_table[p].directory) then
						move_type = 0
					else
						move_type = 1
					end
				end
				copy_or_move = false
				sm_index = 1
			end
		else
			Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Move",black,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Copy",red,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
				sm_index = 1
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				if (files_table[p].directory) then
					if (files_table[p].name ~= "..") then
						copy_name = files_table[p].name
						copy_base = System.currentDirectory() .. files_table[p].name
						copy_type = 0
					end
				else
					copy_type = 1
					copy_name = files_table[p].name
					copy_base = System.currentDirectory() .. files_table[p].name
				end
				copy_or_move = false
				sm_index = 1
			end
		end
	else
	-- Base Controls Functions
		if (Controls.check(pad,KEY_DUP)) then
			if not (Controls.check(oldpad,KEY_DUP)) then
				Timer.reset(ctrlTimer)
				update_bottom_screen = true
				p = p - 1
				if (p >= 16) then
					master_index = p - 15
				end
			else
				if Timer.getTime(ctrlTimer) > timeSlap then
					Timer.reset(ctrlTimer)
					update_bottom_screen = true
					p = p - 1
					if (p >= 16) then
						master_index = p - 15
					end
					timeSlap = math.max(100, timeSlap - 15)
				end
			end
		elseif (Controls.check(pad,KEY_DDOWN)) then
			if not (Controls.check(oldpad,KEY_DDOWN)) then
				Timer.reset(ctrlTimer)
				update_bottom_screen = true
				p = p + 1
				if (p >= 17) then
					master_index = p - 15
				end
			else
				if Timer.getTime(ctrlTimer) > timeSlap then
					Timer.reset(ctrlTimer)
					update_bottom_screen = true
					p = p + 1
					if (p >= 17) then
						master_index = p - 15
					end
					timeSlap = math.max(100, timeSlap - 15)
				end
			end
		else
			timeSlap = 200
		end
		if (p < 1) then
			p = #files_table
			if (p >= 17) then
				master_index = p - 15
			end
		elseif (p > #files_table) then
			master_index = 0
			p = 1
		end
		if (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
			if (files_table[p].directory) then
				if (mode == "SDMC") then
					OpenDirectory(files_table[p].name,0)
				else
					OpenDirectory(files_table[p].name,files_table[p].archive)
				end
				p=1
				master_index=0
			else
				if (mode == "SDMC") then
					OpenFile(files_table[p].name,files_table[p].size)
				else
					OpenExtdataFile(files_table[p].name,files_table[p].archive)
				end
			end
		elseif (Controls.check(pad,KEY_X)) and not (Controls.check(oldpad,KEY_X)) then
			if (mode == "SDMC") then
				if (move_base == nil) and (copy_base == nil) then
					delete_mode = true
				else
					update_bottom_screen = true
					move_base = nil
					move_name = nil
					copy_base = nil
					copy_name = nil
				end
			else
				if (files_table[p].directory) then
					RestoreFolder(files_table[p].name,files_table[p].archive)
				else
					RestoreFile(files_table[p].name,files_table[p].archive)
				end
			end				
		elseif (Controls.check(pad,KEY_Y)) and not (Controls.check(oldpad,KEY_Y)) then
			if (mode == "SDMC") then
				if (copy_base == nil) then
					if (move_base == nil) then
						if (files_table[p].name ~= "..") then
							update_bottom_screen = true
							copy_or_move = true
						end
					else
						update_bottom_screen = true
						if (move_type == 0) then
							System.renameDirectory(move_base,System.currentDirectory() .. move_name)
						else
							System.renameFile(move_base,System.currentDirectory() .. move_name)
						end
						move_base = nil
						files_table = System.listDirectory(System.currentDirectory())
						if System.currentDirectory() ~= "/" then
							local extra = {}
							extra.name = ".."
							extra.size = 0
							extra.directory = true
							table.insert(files_table,extra)
						end
						files_table = SortDirectory(files_table)
					end
				else
					copy_end = System.currentDirectory() .. copy_name
					if copy_end == copy_base then
						temp_copy = "Copy_" .. copy_name
						copy_end = System.currentDirectory() .. temp_copy
						if (copy_type == 1) then
							while System.doesFileExist(copy_end) do
								temp_copy = "Copy_" .. temp_copy
								copy_end = System.currentDirectory() .. temp_copy
							end
						end
					end
					if (copy_type == 0) then
						CopyDir(copy_base,copy_end)
					else
						CopyFile(copy_base,copy_end)
					end
					files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
					files_table = SortDirectory(files_table)
					copy_name = nil
					copy_base = nil
				end
			end
		elseif (Controls.check(pad,KEY_B)) and not (Controls.check(oldpad,KEY_B)) then
			if (mode == "SDMC") then
				update_bottom_screen = true
				if (files_table[p].name ~= "..") then
					new_name = System.startKeyboard(files_table[p].name)
					oldpad = KEY_A
					if (files_table[p].directory) then
						System.renameDirectory(System.currentDirectory() .. files_table[p].name,System.currentDirectory() .. new_name)
					else
						System.renameFile(System.currentDirectory() .. files_table[p].name,System.currentDirectory() .. new_name)
					end
					files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
					files_table = SortDirectory(files_table)
				end
			else
				if (files_table[p].directory) then
					DumpFolder(files_table[p].name,files_table[p].archive)
				else
					DumpFile(files_table[p].name,files_table[p].archive)
				end
			end
		elseif (Controls.check(pad,KEY_DLEFT)) and not (Controls.check(oldpad,KEY_DLEFT)) then
			if (current_type == "SMDH") then
				update_bottom_screen = true
				name = System.startKeyboard("icon.bmp")
				Screen.saveBitmap(current_file.icon,System.currentDirectory()..name)
				oldpad = KEY_A
				files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
				files_table = SortDirectory(files_table)
			elseif (current_type == "TXT") or (current_type == "HEX") then
				if (txt_i > 1) then			
					updateTXT = true
					table.remove(old_indexes)
					txt_index = table.remove(old_indexes)
					txt_i = txt_i - 2
				end
			elseif (current_type == "WAV") then
				if (Sound.isPlaying(current_file)) then
					Sound.pause(current_file)
				else
					Sound.resume(current_file)
				end
			elseif (current_type == "JPGV") then
				if (JPGV.isPlaying(current_file)) then
					JPGV.pause(current_file)
				else
					JPGV.resume(current_file)
				end
			end
		elseif (Controls.check(pad,KEY_DRIGHT)) and not (Controls.check(oldpad,KEY_DRIGHT)) then
			if (current_type == "SMDH") then
				update_bottom_screen = true
				name = System.startKeyboard("icon.bmp")
				Screen.saveBitmap(current_file.icon,System.currentDirectory()..name)
				oldpad = KEY_A
				files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
				files_table = SortDirectory(files_table)
			elseif (current_type == "TXT") or (current_type == "HEX") then
				updateTXT = true
			elseif (current_type == "WAV") then
				if (Sound.isPlaying(current_file)) then
					Sound.pause(current_file)
				else
					Sound.resume(current_file)
				end
			elseif (current_type == "JPGV") then
				if (JPGV.isPlaying(current_file)) then
					JPGV.pause(current_file)
				else
					JPGV.resume(current_file)
				end
			end
		elseif (Controls.check(pad,KEY_SELECT)) and not (Controls.check(oldpad,KEY_SELECT)) then
			update_bottom_screen = true
			p = 1
			if (mode == "SDMC") then
				GarbageCollection()
				mode = "EXTDATA"
				if (update_main_extdata) then
					files_table = System.scanExtdata()
					extdata_backup = files_table
					update_main_extdata = false
				else
					files_table = extdata_backup
				end
				extdata_directory = "/"
			else
				mode = "SDMC"
				System.currentDirectory("/")
				files_table = SortDirectory(System.listDirectory(System.currentDirectory()))
			end
		elseif (Controls.check(pad,KEY_L)) and not (Controls.check(oldpad,KEY_L)) then
			if (mode == "SDMC") then
				if (files_table[p].directory == false) then
					select_mode = true
				end
			end
		elseif (Controls.check(pad,KEY_R)) and not (Controls.check(oldpad,KEY_R)) then
			if (mode == "SDMC") then
				update_bottom_screen = true
				name = System.startKeyboard("New Folder")
				System.createDirectory(System.currentDirectory()..name)
				oldpad = KEY_A
				files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
				files_table = SortDirectory(files_table)
			end
		elseif (Controls.check(pad,KEY_TOUCH)) then
			update_bottom_screen = true
			x,y = Controls.readTouch()
			new_index = math.ceil(y/15)
			if (new_index <= #files_table) then
				if master_index > 0 then
					p = new_index + master_index - 1
				else
					p = new_index
				end
			end
		elseif (Controls.check(pad,KEY_START)) then
			GarbageCollection()
			sm_index = 1
			oldpad = KEY_START
			while exit_flag == nil do
				Screen.refresh()
				Screen.waitVblankStart()
				pad = Controls.read()
				Screen.fillEmptyRect(10,300,20,37,black,BOTTOM_SCREEN)
				Screen.fillRect(11,299,21,36,white,BOTTOM_SCREEN)
				Screen.debugPrint(13,23,"ORGANIZ3D - Controls List",black,BOTTOM_SCREEN)
				if mode == "SDMC" then
					Screen.fillEmptyRect(10,300,50,232,black,BOTTOM_SCREEN)
					Screen.fillRect(11,299,51,231,white,BOTTOM_SCREEN)
					Screen.debugPrint(13,53,"Up/Down : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,68,"Left/Rght : Reader actions",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,83,"Touch : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,98,"CirclePad : Move image viewport",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,113,"A : Open file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,128,"Y : Move/Copy file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,143,"B : Rename file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,158,"X : Delete file/directory",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,173,"L : Open file as...",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,188,"R : Create new folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,203,"Select : Go to Extdata mode",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,218,"Start : Exit ORGANIZ3D",black,BOTTOM_SCREEN)
				else
					Screen.fillEmptyRect(10,300,50,157,black,BOTTOM_SCREEN)
					Screen.fillRect(11,299,51,156,white,BOTTOM_SCREEN)
					Screen.debugPrint(13,53,"Up/Down : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,68,"Touch : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,83,"A : Open file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,98,"B : Dump file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,113,"X : Restore file/directory",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,128,"Select : Go to Filebrowser mode",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,143,"Start : Exit ORGANIZ3D",black,BOTTOM_SCREEN)
				end
				if (Controls.check(pad,KEY_START)) and not (Controls.check(oldpad,KEY_START)) then
					exit_flag = true
				elseif (Controls.check(pad,KEY_B)) and not (Controls.check(oldpad,KEY_B)) then
					exit_flag = false
				end
				Screen.flip()
				oldpad = pad
			end
			update_bottom_screen = true
			if exit_flag then
				Graphics.freeImage(bg)
				Sound.term()
				Graphics.term()
				Timer.destroy(ctrlTimer)
				System.exit()
			else
				exit_flag = nil
			end
		end
	end	
	if not (Controls.check(pad,KEY_TOUCH)) then
		update_bottom_screen = true
		master_index = p - 15
	end
	Screen.flip()
	Screen.waitVblankStart()
	oldpad = pad
end

Texto alterado

Abrir arquivo

local APP_DIR = "/Yuki FM"
local APP_THEME_DIR = APP_DIR.."/Themes"
local APP_CONFIG = APP_DIR.."/config.yuki"
local default_config = [[
LoadTheme("Path of Theme")
]]

local function defaultTheme()
	rawset(_G, "bg", Graphics.convertFrom(Screen.createImage(1,1, Color.new(0,0,0))))
	rawset(_G, "selected_item", Color.new(255,0,0))
	rawset(_G, "menu_color", Color.new(255,255,255))
	rawset(_G, "selected_color", Color.new(0,255,0))
end

update_bottom_screen = true
System.setCpuSpeed(804)
Graphics.init()
function LoadTheme(theme)
	old = System.currentDirectory()
	System.currentDirectory(APP_THEME_DIR.."/"..theme)
	if System.doesFileExist(APP_THEME_DIR.."/"..theme.."/theme.lua") then
		dofile(System.currentDirectory().."/theme.lua")
	else
		defaultTheme()
	end
	System.currentDirectory(old)
end
System.createDirectory(APP_DIR)
System.createDirectory(APP_THEME_DIR)
if not System.doesFileExist(APP_CONFIG) then
	local f = io.open(APP_CONFIG, FCREATE)
	io.write(f, 0, default_config, default_config:len())
	io.close(f)
end
dofile(APP_CONFIG)
Sound.init()
white = Color.new(255,255,255)
black = Color.new(0,0,0)
ctrlTimer = Timer.new()
timeSlap = 200
red = Color.new(255,0,0)
green = Color.new(0,255,0)
copy_or_move = false
is_fullscreen = false
oldpad = Controls.read()
function TableConcat(t1,t2)
    for i=1,#t2 do
        t1[#t1+1] = t2[i]
    end
    return t1
end
function SortDirectory(dir)
	folders_table = {}
	files_table = {}
	for i,file in pairs(dir) do
		if file.directory then
			table.insert(folders_table,file)
		else
			table.insert(files_table,file)
		end
	end
	table.sort(files_table, function (a, b) return (a.name:lower() < b.name:lower() ) end)
	table.sort(folders_table, function (a, b) return (a.name:lower() < b.name:lower() ) end)
	return_table = TableConcat(folders_table,files_table)
	return return_table
end
files_table = SortDirectory(System.listDirectory("/"))
mode = "SDMC"
System.currentDirectory("/")
p = 1
current_file = nil
current_type = nil
big_image = false
master_index = 0
sm_index = 1
build = System.checkBuild()
if build == 0 then
	build = "NH1"
elseif build == 1 then
	build = "CFW"
else
	build = "NH2"
end
if build == "NH1" then
	sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","3DSX Launcher","CIA Installer","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}
	sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","3DSX","CIA","SMDH","ZIP","INFO","TTF"}
elseif build == "NH2" then
	sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","3DSX Launcher","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}
	sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","3DSX","SMDH","ZIP","INFO","TTF"}
else
	sm_voices = {"Video Player","Music Player","Image Viewer","Text Reader","Lua Interpreter","HEX Viewer","CIA Installer","SMDH Decoder","ZIP Extractor","Info Viewer","Font Viewer","Cancel"}
	sm_funcs = {"JMPV","WAV","IMG","TXT","LUA","HEX","CIA","SMDH","ZIP","INFO","TTF"}
end
hex_values = {}
hex_text = {}
updateTXT = false
select_mode = false
update_main_extdata = true
delete_mode = false
move_base = nil
theme_name = "NONAME"
author = "NONAME"
copy_base = nil
x_print = 0
y_print = 0
copy_type = 0
move_type = 0
txt_index = 0
txt_words = 0
txt_i = 0
old_indexes = {}
MAX_RAM_ALLOCATION = 10485760
function FormatTime(seconds)
	minute = math.floor(seconds/60)
	seconds = seconds%60
	hours = math.floor(minute/60)
	minute = minute%60
	if minute < 10 then
		minute = "0"..minute
	end
	if seconds < 10 then
		seconds = "0"..seconds
	end
	if hours == 0 then
		return minute..":"..seconds
	else
		return hours..":"..minute..":"..seconds
	end
end
function DumpFile(input,archive)
	inp = io.open(extdata_directory..input,FREAD,archive)
	if System.doesFileExist("/"..input) then
		System.deleteFile("/"..input)
	end
	out = io.open("/"..string.format('%02X',archive).."_"..input,FCREATE)
	size = io.size(inp)
	index = 0
	while (index+(MAX_RAM_ALLOCATION/2) < size) do
		io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))
		index = index + (MAX_RAM_ALLOCATION/2)
	end
	if index < size then
		io.write(out,index,io.read(inp,index,size-index),(size-index))
	end
	io.close(inp)
	io.close(out)
end
function RestoreFile(input,archive)
	inp = io.open("/"..string.format('%02X',archive).."_"..input,FREAD)
	out = io.open(extdata_directory..input,FWRITE,archive)
	if io.size(inp) <= io.size(out) then
		size = io.size(inp)
		index = 0
		while (index+(MAX_RAM_ALLOCATION/2) < size) do
			io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))
			index = index + (MAX_RAM_ALLOCATION/2)
		end
		if index < size then
			io.write(out,index,io.read(inp,index,size-index),(size-index))
		end
	end
	io.close(inp)
	io.close(out)
end
function RestoreFolder(input,archive)
	files = System.listDirectory("/"..string.format('%02X',archive).."_"..input)
	for z, file in pairs(files) do
		if (file.directory) then
			RestoreFolder(input.."/"..file.name,archive)
		else
			RestoreFile(input.."/"..file.name,archive)
		end
	end
end
function DumpFolder(input,archive)
	files = System.listExtdataDir(extdata_directory..input,archive)
	System.createDirectory("/"..string.format('%02X',archive).."_"..input)
	for z, file in pairs(files) do
		if (file.directory) then
			DumpFolder(input.."/"..file.name,archive)
		else
			DumpFile(input.."/"..file.name,archive)
		end
	end
end
function CopyFile(input,output)
	inp = io.open(input,FREAD)
	if System.doesFileExist(output) then
		System.deleteFile(output)
	end
	out = io.open(output,FCREATE)
	size = io.size(inp)
	index = 0
	while (index+(MAX_RAM_ALLOCATION/2) < size) do
		io.write(out,index,io.read(inp,index,MAX_RAM_ALLOCATION/2),(MAX_RAM_ALLOCATION/2))
		index = index + (MAX_RAM_ALLOCATION/2)
	end
	if index < size then
		io.write(out,index,io.read(inp,index,size-index),(size-index))
	end
	io.close(inp)
	io.close(out)
end
function CopyDir(input,output)
	files = System.listDirectory(input)
	System.createDirectory(output)
	for z, file in pairs(files) do
		if (file.directory) then
			CopyDir(input.."/"..file.name,output.."/"..file.name)
		else
			CopyFile(input.."/"..file.name,output.."/"..file.name)
		end
	end
end
function OpenExtdataFile(text, archive)
	GarbageCollection()
	current_file = io.open(extdata_directory..text,FREAD,archive)
	current_type = "HEX"
	txt_index = 0
	updateTXT = true
end
function ForceOpenFile(text, size, mode)
	if mode == "SMDH" then
		GarbageCollection()
		current_type = "SMDH"
		current_file = System.extractSMDH(System.currentDirectory()..text)
		smdh_show = Console.new(TOP_SCREEN)
		Console.append(smdh_show,"Title: "..current_file.title.."\n\n")
		Console.append(smdh_show,"Description: "..current_file.desc.."\n\n")
		Console.append(smdh_show,"Author: "..current_file.author)
	elseif mode == "3DSX" and not build == "CFW" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		System.launch(System.currentDirectory()..text)
	elseif mode == "JPGV" then
		GarbageCollection()
		current_file = JPGV.load(System.currentDirectory()..text)
		current_type = "JPGV"
		JPGV.start(current_file,NO_LOOP)
	elseif mode == "WAV" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		magic = io.read(current_file,8,4)
		io.close(current_file)
		if magic == "AIFF" then
			current_file = Sound.openAiff(System.currentDirectory()..text, true)
			current_type = "WAV"
			Sound.play(current_file,NO_LOOP)
		elseif magic == "RIFF" then
			current_file = Sound.openWav(System.currentDirectory()..text, true)
			current_type = "WAV"
			Sound.play(current_file,NO_LOOP)
		else
			current_file = Sound.openOgg(System.currentDirectory()..text, true)
			current_type = "WAV"
			Sound.play(current_file,NO_LOOP)
		end
	elseif mode == "IMG" then
		GarbageCollection()
		current_type = "IMG"
		current_file = Graphics.loadImage(System.currentDirectory()..text)
		width = Graphics.getImageWidth(current_file)
		height = Graphics.getImageHeight(current_file)
		if Graphics.getImageWidth(current_file) > 400 then
			width = 400
			big_image = true
		end
		if Graphics.getImageHeight(current_file) > 240 then
			height = 240
			big_image = true
		end
	elseif mode == "LUA" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		reset_dir = System.currentDirectory()
		System.currentDirectory(string.sub(System.currentDirectory(),1,-2))
		dofile(System.currentDirectory().."/"..text)
		System.currentDirectory(reset_dir)
		current_type = "LUA"
		Sound.init()
	elseif mode == "TXT" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		text_console = Console.new(TOP_SCREEN)
		current_type = "TXT"
		txt_index = 0
		txt_words = 0
		updateTXT = true
	elseif mode == "HEX" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		current_type = "HEX"
		txt_index = 0
		updateTXT = true
	elseif mode == "INFO" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		current_type = "INFO"
		f_size = io.size(current_file)
		f = "Bytes"
		if (f_size > 1024) then
			f_size = f_size / 1024
			f = "KBs"
		end
		if (f_size > 1024) then
			f_size = f_size / 1024
			f = "MBs"
		end
		io.close(current_file)
		text_console = Console.new(TOP_SCREEN)
		Console.append(text_console,"Filename: "..text.."\n")
		i = -1
		while string.sub(text,i,i) ~= "." do
			i = i - 1
		end
		i = i + 1
		Console.append(text_console,"Format: "..string.upper(string.sub(text,i)).."\n")
		Console.append(text_console,"Size: "..f_size.." "..f.."\n")
	elseif mode == "ZIP" then
		GarbageCollection()
		pass = System.startKeyboard("")
		System.extractZIP(System.currentDirectory()..text,System.currentDirectory()..string.sub(text,1,-5),pass)
		files_table = System.listDirectory(System.currentDirectory())
		if System.currentDirectory() ~= "/" then
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			table.insert(files_table,extra)
		end
		files_table = SortDirectory(files_table)
	elseif mode == "TTF" then
		GarbageCollection()
		current_file = Font.load(System.currentDirectory()..text)
		current_type = "TTF"
	elseif mode == "CIA" then
		GarbageCollection()
		sm_index = 1
		cia_data = System.extractCIA(System.currentDirectory()..text)
		oldpad = KEY_A
		while true do
			Screen.refresh()
			Screen.waitVblankStart()
			Screen.clear(TOP_SCREEN)
			Screen.debugPrint(0,0,"Title: "..cia_data.title,white,TOP_SCREEN)
			Screen.debugPrint(0,15,"Unique ID: 0x"..string.sub(string.format('%02X',cia_data.unique_id),1,-3),white,TOP_SCREEN)
			Screen.debugPrint(0,30,"Size to install: "..cia_data.install_size,white,TOP_SCREEN)
			Screen.debugPrint(0,45,"Version: "..cia_data.version,white,TOP_SCREEN)
			if not cia_data.icon == nil then
				Screen.debugPrint(0,30,"Name: "..cia_data.name,white,TOP_SCREEN)
				Screen.debugPrint(0,45,"Author: "..cia_data.author,white,TOP_SCREEN)
				Screen.debugPrint(0,60,"Desc: "..cia_data.desc,white,TOP_SCREEN)
				Screen.drawImage(5, 85, cia_data.icon, TOP_SCREEN)
			end
			pad = Controls.read()
			Screen.fillEmptyRect(60,260,50,95,black,BOTTOM_SCREEN)
			Screen.fillRect(61,259,51,96,white,BOTTOM_SCREEN)
			if (sm_index == 1) then
				Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, SDMC)
					break
				end
			elseif (sm_index == 2) then
				Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 3
				elseif (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 1
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, NAND)
					break
				end
			else
				Screen.fillRect(61,259,81,96,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",red,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					break
				end
			end
			oldpad = pad
			Screen.flip()
		end
		update_bottom_screen = true
	end
end
function DeleteDir(dir)
	files = System.listDirectory(dir)
	for z, file in pairs(files) do
		if (file.directory) then
			DeleteDir(dir.."/"..file.name)
		else
			System.deleteFile(dir.."/"..file.name)
		end
	end
	System.deleteDirectory(dir)
end
function OpenFile(text, size)
	if string.upper(string.sub(text,-5)) == ".SMDH" then
		GarbageCollection()
		current_type = "SMDH"
		current_file = System.extractSMDH(System.currentDirectory()..text)
		smdh_show = Console.new(TOP_SCREEN)
		Console.append(smdh_show,"Title: "..current_file.title.."\n\n")
		Console.append(smdh_show,"Description: "..current_file.desc.."\n\n")
		Console.append(smdh_show,"Author: "..current_file.author)
	elseif string.upper(string.sub(text,-4)) == ".ZIP" then
		GarbageCollection()
		pass = System.startKeyboard("PASSWORD")
		System.extractZIP(System.currentDirectory()..text,System.currentDirectory()..string.sub(text,1,-5),pass)
		files_table = System.listDirectory(System.currentDirectory())
		if System.currentDirectory() ~= "/" then
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			table.insert(files_table,extra)
		end
		files_table = SortDirectory(files_table)
	elseif (string.upper(string.sub(text,-5)) == ".3DSX") and not build == "CFW" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		Graphics.term()
		System.launch(System.currentDirectory()..text)
	elseif string.upper(string.sub(text,-5)) == ".JPGV" then
		GarbageCollection()
		current_file = JPGV.load(System.currentDirectory()..text)
		current_type = "JPGV"
		JPGV.start(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".TTF" then
		GarbageCollection()
		current_file = Font.load(System.currentDirectory()..text)
		current_type = "TTF"
	elseif string.upper(string.sub(text,-4)) == ".WAV" then
		GarbageCollection()
		current_file = Sound.openWav(System.currentDirectory()..text, true)
		current_type = "WAV"
		Sound.play(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".OGG" then
		GarbageCollection()
		current_file = Sound.openOgg(System.currentDirectory()..text,true)
		current_type = "WAV"
		Sound.play(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".AIF" or string.upper(string.sub(text,-5)) == ".AIFF" then
		GarbageCollection()
		current_file = Sound.openAiff(System.currentDirectory()..text, true)
		current_type = "WAV"
		Sound.play(current_file,NO_LOOP)
	elseif string.upper(string.sub(text,-4)) == ".PNG" or string.upper(string.sub(text,-4)) == ".BMP" or string.upper(string.sub(text,-4)) == ".JPG" then
		GarbageCollection()
		current_type = "IMG"
		current_file = Graphics.loadImage(System.currentDirectory()..text)
		width = Graphics.getImageWidth(current_file)
		height = Graphics.getImageHeight(current_file)
		if width > 400 then
			width = 400
			big_image = true
		end
		if height > 240 then
			height = 240
			big_image = true
		end
	elseif string.sub(text,-4) == ".lua" or string.sub(text,-4) == ".LUA" then
		GarbageCollection()
		Graphics.freeImage(bg)
		Sound.term()
		reset_dir = System.currentDirectory()
		System.currentDirectory(string.sub(System.currentDirectory(),1,-2))
		dofile(System.currentDirectory().."/"..text)
		System.currentDirectory(reset_dir)
		current_type = "LUA"
		Sound.init()
	elseif string.sub(text,-4) == ".txt" or string.sub(text,-4) == ".TXT" then
		GarbageCollection()
		current_file = io.open(System.currentDirectory()..text,FREAD)
		text_console = Console.new(TOP_SCREEN)
		current_type = "TXT"
		txt_index = 0
		txt_words = 0
		updateTXT = true
	elseif string.upper(string.sub(text,-4)) == ".CIA" and build ~= "NH2" then
		GarbageCollection()
		sm_index = 1
		cia_data = System.extractCIA(System.currentDirectory()..text)
		oldpad = KEY_A
		while true do
			Screen.refresh()
			Screen.waitVblankStart()
			Screen.clear(TOP_SCREEN)
			Screen.debugPrint(0,0,"Title: "..cia_data.title,white,TOP_SCREEN)
			Screen.debugPrint(0,15,"Unique ID: 0x"..string.sub(string.format('%02X',cia_data.unique_id),1,-3),white,TOP_SCREEN)
			Screen.debugPrint(0,30,"Size to install: "..cia_data.install_size,white,TOP_SCREEN)
			Screen.debugPrint(0,45,"Version: "..cia_data.version,white,TOP_SCREEN)
			if not cia_data.icon == nil then
				Screen.debugPrint(0,30,"Name: "..cia_data.name,white,TOP_SCREEN)
				Screen.debugPrint(0,45,"Author: "..cia_data.author,white,TOP_SCREEN)
				Screen.debugPrint(0,60,"Desc: "..cia_data.desc,white,TOP_SCREEN)
				Screen.drawImage(5, 85, cia_data.icon, TOP_SCREEN)
			end
			pad = Controls.read()
			Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)
			Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)
			if (sm_index == 1) then
				Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, SDMC)
					break
				end
			elseif (sm_index == 2) then
				Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",red,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",black,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
					sm_index = 3
				elseif (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 1
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					System.installCIA(System.currentDirectory()..text, NAND)
					break
				end
			else
				Screen.fillRect(61,259,81,96,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,53,"Install to SDMC",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,68,"Install to NAND",black,BOTTOM_SCREEN)
				Screen.debugPrint(63,83,"Cancel",red,BOTTOM_SCREEN)
				if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
					sm_index = 2
				elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
					break
				end
			end
			oldpad = pad
			Screen.flip()
		end
		update_bottom_screen = true
	end
end
function OpenDirectory(text,archive_id)
	i=0
	if mode == "SDMC" then
		if text == ".." then
			j=-2
			while string.sub(System.currentDirectory(),j,j) ~= "/" do
				j=j-1
			end
			System.currentDirectory(string.sub(System.currentDirectory(),1,j))
		else
			System.currentDirectory(System.currentDirectory()..text.."/")
		end
	else
		if text == ".." then
			j=-2
			while string.sub(extdata_directory,j,j) ~= "/" do
				j=j-1
			end
			extdata_directory = string.sub(extdata_directory,1,j)
		else
			extdata_directory = extdata_directory..text.."/"
		end
	end
	if mode == "SDMC" then
		files_table = System.listDirectory(System.currentDirectory())
		if System.currentDirectory() ~= "/" then
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			table.insert(files_table,extra)
		end
		files_table = SortDirectory(files_table)
	else
		if extdata_directory == "/" then
			files_table = extdata_backup
		else
			files_table = System.listExtdataDir(extdata_directory,archive_id)
			local extra = {}
			extra.name = ".."
			extra.size = 0
			extra.directory = true
			extra.archive = archive_id
			table.insert(files_table,extra)
		end
	end
end
function GarbageCollection()
	if current_type == "SMDH" then
		Console.destroy(smdh_show)
		Screen.freeImage(current_file.icon)
	elseif current_type == "TTF" then
		Font.unload(current_file)
	elseif current_type == "JPGV" then
		if JPGV.isPlaying(current_file) then
			JPGV.pause(current_file)
		end
		JPGV.unload(current_file)
		is_fullscreen = false
		fullscreen_check = nil
	elseif current_type == "WAV" then
		if Sound.isPlaying(current_file) then
			Sound.pause(current_file)
		end
		Sound.close(current_file)
	elseif current_type == "IMG" then
		Graphics.freeImage(current_file)
		big_image = false
		y_print = 0
		x_print = 0
	elseif current_type == "TXT" then
		io.close(current_file)
		Console.destroy(text_console)
		old_indexes = {}
		txt_i = 0
	elseif current_type == "INFO" then
		Console.destroy(text_console)
	elseif current_type == "CIA" then
		if not cia_data.icon == nil then
			Screen.freeImage(cia_data.icon)
		end
	elseif current_type == "HEX" then
		io.close(current_file)
		old_indexes = {}
		txt_i = 0
	elseif current_type == "LUA" then
		theme_name = "NONAME"
		author = "NONAME"
	end
	current_type = nil
end
function CropPrint(x, y, text, color, screen)
	if string.len(text) > 25 then
		Screen.debugPrint(x, y, string.sub(text,1,25) .. "...", color, screen)
	else
		Screen.debugPrint(x, y, text, color, screen)
	end
end
function ThemePrint(x, y, text, color, screen)
	if string.len(text) > 40 then
		Screen.debugPrint(x, y, string.sub(text,1,40) .. "...", color, screen)
	else
		Screen.debugPrint(x, y, text, color, screen)
	end
end
function BuildLines(file, index)
	MAX_LENGTH = 1200
	SIZE = io.size(file)
	if ((index + MAX_LENGTH) < SIZE) then
		READ_LENGTH = MAX_LENGTH
	else
		READ_LENGTH = SIZE - index
	end
	if (index < SIZE) then
		Console.clear(text_console)
		Console.append(text_console,io.read(file,index,READ_LENGTH))
		txt_words = Console.show(text_console)
	else
		txt_words = 0
	end
	if (txt_words > 0) then
		table.insert(old_indexes, index)
		index = index + txt_words
		txt_i = txt_i + 1
	end
	return index
end
function BuildHex(file, index)
	MAX_LENGTH = 120
	SIZE = io.size(file)
	if ((index + MAX_LENGTH) < SIZE) then
		READ_LENGTH = MAX_LENGTH
	else
		READ_LENGTH = SIZE - index
	end
	if (index < SIZE) then
		hex_text = {}
		hex_values = {}
		text = io.read(file,index,READ_LENGTH)
		t = 1
		while (t <= 15) do
			if ((t*8) > string.len(text)) then
				temp = string.sub(text,1+(t-1)*8,-1)
			else
				temp = string.sub(text,1+(t-1)*8,t*8)
			end
			t2 = 1
			while t2 <= string.len(temp) do
				table.insert(hex_values,string.byte(temp,t2))
				t2 = t2 + 1
			end
			table.insert(hex_text,temp)
			t = t + 1
		end
		table.insert(old_indexes, index)
		index = index + READ_LENGTH
		txt_i = txt_i + 1
	end
	return index
end
while true do
	base_y = 0
	i = 1
	Screen.refresh()
	if current_type ~= "JPGV" then
		Screen.clear(TOP_SCREEN)
	end
	pad = Controls.read()
	if (current_type == "SMDH") then
		Console.show(smdh_show)
		Screen.debugPrint(0,170,"Icon:",white,TOP_SCREEN)
		Screen.drawImage(0,185,current_file.icon,TOP_SCREEN)
	elseif (current_type == "TTF") then
		Font.setPixelSizes(current_file,8)
		Font.print(current_file,0,5,"8: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,13,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,12)
		Font.print(current_file,0,25,"12: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,37,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,18)
		Font.print(current_file,0,54,"18: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,72,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,24)
		Font.print(current_file,0,95,"24: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,119,"jumps over the lazy dog",white,TOP_SCREEN)
		Font.setPixelSizes(current_file,30)
		Font.print(current_file,0,149,"30: The quick brown fox",white,TOP_SCREEN)
		Font.print(current_file,10,179,"jumps over the lazy dog",white,TOP_SCREEN)
	elseif (current_type == "JPGV") then
		if fullscreen_check == nil then
			Screen.drawPixel(399,239,0xDEADBEFF, TOP_SCREEN)
			tmp = Screen.getPixel(399,239,TOP_SCREEN)
		end
		if is_fullscreen then
			JPGV.drawFast(current_file,TOP_SCREEN)
		else
			JPGV.draw(0,0,current_file,TOP_SCREEN)
		end
		if fullscreen_check == nil then
			if tmp == Screen.getPixel(399,239,TOP_SCREEN) then
				is_fullscreen = true
			end
			fullscreen_check = true
		end
	elseif (current_type == "WAV") then
		Sound.updateStream()
		Screen.debugPrint(0,0,"Title: ",white,TOP_SCREEN)
		ThemePrint(0,15,Sound.getTitle(current_file),white,TOP_SCREEN)
		Screen.debugPrint(0,40,"Author: ",white,TOP_SCREEN)
		ThemePrint(0,55,Sound.getAuthor(current_file),white,TOP_SCREEN)
		Screen.debugPrint(0,80,"Time: "..FormatTime(Sound.getTime(current_file)).." / "..FormatTime(Sound.getTotalTime(current_file)),white,TOP_SCREEN)
		Screen.debugPrint(0,95,"Samplerate: "..Sound.getSrate(current_file),white,TOP_SCREEN)
		if Sound.getType(current_file) == 1 then
			stype = "Mono"
		else
			stype = "Stereo"
		end
		Screen.debugPrint(0,110,"Audiotype: "..stype,white,TOP_SCREEN)
	elseif (current_type == "IMG") then
		Graphics.initBlend(TOP_SCREEN)
		if big_image then
			Graphics.drawPartialImage(0,0,x_print,y_print,width,height,current_file)
			x,y = Controls.readCirclePad()
			if (x < - 100) and (x_print > 0) then
				x_print = x_print - 5
				if x_print < 0 then
					x_print = 0
				end
			end
			if (y > 100) and (y_print > 0) then
				y_print = y_print - 5
				if y_print < 0 then
					y_print = 0
				end
			end
			if (x > 100) and (x_print + width < Graphics.getImageWidth(current_file)) then
				x_print = x_print + 5
			end
			if (y < - 100) and (y_print + height < Graphics.getImageHeight(current_file)) then
				y_print = y_print + 5
			end
			if x_print + width > Graphics.getImageWidth(current_file) then
				x_print = Graphics.getImageWidth(current_file) - width
			end
			if y_print + height > Graphics.getImageHeight(current_file) then
				y_print = Graphics.getImageHeight(current_file) - height
			end
		else
			Graphics.drawImage(0,0,current_file)
		end
		Graphics.termBlend()
	elseif (current_type == "INFO") then
		Console.show(text_console)
	elseif (current_type == "TXT") then
		if (updateTXT) then
			txt_index = BuildLines(current_file,txt_index)
			updateTXT = false
		end
		Console.show(text_console)
	elseif (current_type == "LUA") then
		Screen.debugPrint(0,0,"Yuki FM theme recognized...",white,TOP_SCREEN)
		Screen.debugPrint(0,15,"---------------------------------",white,TOP_SCREEN)
		Screen.debugPrint(0,30,"Theme Name: ",white,TOP_SCREEN)
		ThemePrint(0,45,theme_name,white,TOP_SCREEN)
		ThemePrint(0,75,"Author: " .. author,white,TOP_SCREEN)
	elseif (current_type == "HEX") then
		if (updateTXT) then
			txt_index = BuildHex(current_file,txt_index)
			updateTXT = false
		end
		for l, line in pairs(hex_text) do
			Screen.debugPrint(280,(l-1)*15,string.gsub(line,"\0"," "),white,TOP_SCREEN)
			temp = 1
			while (temp <= string.len(line)) do
				if (temp % 2 == 0) then
					Screen.debugPrint(0+(temp-1)*30,(l-1)*15,string.format('%02X', hex_values[(l-1)*8+temp]),white,TOP_SCREEN)
				else
					Screen.debugPrint(0+(temp-1)*30,(l-1)*15,string.format('%02X', hex_values[(l-1)*8+temp]),red,TOP_SCREEN)
				end
				temp = temp + 1
			end
		end
		Screen.debugPrint(0,225,"Offset: 0x" .. string.format('%X', old_indexes[#old_indexes]) .. " (" .. (old_indexes[#old_indexes]) .. ")",white,TOP_SCREEN)
	else
		Screen.debugPrint(0,0,"Yuki FM v.2.0.3 (Public)",green,TOP_SCREEN)
		Screen.debugPrint(0,15,"---------------------------------",white,TOP_SCREEN)
		Screen.debugPrint(0,30,"**App successfully initizalied**.",green,TOP_SCREEN)
		Screen.debugPrint(0,45,"The time is: h,m,s = System.getTime()",white,TOP_SCREEN)
		Screen.debugPrint(0,45,"---------------------------------",white,TOP_SCREEN)
		Screen.debugPrint(0,60,"Press START for a Controls List",red,TOP_SCREEN)
	end
	if update_bottom_screen then
		Graphics.initBlend(BOTTOM_SCREEN)
		Graphics.drawImage(0,0,bg)
		Graphics.termBlend()
		for l, file in pairs(files_table) do
			if (base_y > 226) then
				break
			end
			if (l >= master_index) then
				if (l==p) then
					base_y2 = base_y
					if (base_y) == 0 then
						base_y = 2
					end
					Screen.fillRect(0,319,base_y-2,base_y2+12,selected_item,BOTTOM_SCREEN)
					color = selected_color
					if (base_y) == 2 then
						base_y = 0
					end
				else
					color = menu_color
				end
				if mode == "SDMC" then
					CropPrint(0,base_y,file.name,color,BOTTOM_SCREEN)
				else
					if file.name == ".." then
						CropPrint(0,base_y,file.name,color,BOTTOM_SCREEN)
					else
						CropPrint(0,base_y,file.name.." ["..string.format('%02X',file.archive).."]",color,BOTTOM_SCREEN)
					end
				end
				base_y = base_y + 15
			end
		end
		if move_base ~= nil then
			Screen.debugPrint(300,0,"M",selected_color,BOTTOM_SCREEN)
		elseif copy_base ~= nil then
			Screen.debugPrint(300,0,"C",selected_color,BOTTOM_SCREEN)
		end
		update_bottom_screen = false
	end
	-- Select Mode Controls Functions
	if (select_mode) then
		Screen.fillEmptyRect(60,260,20,22 + #sm_voices * 15,black,BOTTOM_SCREEN)
		Screen.fillRect(61,259,21,21 + #sm_voices * 15,white,BOTTOM_SCREEN)
		for l, voice in pairs(sm_voices) do
			if (l == sm_index) then
				Screen.fillRect(61,259,21+(l-1)*15,21+l*15,green,BOTTOM_SCREEN)
				Screen.debugPrint(63,23+(l-1)*15,voice,red,BOTTOM_SCREEN)
			else
				Screen.debugPrint(63,23+(l-1)*15,voice,black,BOTTOM_SCREEN)
			end
		end
		if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
			sm_index = sm_index - 1
		elseif (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
			sm_index = sm_index + 1
		elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
			if (sm_index < #sm_voices) then
				ForceOpenFile(files_table[p].name,files_table[p].size,sm_funcs[sm_index])
			end
			sm_index = 1
			select_mode = false
			update_bottom_screen = true
		end
		if (sm_index < 1) then
			sm_index = #sm_voices
		elseif (sm_index > #sm_voices) then
			sm_index = 1
		end
	-- Security Deletion Check Screen
	elseif (delete_mode) then
		Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)
		Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)
		if (sm_index == 1) then
			Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Confirm",red,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Cancel",black,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
				sm_index = 2
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				update_bottom_screen = true
				if (files_table[p].directory) then
					if (files_table[p].name ~= "..") then
						DeleteDir(System.currentDirectory()..files_table[p].name)
					end
				else
					System.deleteFile(System.currentDirectory()..files_table[p].name)
				end
				while (#files_table > 0) do
					table.remove(files_table)
				end
				files_table = System.listDirectory(System.currentDirectory())
				if System.currentDirectory() ~= "/" then
					local extra = {}
					extra.name = ".."
					extra.size = 0
					extra.directory = true
					table.insert(files_table,extra)
				end
				files_table = SortDirectory(files_table)
				if (p > #files_table) then
					p = p - 1
				end
				delete_mode = false
			end
		else
			Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Confirm",black,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Cancel",red,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
				sm_index = 1
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				update_bottom_screen = true
				sm_index = 1
				delete_mode = false
			end
		end
	-- Copy/Move selection
	elseif (copy_or_move) then
		Screen.fillEmptyRect(60,260,50,82,black,BOTTOM_SCREEN)
		Screen.fillRect(61,259,51,81,white,BOTTOM_SCREEN)
		if (sm_index == 1) then
			Screen.fillRect(61,259,51,66,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Move",red,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Copy",black,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DDOWN)) and not (Controls.check(oldpad,KEY_DDOWN)) then
				sm_index = 2
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				if (files_table[p].name ~= "..") then
					update_bottom_screen = true
					move_base = System.currentDirectory() .. files_table[p].name
					move_name = files_table[p].name
					if (files_table[p].directory) then
						move_type = 0
					else
						move_type = 1
					end
				end
				copy_or_move = false
				sm_index = 1
			end
		else
			Screen.fillRect(61,259,66,81,green,BOTTOM_SCREEN)
			Screen.debugPrint(63,53,"Move",black,BOTTOM_SCREEN)
			Screen.debugPrint(63,68,"Copy",red,BOTTOM_SCREEN)
			if (Controls.check(pad,KEY_DUP)) and not (Controls.check(oldpad,KEY_DUP)) then
				sm_index = 1
			elseif (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
				if (files_table[p].directory) then
					if (files_table[p].name ~= "..") then
						copy_name = files_table[p].name
						copy_base = System.currentDirectory() .. files_table[p].name
						copy_type = 0
					end
				else
					copy_type = 1
					copy_name = files_table[p].name
					copy_base = System.currentDirectory() .. files_table[p].name
				end
				copy_or_move = false
				sm_index = 1
			end
		end
	else
	-- Base Controls Functions
		if (Controls.check(pad,KEY_DUP)) then
			if not (Controls.check(oldpad,KEY_DUP)) then
				Timer.reset(ctrlTimer)
				update_bottom_screen = true
				p = p - 1
				if (p >= 16) then
					master_index = p - 15
				end
			else
				if Timer.getTime(ctrlTimer) > timeSlap then
					Timer.reset(ctrlTimer)
					update_bottom_screen = true
					p = p - 1
					if (p >= 16) then
						master_index = p - 15
					end
					timeSlap = math.max(100, timeSlap - 15)
				end
			end
		elseif (Controls.check(pad,KEY_DDOWN)) then
			if not (Controls.check(oldpad,KEY_DDOWN)) then
				Timer.reset(ctrlTimer)
				update_bottom_screen = true
				p = p + 1
				if (p >= 17) then
					master_index = p - 15
				end
			else
				if Timer.getTime(ctrlTimer) > timeSlap then
					Timer.reset(ctrlTimer)
					update_bottom_screen = true
					p = p + 1
					if (p >= 17) then
						master_index = p - 15
					end
					timeSlap = math.max(100, timeSlap - 15)
				end
			end
		else
			timeSlap = 200
		end
		if (p < 1) then
			p = #files_table
			if (p >= 17) then
				master_index = p - 15
			end
		elseif (p > #files_table) then
			master_index = 0
			p = 1
		end
		if (Controls.check(pad,KEY_A)) and not (Controls.check(oldpad,KEY_A)) then
			if (files_table[p].directory) then
				if (mode == "SDMC") then
					OpenDirectory(files_table[p].name,0)
				else
					OpenDirectory(files_table[p].name,files_table[p].archive)
				end
				p=1
				master_index=0
			else
				if (mode == "SDMC") then
					OpenFile(files_table[p].name,files_table[p].size)
				else
					OpenExtdataFile(files_table[p].name,files_table[p].archive)
				end
			end
		elseif (Controls.check(pad,KEY_X)) and not (Controls.check(oldpad,KEY_X)) then
			if (mode == "SDMC") then
				if (move_base == nil) and (copy_base == nil) then
					delete_mode = true
				else
					update_bottom_screen = true
					move_base = nil
					move_name = nil
					copy_base = nil
					copy_name = nil
				end
			else
				if (files_table[p].directory) then
					RestoreFolder(files_table[p].name,files_table[p].archive)
				else
					RestoreFile(files_table[p].name,files_table[p].archive)
				end
			end				
		elseif (Controls.check(pad,KEY_Y)) and not (Controls.check(oldpad,KEY_Y)) then
			if (mode == "SDMC") then
				if (copy_base == nil) then
					if (move_base == nil) then
						if (files_table[p].name ~= "..") then
							update_bottom_screen = true
							copy_or_move = true
						end
					else
						update_bottom_screen = true
						if (move_type == 0) then
							System.renameDirectory(move_base,System.currentDirectory() .. move_name)
						else
							System.renameFile(move_base,System.currentDirectory() .. move_name)
						end
						move_base = nil
						files_table = System.listDirectory(System.currentDirectory())
						if System.currentDirectory() ~= "/" then
							local extra = {}
							extra.name = ".."
							extra.size = 0
							extra.directory = true
							table.insert(files_table,extra)
						end
						files_table = SortDirectory(files_table)
					end
				else
					copy_end = System.currentDirectory() .. copy_name
					if copy_end == copy_base then
						temp_copy = "Copy_" .. copy_name
						copy_end = System.currentDirectory() .. temp_copy
						if (copy_type == 1) then
							while System.doesFileExist(copy_end) do
								temp_copy = "Copy_" .. temp_copy
								copy_end = System.currentDirectory() .. temp_copy
							end
						end
					end
					if (copy_type == 0) then
						CopyDir(copy_base,copy_end)
					else
						CopyFile(copy_base,copy_end)
					end
					files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
					files_table = SortDirectory(files_table)
					copy_name = nil
					copy_base = nil
				end
			end
		elseif (Controls.check(pad,KEY_B)) and not (Controls.check(oldpad,KEY_B)) then
			if (mode == "SDMC") then
				update_bottom_screen = true
				if (files_table[p].name ~= "..") then
					new_name = System.startKeyboard(files_table[p].name)
					oldpad = KEY_A
					if (files_table[p].directory) then
						System.renameDirectory(System.currentDirectory() .. files_table[p].name,System.currentDirectory() .. new_name)
					else
						System.renameFile(System.currentDirectory() .. files_table[p].name,System.currentDirectory() .. new_name)
					end
					files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
					files_table = SortDirectory(files_table)
				end
			else
				if (files_table[p].directory) then
					DumpFolder(files_table[p].name,files_table[p].archive)
				else
					DumpFile(files_table[p].name,files_table[p].archive)
				end
			end
		elseif (Controls.check(pad,KEY_DLEFT)) and not (Controls.check(oldpad,KEY_DLEFT)) then
			if (current_type == "SMDH") then
				update_bottom_screen = true
				name = System.startKeyboard("icon.bmp")
				Screen.saveBitmap(current_file.icon,System.currentDirectory()..name)
				oldpad = KEY_A
				files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
				files_table = SortDirectory(files_table)
			elseif (current_type == "TXT") or (current_type == "HEX") then
				if (txt_i > 1) then			
					updateTXT = true
					table.remove(old_indexes)
					txt_index = table.remove(old_indexes)
					txt_i = txt_i - 2
				end
			elseif (current_type == "WAV") then
				if (Sound.isPlaying(current_file)) then
					Sound.pause(current_file)
				else
					Sound.resume(current_file)
				end
			elseif (current_type == "JPGV") then
				if (JPGV.isPlaying(current_file)) then
					JPGV.pause(current_file)
				else
					JPGV.resume(current_file)
				end
			end
		elseif (Controls.check(pad,KEY_DRIGHT)) and not (Controls.check(oldpad,KEY_DRIGHT)) then
			if (current_type == "SMDH") then
				update_bottom_screen = true
				name = System.startKeyboard("icon.bmp")
				Screen.saveBitmap(current_file.icon,System.currentDirectory()..name)
				oldpad = KEY_A
				files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
				files_table = SortDirectory(files_table)
			elseif (current_type == "TXT") or (current_type == "HEX") then
				updateTXT = true
			elseif (current_type == "WAV") then
				if (Sound.isPlaying(current_file)) then
					Sound.pause(current_file)
				else
					Sound.resume(current_file)
				end
			elseif (current_type == "JPGV") then
				if (JPGV.isPlaying(current_file)) then
					JPGV.pause(current_file)
				else
					JPGV.resume(current_file)
				end
			end
		elseif (Controls.check(pad,KEY_SELECT)) and not (Controls.check(oldpad,KEY_SELECT)) then
			update_bottom_screen = true
			p = 1
			if (mode == "SDMC") then
				Screen.debugPrint(0, 0, "ExtData is loading, please wait", Color.new(255,255,255), TOP_SCREEN)
				GarbageCollection()
				mode = "EXTDATA"
				if (update_main_extdata) then
					files_table = System.scanExtdata()
					extdata_backup = files_table
					update_main_extdata = false
				else
					files_table = extdata_backup
				end
				extdata_directory = "/"
			else
				mode = "SDMC"
				System.currentDirectory("/")
				files_table = SortDirectory(System.listDirectory(System.currentDirectory()))
			end
		elseif (Controls.check(pad,KEY_L)) and not (Controls.check(oldpad,KEY_L)) then
			if (mode == "SDMC") then
				if (files_table[p].directory == false) then
					select_mode = true
				end
			end
		elseif (Controls.check(pad,KEY_R)) and not (Controls.check(oldpad,KEY_R)) then
			if (mode == "SDMC") then
				update_bottom_screen = true
				name = System.startKeyboard("New Folder")
				System.createDirectory(System.currentDirectory()..name)
				oldpad = KEY_A
				files_table = System.listDirectory(System.currentDirectory())
					if System.currentDirectory() ~= "/" then
						local extra = {}
						extra.name = ".."
						extra.size = 0
						extra.directory = true
						table.insert(files_table,extra)
					end
				files_table = SortDirectory(files_table)
			end
		elseif (Controls.check(pad,KEY_TOUCH)) then
			update_bottom_screen = true
			x,y = Controls.readTouch()
			new_index = math.ceil(y/15)
			if (new_index <= #files_table) then
				if master_index > 0 then
					p = new_index + master_index - 1
				else
					p = new_index
				end
			end
		elseif (Controls.check(pad,KEY_START)) then
			GarbageCollection()
			sm_index = 1
			oldpad = KEY_START
			while exit_flag == nil do
				Screen.refresh()
				Screen.waitVblankStart()
				pad = Controls.read()
				Screen.fillEmptyRect(10,300,20,37,black,BOTTOM_SCREEN)
				Screen.fillRect(11,299,21,36,white,BOTTOM_SCREEN)
				Screen.debugPrint(13,23,"Yuki FM - Controls List",black,BOTTOM_SCREEN)
				if mode == "SDMC" then
					Screen.fillEmptyRect(10,300,50,232,black,BOTTOM_SCREEN)
					Screen.fillRect(11,299,51,231,white,BOTTOM_SCREEN)
					Screen.debugPrint(13,53,"Up/Down : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,68,"Left/Rght : Reader actions",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,83,"Touch : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,98,"CirclePad : Move image viewport",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,113,"A : Open file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,128,"Y : Move/Copy file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,143,"B : Rename file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,158,"X : Delete file/directory",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,173,"L : Open file as...",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,188,"R : Create new folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,203,"Select : Go to Extdata mode",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,218,"Start : Exit Yuki FM",black,BOTTOM_SCREEN)
				else
					Screen.fillEmptyRect(10,300,50,157,black,BOTTOM_SCREEN)
					Screen.fillRect(11,299,51,156,white,BOTTOM_SCREEN)
					Screen.debugPrint(13,53,"Up/Down : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,68,"Touch : Navigate through files",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,83,"A : Open file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,98,"B : Dump file/folder",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,113,"X : Restore file/directory",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,128,"Select : Go to Filebrowser mode",black,BOTTOM_SCREEN)
					Screen.debugPrint(13,143,"Start : Exit Yuki FM",black,BOTTOM_SCREEN)
				end
				if (Controls.check(pad,KEY_START)) and not (Controls.check(oldpad,KEY_START)) then
					exit_flag = true
				elseif (Controls.check(pad,KEY_B)) and not (Controls.check(oldpad,KEY_B)) then
					exit_flag = false
				end
				Screen.flip()
				oldpad = pad
			end
			if (Controls.check(pad,KEY_HOME)) then System.takeScreenshot("/Screenshot.bmp",true)
			end
			update_bottom_screen = true
			if exit_flag then
				Graphics.freeImage(bg)
				Sound.term()
				Graphics.term()
				Timer.destroy(ctrlTimer)
				System.exit()
			else
				exit_flag = nil
			end
		end
	end	
	if not (Controls.check(pad,KEY_TOUCH)) then
		update_bottom_screen = true
		master_index = p - 15
	end
	Screen.flip()
	Screen.waitVblankStart()
	oldpad = pad
end