[megaloman]

Код:

@Echo Off
cls
	Set "FileIn=Z:\Box_In\txt файл со ссылками 2.txt"
	Set "FileOut=Z:\Box_In\txt файл со ссылками 2 обработанный.txt"
	
	Set "https=https://k2s.cc/file/"
	Set "Dhttps=%https%delete link/"

	Set /A Num=4

	Set /A i=0
	Set "Rhttps=%https:.=\.%"
	Set "RNum="
	For /L %%i In (1,1,%Num%) Do Call Set "RNum=%%RNum%%[0-9]"
	
	>"%FileOut%" ( For /F "usebackq delims=" %%f In (`2^>nul FindStr /I /R /C:"^%Rhttps%[^/]*/%RNum%[^/]*\.[^/]*$" "%FileIn%"`) Do Call :OutFile 1 "%%f")
	>>"%FileOut%" (For /F "usebackq delims=" %%f In (`2^>nul FindStr /I /R /C:"^%Rhttps%[^/]*/[^/]*%RNum%\.[^/]*$" "%FileIn%"`) Do Call :OutFile 2 "%%f")
pause
Exit /B

:OutFile
	Set "Name=%~n2"
	If %1 EQU 1 (Call Set /A N=1%%Name:~0,%Num%%%) Else (Call Set /A N=1%%Name:~-%Num%%%)
	If %i% EQU 0 Set /A i=%N%-1

	:Begin
		Set /A i+=1
		If %i% EQU %N% (Echo %~2& Exit /B 0)
		Set "NN=%N:~1%"
		Set "ii=%i:~1%"
		(Call Echo %Dhttps%%%Name:%NN%=%ii%%%%~x2)
	GoTo :Begin
Exit /B