script para modificar el nombre de archivos en Windows

[JoaoM]

Perdonen la intrumision.

Donde podria ser algo modificado

@ECHO OFF &SETLOCAL &CD /D "%~DP1"

SETLOCAL ENABLEDELAYEDEXPANSION
FOR /f "tokens=*" %%f in ('DIR "*.JPG" /B /A-D /ON ^|FINDSTR /C:"-000"') DO (Call:Clean1 "%%~nf" "%%~xf")
GOTO:END

:Clean1
SET e=%~2
SET e=%e:~1%
SET c="%~1.%e%"
SET n="%~1"
SET n=%n:-00000000=-00%
SET n=%n:-0000000=-00%
SET n=%n:-000000=-00%
SET n=%n:-00000=-00%
SET n=%n:-0000=-00%
SET n=%n:-000=-00%
SET n=%n:-00=-0%
SET n=%n:-0=-00%
SET n=%n:~1%
SET n=%n:~,-1%
IF NOT %c%=="%n%.%e%" (REN %c% "%n%.%e%")
GOTO:EOF

:Clean2
SET e=%~2
SET e=%e:~1%
SET c="%~1.%e%"
SET n="%~1"
SET n=%n:-00000000=-00%
SET n=%n:-0000000=-00%
SET n=%n:-000000=-00%
SET n=%n:-00000=-00%
SET n=%n:-0000=-00%
SET n=%n:-000=-00%
SET n=%n:-00=-0%
SET n=%n:-0=-00%
FOR %%f in ( -0 -00 -000 -0000 -00000 -000000 -0000000 -00000000 ) DO (SET n=!n:%%f=!)
SET n=%n:~1%
SET n=%n:~,-1%
ECHO.!c! "%n%.%e%"
REM IF NOT %c%=="%n%.%e%" (REN %c% "%n%.%e%")
GOTO:EOF

:END
EXIT

para que al tener

xxxx-xxxx.jpg
no solo agregar o quitar ceros pero que al agregar o quitar siga una secuencia numerica

xxxx-xxxx 001.jpg
ect ect
xxxx-xxxx 010.jpg
xxxx-xxxx 011.jpg
ect
ect y no mantener los dos ceros 009 y 0011