找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 29689|回复: 7

[文本处理] [已解决]批处理如何找出简码跟全码处于首位的字?

[复制链接]
发表于 2015-4-13 20:06:49 | 显示全部楼层 |阅读模式
本帖最后由 每天几分 于 2015-4-14 09:03 编辑

还是输入法的码表,如下:
  1. kh 足
  2. kh 跟 路 足
  3. khty 踽
  4. khu 足
  5. khua 跰
  6. khuf 蹲
  7. k 中 口 只
  8. ka 呀 哎 哄
  9. kad 嘶
  10. khk 中
  11. hkks 躁
复制代码
足字的简码kh处于首位,全码khu,也处于首位。
我想把简码跟全码处于首位的字都找出来,将其全码首位让给别的字(如:khu 蹲 足;khk 躁 中。这只是个示例,方便理解,不作要求)

现在只要求找出简码跟全码处于首位的字即可,请问批处理怎么实现?

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2015-4-13 20:57:41 | 显示全部楼层
回复 1# 每天几分

对五笔不熟,怎么区别简码和全码处于首位的字?或者说筛选的规则是否就是找出单个汉字的行?
 楼主| 发表于 2015-4-13 21:19:50 | 显示全部楼层
回复 2# pcl_test


    是的,找出单个汉字的行即可。或者说不同编码对应同个汉字的,则找出编码最长的那个字及其所在行。
发表于 2015-4-14 00:36:19 | 显示全部楼层
本帖最后由 pcl_test 于 2015-4-14 00:38 编辑

回复 3# 每天几分
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. (for /f "tokens=1,2*" %%a in ('type "测试.txt"') do (
  4. if "%%c" == "" if not defined %%b (
  5. set %%b=def
  6. for /f "tokens=1,2*" %%i in ('find "%%b" "测试.txt"') do if "%%k" == "" (set "str=%%i %%j")
  7. echo,!str!
  8. )))>"结果.txt"
  9. pause
复制代码
 楼主| 发表于 2015-4-14 07:39:10 | 显示全部楼层
回复 4# pcl_test


    范围有点广啊,可以缩小一下么,即,同一个字,前2个字母一样,第3个字母不同,则将之找出。少于2个字母以及超过4个字母的不用找,范围太大了。
比如:
  1. a 工
  2. aaaa 工
复制代码
(这种不用找)

只找下面这种:

  1. kh 足
  2. agaj 茾
  3. agaj 荆
  4. khu 足
  5. gi 灭
  6. ……
  7. agh 廿
  8. giu 灭
  9. cw 难
  10. ……
  11. agcf 荎
  12. cwy 难
复制代码
将上面的
  1. khu 足
  2. giu 灭
  3. cwy 难
复制代码
找出,导出到新文本。
发表于 2015-4-14 08:24:19 | 显示全部楼层
回复 5# 每天几分
回复  pcl_test
找出单个汉字的行即可。或者说不同编码对应同个汉字的,则找出编码最长的那个字及其所在行
每天几分 发表于 2015-4-13 21:19

以后描述问题请务必严谨、到位
发表于 2015-4-14 08:31:29 | 显示全部楼层

  1. @echo off&setlocal enabledelayedexpansion
  2. (for /f "tokens=1*" %%a in ('findstr /v ....... a.txt^|findstr .....^|sort')do (
  3.     if /i "!s!"=="%%b" (
  4.             echo,!c! %%b
  5.             echo,%%a %%b
  6.     )
  7.     set "c=%%a"
  8.     set "s=%%b"
  9. ))>b.txt
复制代码
发表于 2015-4-14 08:54:20 | 显示全部楼层
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. (for /f "tokens=1,2*" %%a in ('type "测试.txt"') do (
  4. set str=%%afedcba9876543210
  5. set/a len=0x!str:~15,1!
  6. if !len! geq 2 if !len! lss 4 if "%%c" == "" if not defined %%b (
  7. set %%b=def
  8. for /f "tokens=1,2*" %%i in ('find "%%b" "测试.txt"') do if "%%k" == "" (set "str=%%i %%j")
  9. echo,!str!
  10. )))>"结果.txt"
  11. pause
复制代码

评分

参与人数 1技术 +1 收起 理由
每天几分 + 1 嗯嗯,好的,就是这样,谢谢,辛苦了。以后 ...

查看全部评分

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 08:48 , Processed in 0.012020 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表