[文本处理] 再求批处理解决遇到--破折符号时，英文引号变为中文破折号。

dzwind

首先感谢前一段时间名叫"aloha20200628"的大师给写一段想要的语句，对于我的日常重复提供大量的帮助。
由于我没有看懂这位大师的写法，所以我想再添加语句，不知该如何下手。
再求加入把英文破折号改为中文破折号，比如将--改为中文——破折号。
@echo off &setlocal enabledelayedexpansion
set file=%1\*.txt
for /f "delims=" %%F in ('dir/s/b/a-d %file%') do (
   set/a "pm=1,qm=1"
   (for /f "usebackq delims=" %%a in ("%%~F") do (
      set "s=%%a"&set "s=!s:......=……!"&set "_s=!s!"
      set "t=%%a"&set "t=!t:--=——!"&set "_t=!t!"   #这一句是我自己加的，但不起作用。
      for %%n in (4096 2048 1024 512 256 128 64 32 16 8 4 2 1) do (
         if "!_s:~%%n,1!" neq "" (set/a "ls+=%%n"&set "_s=!_s:~%%n!")
      )
      for /L %%n in (1,1,!ls!) do for %%c in (" ", "　", "        ") do if "%%~c"=="!s:~,1!" (
         set "s=!s:~1!"&set/a "ls-=1")
      for /L %%n in (0,1,!ls!) do (
         set "c=!s:~%%n,1!" & if ^!c! == ^" (
            set/a "pm=0-!pm!" &if !pm! equ -1 (set "c=“") else (set "c=”")
         ) else if "!c!" == "'" (set/a "qm=0-!qm!" &if !qm! equ -1 (set "c=‘") else (set "c=’"))
         set "_line=!_line!!c!"
      )
      echo,!_line!&set "_line="&set "ls=0"
   ))>"%%~F%date%.txt"
del "%%~F"
)

endlocal&exit/b

求大师帮助。谢谢

dzwind

回复 2# aloha20200628


    跪谢，我给大哥磕一个！

dzwind

回复  dzwind

可在11-12行替换其他的中文双引号和中文单引号类型
aloha20200628 发表于 2024-3-12 11:50

再求2个要求：1、将英文省略号改为中文省略号。2、删除每个txt文件的每段开始的段首空格。
谢谢！

dzwind

谢谢 aloha20200628 大师的帮助，此BAT已经帮助我解决了大部分的问题。
但也逐步发现一个问题，再求 aloha20200628 大师添加语句。
有的文章里英文引号很多，作者写错了引号，或者说引号少了反引号，这个现有的批处理无法根据词句的意思判断是否更改成正确方向的中文引号，所以能不能加上一个在英文变中文引号转化过程中，当遇到：时后面的英文引号更改为向右引的中文引号。

dzwind

回复  dzwind

在强力脚本中是现成工具，回到批处理脚本中很可能要自力更生...玩弄古刀老枪也成了一套日 ...
aloha20200628 发表于 2024-3-12 21:11

   
再求aloha20200628 大师的帮助，此BAT已经帮助我解决了大部分的问题。
但也逐步发现一个问题，再求 aloha20200628 大师添加语句。
有的文章里英文引号很多，有时作者写错了引号，有时句子中的少了反引号，这个现有的批处理无法根据词句的意思判断是否更改成正确方向的中文引号，
所以能不能加上一个在英文变中文引号转化过程中，当遇到：时后面的英文引号更改为向右引的中文引号。

dzwind

回复  dzwind

如很多低质小说网站经常出现这类恶心事，并非仅是引号左右错配，还加上左右引号根本不配对 ...
aloha20200628 发表于 2024-3-19 21:04

    明白了，我手动修改吧。谢谢

dzwind

谢谢大师的帮助！