我必須使用 Fortran 90 將 ASCII 和非 ASCII 字符的輸入文件轉換為二進制向量

Question

有沒有可用的例程？ 我沒有找到

謝謝

Answer 1

假設您想讀取一個二進制文件，該文件包含可打印字符的字節，如 "A"=65 和不可打印的字符，如 "ESC"=27 這樣的東西可能會有所幫助？

integer(kind=selected_int_kind(1)), dimension(1000) :: vector
open(unit=10,file='data.data', access='stream', form='unformatted')
i=1
read(unit=10, iostat=ios) vector(i)
do while(ios==0)
  i=i+1
  read(unit=10, iostat=ios) vector(i)
enddo

為簡單起見，我假設向量的長度最多為 1000。向量現在將包含輸入文件中 ASCII 字符的十進制表示。