Sobeit Switcher v1.13

:variaveis_customizaveis
set verificar=mod_sa.ini
set gtasa=gta_sa.exe
set isb=isb.exe
set backup=d3d9.dll
:variaveis_permanentes
set dversao=1
set sversao=13
set status=null
set acao=null
:janela
echo off
title Sobeit Switcher v%dversao%.%sversao%
mode 35,8
:parametros
if "%1"=="ajuda" goto ajuda
if "%1"=="a" goto ajuda
:pastas
set pasta1=C:\Program Files (x86)\Rockstar Games\GTA San Andreas
set pasta2=C:\Program Files\Rockstar Games\GTA San Andreas
set pasta3=C:\Arquivos de Programas (x86)\Rockstar Games\GTA San Andreas
set pasta4=C:\Arquivos de Programas\Rockstar Games\GTA San Andreas
set pasta5=C:\Rockstar Games\GTA San Andreas
set pasta6=C:\GTA San Andreas
set pasta7=C:\GTA
set pasta8=C:\Arquivos de Programas\GTA
set pasta9=D:\Program Files (x86)\Rockstar Games\GTA San Andreas
set pasta10=D:\Program Files\Rockstar Games\GTA San Andreas
set pasta11=D:\Arquivos de Programas (x86)\Rockstar Games\GTA San Andreas
set pasta12=D:\Arquivos de Programas\Rockstar Games\GTA San Andreas
set pasta13=D:\Rockstar Games\GTA San Andreas
set pasta14=D:\GTA San Andreas
set pasta15=D:\GTA
set pasta16=D:\Arquivos de Programas\GTA
set pasta17=C:\GAMES\GTA
set pasta18=D:\GAMES\GTA
set pasta19=C:\GTA
set pasta20=F:\Program Files\Rockstar Games\GTA San Andreas
set pasta21=F:\Arquivos de Programas (x86)\Rockstar Games\GTA San Andreas
set pasta22=F:\Arquivos de Programas\Rockstar Games\GTA San Andreas
set pasta23=F:\Rockstar Games\GTA San Andreas
set pasta24=F:\GTA San Andreas
set pasta25=F:\GTA
set pasta26=F:\Arquivos de Programas\GTA
set pasta27=F:\GAMES\GTA
:test_pasta
cd %pasta1%
if "%errorlevel%"=="0" goto test_prev
cd %pasta2%
if "%errorlevel%"=="0" goto test_prev
cd %pasta3%
if "%errorlevel%"=="0" goto test_prev
cd %pasta4%
if "%errorlevel%"=="0" goto test_prev
cd %pasta5%
if "%errorlevel%"=="0" goto test_prev
cd %pasta6%
if "%errorlevel%"=="0" goto test_prev
cd %pasta7%
if "%errorlevel%"=="0" goto test_prev
cd %pasta8%
if "%errorlevel%"=="0" goto test_prev
cd %pasta9%
if "%errorlevel%"=="0" goto test_prev
cd %pasta10%
if "%errorlevel%"=="0" goto test_prev
cd %pasta11%
if "%errorlevel%"=="0" goto test_prev
cd %pasta12%
if "%errorlevel%"=="0" goto test_prev
cd %pasta13%
if "%errorlevel%"=="0" goto test_prev
cd %pasta14%
if "%errorlevel%"=="0" goto test_prev
cd %pasta15%
if "%errorlevel%"=="0" goto test_prev
cd %pasta16%
if "%errorlevel%"=="0" goto test_prev
cd %pasta17%
if "%errorlevel%"=="0" goto test_prev
cd %pasta18%
if "%errorlevel%"=="0" goto test_prev
cd %pasta19%
if "%errorlevel%"=="0" goto test_prev
cd %pasta20%
if "%errorlevel%"=="0" goto test_prev
cd %pasta21%
if "%errorlevel%"=="0" goto test_prev
cd %pasta22%
if "%errorlevel%"=="0" goto test_prev
cd %pasta23%
if "%errorlevel%"=="0" goto test_prev
cd %pasta24%
if "%errorlevel%"=="0" goto test_prev
cd %pasta25%
if "%errorlevel%"=="0" goto test_prev
cd %pasta26%
if "%errorlevel%"=="0" goto test_prev
cd %pasta27%
if "%errorlevel%"=="0" goto test_prev
if exist %gtasa% goto test_prev
cls
echo.
echo A pasta do seu gta nao foi detectada.
echo.
pause>nul
exit
:test_prev
cls
echo Verificando permissoes...
rename %gtasa% %gtasa%.sobeit
if exist "%gtasa%.sobeit" (
    rename %gtasa%.sobeit %gtasa%
    goto test_isb
) else (
    echo.
    echo Voce nao tem permissoes.
   pause>nul
   exit
)
:test_isb
cls
if exist "%isb%" (
    goto test_sobeit
) else (
    echo.
    echo Arquivo de instalacao do sobeit nao encontrado.(%isb%)
    pause>nul
    exit
)
:test_sobeit
if exist "%verificar%" (
    set status=Instalado
    color C
) else (
   set status=Desinstalado
   color A
)
if  "%status%"=="Instalado" (
    set acao=Desinstalar
) else (
   set acao=Instalar
)
:menu
cls
echo.
echo Sobeit: %status%
echo -----------------------------------
echo P. Qualquer tecla para %acao%
echo.
pause>nul
if  "%status%"=="Instalado" (
    taskkill /F /IM %gtasa%
    del mod_s*.txt
    del mod_s*.log
    del mod_s*.ini
    del mod_s*.raw
    del d3d9.dll
    del needle.png
    del speedo.png
    cd data
    del carmods.two
    del default.two
    del HANDLING.two
    del SHOPPING.two
    del surface.two
    del timecyc.two
    del VEHICLES.two
    cd..
    if exist "%backup%.backup" rename %backup%.backup %backup%
    goto test_pasta
) else (
   taskkill /F /IM %gtasa%
   if exist "%backup%" rename %backup% %backup%.backup
    %isb%
    goto test_pasta
)
:ajuda
title Sobeit Swither v%dversao%.%sversao% - Ajuda
color A
cls
echo.
echo 1 - Voce nao tem permissoes.
echo 2 - A pasta do seu gta nao foi detectada.
echo 3 - Arquivo de instalacao do sobeit nao encontrado.(%isb%)
echo.
set /p ajuda="Escolha: "
if "%ajuda%"=="1" cls&echo Voce deve executar o Sobeit Switcher como administrador, clicando com o botao direito sobre ele e depois clicando em executar como administrador&pause>nul&goto ajuda
if "%ajuda%"=="2" cls&echo Se o Sobeit Switcher nao detectar automaticamente a pasta do seu gta, voce deve colocar o Sobeit Switcher na pasta do seu gta e pronto :D&pause>nul&goto ajuda
if "%ajuda%"=="3" cls&echo O Arquivo isb.exe deve estar na pasta do seu gta&pause>nul&goto ajuda
goto ajuda

