IBM with pause and dummy commands

@echo off
setlocal

rem Roses are red, violets are blue, sugar is sweet, and so are you.
rem Enjoy your usual ratio: 5% of lines do the actual work, and the rest are there to make sure they work. (It's like 1%, actually)

for /f "tokens=2 delims=:." %%x in ('chcp') do set cp=%%x
chcp 65001>nul
chcp
chcp
set sourcefile=[Ecchihiro]_Netoge_no_Yome_wa_Onnanoko_ja_Nai_to_Omotta？_-_01_[720p_Hi10P_AAC][D232A51F].mkv
set targetfile=[Ecchihiro]_Netoge_no_Yome_wa_Onnanoko_ja_Nai_to_Omotta？_-_01v2_[720p_Hi10P_AAC][56298581].mkv
set app=xdelta3.exe
set changes=changes.vcdiff
set sourcefiletmp=sourcefile.tmp
set targetfiletmp=targetfile.tmp
set movesourcefile=1
set movetargetfile=1
set olddir=old
set WORKINGDIR=%CD%
chdir /d "%~dp0"
(call )

call :find_xdelta3 && call :find_inputs "%~1" && call :run_patch
call :gtfo
goto :eof


:find_xdelta3
(call)
if exist "%app%" (
	(call )
) else (
	echo The required application "%app%" can't be found!
)
goto :eof

:find_inputs
(call)
if exist "%~1" (
    set "sourcefile=%~f1"
    set "targetfile=%~dp1%targetfile%"
    set "sourcefiletmp=%~dp1%sourcefiletmp%"
    set "targetfiletmp=%~dp1%targetfiletmp%"
    set "olddir=%~dp1%olddir%"
	(call )
)
if not exist "%sourcefile%" (
	if exist "..\%sourcefile%" (
		set "sourcefile=..\%sourcefile%"
		set "targetfile=..\%targetfile%"
		set "sourcefiletmp=..\sourcefile.tmp"
		set "targetfiletmp=..\targetfile.tmp"
		set "olddir=..\%olddir%"
		(call )
	) else (
		if exist "..\..\%sourcefile%" (
			set "sourcefile=..\..\%sourcefile%"
			set "targetfile=..\..\%targetfile%"
			set "sourcefiletmp=..\..\sourcefile.tmp"
			set "targetfiletmp=..\..\targetfile.tmp"
			set "olddir=..\..\%olddir%"
			(call )
		) else (
			if exist "..\..\..\%sourcefile%" (
				set "sourcefile=..\..\..\%sourcefile%"
				set "targetfile=..\..\..\%targetfile%"
				set "sourcefiletmp=..\..\..\sourcefile.tmp"
				set "targetfiletmp=..\..\..\targetfile.tmp"
				set "olddir=..\..\..\%olddir%"
				(call )
			) else (
				echo Error: Source file "%sourcefile%" not found.
				echo You must put it in the same folder as this script.
				(call)
			)
		)
	)
) else (
	(call )
)
if not exist "%changes%" (
	echo Error: VCDIFF file "%changes%" is missing.
	echo Please extract everything from the archive.
	(call)
)
goto :eof

:run_patch
echo Attempting to patch "%sourcefile%"...
if %movesourcefile% equ 1 (
	move "%sourcefile%" "%sourcefiletmp%" > nul
) else (
	set "sourcefiletmp=%sourcefile%"
)
if %movetargetfile% equ 0 set "targetfiletmp=%targetfile%"
%app% -d -f -s "%sourcefiletmp%" "%changes%" "%targetfiletmp%"
if %movesourcefile% equ 1 move "%sourcefiletmp%" "%sourcefile%" > nul
if %movetargetfile% equ 1 move "%targetfiletmp%" "%targetfile%" > nul
if exist "%targetfile%" (
	mkdir "%olddir%" 2>nul
	move "%sourcefile%" "%olddir%"
	echo Done.
	(call )
	goto :eof
)
echo Error occured! Patching wasn't successful!
(call)
pause
goto :eof

:gtfo
chdir /d "%WORKINGDIR%"
chcp %cp%>nul
(call )
pause
goto :eof