[megaloman]

Если всё же сохранять батник в 1251 кодировке

Код:

@Echo Off
cls
chcp 1251 >nul

Set "BoxIn=Z:\Отечественная фантастика и фэнтези"
Set "Maska=*.fb2"
Set "BoxArc=Z:\Архив книг"

Md "%BoxArc%" 2>nul

Set "Arc="C:\Program Files\WinRAR\WinRAR.exe" a -ep -ibck -afzip -df"

FOR /F "usebackq delims=" %%f IN (`2^>nul Dir "%BoxIn%\%Maska%" /b /s /a:-d`) DO (
	Echo %%f
	%Arc% "%BoxArc%\%%~nxf.zip" "%%f"
)
Pause

Если заархивированный файл сохранять вместо оригинала в той же папке

Код:

@Echo Off
cls
chcp 1251 >nul

Set "BoxIn=Z:\Отечественная фантастика и фэнтези"
Set "Maska=*.fb2"

Set "Arc="C:\Program Files\WinRAR\WinRAR.exe" a -ep -ibck -afzip -df"

FOR /F "usebackq delims=" %%f IN (`2^>nul Dir "%BoxIn%\%Maska%" /b /s /a:-d`) DO (
	Echo %%f
	%Arc% "%%~f.zip" "%%f"
)
Pause