[NiOl]

Код:

@echo off
setlocal EnableExtensions
if not exist %1 exit
set tmp="%~dpn1.tmp"
set wrk="%~1"
ren %wrk% %~n1.tmp || exit

for /f "usebackq tokens=* delims=" %%L in (%tmp%) do call :ChStr "%%L"
del %tmp%
exit

:ChStr
set L=%~1
echo %L:открыть=закрыть%>>%wrk%
exit /b

* Параметр - имя текстового файла (в кодировке DOS/OEM)