FOR Schleifen und CALL Befehl für mich immer noch unverständlich

REM ------------------------------------------------------------------------
@ECHO OFF
REM --- Settings -----------------------------------------------------------
Setlocal EnableDelayedExpansion
REM ------------------------------------------------------------------------
REM --- Delete Source files from RECOMP.CAB on / off -----------------------
SET DELSRC=OFF
REM ------------------------------------------------------------------------
REM --- Set DXT Quality [superfast,fast,normal,better,uber] ----------------
SET QUALITY=uber
REM ------------------------------------------------------------------------
IF EXIST DATA.CAB (
					expand -f:*.* DATA.CAB .\
					) else	(
							ECHO Archive DATA.CAB not found!
							)
REM ------------------------------------------------------------------------
ECHO Resize and compress files...
FOR /R %%B in (*.dds) do	(
							SET PIXEL=
							SET HSIZE=
							SET VSIZE=
							SET FILEPATH=%%B
							SET FILENAME=%%~nxB
							for /f "tokens=5,6,8* delims=:,x " %%I in	(  
																		'crunch.exe /info -file "%%B"^|findstr "dimensions"'  
																		) do	(
																				IF NOT "%%K" == "1"	(  
																									SET MAXMIPS=7
																									SET MIPMODE=Generate 
																									) ELSE (
																											SET MAXMIPS=1
																											SET MIPMODE=none
																											)
																				SET TRUEPIXEL=%%I %%J
																				SET TRUEMAP=%%K
																				)
                                                        CLS
                                                        ECHO ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
                                                        ECHO ³ Textur Resizer Script for CHRUNCH.EXE by Trecasim    Version 1.00 Beta ³
                                                        ECHO ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
                                                        ECHO ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
                                                        ECHO º Texture Informatons:                                                   º
                                                        ECHO ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
                                                        ECHO º File:    !FILENAME!
                                                        ECHO º Path:    !FILEPATH!
                                                        ECHO º Size:    !TRUEPIXEL!
                                                        ECHO º MipMaps: !TRUEMAP!
                                                        ECHO ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
                                                        ECHO º                                                                        º
                                                        ECHO ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹
                                                        ECHO º Auto Modus Settings:                                                   º
                                                        ECHO ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
                                                        ECHO º Max. Size:    512 Pixel
                                                        ECHO º Max. Mipmaps: !MAXMIPS!
                                                        ECHO º MipMode:      !MIPMODE!
                                                        ECHO ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
                                                        ECHO º                                                                        º
                                                        ECHO ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹
                                                        ECHO º Press Enter for Autoresize or Type the new size.                       º
                                                        ECHO ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
                                                        ECHO ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
							
							IF EXIST "!ProgramFiles!\IrfanView\i_view32.exe" "!ProgramFiles!\IrfanView\i_view32.exe" !FILEPATH! /hide=15  
							CALL :HORIZONTAL
							IF "!PIXEL!" == "" CALL :VERTICAL  
							ECHO PIXEL !PIXEL!
							ECHO HSIZE !HSIZE!
							ECHO VSIZE !VSIZE!
							IF NOT "!PIXEL!" == "AUTO" SET PIXEL=/clampscale !PIXEL!!HSIZE! !VSIZE!  
							IF "!PIXEL!" == "AUTO" SET PIXEL=  
							crunch.exe -file "!FILEPATH!" /dxtQuality !QUALITY! /fileformat DDS /forcewrite /outsamedir /maxmips !MAXMIPS! /mipFilter box /mipMode !MIPMODE! !PIXEL!  
							)
REM --- Ende des Haupt Programs --------------------------------------------
PAUSE
GOTO :EOF						
REM ------------------------------------------------------------------------
REM ------------------------------------------------------------------------
REM --- Zusatz Programme ---------------------------------------------------
REM ------------------------------------------------------------------------

