[求助]文件读写方面
 

[求助]文件读写方面
www.dimcax.com
[求助]文件读写方面
我的一个文件夹内有n个 *.txt文件，其内容如下：
k9
kc31/4.2
25.0
1026.15
4422584.48
427059.58
4.1
8
1
1.8
2
4.8
3-1
6.4
3-2
11.1
4-1
13.5
4-2
16.5
其中1，2，3-1，3-2.。。。。等为地层编号，1.8，4.8，6.4.。。。。为层厚
请问我用什么方法可以读文件夹内的所有*.txt文件，并把txt文件内的，x，y，z，及每层的层号、层厚读出来，并写出到另一个新建的txt文件内？最好用lisp实现。
怎么能把所有钻孔文件中的文件读出来如下：
1-1
点名 x y z 层厚 层底深
1-2
点名 x y z 层厚 层底深
如果没有在钻孔文件中见到下一层，层底深就写成“未揭露”
关键是要把每个文件里的1-1，1-2等都写出来
当然，不同的工程有可能不是按1-1 ，1-2等命名，也可能部分层缺失
请高手赐教，小弟不胜感激！谢谢！
d
怎么没有高手能帮我解决我的问题？
d
数据不全，要求不清。如何编程？
踅摸
d
麻烦帮我看看怎么编程？
假如我任意输入一个层号2-1，到1.txt里面看有没有2-1，没有，就提示“未发现层”若有，到2.txt里面读该层（2-1）的层厚，写文件。然后到3.txt里面读该层（2-1）层厚，写文件，依次类推，直至读完所有文件
写出的文件格式如下：
1-1
2.txt x y z 层厚
3.txt x y z 层厚
4.txt x y z 层厚
1.txt 文件内容如下：
1-1 ； 层号
t35/q,3 ；层岩性
1-2
t7/q,3
2-1
t6/q,2
2.txt、3.txt 文件内容如下
k12 ；孔号
1005.55 ；高程
4068066 ；x坐标
4068066 ；y坐标
1-1 ；层号
3.4 ；层厚
1-2 ；层号
7.2 ；层厚
2-1
13.9
2-2
20.2
d
1、要输出的文件是哪个？
2、共有多少个要读的文件？
3、x、y、z坐标从哪儿得到？
踅摸
d
1.要输出的文件可以自己定义，也可以和层名相同，如2-1。txt，或者3-1.txt
2.要读取的文件数量文件不定，文件数量可以读另一个文件，其内容为：
k1.drl
k2.drl/y
k3.drl/y
k4.drl/y
k5.drl
k6.drl/y
k7.drl
k8.drl/y
k9.drl
k10.drl/y
3.要读的坐标文件2.txt或3.txt。。。。。。等文件里就有啊，包括层厚文件
4。要是你还不怎么清楚，可以给我留个邮箱或者电话，咱们单独交流