Imagemagick Buchseiten teilen und umbenennen per Batch

Moin zusammen,

bin hier superneu und hoffe geholfen zu werden .

Ich suche Hilfe beim teilen und umbenennen von gescannten Buchseiten. Am besten per Batch Aufruf.
Da ich scripte absolut nicht verstehe, hier mein anliegen.

Es sind diverse Ordner mit gescannten Buchseiten vorhanden. Jeweils zwei Buchseiten als ein Bild im Tif Format.
Mit Imagemagick ist es möglich Bilder genau zu halbieren, egal wie Groß das Eingangsbild ist. Also immer die Hälfte.
Wunsch ist es, die Bilder in diversen Unterordnern zu halbieren und den Dateinamen zu erweitern.
Imagemagick ist in den System-Variablen eingetragen. Befehle funktionieren aus beliebigen CMD Fenstern.
Der Befehl


halbiert alle Bilder eines Ordners aus dem der Befehl gestartet wurde und benennt sie in Cropped_00001.tif, Cropped_00002.tif, Cropped_00003.tif, usw..
Alle Dateien müssen hinterher wieder mit z.B. Total Commander oder Bulk Rename umbenannt werden. Recht mühsam.
Jetzt habe ich folgenden Code im Netz gefunden und als split.bat auf dem Desktop abgelegt.


Jedes Bild welche auf diese Datei gezogen wird, wird halbiert und der Dateiname um -L bzw. -R erweitert. Also nahezu perfekt, aber eben nur für jedes Bild einzeln.
Welche Variablen / Schalter erledigen das für alle Bilder in einem Ordner, bzw.
in allen Unterordnern eines Ordners?
Traum wäre, wenn alle neuen halbierten Seiten eine Ebene höher in einen, dem Dateinamen oder Vaterverzeichnis mit dem Zusatz _Geteilt, entsprechenden Ordner verschoben werden.

Ich bin sicher es geht, nur ich bin zu blöd dazu.

Für Anregungen und Hilfe jetzt schon mal Danke.

@echo off
SetLocal EnableDelayedExpansion

For %%A in (%*) do (
	For /f "Delims=" %%B in ('dir /s /b "%%~A\*.tif"') do (  
		Set dir=%%~dpB
		for %%C in ("!dir:~0,-1!") do (  
			set ParentPath=%%~dpC
			set ParentDir=%%~nxC
			)
		if "!ParentDir:~-7!" neq "geteilt" (  
			mkdir "!ParentPath!!ParentDir!_geteilt" >nul 2>&1  
			magick convert "%%B" -crop 2x1@ -write mpr:img -delete 0--1 mpr:img -write "!ParentPath!!ParentDir!_geteilt\%%~nB-L.tif" +delete mpr:img[1] "!ParentPath!!ParentDir!_geteilt\%%~nB-R.tif"  
			)
		)
	)

$Args | % {
	ls -r "$_\*.Tif" | ? {$_.DirectoryName -notmatch "_geteilt$"} | % {  
		$Dir=(md -force "$($_.DirectoryName)_geteilt").Fullname  
		magick convert $_.Fullname -crop 2x1@ -write mpr:img -delete 0--1 mpr:img -write "$dir\$($_.BaseName)-L.tif" +delete mpr:img[1] "$dir\$($_.BaseName)-R.tif"  
		}
	}

powershell -EP ByPass -File

Powershell -EP ByPass -File "C:\Skripte\Bilder teilen.PS1"  

$Args | % {
 	ls -r "$_\*.Tif" | ? {$_.DirectoryName -notmatch "_geteilt$"} | % {  
 		$Dir=(md -force "$($_.DirectoryName)_geteilt").Fullname  
 		magick convert $_.Fullname -crop 2x1@ -write mpr:img -delete 0--1 mpr:img -write "$dir\$($_.BaseName)-L.tif" +delete mpr:img[1] "$dir\$($_.BaseName)-R.tif"  
 		}
 	}

splitbook "E:\Ordnername"