Arturia Patcher for ASCEMU2 v2022.0 WiN

@echo off
setlocal EnableDelayedExpansion

:: Define Combined VST Names with expansion for "V" versions
set "VST_LIST=Dist COLDFIRE Dist OPAMP-21 Dist TUBE-CULTURE Tape MELLO-FI Pre 1973 Pre TRIDA Pre V76 Rotary CLS-222 Rev LX-24 Rev PLATE-140 Rev INTENSITY Rev SPRING-636 Delay TAPE-201 Delay BRIGADE Delay ETERNITY Efx FRAGMENTS Bus FORCE Comp DIODE-609 Eq SITRAL-295 Chorus DIMENSION-D Phaser BI-TRON Flanger BL-20 Chorus JUN-6 Comp VCA-65 Comp TUBE-STA Comp FET-76 Filter MS-20 Filter MINI Filter SEM Filter M12 Acid V Analog Lab ARP2600 V Augmented BRASS Augmented GRAND PIANO Augmented STRINGS Augmented VOICES Augmented WOODWINDS B-3 V Buchla Easel V Clavinet V CMI V CP-70 V CS-80 V CZ V DX7 V Emulator II V Farfisa V Jun-6 V Jup-8 V KORG MS-20 V Matrix-12 V Mellotron V Mini V MiniFreak V Modular V OP-Xa V Piano V Prophet-5 V Prophet-VS V SEM V Solina V SQ80 V Stage-73 V Synclavier V Synthi V Vocoder V Vox Continental V Wurli V"

:: Expanded VST List Initialization
set "EXPANDED_VST_LIST="

:: Expand VST List
for %%A in (%VST_LIST%) do (
set "VST=%%A"
if "!VST:V=!" neq "!VST!" (
:: VST name contains "V", add versions 2-5
for /L %%V in (2,1,5) do (
set "EXPANDED_VST_LIST=!EXPANDED_VST_LIST! %%A%%V"
)
) else (
set "EXPANDED_VST_LIST=!EXPANDED_VST_LIST! %%A"
)
)

:: Patching Command Template using expanded VST list
for %%A in (!EXPANDED_VST_LIST!) do (
set "patched=0"
echo Patching %%A

:: Attempt patching VST2 in VST2 Folder
if exist "%PROGRAMFILES%\Steinberg\VstPlugins\%%A.dll" (
ArturiaPatch.exe "%PROGRAMFILES%\Steinberg\VstPlugins\%%A.dll" && set "patched=1"
)

:: Attempt patching VST3 in VST3 Folder
if exist "%COMMONPROGRAMFILES%\VST3\%%A.vst3" (
ArturiaPatch.exe "%COMMONPROGRAMFILES%\VST3\%%A.vst3" && set "patched=1"
)

:: Attempt patching VST2 in ProgramData
if exist "%PROGRAMDATA%\Arturia\%%A\x64\%%A.dll" (
ArturiaPatch.exe "%PROGRAMDATA%\Arturia\%%A\x64\%%A.dll" && set "patched=1"
)

:: Attempt patching VST3 in ProgramData
if exist "%PROGRAMDATA%\Arturia\%%A\x64\%%A.vst3" (
ArturiaPatch.exe "%PROGRAMDATA%\Arturia\%%A\x64\%%A.vst3" && set "patched=1"
)

:: Check if the VST was not patched in any attempt
if !patched! equ 0 (
echo Failed to patch %%A in all locations.
)
echo;
)

echo Batch Processing Completed.
pause