Re: [問題] 請問有fortran高手能幫我看看解讀binar …

看板Programming作者 (sjgau)時間16年前 (2007/11/08 08:47), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串1/1
請 e-mail 檔案給我 fortran 的 source- code 和 那個 binary file 我儘快幫你看看 同時會附上 詳細的說明 e-mail: sjgau4311@gmail.com 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

11/08 13:27, , 1F
感謝您~已找到老師教我了<(_ _)>
11/08 13:27, 1F
文章代碼(AID): #17CboA_D (Programming)