回 帖 发 新 帖 刷新版面

主题:Fortran程序如何读取下面TXT文档里面的内容,未知行数列数还含有字符

v1  1   0  pulse(0  12  0  0.001m  0.001m  0.06  0.08)(初值 幅值 延时 上升时间 下降时间 脉宽 周期)

r1  1   2    6k

r2  2   0    6k

r3  2   3    6k

c1  3   0    2uf

.tran   0.1ms   80ms

.probe

.end

这是文档里的内容

回复列表 (共1个回复)

沙发

program main 

character aline*256, aa*2

open(1,file='    ',status='old')

1   continue 

read(1,'(a)',end =2) aline

read(aline,*,err=3)  aa, i1 i2  ......

3  continue

read(aline,*,err=4)  aa, i1 i2  ......

4 continue 


goto 1 

2 continue

....

.....


我来回复

您尚未登录,请登录后再回复。点此登录或注册