[megaloman]

Очередной вариант создания искусственного интеллекта на CMD

Код:

@Echo Off
cls
	>nul Chcp 1251
	
	Set "FileIn=Z:\Box_In\Нужно в файле.txt"
	Set "name=СоБаКа"

	If Not Exist "%FileIn%" (
		Echo Файл "%FileIn%" не найден. &Echo.
		Pause
		Exit /B 2 
	) 

	Set /A i=0

	Echo Выбирайте номер варианта N (Enter -завершение работы):
	Echo.
	For /F "usebackq Skip=2 delims=" %%s In (`2^>nul Find /I "%name%" "%FileIn%"`) Do (
		Call Set /A i+=1
		Call Set "@@%%i%%=%%s"
		Call Echo %%i%%= %%s
	)
	If %i%==0 (
		Echo Подстрока "%name%" в файле "%FileIn%" не найдена  &Echo.
		Pause
		Exit /B 1 
	) 

	:Begin
		Echo.
		Set "NN="
		Set /P NN=N=
		If "%NN%"=="" Exit /B 0
		If %NN% GEQ 1 If %NN% LEQ %i% (Call Set "Select=%%@@%NN%%%" &GoTo :End)
		Echo Введено неверное значение "%NN%", введите верное: &GoTo :Begin
	:End
	Echo %Select%

Pause
Exit /B 0

Предполагал, что текстовый файл в кодировке 1251, следовательно и батник должен быть в кодировке 1251