::Sobeit Switcher Changelog

v1.13 - 06/03/2012
: Removido a variavel da pasta 28.
: Mensagem na pagina ajuda fixada.
: Texto "P. Alguma tecla para %acao%" Alterado para "P. Qualquer tecla para %acao%"
: Removido a palavra "Erro" dos 2 textos de ajuda no link ajuda
: Removido aquela porrada de linhas para remover os arquivos mod_sa.log, mod_sa_all.log e alterado para mod_s*.txt, mod_s*.ini, mod_s*.raw, mod_s*.log

v1.12 - 02/23/2012
: Removido a pasta duplicada
: Removido o Link versao
: Texto "Arquivos requeridos nao encontrados." alterado para "Arquivo de instalacao do sobeit nao encontrado.(%isb%)"

v1.11 - 05/01/2012
: Corrigido erro no else

v1.10 - 13/11/2011
: Novo Design, mais claro.

v0.10 - 12/11/2011
: Removido o pulo de linha nos textos de ajuda
: Adicionado um cls nos textos de ajuda
: Adicionado >nul nos pauses dos textos de ajuda
: Parametro creditos foi removido.
: Parametro oldmaker ( criado para testes ) foi removido.
: Retirado o 0 dos color para setar a cor se o sobeit estiver instalado ou desinstalado.

