Batch Backup v1.0 - Beta 23

:script
set versao=v1.0 - Beta 23
set irpara=pagina_principal
:verificando
cmdmenusel
if "%errorlevel%"=="9009" start /min iexplore https://dl.dropbox.com/u/3373795/pacotes/cmdmenusel.zip&exit
cmdmenusel
if "%errorlevel%"=="9059" start /min iexplore https://dl.dropbox.com/u/3373795/pacotes/cmdmenusel.zip&exit
cmdFocus
if "%errorlevel%"=="9009" start /min iexplore https://dl.dropbox.com/u/3373795/pacotes/cmdFocus.zip&exit
cmdFocus
if "%errorlevel%"=="9059" start /min iexplore https://dl.dropbox.com/u/3373795/pacotes/cmdFocus.zip&exit
:Verificacao
set ver_config=0
set ver_lista=0
set ver_pasta=0
if not exist Configuracoes.ini set ver_config=1
if not exist Lista.ini set ver_lista=1
if not exist Backups set ver_pasta=1
if "%ver_lista%"=="1" set irpara=restaurarconfig&goto janela
if "%ver_config%"=="1" set irpara=restaurarconfig2&goto janela
if "%ver_pasta%"=="1" set irpara=restaurarconfig3&goto janela
:Configuracoes
for /f "tokens=1,2 delims==" %%a in (Configuracoes.ini) do (
if %%a==Idioma set Idioma=%%b
if %%a==corF set corF=%%b
if %%a==corL set corL=%%b
if %%a==hkcr set hkcr=%%b
if %%a==hkcu set hkcu=%%b
if %%a==hklm set hklm=%%b
if %%a==hku set hku=%%b
if %%a==hkcc set hkcc=%%b
)
:Configuracoes_Temp
set Idioma_temp=%Idioma%
set corF_temp=%corF%
set corL_temp=%corL%
set hkcr_temp=%hkcr%
set hkcu_temp=%hkcu%
set hklm_temp=%hklm%
set hku_temp=%hku%
set hkcc_temp=%hkcc%
goto idioma_%Idioma%
:idioma_pt-br
set d1=Nenhuma opcao selecionada
set d2=Criar backup
set d3=Restaurar backup
set d4=Deletar backup
set d5=Configuracoes
set d6=Sair
set d7=Cor fundo
set d8=Cor letra
set d9=Voltar
set d10=Slot ocupado
set d11=Exportando
set d12=Compactando
set d13=Finalizando
set d14=Slot selecionado esta vazio
set d15=Erro ao selecionar o slot
set d16=Idioma
goto cores
:idioma_en
set d1=No option selected
set d2=Create backup
set d3=Restore backup
set d4=Delete backup
set d5=Configurations
set d6=Exit
set d7=Background color
set d8=Letter color
set d9=Return
set d10=Slot busy
set d11=Exporting
set d12=Compacting
set d13=Finishing
set d14=Selected slot is empty
set d15=Error when select the slot
set d16=Language
goto cores
:cores
if "%corF%"=="0" set corFN=Preto
if "%corF%"=="1" set corFN=Azul
if "%corF%"=="2" set corFN=Verde
if "%corF%"=="3" set corFN=Agua
if "%corF%"=="4" set corFN=Vermelho
if "%corF%"=="5" set corFN=Roxo
if "%corF%"=="6" set corFN=Amarelo
if "%corF%"=="7" set corFN=Branco
if "%corF%"=="8" set corFN=Cinza
if "%corF%"=="9" set corFN=Azul claro
if "%corF%"=="A" set corFN=Verde claro
if "%corF%"=="B" set corFN=Agua clara
if "%corF%"=="C" set corFN=Vermelho claro
if "%corF%"=="D" set corFN=Roxo claro
if "%corF%"=="E" set corFN=Amarelo claro
if "%corF%"=="F" set corFN=Branco claro
if "%corL%"=="0" set corLN=Preto
if "%corL%"=="1" set corLN=Azul
if "%corL%"=="2" set corLN=Verde
if "%corL%"=="3" set corLN=Agua
if "%corL%"=="4" set corLN=Vermelho
if "%corL%"=="5" set corLN=Roxo
if "%corL%"=="6" set corLN=Amarelo
if "%corL%"=="7" set corLN=Branco
if "%corL%"=="8" set corLN=Cinza
if "%corL%"=="9" set corLN=Azul claro
if "%corL%"=="A" set corLN=Verde claro
if "%corL%"=="B" set corLN=Agua clara
if "%corL%"=="C" set corLN=Vermelho claro
if "%corL%"=="D" set corLN=Roxo claro
if "%corL%"=="E" set corLN=Amarelo claro
if "%corL%"=="F" set corLN=Branco claro
:Lista
for /f "tokens=1,2 delims==" %%a in (Lista.ini) do (
if %%a==Slot1 set Slot1=%%b
if %%a==Slot2 set Slot2=%%b
if %%a==Slot3 set Slot3=%%b
if %%a==Slot4 set Slot4=%%b
if %%a==Slot5 set Slot5=%%b
if %%a==Slot6 set Slot6=%%b
if %%a==Slot7 set Slot7=%%b
if %%a==Slot8 set Slot8=%%b
if %%a==Slot9 set Slot9=%%b
)
:Lista_Temp
set Slot1_temp=%Slot1%
set Slot2_temp=%Slot2%
set Slot3_temp=%Slot3%
set Slot4_temp=%Slot4%
set Slot5_temp=%Slot5%
set Slot6_temp=%Slot6%
set Slot7_temp=%Slot7%
set Slot8_temp=%Slot8%
set Slot9_temp=%Slot9%
:janela
color %corF%%corL%
echo off
title Batch Backup %versao%
mode 36,17
CmdFocus /center
:limparmenus
set menu_principal=null
set menu_criar=null
set menu_restaurar=null
set menu_deletar=null
set menu_configurar=null
goto %irpara%
:pagina_principal
cls
if "%erro%"=="2" echo %d1%.&set erro=0
cmdmenusel.exe %corF%%corL%%corL%%corF% "%d2%" "%d3%" "%d4%" "%d5%" "%d6%"
:menu_principal
if "%errorlevel%"=="1" goto pagina_criar
if "%errorlevel%"=="2" goto pagina_restaurar
if "%errorlevel%"=="3" goto pagina_deletar
if "%errorlevel%"=="4" goto pagina_configuracoes
if "%errorlevel%"=="5" exit
set erro=2
set irpara=pagina_principal
goto limparmenus
:pagina_configuracoes
cls
cmdmenusel.exe %corF%%corL%%corL%%corF% "%d7%: %corFN%" "%d8%: %corLN%" "%d16%: %Idioma%" "HKLM: %hklm%" "HKCR: %hkcr%" "HKCU: %hkcu%" "HKU : %hku%" "HKCC: %hkcc%" "%d9%"
:menu_configurar
if "%errorlevel%"=="1" set alterar=F&goto alterarcor
if "%errorlevel%"=="2" set alterar=L&goto alterarcor
if "%errorlevel%"=="3" goto alteraridioma
if "%errorlevel%"=="4" if "%hklm%"=="Sim" (set hklm_temp=Nao&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes) else (set hklm_temp=Sim&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes)
if "%errorlevel%"=="5" if "%hkcr%"=="Sim" (set hkcr_temp=Nao&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes) else (set hkcr_temp=Sim&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes)
if "%errorlevel%"=="6" if "%hkcu%"=="Sim" (set hkcu_temp=Nao&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes) else (set hkcu_temp=Sim&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes)
if "%errorlevel%"=="7" if "%hku%"=="Sim" (set hku_temp=Nao&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes) else (set hku_temp=Sim&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes)
if "%errorlevel%"=="8" if "%hkcc%"=="Sim" (set hkcc_temp=Nao&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes) else (set hkcc_temp=Sim&set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes)
if "%errorlevel%"=="9" set irpara=pagina_principal&set erro=0&goto limparmenus
:alterarcor
cls
cmdmenusel.exe %corF%%corL%%corL%%corF% "Preto" "Azul" "Verde" "Agua" "Vermelho" "Roxo" "Amarelo" "Branco" "Cinza" "Azul claro" "Verde claro" "Agua clara" "Vermelho claro" "Roxo claro" "Amarelo claro" "Branco claro" "Voltar"
if "%errorlevel%"=="1" set cor%alterar%_temp=0&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="2" set cor%alterar%_temp=1&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="3" set cor%alterar%_temp=2&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="4" set cor%alterar%_temp=3&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="5" set cor%alterar%_temp=4&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="6" set cor%alterar%_temp=5&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="7" set cor%alterar%_temp=6&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="8" set cor%alterar%_temp=7&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="9" set cor%alterar%_temp=8&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="10" set cor%alterar%_temp=9&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="11" set cor%alterar%_temp=A&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="12" set cor%alterar%_temp=B&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="13" set cor%alterar%_temp=C&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="14" set cor%alterar%_temp=D&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="15" set cor%alterar%_temp=E&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="16" set cor%alterar%_temp=F&set irpara2=alterarcor&set irpara=alterarcor&goto salvar_configuracoes
if "%errorlevel%"=="17" set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes
:alteraridioma
cls
cmdmenusel.exe %corF%%corL%%corL%%corF% "Portugues-Brasileiro" "English" "%d9%"
if "%errorlevel%"=="1" set Idioma_temp=pt-br&set irpara2=alteraridioma&set irpara=alteraridioma&goto salvar_configuracoes
if "%errorlevel%"=="2" set Idioma_temp=en&set irpara2=alteraridioma&set irpara=alteraridioma&goto salvar_configuracoes
if "%errorlevel%"=="3" set irpara2=pagina_configuracoes&set irpara=pagina_configuracoes&goto salvar_configuracoes
:alteraridioma2
cmdmenusel.exe 0770 "Portugues-Brasileiro" "English"
if "%errorlevel%"=="1" set ima=pt-br
if "%errorlevel%"=="2" set ima=en
goto restaurarconfig2
:pagina_criar
cls
if "%erro%"=="1" echo %d10%.&set erro=0
cmdmenusel.exe %corF%%corL%%corL%%corF% "Slot 1: %Slot1%" "Slot 2: %Slot2%" "Slot 3: %Slot3%" "Slot 4: %Slot4%" "Slot 5: %Slot5%" "Slot 6: %Slot6%" "Slot 7: %Slot7%" "Slot 8: %Slot8%" "Slot 9: %Slot9%" "%d9%"
:menu_criar
if "%errorlevel%"=="1" set slot=%Slot1%&set n=1&goto pagina_criar2
if "%errorlevel%"=="2" set slot=%Slot2%&set n=2&goto pagina_criar2
if "%errorlevel%"=="3" set slot=%Slot3%&set n=3&goto pagina_criar2
if "%errorlevel%"=="4" set slot=%Slot4%&set n=4&goto pagina_criar2
if "%errorlevel%"=="5" set slot=%Slot5%&set n=5&goto pagina_criar2
if "%errorlevel%"=="6" set slot=%Slot6%&set n=6&goto pagina_criar2
if "%errorlevel%"=="7" set slot=%Slot7%&set n=7&goto pagina_criar2
if "%errorlevel%"=="8" set slot=%Slot8%&set n=8&goto pagina_criar2
if "%errorlevel%"=="9" set slot=%Slot9%&set n=9&goto pagina_criar2
if "%errorlevel%"=="10" set irpara=pagina_principal&set erro=0&goto limparmenus
set erro=2
set irpara=pagina_criar
goto limparmenus
:pagina_criar2
if "%slot%"=="Vazio" set irpara=pagina_criar3&goto limparmenus
set erro=1
set irpara=pagina_criar
goto limparmenus
:pagina_criar3
cd Backups
if not exist Slot%n% mkdir Slot%n%
cd Slot%n%
set Slot%n%_temp=%time% - %date%
title [.          ] %d11% hkcr...
reg export hkcr hkcr.reg>nul
title [..         ] %d11% hkcu....
reg export hkcu hkcu.reg>nul
title [...        ] %d11% hklm...
reg export hklm hklm.reg>nul
title [....       ] %d11% hku...
reg export hku hku.reg>nul
title [.....      ] %d11% hkcc...
reg export hkcc hkcc.reg>nul
title [......     ] %d12% hkcc...
makecab hkcc.reg>nul
title [.......    ] %d12% hkcr....
makecab hkcr.reg>nul
title [........   ] %d12% hkcu...
makecab hkcu.reg>nul
title [.........  ] %d12% hklm...
makecab hklm.reg>nul
title [.......... ] %d12%  hku...
makecab hku.reg>nul
title [...........] %d13%...
del *.reg
cd..
cd..
set irpara2=pagina_criar
goto salvar_lista
:pagina_restaurar
cls
if "%erro%"=="5" echo %d14%
if "%erro%"=="3" echo %d15%.&set erro=0
cmdmenusel.exe %corF%%corL%%corL%%corF% "Slot 1: %Slot1%" "Slot 2: %Slot2%" "Slot 3: %Slot3%" "Slot 4: %Slot4%" "Slot 5: %Slot5%" "Slot 6: %Slot6%" "Slot 7: %Slot7%" "Slot 8: %Slot8%" "Slot 9: %Slot9%" "%d9%"
:menu_restaurar
if "%errorlevel%"=="1" set slot=%Slot1%&set n=1&goto pagina_restaurar2
if "%errorlevel%"=="2" set slot=%Slot2%&set n=2&goto pagina_restaurar2
if "%errorlevel%"=="3" set slot=%Slot3%&set n=3&goto pagina_restaurar2
if "%errorlevel%"=="4" set slot=%Slot4%&set n=4&goto pagina_restaurar2
if "%errorlevel%"=="5" set slot=%Slot5%&set n=5&goto pagina_restaurar2
if "%errorlevel%"=="6" set slot=%Slot6%&set n=6&goto pagina_restaurar2
if "%errorlevel%"=="7" set slot=%Slot7%&set n=7&goto pagina_restaurar2
if "%errorlevel%"=="8" set slot=%Slot8%&set n=8&goto pagina_restaurar2
if "%errorlevel%"=="9" set slot=%Slot9%&set n=9&goto pagina_restaurar2
if "%errorlevel%"=="10" set irpara=pagina_principal&set erro=0&goto limparmenus
set erro=4&set irpara=pagina_restaurar&goto limparmenus
:pagina_restaurar2
cd Backups
if "%slot%"=="Vazio" set erro=5&set irpara=pagina_restaurar&goto limparmenus
if not exist Slot%n% set erro=3&set irpara=pagina_restaurar&goto limparmenus
cd Slot%n%
cls
echo   ------------------------
echo   [ Restaurando backup...]
echo   [ Etapa 1/5            ]
reg import hkcr.reg>nul
echo   [ Etapa 2/5            ]
reg import hkcu.reg>nul
echo   [ Etapa 3/5            ]
reg import hklm.reg>nul
echo   [ Etapa 4/5            ]
reg import hku.reg>nul
echo   [ Etapa 5/5            ]
reg import hkcc.reg>nul
echo   [ Backup Restaurado    ]
echo   ------------------------
cd..
cd..
pause>nul
goto script
:pagina_deletar
cls
if "%erro%"=="5" echo %d14%&set erro=0
cmdmenusel.exe %corF%%corL%%corL%%corF% "Slot 1: %Slot1%" "Slot 2: %Slot2%" "Slot 3: %Slot3%" "Slot 4: %Slot4%" "Slot 5: %Slot5%" "Slot 6: %Slot6%" "Slot 7: %Slot7%" "Slot 8: %Slot8%" "Slot 9: %Slot9%" "Voltar"
:menu_deletar
if "%errorlevel%"=="1" set slot=%Slot1%&set n=1&goto pagina_deletar2
if "%errorlevel%"=="2" set slot=%Slot2%&set n=2&goto pagina_deletar2
if "%errorlevel%"=="3" set slot=%Slot3%&set n=3&goto pagina_deletar2
if "%errorlevel%"=="4" set slot=%Slot4%&set n=4&goto pagina_deletar2
if "%errorlevel%"=="5" set slot=%Slot5%&set n=5&goto pagina_deletar2
if "%errorlevel%"=="6" set slot=%Slot6%&set n=6&goto pagina_deletar2
if "%errorlevel%"=="7" set slot=%Slot7%&set n=7&goto pagina_deletar2
if "%errorlevel%"=="8" set slot=%Slot8%&set n=8&goto pagina_deletar2
if "%errorlevel%"=="9" set slot=%Slot9%&set n=9&goto pagina_deletar2
if "%errorlevel%"=="10" set irpara=pagina_principal&set erro=0&goto limparmenus
set erro=2
set irpara=pagina_deletar
goto limparmenus
:pagina_deletar2
set irpara=pagina_deletar3
goto limparmenus
:pagina_deletar3
if "%slot%"=="Vazio" set erro=5&set irpara=pagina_deletar&goto limparmenus
set irpara2=pagina_deletar
set Slot%n%_temp=Vazio
cd Backups
del /q Slot%n%
cd..
goto salvar_lista
:salvar_lista
if "%irpara%"=="salvar_lista" goto %irpara2%
(
echo Slot1=%Slot1_temp%
echo Slot2=%Slot2_temp%
echo Slot3=%Slot3_temp%
echo Slot4=%Slot4_temp%
echo Slot5=%Slot5_temp%
echo Slot6=%Slot6_temp%
echo Slot7=%Slot7_temp%
echo Slot8=%Slot8_temp%
echo Slot9=%Slot9_temp%
)>Lista.ini
set irpara=salvar_lista
goto Configuracoes
:salvar_configuracoes
if "%irpara%"=="salvar_configuracoes" goto %irpara2%
(
echo Idioma=%Idioma_temp%
echo corF=%corF_temp%
echo corL=%corL_temp%
echo hkcr=%hkcr_temp%
echo hkcu=%hkcu_temp%
echo hklm=%hklm_temp%
echo hku=%hku_temp%
echo hkcc=%hkcc_temp%
)>Configuracoes.ini
set irpara=salvar_configuracoes
goto Configuracoes
:restaurarconfig
(
echo Slot1=Vazio
echo Slot2=Vazio
echo Slot3=Vazio
echo Slot4=Vazio
echo Slot5=Vazio
echo Slot6=Vazio
echo Slot7=Vazio
echo Slot8=Vazio
echo Slot9=Vazio
)>Lista.ini
:restaurarconfig2
if "%ima%"=="" goto alteraridioma2
if "%ver_config%"=="0" goto restaurarconfig3
(
echo Idioma=%ima%
echo corF=0
echo corL=F
echo hkcr=Sim
echo hkcu=Sim
echo hklm=Sim
echo hku=Sim
echo hkcc=Sim
)>Configuracoes.ini
:restaurarconfig3
if "%ver_pasta%"=="0" goto restaurarconfig4
mkdir Backups
set n=1
:restaurarconfig3_2
cd Backups
if not exist Slot%n% mkdir Slot%n%
cd..
if "%n%"=="9" goto restaurarconfig4
set /a n+=1
goto restaurarconfig3_2
:restaurarconfig4
if "%ver_config%"=="1" msg %username% "O arquivo de configuracoes foi restaurado para o padrao."
if "%ver_lista%"=="1" msg %username% "A lista de backups foi restaurada para a padrao"
if "%ver_pasta%"=="1" msg %username% "As pastas de backups foram criadas"
goto script

