批处理转义所有的文本特殊字符

老刘1号

读取：特殊字符转义成普通字符序列；
readline.bat

1. 
   
2. @echo off
   
3. setlocal disabledelayedexpansion
   
4. for /f "delims=#" %%. in (
   
5.         'prompt #$E# ^& echo on ^& for %%_ in ^( . ^) do rem'
   
6. ) do (
   
7.         set "_Esc=%%."
   
8. )
   
9. 
   
10. set _In= & set /p "_In="
    
11. for /f "delims=" %%. in ("%_Esc%") do (
    
12.         if defined _In (
    
13.                 call set "_In=%%_In:"=%%.D%%"
    
14.                 call set "_In=%%_In:!=%%.E%%"
    
15.                 setlocal ENABLEDELAYEDEXPANSION
    
16.                 (
    
17.                         set "_In=!_In:^=%%.C!"
    
18.                         set "_In2="
    
19.                         :READLINE_Replace
    
20.                         if defined _In (
    
21.                                 if "!_In:~,1!" == "%%" (
    
22.                                         set "_In2=!_In2!%_Esc%P"
    
23.                                 ) else (
    
24.                                         set "_In2=!_In2!!_In:~,1!"
    
25.                                 )
    
26.                                 set "_In=!_In:~1!"
    
27.                                 goto READLINE_Replace
    
28.                         )
    
29.                         :READLINE_Replace2
    
30.                         if defined _In2 (
    
31.                                 if "!_In2:~,1!" == "%_Esc%" (
    
32.                                         set "_In3=!_In3!$"
    
33.                                 ) else if "!_In2:~,1!" == "$" (
    
34.                                         set "_In3=!_In3!$$"
    
35.                                 ) else if "!_In2:~,1!" == ":" (
    
36.                                         set "_In3=!_In3!$A"
    
37.                                 ) else (
    
38.                                         set "_In3=!_In3!!_In2:~,1!"
    
39.                                 )
    
40.                                 set "_In2=!_In2:~1!"
    
41.                                 goto READLINE_Replace2
    
42.                         )
    
43.                         echo.!_In3!
    
44.                 )
    
45.                 endlocal
    
46.         )
    
47. )
    

复制代码

写入：把转义字符序列替换回特殊字符；
writeall.cmd

1. 
   
2. @echo off & setlocal ENABLEDELAYEDEXPANSION
   
3. 
   
4. for /f "delims=" %%i in ('more') do (
   
5.         set "_Out=%%~i"
   
6.         set _OutBuf=
   
7.         :WRITEALL_Loop
   
8.         if "!_Out:~,2!" == "$$" (
   
9.                 set "_OutBuf=!_OutBuf!$"
   
10.                 set "_Out=!_Out:~2!"
    
11.                 goto WRITEALL_Loop
    
12.         ) else if "!_Out:~,2!" == "$E" (
    
13.                 set "_OutBuf=!_OutBuf!^!"
    
14.                 set "_Out=!_Out:~2!"
    
15.                 goto WRITEALL_Loop
    
16.         ) else if "!_Out:~,2!" == "$C" (
    
17.                 set "_OutBuf=!_OutBuf!^^"
    
18.                 set "_Out=!_Out:~2!"
    
19.                 goto WRITEALL_Loop
    
20.         ) else if "!_Out:~,2!" == "$D" (
    
21.                 set "_OutBuf=!_OutBuf!^""
    
22.                 set "_Out=!_Out:~2!"
    
23.                 goto WRITEALL_Loop
    
24.         ) else if "!_Out:~,1!" == "=" (
    
25.                 set "_OutBuf=!_OutBuf!="
    
26.                 set "_Out=!_Out:~1!"
    
27.                 goto WRITEALL_Loop
    
28.         ) else if "!_Out:~,1!" == " " (
    
29.                 set "_OutBuf=!_OutBuf! "
    
30.                 set "_Out=!_Out:~1!"
    
31.                 goto WRITEALL_Loop
    
32.         ) else if "!_Out:~,2!" == "$P" (
    
33.                 set "_OutBuf=!_OutBuf!%%"
    
34.                 set "_Out=!_Out:~2!"
    
35.                 goto WRITEALL_Loop
    
36.         ) else if "!_Out:~,2!" == "$A" (
    
37.                 set "_OutBuf=!_OutBuf!:"
    
38.                 set "_Out=!_Out:~2!"
    
39.                 goto WRITEALL_Loop
    
40.         ) else if defined _Out (
    
41.                 set "_OutBuf=!_OutBuf!!_Out:~,1!"
    
42.                 set "_Out=!_Out:~1!"
    
43.                 goto WRITEALL_Loop
    
44.         )
    
45.         echo.!_OutBuf!
    
46. )
    

复制代码

这两个必须写成单独的bat调用，不能直接call标号（setlocal以及一些环境问题）。

做了一定测试，应该没问题（希望别打脸）。

hnfeng

高深

我仅仅是先定义Esc转义符  for /F %%a in ('echo prompt $E ^| cmd') do set "EscK=%%a"，然后用 echo 或 set /p 来定义字符颜色、光标位置、清除内容……，浅显的很

窄口牛

那求个东西吧，把任意文本拖入，生成一个bat，运行这个bat输出一个一模一样的bat出来，名字加个re啥的区分原文件。
有些大于小于和数字挨着的文本会出问题，有时候需要^，有时候不需要。

老刘1号

窄口牛 发表于 2026-4-6 10:21
那求个东西吧，把任意文本拖入，生成一个bat，运行这个bat输出一个一模一样的bat出来，名字加个re啥的区分 ...

其实这个帖子纯属娱乐，空行处理可能有问题/中文没有测试，
源文件含有非可显示字符比如escape也有问题，
只是输出的话可以考虑连文本一起打个压缩包，就没有这个需求了；
或者用 certutil -decode / certutil -decodehex
或者用 expand
或者用 dism /apply-image
或者任意其它语言（vbs/js/powershell）混编，
或者附带任意第三方/其它语言编译出的产品，
都比批处理实现坑少

yyz219

看不懂也支持