求大神修改一个文本格式，谢谢！（已完成）

fortran2005 · 发表于 2018-4-11 21:45:35

登录后查看更多精彩内容~

您需要登录才可以下载或查看，没有帐号？立即注册

x

本帖最后由 fortran2005 于 2018-4-13 12:55 编辑

H00 SPS format version num.    SPS 2.1;
H01 Description of survey area  12345kuai0408,,N/A,N/A;
H02 Date of survey (DDMMYYYY) 01.06.2015,01.06.2015;
H021Post-plot date of issue    01.06.2015;
H022Tape/disk identifier       N/A;
H023Line sequence number       ;
H03 Client                   N/A;
H04 Geophysical contractor    N/A,N/A;
H05 Positioning contractor    N/A;
H06 Pos. proc. contractor    N/A;
H07 Field computer system(s) N/A,N/A,N/A;
H08 Coordinate location       N/A;
H09 Offset to coord. location N/A,N/A;
H10 Clock time w.r.t. GMT    8:Current Time 12:00:00;
H11 Spare                      N/A;
H12 Geodetic datum,-spheroid N/A,N/A,N/A,N/A;
H13 Spare                      N/A;
H14 Geodetic datum parameters N/A,N/A,N/A,N/A,N/A,N/A,N/A;
H15 Spare                      N/A;
H16 Spare                      N/A;
H17 Vertical datum description  N/A,N/A,N/A,N/A;
H18 Projection type          N/A;
H19 Projection zone          N/A,N/A;
H20 Description of grid units Metres;
H201Factor to metre          1.00000000;
H210Lat. of standard parallel(s);
H220Long. of central meridian ;
H231Grid origin                ;
H232Grid coord. at origin    ;
H241Scale factor             ;
H242Lat., long. scale factor ;
H256Lat., long. initial line ;
H257Circular bearing of H256 ;
H258Quadrant bearing of H256 ;
H259Angle from skew          ;
H30 Project code and description;
H400Type,Model,Polarity       ;
H401Crew name,Comment          ;
H402Sample int.,Record Len.    1,0.000000,N/A;
H403Number of channels       1,8160;
H404Tape type,format,density ;
H405Filter_alias Hz,dB pnt,slope;
H406Filter_notch Hz,-3dB points ;
H407Filter_low Hz,dB pnt,slope  ;
H408Time delay FTB-SOD app Y/N  ;
H409Multi component recording ;
H410Aux. channel 1 contents    ;
H411Aux. channel 2 contents    ;
H412Aux. channel 3 contents    ;
H413Aux. channel 4 contents    ;
H414Spare                      ;
H415Spare                      ;
H416Spare                      ;
H417Spare                      ;
H418Spare                      ;
H419Spare                      ;
H600Type,model,polarity       G1,geophone 1;
H601Damp coeff,natural freq. ;
H602Nunits,len(X),width(Y)    ;
H603Unit spacing X,Y          ;
H604Spare                      ;
H605Spare                      ;
H606Spare                      ;
H607Spare                      ;
H608Spare                      ;
H609Spare                      ;
H700Type,model,polarity       E1,explosive 1;
H701Size,vert. stk fold       ;
H702Nunits,len(X),width(Y)    ;
H703Unit spacing X,Y          ;
H990R,S,X file quality control  ;
H991Coord. status final/prov ;
H26 .....1.........2.........3.........4.........5.........6.........7.........8
H26 5678901234567890123456789012345678901234567890123456789012345678901234567890
S 21183.0 1218.0  1E1                   434536.2 3390949.8 0.0
S 21183.0 1242.0  1E1                   434549.5 3392155.9 0.0
S 21183.0 1256.0  1E1                   434549.2 3392848.8 0.0
S 21183.0 1258.0  1E1                   434546.2 3392951.9 0.0
S 21183.0 1274.0  1E1                   434550.9 3393750.2 0.0
S 21184.0 1254.0  1E1                   434592.0 3392754.3 0.0
S 21184.0 1256.0  1E1                   434599.8 3392849.4 0.0
S 21184.0 1258.0  1E1                   434599.7 3392949.9 0.0
S 21184.0 1270.0  1E1                   434599.5 3393548.2 0.0
S 21184.0 1274.0  1E1                   434600.5 3393748.2 0.0
S 21186.0 1258.0  1E1                   434695.7 3392948.6 0.0
S 21187.0 1278.0  1E1                   434750.2 3393949.8 0.0
S 21188.0 1254.0  1E1                   434800.2 3392750.0 0.0
S 21188.0 1270.0  1E1                   434797.0 3393556.4 0.0
S 21188.0 1274.0  1E1                   434800.0 3393749.8 0.0
S 21188.0 1276.0  1E1                   434800.0 3393850.1 0.0
S 21189.0 1204.0  1E1                   434849.8 3390250.0 0.0
S 21190.0 1204.0  1E1                   434911.8 3390250.3 0.0
S 21191.0 1254.0  1E1                   434946.0 3392749.0 0.0
S 21192.0 1258.0  1E1                   435000.2 3392950.2 0.0
S 21194.0 1258.0  1E1                   435100.2 3392949.8 0.0
S 21194.0 1268.0  1E1                   435100.1 3393449.9 0.0
S 21194.0 1272.0  1E1                   435099.8 3393650.3 0.0
S 21194.0 1274.0  1E1                   435099.8 3393749.8 0.0
S 21195.0 1268.0  1E1                   435149.8 3393449.9 0.0
S 21195.0 1270.0  1E1                   435149.8 3393549.8 0.0
S 21195.0 1272.0  1E1                   435162.2 3393650.3 0.0
S 21195.0 1276.0  1E1                   435150.0 3393850.0 0.0
S 21196.0 1248.0  1E1                   435214.4 3392450.0 0.0
S 21196.0 1268.0  1E1                   435199.9 3393449.9 0.0