::Batch Backup ChangeLog

v1.0 - Beta 23 (03//03/2013
:Iniciado o processo de integração de multiplos idiomas.

v1.0 - Beta 22 (23/02/2013)
: Adicionado espelhos para download dos pacotes indisponíveis.

v1.0 - Beta 21 (23/02/2013)
: VBSCRIPTS substituídos pelo "msg" normal do windows.
: Adicionado as variáveis corF e corL para definir a cor de fundo e a cor das letras. Foi preciso adicionar 2 variáveis separadas por causa do cmdmenusel.
: Todos os menus foram substituídos pelo cmdmenusel.
: Foi alterado a exibição do processo de backup.
: Adicionado uma verificação sob a existência dos programas externos necessários.
: Parte de configuração quase concluída.
: Adicionado também o pacote cmdFocus, a fim de centralizar a janela.
: Uma bela melhorada na parte de salvamento das ini's, era uma ">>Arquivo" para cada linha, agora ficou apenas um para todos os echo's, graças ao "( )"
: Ainda não tive tempo de terminar de vez a parte de restauração, pretendo adicionar uma espécie de "fechamento" a fim de fazer um fechamento em massa, para melhorar o processo de restauração.
: Mensagens de erros foram movidas para cima do menu, óbvio, o cmdmenusel não é livre, ele só libera as ações a seguir após ter escolhido uma opção.
: Adicionado a exibição de cores em texto no menu de configurações

v1.0 - Beta 20 (14/10/2012)
: Tamanho da janela re-ajustada para caber confortavelmente a lista de backup
: Adicionado compactação sem perda de dados nos arquivos de backup (ainda em testes)

v1.0 - Beta 19 (25/04/2010)
: Em vez de ir para a pagina verificacao, agora quando restaurar um arquivo padrao, ira para a pagina script, para setar o irpara e nao interferir com a modificaçao abaixo
: Em vez de ir direto para a pagina de restauracao, se algum arquivo padrao nao existir, ele ira primeiro passar pela pagina janela.

v1.0 - Beta 18 (25/04/2010)
: Ajeitado o echo de algumas paginas.

v1.0 - Beta 17 (24/04/2010)
: Removido 2 start/wait bb.vbs, adicionado as 3 msgs em um unico arquivo e abrindo ele uma unica vezz.

v1.0 - Beta 16 (24/04/2010)
: Ajeitado o design da pagina configuracoes
: Adicionado a opção 7 no menu Configuracoes.

v1.0 - Beta 15 (24/04/2010)
: Adicionado a pagina de salvamento do arquivo Configuracoes.ini
: Adicionado para que limpe o menu_configurar no limparmenus
: Pagina configuracoes em andamento, ainda não concluida.

v1.0 - Beta 14 (23/04/2010)
: Adicionado um set erro=0 nos menus das paginas ao voltar para a pagina principal.

v1.0 - Beta 13 (22/04/2010)
: Adicionado para que sempre que for voltar para a pagina principal, passar pelo limpar menus

v1.0 - Beta 12 (22/04/2010)
: Adicionado um sisteminha de restauração padrão para os arquivos Configuracoes.inii, Lista.ini e as pastas de backup

v1.0 - Beta 11 (22/04/2010)
: Resolvido o bug nas paginas que fazia com que nao pudesse criar/deletar + de 1 backup.
: Pagina thuthuca renomeada para pagina_criar3
: Adicionado a pagina_deletar2 como parte do fix do bug

v1.0 - Beta 10 (13/03/2010)
: Adicionado a opção 10 em todos os menus para poder voltar para a pagina principal

v1.0 - Beta 9 (11/03/2010)
: Arrumado o bug com a pagina deletar
: Removido a pagina irpara2

v1.0 - Beta 8 (10/03/2010)
: Adicionado a verificação do slot na parte de restauração

v1.0 - Beta 7 (14/11/2009)
: Adicionado outros erros
: Setado para ir no link limparmenus em algumas escolhas
: Numero de slots reduzido para 9
: Pagina deletar finalizado
: Adicionado a variavel irpara2

v1.0 - Beta 6 (13/11/2009)
: Removido a variavel pasta
: Em andamento a leitura da ini Lista
: Terminado o design da pagina_criar
: Adicionado um sisteminha de erros
: Adicionado erro 1 - Slot ocupado.
: Adicionado erro 2 - Nenhum slot selecionado.
: Retirado a variavel SlotNome e SlotInfo
: Retirado a variavel SlotData
: Varias outras mudanças...

v1.0 - Beta 5 (13/11/2009)
: Link Checkbackup removido
: Retirado o if no Criar_Backup
: Em andamento a leitura da ini  Configuracoes
: Design alterado.
: Link "criar_backup" renomeado para "pagina_criar"
: Link "restaurar_backup" renomeado para "pagina_restaurar"
: Link "deletar_backup" renomeado para "pagina_deletar"
: Adicionado ">nul" nas operacoes de exportacoes
: Adicionado o color para ser lido no Configuracoes.ini

v1.0 - Beta 4 (13/11/2009)
: Adicionado o set que faltava para setar a variavel versao
: Removido o aviso para executar como administrador
: Adicionado um mode para setar o tamanho da janela
: A Pagina principal foi totalmente refeito, deixando apenas as opções a mostra.
: Link "menu" renomeado para "pagina_principal"
: Adicionado o link para a pagina configuracoes na pagina principal
: Menu de escolha "menu_escolha" renomeado para "menu_principal"

v1.0 - Beta 3 (13/11/2009)
: Alterado o metodo de importação e exportação do backup.
: Removido temporariamente (talvez) a variavel com a pasta de backup, os cd e etc...

v1.0 - Beta 2 (13/11/2009)
: Removido o cls logo no inicio do primeiro menu de escolha.
: Adicionado o ponto que faltava no echo para quebrar uma linha no link menu

v1.0 - Beta 1 (13/11/2009)
: Finalizado as linhas mais importantes.