UPX script

Here's a script I've been working on to automatically UPX all exe & dll files in the App\[app] folder and its subfolders. It compresses with the recommended settings, and does a upx -t on each resultant file to make sure it decompresses correctly. If it doesn't, it automatically reverts to the backed up original copy. If it does the backup is deleted. It's written to be run from the Source directory of the app. Two variables need to be set, UPXBIN points to the upx.exe binary and APP is the name of the root app binary folder. So far it seems to have worked like a charm on GnuCash Portable. I've been running it through its paces with no crashes yet.

:: This script will compress all exe and dll files in the %APP% directory to save space.
:: Files that don't compress correctly are automatically reverted
@ECHO OFF
:: UPX is available at http://upx.sourceforge.net
SET UPXBIN=F:\PortableApps\UPX\upx.exe
SET APP=GnuCash

ECHO Compressing exe and dll files
SETLOCAL EnableDelayedExpansion
FOR /F "tokens=*" %%G IN ('DIR /B /S ..\..\App\%APP%\*.exe ..\..\App\%APP%\*.dll') DO (
    %UPXBIN% "%%G" --best --compress-icons=0 --nrv2e --crp-ms=999999 -k
	SET VAR=%%G
	%UPXBIN% "%%G" -t
	IF !ERRORLEVEL! NEQ 0 (MOVE /Y !VAR:~0,-1!^~ %%G) ELSE (DEL /Q !VAR:~0,-1!^~)
)
pause