自己编了一段读取sgy二进制文件的小程序
[Fortran] 纯文本查看 复制代码 PROGRAM SEISMIC
IMPLICIT NONE
INTEGER I
INTEGER*4::SAMPLE_RATE
CHARACTER*80 INPUTFILENAME
CHARACTER*80 OUTPUTFILENAME
INPUTFILENAME='Z.SGY'
OPEN(9,FILE=INPUTFILENAME,ACCESS='DIRECT',FORM='BINARY',RECL=4)
DO I=800,805
READ(9,REC=I)SAMPLE_RATE
WRITE(*,*)i,SAMPLE_RATE
END DO
CLOSE(9)
END PROGRAM
输出结果

但是用sgy查看软件看到的相应位置的数据是

麻烦大家给看看为什么会出现这种问题?多谢了
|