作者sjgau (sjgau)
看板Programming
标题Re: [问题] 请问有fortran高手能帮我看看解读binar …
时间Thu Nov 8 08:47:05 2007
请 e-mail 档案给我
fortran 的 source- code
和 那个 binary file
我尽快帮你看看
同时会附上 详细的说明
e-mail:
[email protected]
or link to:
http://groups.google.com/group/ntust_f90?hl=zh-TW&lnk=li
※ 引述《lenakaho (ickc)》之铭言：
: 以下是全文 14000001.000是binary形式
: ---
: character*1 bb(2048)
: integer ns(1024)
: open(14,film='14000001.000',form='binary')
: read(*,*) (bb(k),k=1,760)
: nb1=256
: 130 do k=1,nb1
: k2=k*2
: k1=k2-1
: ms=ichar(bb(k2))
: ns(k)=ichar(bb(k1))+256*mod(ms,16)
: ni=ms/128
: na=ms/16-ni*8
: 200 continue
: go to 130
: stop
: end
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 211.77.241.1
1F：推 lenakaho:感谢您~已找到老师教我了<(_ _)> 140.112.68.132 11/08 13:27