[alpap]

Код:

@echo off
set "f=1.txt"
<"%f%">$ (
 for /f "delims=" %%a in ('more') do @(
  echo %%a|>nul findstr/ec:"== ))" && (
   for /f "tokens=1,2 delims=:" %%b in ("%%~a") do @(
    echo %%b::
    echo %%c
   )
  ) || (
   echo %%a
  )
 )
)& move $ "1.txt"
exit

.

[Дмитрий_Кульгейко@vk]

Опробовал код. Что-то не совсем так.
Переход на новую строку произошел, но вместо символов "== ))" стоит 0

[NickM]

вот, надергал куски из сети ))

Код:

@echo off
SetLocal EnableExtensions EnableDelayedExpansion
 
Set infile=in.txt
Set outFile=out.txt

:: Узнаем количество строк в файле
for /f %%n in ( 'more ^< "!infile!" ^| find /c /v ""' ) do (
	set tail.count=%%n
)

:: Модифицируем две последние строки в файле 
for /f "UseBackQ delims=" %%n in ("%infile%") do ( 
  set "LINE=%%n"
  set /a m+=1  
  if !m! EQU !tail.count! (goto funcR) else (echo=!LINE!>>"%outFile%")
)
:funcR
set LINE=%LINE:~0,-5%
echo=%LINE%>>"%outFile%"
echo.== ))>>"%outFile%"

[alpap]

Дмитрий_Кульгейко@vk,
А не подскажете, почему у меня все работает? Даже кодировку такую поставил, хоть тут она роли и не играет (читабельность - не в счет):
Файл 138004

[alpap]

Подозреваю что в файле далеко не "текст::== ))", выложите файл сюда, посмотрим.

[Дмитрий_Кульгейко@vk]

Изначально файл такой как во вложении. Числа в имени файла меняются.

[Дмитрий_Кульгейко@vk]

To: alpap
Если убираю все кроме последней строки, ваш код работает.

To: NickM
Ваш код тоже работает если у файла постоянное имя.

[alpap]

Дмитрий_Кульгейко@vk,
Мало того что в строках еще есть :, откуда мне знать, а он у меня в разделителях, так еще вы приводите строку "текст::== ))", а на самом деле "текст::==))":

Код:

@echo off
set "f=1.txt"
<"%f%">$ (
 for /f "delims=" %%a in ('more') do @(
  echo %%a|>nul findstr/ec:"==))" && (
   for /f "tokens=1* delims==" %%b in ("%%~a") do @(
    echo %%b
    echo ==%%c
   )
  ) || (
   echo %%a
  )
 )
)
move $ "1.txt"
exit

.

[megaloman]

Код:

@Echo Off

	Set "Sep===))"
	Set /A NSep=4
	Set "FName=ma2_20166_28.txt"

SetLocal EnableExtensions EnableDelayedExpansion
Call :ReLast "%FName%"
GoTo :Eof

:ReLast

Del "%~1.tmp" 2>nul
 
Set "Str="
FOR /F "usebackq delims=" %%s IN (`type "%~1"`) DO (
	If Not "!Str!"=="" >>"%~1.tmp" Echo !Str!
	Set "Str=%%s"
)
If Not "!Str:~-%NSep%!"=="%Sep%" Del "%~1.tmp" 2>nul & GoTo :Eof
If "!Str:~0,-%NSep%!"=="" Del "%~1.tmp" 2>nul & GoTo :Eof 

>>"%~1.tmp" Echo !Str:~0,-%NSep%!
>>"%~1.tmp" Echo !Str:~-%NSep%!
Move /Y "%~1.tmp" "%~1" >nul
GoTo :Eof

Дмитрий_Кульгейко@vk, Основные действия оформлены в виде процедуры, возможно, Вам потом захочется еще сделать цикл по файлам. Скрипт не изменит файл, у которого последняя строка

Код:

==))