批处理怎样把文本内特定数据提取到新的文本？

cgwang · 发表于 2014-12-25 16:58:39

如何将下列数据里Start-Line下面em592、1|Db前后两个数、|dz后数提出到新的文本
For M5|Adr    1|TO  20141220.dat             |                   |                   |                   |
For M5|Adr    2|TO  Start-Line    aBFFB    1|                   |                   |                   |
For M5|Adr    3|KD1 EM592                1|                   |                   |Z       0.00000 m |
For M5|Adr 14|KD1       2                1|Sh       0.07105 m |dz    -0.07105 m |Z       0.00000 m |
For M5|Adr 15|KD2       2       2       1|Db       13.94 m |Df       14.51 m |Z       0.07105 m |
For M5|Adr 16|TO  End-Line                1|                   |                   |                   |
For M5|Adr    1|TO  20141220.dat             |                   |                   |                   |
For M5|Adr    2|TO  Start-Line    aBFFB    1|                   |                   |                   |
For M5|Adr    3|KD1 EM591                1|                   |                   |Z       0.00000 m |
For M5|Adr 44|KD1       8                1|Sh       0.03500 m |dz    -0.03500 m |Z       0.00000 m |
For M5|Adr 45|KD2       8       8       1|Db       343.70 m |Df       345.29 m |Z       0.03500 m |
For M5|Adr 46|TO  End-Line                1|                   |                   |                   |
For M5|Adr    1|TO  20141220.dat             |                   |                   |                   |
For M5|Adr    2|TO  Start-Line    aBFFB    1|                   |                   |                   |
For M5|Adr    3|KD1 EM587                1|                   |                   |Z       0.00000 m |
For M5|Adr 55|KD2    10    10       1|Db       448.12 m |Df       448.74 m |Z       -0.03286 m |
For M5|Adr 56|TO  End-Line                1|                   |                   |                   |
提取到新文本，格式为为
EM592 2 13.94  -0.07105
EM591 8 343.70  -0.03500
EM587  10  448.12  -0.03286
第三列取 1|Db和|Df 后数据大的那个
由于我对数据理解错误，第三列应该提取的是|Df 前后两个距离之和，而不是两个的最大值。

terse · 发表于 2014-12-25 23:33:39

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.dat) do (
set "str=%%i"
if defined Line (
for /f %%a in ("!str:*|KD1=!") do set "s1=%%a"
set "Line="
)
if "!str:*|Db =!" neq "!str!" (
for /f "tokens=1-2" %%a in ("!str:*|KD2 =!") do set "s2=%%b"
for /f %%a in ("!str:*|Db =!") do set "s3=%%a"
for /f %%a in ("!str:*|Df =!") do (
for /f "tokens=1-2 delims=." %%A in ("!s3!") do (
for /f "tokens=1-2 delims=." %%C in ("%%a") do (
if %%A equ %%C (
if 1%%B lss 1%%D set "s3=%%a"
) else if %%A lss %%C set "s3=%%a"
)
)
)
for /f %%a in ("!str:*|Z =!") do set "s4=%%a"
)
if defined s4 (
echo !s1! !s2! !s3! !s4!
set s4=
)
if "!str: Start-Line =!" neq "!str!" set "Line=0"
)
pause

复制代码

ads350668398 · 发表于 2014-12-26 06:42:22

本帖最后由 ads350668398 于 2014-12-26 06:48 编辑

怎么我的问题都很少有人文景怎么复杂的事情有人怎么积极#@4

cgwang · 发表于 2014-12-26 09:28:46

提取出来了，可是怎么在dos里面，我想让它提取到一个新的文件里面，该怎么修改呢，大侠

DAIC · 发表于 2014-12-26 11:19:38

回复 4# cgwang

@echo off&setlocal enabledelayedexpansion
(for /f "delims=" %%i in (a.dat) do (
set "str=%%i"
if defined Line (
for /f %%a in ("!str:*|KD1=!") do set "s1=%%a"
set "Line="
)
if "!str:*|Db =!" neq "!str!" (
for /f "tokens=1-2" %%a in ("!str:*|KD2 =!") do set "s2=%%b"
for /f %%a in ("!str:*|Db =!") do set "s3=%%a"
for /f %%a in ("!str:*|Df =!") do (
for /f "tokens=1-2 delims=." %%A in ("!s3!") do (
for /f "tokens=1-2 delims=." %%C in ("%%a") do (
if %%A equ %%C (
if 1%%B lss 1%%D set "s3=%%a"
) else if %%A lss %%C set "s3=%%a"
)
)
)
for /f %%a in ("!str:*|Z =!") do set "s4=%%a"
)
if defined s4 (
echo !s1! !s2! !s3! !s4!
set s4=
)
if "!str: Start-Line =!" neq "!str!" set "Line=0"
))>新的文本.txt

复制代码

DAIC · 发表于 2014-12-26 11:20:09

回复 3# ads350668398

可以考虑一下是不是自己提问的方式有待改善

cgwang · 发表于 2014-12-26 12:49:34

谢谢 terse 和DAIC的帮助,问题解决了。以后我会注意提问方式的

cgwang · 发表于 2014-12-26 13:30:53

回复 7# cgwang

由于我对数据理解错误，第三列应该提取的是|Df 前后两个距离之和，而不是两个的最大值，看来文化知识少就是很可怕呀

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

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

[文件操作] 批处理怎样把文本内特定数据提取到新的文本？