求助，有批量将全角文字转变为半角文字的插件或者程序吗？

CAD小神 · 发表于 2017-12-27 08:39

以前老的图纸有很多全角数字和字母穿插在汉字中，现在想将它批量转变为半角的，请教有类似的可以批量转换的工具或者程序吗？

CAD小神 · 发表于 2017-12-27 09:36

E:\桌面\7B{T0))YTD~GN0OC7(_6`VI.png

CAD小神 · 发表于 2017-12-27 09:37

画横线的字体是全角，想转成半角

duotu007 · 发表于 2017-12-27 09:48

CAD小神发表于 2017-12-27 09:37
画横线的字体是全角，想转成半角

做个对照表，对照替换就可以吧

CAD小神 · 发表于 2017-12-27 09:50

duotu007 发表于 2017-12-27 09:48
做个对照表，对照替换就可以吧

可以说的稍微详细一点吗？替换得内容不只一种，有几十种都要替换。。

CAD小神 · 发表于 2017-12-27 10:24

有大神么T T

langke52 · 发表于 2017-12-27 15:12

修改字体样式？

mikewolf2k · 发表于 2018-1-2 13:04

全角半角的内码应该不一样，只能如地板所言，做个对照表替换。
好在都是英文和标点，要替换的也就那么几十个，列一列不费多少时间。

fl202 · 发表于 2018-1-10 17:35

刚好看到：
http://bbs.xdcad.net/forum.php?m ... sortid%26sortid%3D1
[字符串] [函数发布] （xd::string:dbc->sbc）字符串全角转半角
(defun xd::string:dbc->sbc (str / first match n second str1)
  (if (setq match (xd::string:regexps "[\\u3000\\uff01-\\uff5f]" str ""))
(progn
   (foreach n match
      (if (= n "　")
      (setq str (xd::string:regexpr "　" str " " ""))
      (progn
         (setq first (substr n 1 1)
               second (ascii (substr n 2 1))
               second (- second 128)
               str1 (chr second)
         )
         (setq str (xd::string:regexpr n str str1 ""))
      )
      )
   )
)

傲视豆腐 · 发表于 2021-10-31 11:57

我反而想要半角转全角的，不知道有没有呢

账号		自动登录	找回密码
密码			注册

[提问] 求助，有批量将全角文字转变为半角文字的插件或者程序吗？

本帖子中包含更多资源

本帖子中包含更多资源