REM ------------------------------------------------------------------------
:HORIZONTAL
SET HSIZE=
SET choice=
SET /p choice=H-Resolution: 
IF "!choice!" == ""	(  
					ECHO.
					ECHO Auto mode started ...
					IF "!TRUEPIXEL!" == "4096 4096" SET PIXEL=512 512  
					IF "!TRUEPIXEL!" == "4096 2048" SET PIXEL=512 256  
					IF "!TRUEPIXEL!" == "4096 1024" SET PIXEL=512 128  
					IF "!TRUEPIXEL!" == "4096 512" SET PIXEL=1024 128  
					IF "!TRUEPIXEL!" == "4096 256" SET PIXEL=2048 128  
					IF "!TRUEPIXEL!" == "2048 2048" SET PIXEL=512 512  
					IF "!TRUEPIXEL!" == "2048 1024" SET PIXEL=512 256  
					IF "!TRUEPIXEL!" == "2048 512" SET PIXEL=512 128  
					IF "!TRUEPIXEL!" == "2048 256" SET PIXEL=1024 128  
					IF "!TRUEPIXEL!" == "1024 1024" SET PIXEL=512 512  
					IF "!TRUEPIXEL!" == "1024 512" SET PIXEL=512 256  
					IF "!TRUEPIXEL!" == "1024 256" SET PIXEL=512 128  
					IF "!TRUEPIXEL!" == "512 1024" SET PIXEL=256 512  
					IF "!TRUEPIXEL!" == "256 1024" SET PIXEL=128 512  
					IF "!TRUEPIXEL!" == "1024 2048" SET PIXEL=256 512  
					IF "!TRUEPIXEL!" == "512 2048" SET PIXEL=128 512  
					IF "!PIXEL!" == "" (  
										CALL :AUTOFAIL
										)
					GOTO :EOF
					)
IF NOT "!choice!" == "" FOR %%C IN (64 128 256 512 1024 2048) DO IF "!choice!" == "%%C"	SET HSIZE=!choice!  
IF "!HSIZE!" == ""	(  
					ECHO "!choice!" is not valid please try again  
					CALL :HORIZONTAL
					)
GOTO :EOF	
REM ------------------------------------------------------------------------
:VERTICAL
SET VSIZE=
SET choice=
SET /p choice=V-Resolution: 
IF "!choice!" == ""	(  
					ECHO This is not valid please try again
					GOTO VERTICAL
					)

IF NOT "!choice!" == "" FOR %%D IN (64 128 256 512 1024 2048) DO IF "!choice!" == "%%D"	SET VSIZE=!choice!  
IF "!VSIZE!" == ""	(  
					ECHO "!choice!" is not valid please try again  
					CALL :VERTICAL
					)
GOTO :EOF							
REM ------------------------------------------------------------------------							
:AUTOFAIL
ECHO.
ECHO ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
ECHO º Auto mode not avalable for this file                                   º
ECHO º                                                                        º
ECHO º Press Enter for auto mode without resizeing                            º
ECHO º Press N for manual settings                                            º
ECHO ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
ECHO ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
set choice=
set /p choice=Choose:
IF "!choice!" == ""	(  
					SET PIXEL=AUTO
					GOTO :EOF
					)
if "!choice!" == "n" GOTO HORIZONTAL  
ECHO "!choice!" is not valid please try again  
GOTO AUTOFAIL

@ECHO OFF
TITLE RESIZER
Setlocal DisableDelayedExpansion
IF EXIST "%TEMP%\RESIZER ERROR.LOG" DEL /Q "%TEMP%\RESIZER ERROR.LOG"  
FOR /R %%B in (*!*) do (ECHO UNSUPORTED FILENAME: "%%B" >>"%TEMP%\RESIZER ERROR.LOG")  
Setlocal EnableDelayedExpansion
SET DELSRC=OFF
SET QUALITY=uber
IF EXIST "!TEMP!\RESIZER ERROR.LOG" (NOTEPAD.EXE "!TEMP!\RESIZER ERROR.LOG"  
                                                              GOTO :EOF
                                                              )

Option Explicit
Dim pc, programm, fenstername
Dim wmi, system, process
Dim WshShell
programm = "cmd.exe"  
fenstername = "RESIZER"  
Set wmi = GetObject("winmgmts:")  
Set system = wmi.instancesOf("win32_process")  
For Each process In system
If lcase(process.name)=programm Then
Set WshShell = CreateObject("WScript.Shell")  
With WshShell
.AppActivate fenstername
End with
Exit For
End If
Next