RakSAMPClient Launcher Batch

del *.txt
del *.log
del *.xml
:janela
echo off
mode 30,15
title RakSAMPClient Launcher Batch
:admin_test
echo Teste administrativo>admin.test
if not exist admin.test goto erro_admin
del admin.test
if exist admin.test goto erro_admin
:pastas
set p_bot=BOT
set p_dep=Dependencias
:variaveis
set nome=0
set servidor=0
set bots=0
set bot_nome=0
set bot_x=0
set bot_y=0
:carregar_ini
for /f "tokens=1,2 delims==" %%a in (%p_dep%\Configuracoes.ini) do (
if %%a==nome set nome=%%b
if %%a==servidor set servidor=%%b
if %%a==corrermodo set corrermodo=%%b
if %%a==idveiculo set idveiculo=%%b
)
:correr_textos
set t0=RCON
set t1=Simples
set t2=Permanecer
set t3=Normal
set t4=Seguir
set t5=Seguir+carro
set t6=Rotas
:correr_modo
if "%corrermodo%"=="0" set tcorrermodo="%t0%"
if "%corrermodo%"=="1" set tcorrermodo="%t1%"
if "%corrermodo%"=="2" set tcorrermodo="%t2%"
if "%corrermodo%"=="3" set tcorrermodo="%t3%"
if "%corrermodo%"=="4" set tcorrermodo="%t4%"
if "%corrermodo%"=="5" set tcorrermodo="%t5%"
if "%corrermodo%"=="6" set tcorrermodo="%t6%"
:menu
cls
%p_dep%\cmdmenusel.exe 0770 "Nome: %nome%" "Servidor: %servidor%" "Modo a correr: %tcorrermodo%" "Veiculo ID: %idveiculo%" "" "Bots executando: %bots%" "" "Sair"
if "%errorlevel%"=="1" goto menu_nome
if "%errorlevel%"=="2" goto menu_servidor
if "%errorlevel%"=="3" goto menu_acorrer
if "%errorlevel%"=="4" goto menu_idveiculo
if "%errorlevel%"=="6" goto bots
if "%errorlevel%"=="7" exit
goto menu
:menu_acorrer
cls
%p_dep%\cmdmenusel.exe 0770 "%t0%" "%t1%" "%t2%" "%t3%" "%t4%" "%t5%" "%t6%" "" "Voltar"
if "%errorlevel%"=="1" set corrermodo=0&goto salvar_configuracoes
if "%errorlevel%"=="2" set corrermodo=1&goto salvar_configuracoes
if "%errorlevel%"=="3" set corrermodo=2&goto salvar_configuracoes
if "%errorlevel%"=="4" set corrermodo=3&goto salvar_configuracoes
if "%errorlevel%"=="5" set corrermodo=4&goto salvar_configuracoes
if "%errorlevel%"=="6" set corrermodo=5&goto salvar_configuracoes
if "%errorlevel%"=="7" set corrermodo=6&goto salvar_configuracoes
if "%errorlevel%"=="8" goto menu
goto menu_acorrer
:menu_idveiculo
echo.
set /p idveiculo="Entre com o novo ID: "
goto salvar_configuracoes
:menu_nome
echo.
set /p nome="Entre com o novo nome: "
goto salvar_configuracoes
:menu_servidor
echo.
set /p servidor="Entre com o novo servidor: "
goto salvar_configuracoes
:bots
cls
type bots.txt
if "%errorlevel%"=="1" (
cls
echo Nenhum bot rodando ou listado.
)
%p_dep%\cmdmenusel.exe 0770 "Adicionar um bot" "" "Voltar"
if "%errorlevel%"=="1" goto bots_adicionar
if "%errorlevel%"=="3" goto menu
goto bots
:bots_adicionar
echo.
set /p bot_nome="Entre com o nome do BOT: "
echo.
echo Exemplo: 0.0
set /p bot_x="Entre com a posicao X do BOT: "
set /p bot_y="Entre com a posicao Y do BOT: "
echo %bot_nome% - %bot_x% %bot_y%>>bots.txt
set /a bots+=1
del *.xml
:adicionando_bot
cls
echo Gerando XML...
type %p_dep%\RakSAMPClient.xml|%p_dep%\repl.bat "NOME_PLAYER" "%nome%">bot_01.tmp
type bot_01.tmp|%p_dep%\repl.bat "POSICAO_X" "%bot_x%">bot_02.tmp
type bot_02.tmp|%p_dep%\repl.bat "POSICAO_Y" "%bot_y%">bot_03.tmp
type bot_03.tmp|%p_dep%\repl.bat "NOME_BOT" "%bot_nome%">bot_04.tmp
type bot_04.tmp|%p_dep%\repl.bat "IP_SERVIDOR" "%servidor%">bot_05.tmp
type bot_05.tmp|%p_dep%\repl.bat "CORRERMODO" "%corrermodo%">bot_06.tmp
type bot_06.tmp|%p_dep%\repl.bat "VEICULOID" "%idveiculo%">RakSAMPClient.xml
del *.tmp
start %p_bot%\RakSAMP.exe
goto menu
:salvar_configuracoes
(
echo nome=%nome%
echo servidor=%servidor%
echo corrermodo=%corrermodo%
echo idveiculo=%idveiculo%
)>%p_dep%\Configuracoes.ini
goto variaveis
:erro_admin
echo.
echo Voce precisa de permissoes administrativas na pasta em que roda o batch.
echo.
pause>nul
exit