登录/注册后可看大图

为了减少重复工作量，有这么一个txt文件，后缀是”.S”或者”.R”，内容如图或者文本所示，我想提取的数据为图中所框选的4列数据，
这四列数据特点如下2个特点：
1、第一列标示为”S”或者”R”，
2、第一个红框数据为固定2-11列，第二个红框数据为固定12-21列，第三个红框为固定47-55列，第四个红框为固定56-65列。

提取这四列数据后做如下运算，运算结果存放在Excel里的A B C 三列里面，然后存成csv格式。
A=方框3+参数1*1000000 //参数1自己填写
B=方框4
C=方框1*参数2+方框2 //参数2自己填写
最后还有一个要求，能批量修改数据，输出的csv名字和源文件名一样，谢谢各位大神！

ps.
能弄成一个这种界面的就最好了:lol，我对matlab不懂，只能表达下自己想要的结果

登录/注册后可看大图

1099221723 · 发表于 2018-4-12 09:18:58

应该可以用

转换.rar (7.61 KB, 下载次数: 4)

fortran2005 · 发表于 2018-4-13 08:47:25

1099221723 发表于 2018-4-12 09:18
应该可以用

我先试一下，谢谢您

fortran2005 · 发表于 2018-4-13 09:02:46

fortran2005 发表于 2018-4-13 08:47
我先试一下，谢谢您

您好，谢谢您帮忙写代码，能不能加你QQ下，我QQ号码是453424011，有些地方还需要修改

fortran2005 · 发表于 2018-4-13 09:22:48

1099221723 发表于 2018-4-12 09:18
应该可以用

能否分享下源代码，我学习学习，谢谢

fortran2005 · 发表于 2018-4-13 10:02:20

本帖最后由 fortran2005 于 2018-4-13 11:11 编辑

1099221723 发表于 2018-4-12 09:18
应该可以用

前面我写错了，A列的正确方程式是：A=方框3+參數1*1000000 //參數1自己填寫，

然后界面上那个“参数1”可以改成“度带号”；“参数2”改成“连接桩号”吗？

另外，前面给您的数据格式是 "SPS2.1", 我还有一种格式是“SPS1.0”，sps1.0的格式与sps2.1的格式唯一区别就是：（第一个和第二个红框的列不一样，）
"SPS1.0"格式是:第一个红框数据为固定2-17列，第二个红框数据为固定18-25列，其所有东西都一样。
最后能否弄出下图结果来：sps1.0和SPS2.1格式让我自己选择。十分感谢！
TIM截图20180413110923.png

1099221723 · 发表于 2018-4-13 12:11:34

fortran2005 发表于 2018-4-13 10:02
前面我写错了，A列的正确方程式是：A=方框3+參數1*1000000 //參數1自己填寫，

然后界面上那个“参数1 ...

转换.rar (7.84 KB, 下载次数: 2)

fortran2005 · 发表于 2018-4-13 12:51:00

1099221723 发表于 2018-4-13 12:11

非常感谢，我测试了下，完全没有问题，减少了我不少重复工作量。能把代码发我学习下吗？453424011@qq.com

fortran2005 · 发表于 2018-4-18 21:30:53

1099221723 发表于 2018-4-12 09:18
应该可以用

http://bbs.06climate.com/forum.p ... id=60305&extra=大神能否再帮忙写个小程序

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

[程序设计] 求大神修改一个文本格式，谢谢！（已完成）

登录后查看更多精彩内容~