v0.9 - 11/11/2011
: Variavel "sobeit" renomeada para "status".
: Variavel "status" renomeada para "acao" ( ação ).
: Adicionado o "exit" no fim do link versao.

v0.8 - 10/11/2011
: Projeto renomeado para "Sobeit Switcher".
: Adicionado o parametro "versao" ou "v" para obter informações sobre a versao atual.
: Retirado a variavel "versao".
: Adicionado a variavel "dversao" que indica a versao do design.
: Adicionado a variavel "sversao" que indica a versao do script.
: Title foi adaptado com as novas variaveis de versao.
: O Link janela foi colocado depois do link das variaveis, oque fazia com que a versao nao fosse definida no titulo
: O Link creditos foi concluido ( tinha faltado algumas partes )

v0.7 - 09/11/2011
: A Variavel versao foi restaurada novamente..agora é permanente.
: Adicionado mais 9 pastas.
: Foi adicionado a pasta 19 no test_pasta que eu tinha esquecido junto com as 9 pastas novas.
: Link ":config" alterado para ":test_sobeit".
: Adicionado o parametro "ajuda" ou "a" onde leva para a pagina de ajuda obtendo mais informacoes sobre o Sobeit Changer.
: Adicionado o parametro "creditos" ou "c" para obter informações sobre a programação do script.
: "Execute como administrador" foi substituido por "Voce nao tem permissoes."

v0.6 - 09/11/2011
: Variavel versao foi retirado e sera colocado manualmente no title.
: Variavel janela foi retirado e o tamanho do mode sera colocado manualmente.
: Foi criado uma nova categoria de variaveis, as Variaveis customizaveis, aquelas que podem ser alteradas.
: O Texto do changelog foi alterado de "::Sobeit Changer - Changelog" para apenas "Changelog".

v0.5 - 08/11/2011
: Foi adicionado novamente a variavel versao.
: O Titulo(title) foi revertido para o modo antigo contendo o nome a versão atual.
: O Texto do changelog foi alterado de "::Sobeit Changer (versão atual)" para "::Sobeit Changer - Changelog".
: Link "Check" renomeado para "test_pasta".
: Link "admintest" renomeado para "test_prev".
: Link "checkisb" renomeado para "test_isb".
: O Changelog foi colocado no final do script.
: Adicionado uma variavel para o arquivo isb.exe.
: Adicionado uma variavel para o arquivo de backup ( padrao: d3d9.dll ).
: Foi trocado o "gta_sa.exe" para executar a variavel "gtasa" nos 2 taskkill

v0.4 - 06/11/2011
: Removido a variavel versao.
: Titulo definido apenas para Sobeit Changer.
: Removido o pulo de linha no admintest.
: Arquivo de instalação do sobeit de ssb.exe alterado para isb.exe ( Instalador SoBeit ).
: Adicionado uma verificação simples para checar a existencia do arquivo isb.exe
: Criado link pastas para separar as variaveis das pastas das variaveis normais, deixando o codigo mais organizado.
: Removido o espaço que tinha entre a ultima variavel pasta e o link janela.
: Removido os espaços do pause de "pause > nul" ficando apenas "pause>nul"

v0.3 - 12/09/2011
: Changelog adicionado no inicio do codigo.
: Adicionado uma função de backup para a dll "d3d9"
: Adicionado a variavel "versao".
: Variavel "titulo" foi removida.
: Titulo de "%titulo%" alterado para "Sobeit Changer %versao%".
: Adicionado mais algumas pastas para verificação.
: link ":configuracoes" alterado para ":variaveis".
: Link ":app" alterado para ":janela".

v0.2 - 11/09/2011
: Removido o aviso para executar como administrador.
: Adicionado um teste de permissao.
: Todas as pastas foram para as variaveis "pastax".
: Instalar/Desinstalar sobeit foi totalmente reformado e ficando somente um if em vez de dois links.
: Outras mudancas que já me esqueci...

v0.1 - 11/09/2011
: Finalizado as linhas mais importantes do script.