标题: [文本处理] bat 循环复制文件内容的问题 [打印本页]
作者: yonghuairuogu 时间: 2013-11-13 17:37 标题: bat 循环复制文件内容的问题
我有一个文件,里面有1000行,我想将3-10行,13-20行,23-30行,。。。。的内容等复制到另一个文件里,请问该怎么做呢?bat批处理如何实现?先谢谢各位兄弟姐妹了 文件内容见下:
First Breaks generated by GEOGIGA FrontEnd
TOTAL_NUMBER_OF_SHOTS: 1
SEISMIC_DATA_FILE_NAME: 10.dat
SHOT_LOCATION: 1.000
NUMBER_OF_RECEIVERS: 12
# X T Layer
1 1.000 0.003648 1
2 2.000 0.003592 1
3 3.000 0.003581 1
4 4.000 0.003502 1
First Breaks generated by GEOGIGA FrontEnd
TOTAL_NUMBER_OF_SHOTS: 1
SEISMIC_DATA_FILE_NAME: 1.dat
SHOT_LOCATION: 10.000
NUMBER_OF_RECEIVERS: 12
# X T Layer
1 1.000 0.002657 1
2 2.000 0.002657 1
3 3.000 0.002567 1
4 4.000 0.002680 1
First Breaks generated by GEOGIGA FrontEnd
TOTAL_NUMBER_OF_SHOTS: 1
SEISMIC_DATA_FILE_NAME: 2.dat
SHOT_LOCATION: 9.000
NUMBER_OF_RECEIVERS: 12
# X T Layer
1 1.000 0.002860 1
2 2.000 0.002826 1
3 3.000 0.002815 1
4 4.000 0.002849 1
复制后变成
SEISMIC_DATA_FILE_NAME: 10.dat
SHOT_LOCATION: 1.000
NUMBER_OF_RECEIVERS: 12
# X T Layer
1 1.000 0.003648 1
2 2.000 0.003592 1
3 3.000 0.003581 1
4 4.000 0.003502 1
SEISMIC_DATA_FILE_NAME: 1.dat
SHOT_LOCATION: 10.000
NUMBER_OF_RECEIVERS: 12
# X T Layer
1 1.000 0.002657 1
2 2.000 0.002657 1
3 3.000 0.002567 1
4 4.000 0.002680 1
SEISMIC_DATA_FILE_NAME: 2.dat
SHOT_LOCATION: 9.000
NUMBER_OF_RECEIVERS: 12
# X T Layer
1 1.000 0.002860 1
2 2.000 0.002826 1
3 3.000 0.002815 1
4 4.000 0.002849 1
作者: apang 时间: 2013-11-13 18:08
- @echo off
- (for /f "delims=" %%a in (a.txt) do (
- set /a "n+=1,m=n%%10,1/(m-1),1/(m-2)"2>nul&&echo,%%a
- ))>b.txt
- pause
复制代码
作者: yonghuairuogu 时间: 2013-11-13 19:37
本帖最后由 yonghuairuogu 于 2013-11-13 19:39 编辑
回复 2# apang
非常感谢这位大神,
假如我要复制的是7-20,27-40,47-60,。。。您的程序该如何修改呢?
作者: apang 时间: 2013-11-13 21:13
回复 3# yonghuairuogu
比较猥琐的办法:- @echo off
- (for /f "delims=" %%a in (a.txt) do (
- set/a"n+=1,m=n%%20,1/((m-1)*(m-2)*(m-3)*(m-4)*(m-5)*(m-6))"&&echo,%%a
- ))>b.txt 2>nul
- pause
复制代码
或者这样:- @echo off & setlocal enabledelayedexpansion
- set "n=-1"
- (for /f "delims=" %%a in (a.txt) do (
- set /a n+=1,m=n%%20
- if !m! geq 6 echo,%%a
- ))>b.txt
- pause
复制代码
作者: yonghuairuogu 时间: 2013-11-13 21:32
回复 4# apang
膜拜呀,非常感谢!
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |