Batch Backup v1.0 - Beta 6

:script
set versao=v1.0 - Beta 6
set irpara=pagina_principal
:Configuracoes
for /f "tokens=1,2 delims==" %%a in (Configuracoes.ini) do (
if %%a==cor set cor=%%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 cor_temp=%cor%
set hkcr_temp=%hkcr%
set hkcu_temp=%hkcu%
set hklm_temp=%hklm%
set hku_temp=%hku%
set hkcc_temp=%hkcc%
: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
if %%a==Slot10 set Slot10=%%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%
set Slot10_temp=%Slot10%
:numero
:janela
color %cor%
echo off
title Batch Backup %versao%
mode 43,18
:limparmenus
set menu_principal=null
set menu_criar=null
goto %irpara%
:pagina_principal
cls
echo   ------------------------
echo   [ (1) Criar Backup     ]
echo   [ (2) Restaurar Backup ]
echo   [ (3) Deletar Backup   ]
echo   [ (4) Configuracoes    ]
echo   [ (5) Sair             ]
echo   ------------------------
:menu_principal
echo.
set/p menu_principal="Menu #: "
if "%menu_principal%"=="1" goto pagina_criar
if "%menu_principal%"=="2" goto pagina_restaurar
if "%menu_principal%"=="3" goto pagina_backup
if "%menu_principal%"=="4" goto pagina_configuracoes
if "%menu_principal%"=="5" exit
goto menu_principal
:pagina_configuracoes
cls
echo   ------------------------
echo   [ (1) Alterar pasta    ]
echo   [ (2) Alterar cor      ]
echo   [ (3)    ]
echo   [ (4) Configuracoes    ]
echo   [ (5) Sair             ]
:pagina_criar
cls
echo   ----------------------
echo   [ (1) Slot 1: %Slot1% ]
echo   [ (2) Slot 2: %Slot2% ]
echo   [ (3) Slot 3: %Slot3% ]
echo   [ (4) Slot 4: %Slot4% ]
echo   [ (5) Slot 5: %Slot5% ]
echo   [ (6) Slot 6: %Slot6% ]
echo   [ (7) Slot 7: %Slot7% ]
echo   [ (8) Slot 8: %Slot8% ]
echo   [ (9) Slot 9: %Slot9% ]
echo   [ (10) Slot 10: %Slot10%]
echo   ----------------------
:menu_criar
if "%erro%"=="1" echo Slot Ocupado.
if "%erro%"=="2" echo Nenhum slot selecionado.&set erro=0
set /p menu_criar="Slot #: "
if "%menu_criar%"=="1" set slot=%Slot1%&set n=1&goto pagina_criar2
if "%menu_criar%"=="2" set slot=%Slot2%&set n=2&goto pagina_criar2
if "%menu_criar%"=="3" set slot=%Slot3%&set n=3&goto pagina_criar2
if "%menu_criar%"=="4" set slot=%Slot4%&set n=4&goto pagina_criar2
if "%menu_criar%"=="5" set slot=%Slot5%&set n=5&goto pagina_criar2
if "%menu_criar%"=="6" set slot=%Slot6%&set n=6&goto pagina_criar2
if "%menu_criar%"=="7" set slot=%Slot7%&set n=7&goto pagina_criar2
if "%menu_criar%"=="8" set slot=%Slot8%&set n=8&goto pagina_criar2
if "%menu_criar%"=="9" set slot=%Slot9%&set n=9&goto pagina_criar2
if "%menu_criar%"=="10" set slot=%Slot10%&set n=10&goto pagina_criar2
set erro=2
goto pagina_criar
:pagina_criar2
if "%slot%"=="Vazio" goto thuthuca
set erro=1
set irpara=pagina_criar
goto limparmenus
:thuthuca
cd Backups
if not exist Slot%n% mkdir Slot%n%
cd Slot%n%
set Slot%n%_temp=%time% - %date%
echo   ------------------------
echo   [ Criando backup...    ]
echo   [ Etapa 1/5            ]
reg export hkcr hkcr.reg>nul
echo   [ Etapa 2/5            ]
reg export hkcu hkcu.reg>nul
echo   [ Etapa 3/5            ]
reg export hklm hklm.reg>nul
echo   [ Etapa 4/5            ]
reg export hku hku.reg>nul
echo   [ Etapa 5/5            ]
reg export hkcc hkcc.reg>nul
echo   [ Backup Criado        ]
echo   ------------------------
cd..
cd..
goto salvar_lista
:pagina_restaurar
cls
mode 45,25
echo   ----------------------
echo   [ (1) Slot 1: %Slot1% ]
echo   [ (2) Slot 2: %Slot2% ]
echo   [ (3) Slot 3: %Slot3% ]
echo   [ (4) Slot 4: %Slot4% ]
echo   [ (5) Slot 5: %Slot5% ]
echo   [ (6) Slot 6: %Slot6% ]
echo   [ (7) Slot 7: %Slot7% ]
echo   [ (8) Slot 8: %Slot8% ]
echo   [ (9) Slot 9: %Slot9% ]
echo   [ (10) Slot 10: %Slot10%]
echo   ----------------------
:menu_criar
if "%erro%"=="1" echo Slot Ocupado.
if "%erro%"=="2" echo Nenhum slot selecionado.&set erro=0
set /p menu_criar="Slot #: "
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   ------------------------
pause>nul
goto script
:pagina_deletar
del *.reg
echo Backups deletados.
pause>nul
goto script
:salvar_lista
echo Salvando o arquivo lista.ini..
if "%irpara%"=="salvar_lista" echo Lista salva e carregada com sucesso.&pause&goto pagina_principal
echo Slot1=%Slot1_temp%>Lista.ini
echo Slot2=%Slot2_temp%>>Lista.ini
echo Slot3=%Slot3_temp%>>Lista.ini
echo Slot4=%Slot4_temp%>>Lista.ini
echo Slot5=%Slot5_temp%>>Lista.ini
echo Slot6=%Slot6_temp%>>Lista.ini
echo Slot7=%Slot7_temp%>>Lista.ini
echo Slot8=%Slot8_temp%>>Lista.ini
echo Slot9=%Slot9_temp%>>Lista.ini
echo Slot10=%Slot10_temp%>>Lista.ini
set irpara=salvar_lista
goto Configuracoes
exit

::Batch Backup ChangeLog


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.