@echo off
setlocal EnableDelayedExpansion
set/a "_tag=0,_num=0" && pushd "D:\AM-2.6.1\ROMlists"
echo==========================================================
echo= AM Favorites ROMlist Generator Script for Windows
echo==========================================================
if not exist .\favorites.txt (
set/p "'= - Cretating .\Favorites.txt File.."<nul & echo\
) else 2>nul (set/p "'= - Backing up your old Favorites.txt: "<nul
move/y .\Favorites.txt .\Favorites.txt.backup >nul && echo\Done^!!)
echo/- Gathering list of your Favorites: Tags-Files
for %%G in (*.tag)do set/a "_tag+=1" && for /f useback^delims^= %%i in (`
more "%%~G"`)do set/p "'=- ROM Found in File %%~nxG: %%~i"<nul & echo= & (
<con: find "%%~i;" <"%%~nG.txt" >>".\Favorites.txt" && set/a "_num+=1")
set/a "_num+=10000,_tag+=10000" && <con: call echo/- Romlist Files [tag=txt]: !_tag:~-3!
echo/- Favorites added to Disc: !_num:~-3! & echo/- ROMlist .\Favorites.txt: New && popd
endlocal & echo/- is Done!.. & timeout 3|findstr /ec:\.\Favorites\.txt "%~f0" & goto:EOF
========================================================================================
- Add a display in Attract Mode and set its ROMlist to the newly created .\Favorites.txt
========================================================================================
This script basically does the same thing as DM's Favorites ROMlist generator but
on Windows [ Shouts to him for the pi version d;) ].
How it works:
It grabs all the (tagged) favorites from every tag file, searches for them through
all the ROMlists, then generates a ROMlist called Favorites.txt Written by Steve
Sherrod, 05/20/17, as part of project HyperPie Expanded
========================================================================================
=========================================================
AM Favorites ROMlist Generator Script for Windows
=========================================================
- Backing up your old Favorites.txt: Done
- Gathering list of your Favorites: Tags-Files
- ROM Found in File Arcade.tag: 64street
- ROM Found in File Arcade.tag: mslug
- ROM Found in File Arcade.tag: 40love
- ROM Found in File Sega Genesis.tag: blkdrgon
- ROM Found in File Sega Genesis.tag: Duke Nukem 3D (Brazil)
- ROM Found in File Sega Genesis.tag: afighter
- ROM Found in File Sega Genesis.tag: airduel
- Romlist Files [tag=txt]: 002
- Favorites added to Disc: 007
- ROMlist .\Favorites.txt: New
- is Done!..
- Add a display in Attract Mode and set its ROMlist to the newly created .\Favorites.txt
64street;64th. Street - A Detective Story (World) (1991);6.91
mslug;Metal Slug - Super Vehicle-001 (1996);9.18
40love;Forty-Love (1984);0.00
blkdrgon;Black Dragon (Japan) (1987);9.40782122909
Duke Nukem 3D (Brazil);10 Super Jogos;Sega Genesis;;2002;Epyx;Compilaçao-Estratégia-Esporte;8+;;;;;;;;0.8;
afighter;Action Fighter (FD1089A 317-0018) (1986);7.00
airduel;Air Duel (Japan) (1990);6.74
1. Use /D
com o cd /D
, isso faz o cmd.exe|CHDIR
entrar na pasta e no /Drive
apontado por argumento, o que não vai ocorrer sem adicionar o /D
quando é executado apontando para drive diferente do atual.
cd /d "D:\AM-2.6.1\ROMlists"
Obs.: Pode também substituir cd /d
pelo pushd
, que altera a ordem na fila de pastas para busca dos seus comandos entrando na pasta passada pelo argumento já colocando a pasta atual para a primeira na fila/pilha, e também salvando o Drive\Pasta onde foi originalmente executado para retornar quando executar com popd
.
pushd "D:\AM-2.6.1\ROMlists"
... ...
...seus códigos...
... ...
popd
2. O comando set /a
pode ser usado para definir múltiplas variáveis já atribuindo os seus valores passados após o símbolo de igual, apenas utilizando como delimitadores, um espaço mais uma vírgula (ou apenas uma vírgula), ficando o seu comando para definir os valores de _num_favorites=0
e de _ROMlist=0
:
set "variável_1=valor_1, variável_2=valor_2, variável_3=valor_3"
rem :: Ou sem o espaço
set "variável_1=valor_1,variável_2=valor_2,variável_3=valor_3"
Obs.: A variável romlist
é delcarada set /a romlist=0
mas não figura em uso no seu código postado...
3. O autor original do código usou um if exist favorites.txt()
sem um else()
, ignorando (por alguma razão), a possível inexistência do arquivo ou uma ação de exclusão do arquivo pelo usuário, o que tornar falsa a mensagem Backing up old favorites.txt file
presente na primeira execução, ou para quando o usuário resolver apagar esse arquivo.
4. O comando set /a "variavel=variavel + 1"
pode ser substituído por set /a "variável+=1"
para aplicar o incremento de sua variável (para decremento é só inverter o sinal set /a "variavel-=1"
).
5. Os loopings For
(1x) e For /F
(2x) utilizados no bat original são muito lentos, eles vão pegar um MesmoNomeArquivo.TAG
e comparar linha por linha com cada linha de MesmoNomeArquivo.TXT
.
6. Você pode alterar o loop para procurar no outro arquivo (todo e de uma vez):
listar o linha por linha do arquivo.tag
... for /f "usebackq delims=" %%i in (`more "%%~G"`)do (
...
procurar a linha do arquivo.tag no arquivo.txt de uma vez já gravando o resultado
find "%%~i;" <"%%~nG.txt">>".\Favorites.txt"
...
Obs.: Mas perceba que isso acelara o processamento entre os dois arquivos, se o MesmoNomeArquivo.TAG
tiver 10 linhas e o MesmoNomeArquivo.TXT
tiver 1.000 linhas, dessa forma acima, serão 10 linhas x 1 arquivo = 10 execuções, e no original está sendo 10 linhas x 1000 linhas = 10.000 execuções, é muito demorado.
7. Uso de aspas, lembre-se do que comentou o @Ricardo Bohner...
Nessa parte: echo."!str!" | findstr /c:%%a>nul && (
tenta colocar uma aspas em %%a
-> "%%a"
Obs.: O Finstr
vai interpretar o conteúdo da string passada como o um ReGex (. *, $, ^, , 9-0, <, />, [, ], etc...
, pois ele tende e trata tudo como ReGex (salvo se você usar uma das flags explicitas para que não faça isso, ou o /L
ou o /C:
), e o também o seu For /F
vai imediatamente fechar o laço/loop em andamento se a string contém algum )
:
64street;64th. Street - A Detective Story (World);Arcade;;1991;C.P. Brain;Briga de rua-Luta / 2.5D-Luta;1-2;;;;;;;;0.5;;;;;Duken
8. Substitua o Findstrt
por um find
"simples*, fica mais fácil usa o find
para uma busca literal, onde nenhuma regex está em uso.
find "string/linhaDo.Tag" redireciona o arquivo.TXT // para o find ler na busca pela string...
find "%%~i;" <"%%~nG.txt"
9. Use aspas no seu loop for /F
adicionando usebackq
, ou abreviado (não documentado) useback
:
Obs.: Por paranóia minha, uso também em alguns códigos onde carateres especiais podem surgir no processamento, e ainda assim, vou usar o set /p "'=String Com Caracteres Especias [espacos] , &, (, ), etc.. " <nul
, mas como isso faz com que a saída do próximo comando ocorrer na mesma linha, sou obrigado a adicionar um echo\
quando é necessário escrever em tela/arquivo já quebrando a linha atual. Veja isso no primeiro código postado, (código numa versão compacta):
rem :: uso do usebackq no loop For /F aplica-se em echo, set, etc...
rem :: e o uso do set /p "'=String Escapada" <nul escapando as strings
rem :: com aspas duplas "usecakq" + set /p "=String" mas sem ecoar/printar
rem :: a duplicidade da aspas duplas: ""..."" em: ""String escapada""
for /f useback^delims^= %%i in (`
more "%%~G"`)do set/p "'=- ROM Found in File %%~nxG: %%~i"<nul & echo= & (
<con: find "%%~i;" <"%%~nG.txt" >>".\Favorites.txt" && set/a "_num+=1")
10. Mesmo código, porém portado para uma versão/layout mais covencional:
@echo off
set /a "_tag=0"
set /a "_num=0"
cd /d "D:\AM-2.6.1\ROMlists"
setlocal EnableDelayedExpansion
echo==========================================================
echo= AM Favorites ROMlist Generator Script for Windows
echo==========================================================
if not exist .\favorites.txt (
set /p "'= - Cretating .\Favorites.txt File.."<nul
echo\
) else (
set /p "'= - Backing up your old Favorites.txt: "<nul
move /y .\Favorites.txt .\Favorites.txt.backup 2>nul >nul
if %errorlevel% equ 0 echo\Done^!!
)
echo/- Gathering list of your Favorites: Tags-Files
for %%G in (*.tag)do (
set /a "_tag=!_tag! + 1"
for /f "usebackq delims=" %%i in (`more "%%~G"`)do (
set/p "'=- ROM Found in File %%~nxG: %%~i"<nul
echo=
find "%%~i;" <"%%~nG.txt" >>".\Favorites.txt"
if %errorlevel% equ 0 set /a "_num=!_num! + 1"
)
)
set /a "_num=!_num! + 1000"
set /a "_tag=!_tag! + 1000"
call echo/- Romlist Files [tag=txt]: !_tag:~-3!
echo/- Favorites added to Disc: !_num:~-3!
echo/- ROMlist .\Favorites.txt: New
endlocal
echo/- is Done!..
findstr /ec:\.\Favorites\.txt "%~f0"
goto :EOF
========================================================================================
- Add a display in Attract Mode and set its ROMlist to the newly created .\Favorites.txt
========================================================================================
This script basically does the same thing as DM's Favorites ROMlist generator but
on Windows [ Shouts to him for the pi version d;) ].
How it works:
It grabs all the (tagged) favorites from every tag file, searches for them through
all the ROMlists, then generates a ROMlist called Favorites.txt Written by Steve
Sherrod, 05/20/17, as part of project HyperPie Expanded
========================================================================================
Algums leituras adicionais