Dateinamen einlesen, auftrennen, umsortieren ... Datei umbenennen

@echo off

echo __________________________________________
echo __________///  Umbenennen \\\_____________
echo __________________________________________

set {{comment_strings:41500927602}} 

:1
for /f {{comment_strings:42541603153}} %%i in ('dir /b %MaskRename%') do set {{comment_strings:6657828605}} & call :2 {{comment_strings:64224063958}}  

echo __________________________________________    
echo Umbenennen beendet.   
echo __________________________________________    
goto :3


:2
set name=%name:_occlusion=-occlusion%
ren %1 "%Name:~-2%-%Name:~,-4%%~x1"   
echo %1 {{comment_strings:32365003170}} 
goto :1

:3

echo __________________________________________
echo ___________///  Sortieren \\\_____________
echo __________________________________________

set "MaskSort=??-*.*"  

:5
for /F {{comment_strings:23759469791}} %%i in ({{comment_strings:14094549536}}) do set {{comment_strings:13762658272}} & call :4 "%%i"  

goto :6

:4
    if exist {{comment_strings:43115843065}} ( 
        move {{comment_strings:12963304718}} "%Name1:~3%\" 2>NUL  
	rem goto :5 
    ) ELSE (
        echo __________________________________________    
        echo              Erstelle Ordner   : %Name1:~3%   
        echo __________________________________________        

        md "%Name1:~3%" 2>NUL  
        move "%name1%%~x1" "%Name1:~3%\" 2>NUL  
	rem goto :5	
    )
goto :5

:6
echo __________________________________________    
echo Sortiervorgang beendet.    
echo __________________________________________  
goto :eof
pause

@echo off & setlocal & goto :Start

:umbenennen
  set name=%name:_occlusion=-occlusion%
  ren %1 "%Name:~-2%-%Name:~,-4%%~x1"   
  echo %1 "%Name:~-2%-%Name:~,-4%%~x1"  
  goto :eof

:sortieren
  if not exist "%Name1:~3%" (  
    echo    Erstelle Ordner   : %Name1:~3%   
    md "%Name1:~3%"  
  )
  move "%name1%%~x1" "%Name1:~3%\"  
  goto :eof

:checken
  if exist "%Name2:~,-10%" (  
    echo    gecheckt: %Name2:~,-10%
  ) ELSE (
    echo ...
    echo !!! In der Benennung von "%Name2:~,-10%" und dem Pass ist ein Fehler !!!  
    echo ...)
  goto :eof


:Start
  echo __________///  Umbenennen \\\_____________
  echo ==========================================

  set "MaskRename=*00??.*"  
  for /f "delims=" %%i in ('dir /b %MaskRename%') do set "Name=%%~ni" & call :umbenennen "%%i"  

  echo __________________________________________    
  echo :::::   Umbenennen beendet.   
  echo\
  echo\
  echo ___________///  Sortieren \\\_____________
  echo ==========================================

  set "MaskSort=??-*.*"  
  for /F "delims=" %%i in ('dir/b %MaskSort%') do set "Name1=%%~ni" & call :sortieren "%%i"  

  echo __________________________________________  
  echo :::::   Sortieren beendet.    
  echo\
  echo\
  echo ___________///  Checken \\\_______________
  echo ==========================================

  set "MaskCheck=*-occlusion"  
  for /F "delims=" %%i in ('dir/b %MaskCheck%') do set "name2=%%i" & call :checken "%%i"  

  echo __________________________________________  
  echo :::::   Checken beendet.  
 
pause