Fortran读取二进制文件
一).一般问题
二进制文件与我们通常使用的文本文件储存方式有根本的不同。这样的不同很难用言语表达，自己亲自看一看，理解起来会容易得多。因此，我推荐学习二进制文件读写的朋友安装一款十六进制编辑器。这样的编辑器有很多，在我们的 CVF 附带的集成开发环境下就可以（将二进制文件拖动到 IDE 窗口后松开）。Visual Studio 2005 也是可以的。（不过需要在 File 菜单下 Open，File）
另外推荐一款使用较多的软件，叫做 UltraEdit（以下简称 UE）。是很不错的文本编辑器，也能做十六进制编辑器使用。
为什么要用十六进制编辑器？而不用 2 进制呢？因为 2 进制实在太小，书写起来会很长，很不直观。而我们的计算机把 8 位作为一个字节。刚好 2 ** 8 = 256 = 16 ** 2。用 8 位 2 进制表达的数，我们用 2 个十六进制数据来表达，更直观和方便。
二).文件格式
所有文件，笼统意义上将可以区分为两类，一类是文本文件，一类是二进制文件。
1).文本文件
文本文件用记事本等文本编辑器打开，我们可以看懂上面的信息。所以使用比较广泛。通常一个文本文件分为很多很多行，作为数据储存时，还有列的概念。实际上，储存在硬盘或其他介质上，文件内容是线一样储存的，列是用空格或 Tab 间隔，行是用回车和换行符间隔。
以 ANSI 编码（使用较多）的文本文件来说，例如我们储存如下信息：
引用：
10
11
12
需要的空间是：3 行 ×每行 2 个字符 + 2 个回车符 + 2 个换行符 = 10 字节。文本文件储存数据是有格式，无数据类型的。比如 10 这个数据，并不指定是整型还是实型还是字符串。它有长度，就是 2，两个字节。储存时计算机储存它的 ASCII 码：31h,30h。（十六进制表示）。回车符是：0Dh，换行符：0Ah。因此，这个数据储存是这样的：
引用：
31 30 0D 0A 31 31 0D 0A 31 32
(红色为回车符和换行符) 31h 30h 就是 10，31h 31h 就是 11，31h 32h 就是 12。因此我们也可以认为文本文件是特殊的二进制文件。
2).二进制文件
二进制文件，是无格式有数据类型的。比如上面的 10 11 12 三个数。但二进制文件没有行的概念。我们要紧凑地储存他们。（当然也可以中间加入一些空白的字节）
从数据类型上来说，我们首先考虑整型。如果把 10 11 12 当作 2 字长的整型。则 10 表示为：0Ah 00h。因为 0Ah 对应十进制 10。而后面的 00h 是空白位。2 字长的整型如果不足 FFh，也就是不足 255，则需要一个空白位。类似的：11 表示为 0Bh 00h，12 表示为 0Ch 00h。
当整型数据超过 255 时，我们需要 2 个字节来储存。比如 2748（ABCh），则表示为：BCh 0Ah。要把低位写在前面（BCh），高位写在后面（0Ah）。
当整型数据超过 65535 时，我们就需要 4 个字节来储存。比如 439041101（1A2B3C4Dh），则表示成：4Dh 3Ch 2Bh 1Ah。当数据再大时，我们就需要 8 字节储存了。
二进制文件的实型数据也有字节长度的区分，比如 4 字长，8 字长。但实型数据的长度并不仅仅代表它的表达的范围，更多的代表精度。所以，8 字长的我们又称为双精度。关于实型数据如何储存为 2 进制。则有很多套规则。现在都广泛使用的是 IEEE 标准浮点格式。关于这样的规则，我还正在了解，比较麻烦。就不多说了。在这里也没有必要了解。
二进制文件也可以储存字符型数据，储存方法和文本文件一样。都是使用 ASCII 编码储存的。所以我们用记事本打开某些二进制文件时，也能看到一些有意义的字符串。（无意义的乱码我们可以认为是整型或实型，不过记事本程序当作字符来解释，因此造成了乱码）
三).使用二进制文件的好处
为什么要使用二进制文件。原因大概有三个：
第一是二进制文件比较节约空间，这两者储存字符型数据时并没有差别。但是在储存数字，特别是实型数字时，二进制更节省空间，比如储存 Real*4 的数据：3.1415927，文本文件需要 9 个字节，分别储存：3 . 1 4 1 5 9 2 7 这 9 个 ASCII 值，而二进制文件只需要 4 个字节（DB 0F 49 40）
第二个原因是，内存中参加计算的数据都是用二进制无格式储存起来的，因此，使用二进制储存到文件就更快捷。如果储存为文本文件，则需要一个转换的过程。在数据量很大的时候，两者就会有明显的速度差别了。
第三，就是一些比较精确的数据，使用二进制储存不会造成有效位的丢失。
四).二进制文件的储存方式
列举一个二进制文件如下：
引用：
00000000h: 0F 01 00 00 0F 03 00 00 12 53 21 45 58 62 35 34 ; .........S!EXb54
00000010h: 41 42 43 44 45 46 47 48 49 47 4B 4C 4D 4E 4F 50 ; ABCDEFGHIGKLMNOP
这里列出的是在 UltraEdit（UE）里看到的东西。其实只有红色部分是文件内容。前面的是 UE 加入的行号。后面的是 UE 尝试解释为字符型的参考。
这个文件一共有 32 字节长。显示为两列，每列 16 个字节。实际上，这仅仅是 UE 的显示而已。真实的文件并不分行。仅仅知道这个文件的内容，如果我们没有任何说明的话，是不能看出任何有用信息的。
下面我规定一下说明：我们认为，前 4 个字节是一个 4 字节的整型数据（0F 01 00 00 十六进制：10Fh 十进制：271）。这 4 个字节之后的 4 个字节是另一个 4 字节的整型数据（0F 03 00 00 十六进制：30Fh 十进制：783）。其后的 4 个字节（12 53 21 45 ）表示一个 4 字节的实型数据：2.5811919E+3。再其后的 4 个字节（58 62 35 34）表示另一个 4 字节的实行数据：1.6892716E-7。而只后的 16 个字节（41 42 43 44 45 46 47 48 49 47 4B 4C 4D 4E 4F 50）我们认为是 16 个字节的字符串（ABCDEFGHIGKLMNOP）
实际上，二进制文件只是储存数据，并不写明数据类型，比如上面的第 9 字节到第 16 字节
（12 53 21 45 58 62 35 34），我们刚才认为是 2 个 4 字节的实型，其实也可以认为是 8 个字节的字符型（ S!EXb54）。而后面的 16 个字节的字符串（ABCDEFGHIGKLMNOP），我们也可以认为是 2 个 8 字节的整型，或者 4 个 4 字节的整型，甚至 2 个 8 字节的实型，4 个 4 字节的实型，等等等等。
因此，面对一个二进制文件，我们不能准确地知道它的含义，我们需要他的数据储存方式的说明。这个说明告诉我们第几个字节到第几个字节是什么类型的数据，储存的数据是什么含义。否则的话，我们只能猜测，或者无能为力。
五).如何使用语句操作二进制文件
我们将上面的那个二进制文件保存为：TestBin.Bin 来举例。
读取和写入二进制其实是两个很类似的操作，了解了其中之一，另一个也就不难了。
二进制文件我们通常使用直接读取方式，Open 语句可以写为：
引用：
Open( 12 , File = 'TestBin.Bin' , Access = 'Direct' , Form = 'Unformatted' , RecL = 4 )
上面的 Access 表示直接读取方式，Form 表示无格式储存。比较重要的是 RecL 。我们读取数据时，是用记录来描述单位的，每一次读入或写入是一个记录。记录的长度在 Open 时就确定下来，以后不能改变。如果需要改变，只能 Close 以后再此 Open。
记录长度在某些编译器下表示读取的 4 字节长度的倍数，规定为 4 表示记录长度为 16 字节。有些编译器下就直接表示记录的字节数，规定为 4 则表示记录长度为 4 字节。这个问题需要参考编译器手册。
在 VF 系列里，这个值是前面一个含义。可以通过设置工程属性的 Fortran，Data，
Use Bytes as RECL= Unit for Unformatted Files 来改变，使之成为后一个含义。在命令行模式下，则使
用 /assume:byterecl 这个编译选项。
确定 RecL 大小是我们需要做的事情，一般来说，不适合太大，也不适合太小。还需要结合数据储存方式来考虑。太小的话，我们需要执行读写的次数就多，太大的话，我们就不方便操作小范围的数据。
有时候我们甚至会分多次来读取数据，每一次的 RecL 都不同。对于上面的 TestBin.Bin 文件来说，它比较简单，我以 16 字节长度和 8 字节长度两种读取方式来演示，你甚至可以一次 32 个字节长度全部读完：（1）RecL = 4 【记录长度 16 字节】
引用：
Program main
Implicit None
Integer*4 :: iVar1 , iVar2
Real*4 :: rVar1 , rVar2
Character(Len=16) :: cStr
Open( 12 , File = 'TestBin.Bin' , Access = 'Direct' , Form = 'Unformatted' , RecL = 4 )
Read( 12 , Rec = 2 ) cStr
Read( 12 , Rec = 1 ) iVar1 , iVar2 , rVar1 , rVar2
Write( * , * ) cStr
Write( * , * ) iVar1 , iVar2 , rVar1 , rVar2
Close( 12 )
End Program main
这里的 Open 里指定了 RecL = 4（记录长度是 16 字节）。
第一个 Read 语句，直接读取第二笔记录（也就是第 17 字节到第 32 字节）。读取出
的 cStr = "ABCDEFGHIGKLMNOP"。
第二个 Read 语句，返回来读取第一笔记录（也就是前面 16 个字节）。读取出的数据分别放入 4 个 4 字节的变量。（其中前面两个是整型，后面两个是实型）
输出结果为：
ABCDEFGHIGKLMNOP
271 783 2581.192 1.6892716E-07
看到这个结果，就说明我们成功了。
同时我们可以看到，第一个语句，我们直接跳到第二条记录读取，并没有读取第一条。这就是直接读取数据的方便。有时候我们根本不需要某些数据，这时候，我们可以直接跳到某一条记录上。这个记录甚至可以是我们实现算出来的变量。比如：
iRec = ( a + b ) / C
Read( 12 , Rec = iRec ) cStr
实现我们储存了 100 天的数据，我们只需要第 21 天的数据，我们怎么办？在顺序读取时，我们可能会开辟一个 100 元素的数组，或者循环执行 20 次空白的读取。但是在直接读取时，我们只需要执行一
句 Read( 12 , Rec = 21 )。这是多么的方便。（直接读取和顺序读取虽然于文本文件和二进制文件没有直接的关联，但是文本文件通常用顺序读取，而二进制文件通常用直接读取。这是他们的性质决定的。）（2）RecL = 2【记录长度为 8 字节】
引用：
Program main
Implicit None
Integer*4 :: iVar1 , iVar2
Real*4 :: rVar1 , rVar2
Character(Len=16) :: cStr
Open( 12 , File = 'TestBin.Bin' , Access = 'Direct' , Form = 'Unformatted' , RecL = 2 )
Read( 12 , Rec = 4 ) cStr( 9 : 16 )
Read( 12 , Rec = 3 ) cStr( 1 : 8 )
Read( 12 , Rec = 1 ) iVar1 , iVar2
Read( 12 , Rec = 2 ) rVar1 , rVar2
Write( * , * ) cStr
Write( * , * ) iVar1 , iVar2 , rVar1 , rVar2
Close( 12 )
End Program main
这里设定的 RecL = 2 ，意思是一笔记录 8 个字节。所以我们不能一次读取 cStr 这个 16 字节的字符串。我们必须分两次读取。第一次读取第 4 笔记录，放入字符串后半段。第二次读取第 3 笔记录，放入字符串前半段。（可以调换位置）。然后读取第一笔记录的两个整型变量和第二笔记录的两个实型变量。
输出结果和（1）的方法一样。
（3）写入二进制文件
写入二进制文件同样需要考虑 RecL 的问题。我们这里以 RecL = 4 来举例。
引用：
Program main
Implicit None
Open( 12 , File = 'TestBinW.Bin' , Access = 'Direct' , Form = 'Unformatted' , RecL = 4 )
Write( 12 , Rec = 1 ) 271 , 783 , 2581.192_4 , 1.6892716E-07
Write( 12 , Rec = 2 ) "ABCDEFGHIGKLMNOP"
Close( 12 )
End Program main
写入二进制文件和读取二进制文件是差不多的，我就不再解释了。需要注意的是，如果直接写入第 N 笔记录，而文件没有只有 M 笔记录（M < N），那么，第 M+1 到第 N-1 笔记录会用 0 填充。也就是说，二进制文件不会出现断裂。
二进制文件的读写是比较灵活的，实际应用中，我们使用哪种方式，我们应该根据自己的情况来设计。如何选择合适的记录长度 RecL，如何设计高效的储存方式等。
关于二进制文件读写的详细解说
先介绍函数，我们一共要用到三个函数，fopen，fread，fwrite。二进制读写的顺序是用fopen以二进制方式打开读写文件，然后使用fread和fwrite两个函数将数据写入二进制文件中。下面我们看看一个拷贝程序的源码：
2中，注意fread的返回值，这个值需要在fwrite的时候将会用到。 后面是关于fopen，fread，fwrite三个函数的详细说明。 fopen（打开文件） 相关函数open，fclose 表头文件#include
上述的形态字符串都可以再加一个b字符，如rb、w+b或ab＋等 组合，加入b 字符用来告诉函数库打开的文件为二进制文件，而非 纯文字文件。不过在POSIX系统，包含Linux都会忽略该字符。由 fopen()所建立的新文件会具有S_IRUSR|S_IWUSR|S_IRGRP|S_I WGRP|S_IROTH|S_IWOTH(0666)权限，此文件权限也会参考um ask值。 返回值文件顺利打开后，指向该流的文件指针就会被返回。若果文件打开失败则返回NULL，并把错误代码存在errno 中。 附加说明一般而言，开文件后会作一些文件读取或写入的动作，若开文件失败，接下来的读写动作也无法顺利进行，所以在fopen()后请作错误 判断及处理。 范例#include
fortran文件读取技巧
最近专业课海洋要素计算作业需要用fortran编程读取验潮站资料（如下，是txt,其中数据是有62行，限于篇幅，我只截取了前5行数据外加验潮站的4行头信息） ！要注意的是最后一列数据后面没有空格 program ex1 !********************************************** !* written by 潘海东, 2015,3,20 !*一次性读取744个数据，放入一维数组中 !*（如果一次性读取太多的话可能会对系统造成某些影响） !********************************************** INTEGER :: b(62*12)，i character(len=20) time,location,u1,u2 open(10, file = 'C:\Users\Administrator\Desktop\sjs_t_97aug_m(harmonic).txt', status = 'old') ！********读取头信息 read(10,"(A3)") u1 read(10,"(A18)") time read(10,"(A13)") location read(10,"(A2)") u2 ！********读取数据 read(10,100) b(:) 100 format(61(11(I4,1x),I4,/),11(I4,1x),I4) !在fortran的输入输出中'/'代表换行 close(10) end program ex2 !********************************************** !* written by 潘海东, 2015,3,20 !*读取第3列至第11列 !********************************************** INTEGER :: a(62,9),i character(len=20) time,location,u1,u2 open(10, file = 'C:\Users\Administrator\Desktop\sjs_t_97aug_m(harmonic).txt', status = 'old') !***读取头信息
使用文本文件 txt 进行数据存取的技巧总结 相当
使用文本文件txt 进行数据存取的技 巧总结相当 使用文本文件(.txt)进行数据存取的技巧总结 由于本帖内容较多，部分转自他人的心得，因此，凡转贴的地方仅用"--转--"标注，原作者略去，在此对所有原作者表示感谢！ 特别说明：由于大家在I/O存取上以txt文件为主，且读取比存储更麻烦(存储的话fwrite,fprintf基本够用)，因此下面的讨论主要集中在"txt文件 的读取"上。除了标注了"转"之外，其余心得均出于本人经验之结果，欢迎大家指正、补充。 一.基本知识： --转-- 1.二进制文件与文本文件的区别： 将文件看作是由一个一个字节(byte)组成的，那么文本文件中的每个字节 的最高位都是0，也就是说文本文件使用了一个字节中的七位来表示所有的信息，而二进制文件则是将字节中的所有位都用上了。这就是两者的区别；接着，第二个问题就是文件按照文本方式或者二进制方式打开，两者会有什么不同呢?其实不管是二进制文件也好，还是文本文件也好，都是一连串的0和1，但是 打开方式不同，对于这些0和1的处理也就不同。如果按照文本方式打开，在 打开的时候会进行translate，将每个字节转换成ASCII码，而以按照二进制 方式打开的话，则不会进行任何的translate；最后就是文本文件和二进制文 件在编辑的时候，使用的方式也是不同的。譬如，你在记事本中进行文本编辑 的时候，你进行编辑的最小单位是字节(byte)；而对二进制文件进行编辑的话，最小单位则是位(bit)，当然我们都不会直接通过手工的方式对二进制文件进行编辑了。 从文件编码的方式来看，文件可分为ASCII码文件和二进制码文件两种：
二进制文件的读写以及相关心得
二进制文件读写分析 有关TXT文件以及bin文件处理的测试代码 int main() { //fstream file("D:\\test.dat",ios_base::in|ios_base::out|ios_base::app); fstream file; file.open("D:\\test1.dat",ios_base::out); { int temp[10] = {0x11,0x13,0x14,0x1F,0x1D,0x11,0x11,0x12,0x11,0x11}; int temp1[10]; file.write((char *)temp,sizeof(temp)); file.close(); file.open("D:\\test1.dat",ios_base::in); file.read((char *)temp,sizeof(temp)); unsigned int i; cout< Read 的规则： 按行读取，每次读一行，读完后光标自动跳到下一行的开头，空格和逗号代表结束（所以空格和逗号也是读取的一部分的话，需要使用“输入输出格式”） 如果想要将一行数据读入数组，代码为： Read(10,*) s(:,:,:) 不用规定输入输出格式，因为会根据s(:,:,:)确定需要读入的数字的个数，然后fortran会按部就班的读取，甚至文件中当前这一行的数字个数不足以填满s(:,:,:)的时候，read会自动跳到下一行继续搜索数字，直到填满s(:,:,:)为止。 但是需要注意给数组赋值的顺序：read会把它搜索到的第一个数字给s(1,1,1),第二个给s(2,1,1),第三个给s(3,1,1)… 程序9 1: 将read(unit=field,fmt="(A79)",iostat=status)buffer 中的A79改为A2，结果只输出每行的前两个字符，说明read是按整行整行读取的。 中间空了几行之后，空行之后的内容还是能被读取和输出，这说明，空行和空白是不一样的：空行也算是一种文本内容，因此不会终止读取，而空白意味着结束。 !读取文件 program main implicit none character(len=79)::filename="number.txt",buffer integer,parameter::field=10 integer::status=0 logical alive inquire(file=filename,exist=alive) if(alive)then open(unit=field,file=filename) do while(.true.) read(unit=field,fmt="(A79)",iostat=status)buffer if(status/=0)exit write(*,"(A79)")buffer end do else write(*,*)filename,"does't exist." end if pause stop end program main ============================================= 附number.txt =============================== 1234555666 C++中Txt文件读取和写入 标签：c++nullstringios文本编辑file 2012-10-07 16:58 45182人阅读评论(3) 收藏举报 分类： C/C++基础（75） C++中Txt文件读取和写入 一、ASCII 输出 为了使用下面的方法, 你必须包含头文件 Fortran中批量处理文件的方法总结 —循环读取目录下的所有符合条件的文件===================== 一、简单的介绍 在一年之前，我写过一个程序，主要是对Micaps资料进行批量处理，将逐日资料处理为旬、月的数据，在那个程序中，始终有一个问题困扰我，就是如何自动生成该读取的下一个文件名，这使我真正开始关注fortran中的批处理，时隔一年，决定写下这些文字，将我用到的一些fortran批处理的方法和大家共享，交流。 对于那些只要会用程序，不求其中原理的朋友，请马上跳过这些文字，直接去下载附件吧！程序里有使用说明，但是，如果你不懂原理，估计现成的程序你使用起来也会碰壁哦！ 这里所说的批处理是指对某一个目录下的指定后缀的文件的批量读取和处理。 我总结的批处理方法大概可以用下面这个示意图来说明： | | |将文件目录写入一个文本文件，供fortran循环读取 |————手动输入文件名 |————运行程序之前命令行工具导出文件名 |————程序运行后，未开始计算之前，生成文件名 | ————调用CMD命令生成 | ————GETFILEINFOQQ方法生成 | ————调用WIN32API生成 | |在程序运行时动态生成文件名 | | 对于第一种方法，我将主要介绍如何将目录写入文件，然后举出一个小的示例来验证。第二种方法主要是说明其思路。 二、方法的介绍 1、将文件目录写入一个文本文件，供fortran循环读取 1.1、手动输入文件名 这是最基本的方法啦，如果文件个数不多，而且文件名中包含了空格等特殊字符的话，建议使用这种方法，在这里就不多说啦，至于在fortran中的处理，等几个小方法介绍完之后会有一个例子来说明。 解码labview读写二进制文件格式 一直觉得NI 很恶心,最近越发觉得恶心,竟知道骗钱,我花了2 周去探它该死的数据格式,问他们售后居然说不知道...还得我亲自动手...现在把数据格式写下来,为大家做点贡献吧...关于用matlab/vc 读二进制文件write to binary file 的数据NI 可以直接用这个函数把数据写下来,但是读取格式不告诉你,要你用它的软 件去读...读的方法:1) 用uchar 去读,将数据转置存储;2)用浮点去读,倒序;-------- 这些在网上可以查到,下面才是关键.... 对64 位数据:3)每个通道有21 个数据是头文件,即21*64bit 的头信息,可以不去管它,跳过; 4)除了头文件外,每个通道还有1-3 个字节的信息(不知道什么玩意儿),要跳过;具体来讲是这样,如果有6 个通道, 第一个通道存储了1 个字节,要扣除;第2,4,5 个通道多了2 个字节,要扣除;第3,6 通道多了3 个字节要扣除.但是必须从3 开始扣.即假如总共N 字节数据,则第一个通道读N-3 个,接下来2,4,5 要读N-4 个,剩下的3,6 要读N-5 个.只有这样才能正确的读取.不过要注意数据倒序的问题,实际的数据可能正好通道顺序相反.5) 剩下的就是编程的问题了,还有很多细节大家可以自己解决,再看怎么要内存最小,耗时最短...我是没有在NI 的说明文档里面找对相关的数据存储格式,这里是 6 个通道的举例,要是5 个通道又得慢慢试了...再来一句,NI 真恶心,其实没必要 保留数据格式...搞的人家都要用它的软件...tips:感谢大家的阅读，本文由我司收集整编。仅供参阅！ 1.建立新的运行空间 File>new>workspace>new>prject>console application>new>file>free-form 2.建立多个文件 可以把子程序文件和主程序文件放在同一个source文件下 3.建立外部文件用于读写数据 Open(1,file=’ exam.txt ‘)用于打开文件，其中1为设备号——用一整数表示，exam.txt为要打开的文件名，文件有文件名和文件类型构成，文件名可给出路径如file=’ D:\exam\exam.txt ‘Write(1,*)’学生的成绩为：’用于在写在前面打开的1文件里写数据，其中*和0、5、6是系统预定义的设备号由系统隐含规定。一个文件名只能和一个设备号建立联系，同样一个设备号也只能与一个文件建立联系，一个通过OPEN语句打开并指定了设备号的文件不能再次用OPEN语句打开 Read(1,*)表示从文件里面读取数据，一次读取一个数据，数据间用逗号隔开 每隔一个read语句或write语句默认的换一行读入或写入 Write(1,”(‘输入’)”)=write(1,*) ‘输入’ Write(1,”(‘I3,’输出’,I7)”) x,y结果是x以3个整型字符输出，输出，y以7个整型输出 Read(1,100)或write(1,100)I,j,k 100 format(I3,I7,F6)表示按照100语句的格式读入或输出顺序读写数据： Read(uint设备号,fmt格式说明,end结束语句转移,eor错误语句转移) 输入数据可以按规定的域宽输入，也可以用逗号强制间隔， 1.使用read语句读取数据时，read语句输入表中的数据类型和格式应该与当前指针位置 数据类型和格式一致。 2.使用read语句读取数据时，从当前文件指针开始读取，完成读取后文件指针自动后移一 个记录，使用OPEN和REWIND语句时，文件指针指向第一个记录，从第一个记录开始读取。 3.使用read语句读取时，如果输入表要求输入的数据少于当前记录的数据个数，则多余的 数据将被忽略，下一个read语句从下一个新的记录开始读取数据。相反则继续读取下条数据记录直到读完全部输入数据。 4.使用write语句时，从当前文件指针开始存写，完成存写后文件指针自动后移一个记录， 使用OPEN和REWIND语句时，文件指针指向第一个记录，从第一个记录开始读取。如果文件已存在，则原文件的数据将丢失。 5.使用write语句写入数据时，从当前的位置开始写入，可使用format语句中的格式说明 及括号和反斜杠/创建多条新纪录写入，完成操作后，文件指针自动后移一个记录。6.使用了read以后，立即使用write语句，将导致写入的数据为最后一个记录，其余的数 据将丢失。如果在文件末尾要写入新的记录可以通过下了语句实现： 100 read(1,*,end=200) Goto 100 200 write(1,*)’’ 7.使用了write语句立即使用read语句会遇到一个文件结束标志。如果写入后要立即进行 读取，需要用OPEN、rewind、backspace等对文件重新定位。 文件打开操作： Open(unit=设备号，file=文件名，access=存取方式,form=存取格式,recl=记录长度,err=错误转移,pad=补加空格,position=读取位置) 如err=100，表示跳到100号语句 Position 为文件位置包括三个格式，ASIS，已存在文件的上一次操作位置为文件的位置，缺 二进制文件和文本文件的详细以及如何生成二进制文件？ 技术随笔 2010-05-01 19:13:56 阅读226 评论0 字号：大中小订阅 这个问题一直困扰了很多年，可能是我没有认真的去思考。我相信很多人可能和我一样很纠葛，到底编译器也好，汇编器也好是如何工作的呢？到底怎么回事？为什么会运行呢？这是让我们这些看着windows 学习电脑的人真的很难去理解计算机的内部结构。其实，这一切都只是障眼法，下面我就来给大家细细说说我对计算机的理解。 解答1：编译器是怎么回事？ 所谓编译器，顾名思义就是将一种文本格式转换成另一种文本格式。比如将字符串echo "hello"; 转换成printf("hello"); 这其实是php语言转成c语言的一种表示。这只是一种简单的描述，其实很大一部分的编译器是将源语言转换成了汇编语言。下面我们来看看 C 语言中的经典hello word，通过gcc编译后生成的汇编是怎么回事。 c语言源码： #include fortran文件操作 From: 《Fortran 95 程序设计》彭国伦 1.文件读取的概念： 读取：“顺序读取”和“直接读取”。 保存：“文本文件”和“二进制文件”。 二进制文件：读取快，因为保存格式和数据在内存中的保存方法一样，同时也节省空间。 －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ 2. 文件的操作： －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ open的使用：使用open命令打开文件之后，就可以对文件来做输入输出。 example: program ex0901 impicit none open(unit=10, file='hello.txt') ! 打开hello.txt文件, unit指定文件代码，file 指定文件名称。 write(10, *) "hello" !在代码为10的文件中写入hello stop end program ex0901 open中有很多参数可以使用，详细如下： OPEN(UNIT=number, FILE='filename', FORM='...', STATUS='...', ACCESS='...', RECL=length, ERR=label, IOSTAT=iostat, BLANK='...', POSITION='...', ACTION=action, PAD='...', DELIM='...') UNIT='number'： number必须是一个正整数，它可以使用变量或是常量来赋值。number最好避开1,2,5,6。因为2,6是默认的输出位置，也就是屏幕。1，5则是默认的输入位置，键盘。 FILE='filename'：指定要打开的文件名称，文件名要符合系统规定。windows下不区分大小写，unix下则会区分大小写，最好不要使用中文文件名。 FORM='FORMATTED' OR 'UNFORMATTED' FORM字段只有两个值可以设置： FORM='FORMATTED' “文本文件”格式来保存 FORM='UNFORMATTED' “二进制文件”格式保存 这一栏不给定时候的默认值是: FORM='FORMATTED' STATUS='NEW' or 'OLD' or 'SCRATCH' or 'UNKNOWN' 用来说明打开一个新的文件或已经存在的旧文件。 STATUS='NEW' 打开一个原本不存在的新文件 STATUS='OLD' 打开一个原来已经存在的文件 STATUS='REPLACE' 若文件已经存在则重新创建一次，原来的内容消失；若不存在则会创建新文件。 STATUS='SCRATCH' 表示要打开一个暂存文盘，这个时候可以不需要指定文件名称，也就是FILE这个一栏可以忽略。因为程序本身会自动取一个文件名，至于文件名是啥也不重要，因为暂存盘会在程序结束后自动删除。 STATUS='UNKNOWN' 由各编译器自定义。通常会同REPLACE的效果。 ！这一栏不给定时，默认为STATUS='UNKNOWN'。 ACCESS='SEQUENTIAL' or 'DIRECT' 设置读写文件的方法： C打开文件文本方式二进制方式 2009年11月01日星期日 22:53 Windows平台下 如果以“文本”方式打开文件，当读取文件的时候，系统会将所有的"\r\n"转换成"\n"；当写入文件的时候，系统会将"\n"转换成"\r\n"写入。 如果以"二进制"方式打开文件，则读/写都不会进行这样的转换。 在Unix/Linux平台下，“文本”与“二进制”模式没有区别。 数据有字符型和非字符型（数）两种。按文本方式写文件指的是将数据转换为对应的字符型数据之后再写入文件。对于字符型数据，由于其本身就是ASCII码字符，一般不必转换，直接写入文件。但是，由于不同的系统对于换行符（'\n'）有不同的处理（转换）方式，在有的系统（如Windows）下也会对 '\n' 作适当的转换。 对于非字符型数据，都要进行转换处理。例如：int m = 12; 以及 double f = 2.3;，分别按照 "%d"、"%lf" 方式将 m 和 f 写入文件的时候，写入的分别是 '1'、'2' 两个字符以及 '2'、'.'、'3' 等三个字符的ASCII码值。显然，如果按照二进制方式写的话，在文件中一般 m 要占 4 个字节、f 要占 8 个字节。 一、文本文件与二进制文件的定义 大家都知道计算机的存储在物理上是二进制的，所以文本文件与二进制文件的区别并不是物理上的，而是逻辑上的。这两者只是在编码层次上有差异。 简单来说，文本文件是基于字符编码的文件，常见的编码有ASCII编码，UNICODE编码等等。二进制文件是基于值编码的文件，你可以根据具体应用，指定某个值是什么意思（这样一个过程，可以看作是自定义编码）。 从上面可以看出文本文件基本上是定长编码的(也有非定长的编码如 UTF-8)，基于字符嘛，每个字符在具体编码中是固定的，ASCII码是8个比特的编码，UNICODE一般占16个比特。而二进制文件可看成是变长编码的，因为是值编码嘛，多少个比特代表一个值，完全由你决定。大家可能对BMP文件比较熟悉，就拿它举例子吧，其头部是较为固定长度的文件头信息，前2字节用来记录文件为BMP格式，接下来的8个字节用来记录文件长度，再接下来的4字节用来记录bmp文件头的长度。。。大家可以看出来了吧，其编码是基于值的（不定长的，2、4、8字节长的值都有），所以BMP是二进制文件。 二、文本文件与二进制文件的存取 文本工具打开一个文件的过程是怎样的呢？拿记事本来说，它首先读取文件物理上所对应的二进制比特流（前面已经说了，存储都是二进制的），然后按照你所选择的解码方式来解释这个流，然后将解释结果显示出来。一般来说，你选取的解码方式会是ASCII码形式（ASCII码的一个字符是８个比特），接下来，它8个比特8个比特地来解释这个文件流。例如对于这么一个文件流"01000000_01000001_01000010_01000011"(下划线''_''，是我为了增强可读性，而手动添加的)，第一个8比特''01000000''按ASCII码来解码的 1.建立新的运行空间 File>new>workspace>new>prject>console application>new>file>free-form 2.建立多个文件 可以把子程序文件和主程序文件放在同一个source文件下 3.建立外部文件用于读写数据 Open(1,file=’ exam.txt ‘)用于打开文件，其中1为设备号——用一整数表示，exam.txt 为要打开的文件名，文件有文件名和文件类型构成，文件名可给出路径如file=’D:\exam\exam.txt ‘ Write(1,*)’学生的成绩为：’用于在写在前面打开的1文件里写数据，其中*和0、5、6是系统预定义的设备号由系统隐含规定。一个文件名只能和一个设备号建立联系，同样一个设备号也只能与一个文件建立联系，一个通过OPEN语句打开并指定了设备号的文件不能再次用OPEN语句打开 Read(1,*)表示从文件里面读取数据，一次读取一个数据，数据间用逗号隔开 每隔一个read语句或write语句默认的换一行读入或写入 Write(1,”(‘输入’)”)=write(1,*) ‘输入’ Write(1,”(‘I3,’输出’,I7)”) x,y结果是x以3个整型字符输出，输出，y以7个整型输出 Read(1,100)或write(1,100)I,j,k 100 format(I3,I7,F6)表示按照100语句的格式读入或输出顺序读写数据： Read(uint设备号,fmt格式说明,end结束语句转移,eor错误语句转移) 输入数据可以按规定的域宽输入，也可以用逗号强制间隔， 1. 使用read语句读取数据时，read语句输入表中的数据类型和格式应该与当前指针位置 数据类型和格式一致。 2. 使用read语句读取数据时，从当前文件指针开始读取，完成读取后文件指针自动后移一个记录，使用OPEN和REWIND语句时，文件指针指向第一个记录，从第一个记录开始读取。 3. 使用read语句读取时，如果输入表要求输入的数据少于当前记录的数据个数，则多余的数据将被忽略，下一个read语句从下一个新的记录开始读取数据。相反则继续读取下条数据记录直到读完全部输入数据。 4. 使用write语句时，从当前文件指针开始存写，完成存写后文件指针自动后移一个记录，使用OPEN和REWIND语句时，文件指针指向第一个记录，从第一个记录开始读取。如果文件已存在，则原文件的数据将丢失。 5. 使用write语句写入数据时，从当前的位置开始写入，可使用format语句中的格式说明及括号和反斜杠/创建多条新纪录写入，完成操作后，文件指针自动后移一个记录。 6. 使用了read以后，立即使用write语句，将导致写入的数据为最后一个记录，其余的数据将丢失。如果在文件末尾要写入新的记录可以通过下了语句实现： 100 read(1,*,end=200) Goto 100 200 write(1,*)’’ 7. 使用了write语句立即使用read语句会遇到一个文件结束标志。如果写入后要立即进行读取，需要用OPEN、rewind、backspace等对文件重新定位。 文件打开操作： Open(unit=设备号，file=文件名，access=存取方式,form=存取格式,recl=记录长度,err=错误转移,pad=补加空格,position=读取位置) 如err=100，表示跳到 100号语句 本文由我司收集整编，推荐下载，如有疑问，请与我司联系 Linux下二进制方式读写文件 2017/03/29 0 最近在做项目需要把内存数据写入到文件中，然后再从文件中以二进制方式读出使用。由于接触Linux开发时间不长，开始询问度娘，度娘的 回答是使用以wb方式打开文件后使用fwrite把数据写入文件，以rb方式打开文件 后使用fread读出数据。下面详细介绍一下相关的函数极其使用说明。需要用的头文件为stdio.h，函数结构为fwrite、fread、fseek、ftell、fstat。1. fwrite size_t fwrite(const void* buffer, size_t size, size_t count, FILE* stream); 返回：返回实际写入的数据块数目（1）buffer：是一个指针，对fwrite来说，是要获取数据的地址；（2）size：要写入内容的单字节数；（3）count: 要进行写入size 字节的数据项的个数；（4）stream: 目标文件指针；（5）返回实际写入的数据项个数count。说明：写入到文件的哪里？这个与文件的打开模式有关，如果是w ，则是从file pointer指向的地址开始写，替换掉之后的内容，文件的长度可以不变，stream的位置移动count个数；如果是a ，则从文件的末尾开始添加，文件长度加大。注意：这个函数以二进制形式对文件进行操作，不局限于文本文件2. fread size_t fread(void *buffer, size_t size, size_t count, FILE *stream) ; 返回：返回真实写入的项数，若大于count则意味着产生了错误。另外，产生错误后，文件 位置指示器是无法确定的。若其他stream或buffer为空指针，或在unicode模式中 写入的字节数为奇数，此函数设置errno为EINVAL以及返回0. （1）buffer：用于接收数据的内存地址；（2）size：要读的每个数据项的字节数，单位是字节；（3）count：要读count个数据项，每个数据项size个字节.；（4）stream: 目标文件指针；3. fseek int fseek(FILE * stream,long offset,int whence); 返回：成功返回0，失败返回-1，errno会存放错误代码。（1）stream: 目标文件指针；（2）offset: 相对于whence的偏移量；（3）whence:绝对位置。说明：fseek()用来移动文件流的读写位置。参数stream为已打开的文件指针，参数offset为根据参数whence来移动读写位置的位移数。注意1：参数whence为下列其中一种:： fopen , fread fwrite 函数读写二进制文件 1#include Matlab中如何实现二进制文件的读写 1、文件的打开与关闭 1）打开文件 在读写文件之前，必须先用fopen函数打开或创建文件，并指定对该文件进行的操作方式。fopen函数的调用格式为： fid=fopen（文件名，‘打开方式’） 说明：其中fid用于存储文件句柄值，如果返回的句柄值大于0，则说明文件打开成功。文件名用字符串形式，表示待打开的数据文件。常见的打开方式如下： ‘r’：只读方式打开文件（默认的方式），该文件必须已存在。 ‘r+’：读写方式打开文件，打开后先读后写。该文件必须已存在。 ‘w’：打开后写入数据。该文件已存在则更新；不存在则创建。 ‘w+’：读写方式打开文件。先读后写。该文件已存在则更新；不存在则创建。 ‘a’：在打开的文件末端添加数据。文件不存在则创建。 ‘a+’：打开文件后，先读入数据再添加数据。文件不存在则创建。 另外，在这些字符串后添加一个“t”，如‘rt’或‘wt+’，则将该文件以文本方式打开；如果添加的是“b”，则以二进制格式打开，这也是fopen函数默认的打开方式。 2）关闭文件 文件在进行完读、写等操作后，应及时关闭，以免数据丢失。关闭文件用fclose函数，调用格式为： sta＝fclose(fid) 说明：该函数关闭fid所表示的文件。sta表示关闭文件操作的返回代码，若关闭成功，返回0，否则返回-1。如果要关闭所有已打开的文件用fclose(‘all’)。 2、二进制文件的读写操作 1）写二进制文件 fwrite函数按照指定的数据精度将矩阵中的元素写入到文件中。其调用格式为： COUNT＝fwrite（fid，A，'precision'） 说明：其中COUNT返回所写的数据元素个数（可缺省），fid为文件句柄，A用来存放写入文件的数据，precision代表数据精度，常用的数据精度有：char、uchar、int、long、float、double等。缺省数据精度为uchar，即无符号字符格式。 例6.8 将一个二进制矩阵存入磁盘文件中。 >> a=[1 2 3 4 5 6 7 8 9]; >> fid=fopen('d:\test.bin','wb') %以二进制数据写入方式打开文件 fid = 3 %其值大于0，表示打开成功 >> fwrite(fid,a,'double') ans = 9 %表示写入了9个数据 >> fclose(fid) ans = 0 %表示关闭成功 2）读二进制文件 fread函数可以读取二进制文件的数据，并将数据存入矩阵。其调用格式为： [A，COUNT]=fread(fid，size，'precision') 说明：其中A是用于存放读取数据的矩阵、COUNT是返回所读取的数据元素个数、fid为文件句柄、size为可选项，若不选用则读取整个文件内容；若选用则它的值可以是下列值：N （读取N个元素到一个列向量）、inf（读取整个文件）、[M，N]（读数据到M×N的矩阵中，数据按列存放）。precision用于控制所写数据的精度，其形式与fwrite函数相同。 %写一维数据至数据文件 n=0:pi/10:4*pi; y=sin(n); fip=fopen('C:\binary3.bin','wb'); fwrite(fip,Pxx,'double'); fclose(fip); %从数据文件读取一维数据 fip=fopen('C:\binary3.bin','rb'); [SIN,num]=fread(fip,[2,20],'double');%inf表示读取文件中的所有数据，[M,N]表示 %将读取的数据放置在M行N列中，N表示将读取的数据放置在1列中 Matlab中如何实现二进制文件的读写 说明：matlab产生的是.bin二进制文件。.bit是FPGA的比特流文件 1、文件的打开与关闭 1）打开文件 在读写文件之前，必须先用fopen函数打开或创建文件，并指定对该文件进行的操作方式。fopen 函数的调用格式为： fid=fopen（文件名，‘打开方式'） 说明：其中fid用于存储文件句柄值，如果返回的句柄值大于0，则说明文件打开成功。文件名用字符串形式，表示待打开的数据文件。常见的打开方式如下： ‘r'：只读方式打开文件（默认的方式），该文件必须已存在。 ‘r+'：读写方式打开文件，打开后先读后写。该文件必须已存在。 ‘w'：打开后写入数据。该文件已存在则更新；不存在则创建。 ‘w+'：读写方式打开文件。先读后写。该文件已存在则更新；不存在则创建。 ‘a'：在打开的文件末端添加数据。文件不存在则创建。 ‘a+'：打开文件后，先读入数据再添加数据。文件不存在则创建。 另外，在这些字符串后添加一个“t”，如‘rt'或‘wt+'，则将该文件以文本方式打开；如果添加的是“b”，则以二进制格式打开，这也是fopen函数默认的打开方式。 2）关闭文件 文件在进行完读、写等操作后，应及时关闭，以免数据丢失。关闭文件用fclose函数，调用格式为： sta＝fclose(fid) 说明：该函数关闭fid所表示的文件。sta表示关闭文件操作的返回代码，若关闭成功，返回0，否则返回-1。如果要关闭所有已打开的文件用fclose(‘all')。 2、二进制文件的读写操作 1）写二进制文件 fwrite函数按照指定的数据精度将矩阵中的元素写入到文件中。其调用格式为： COUNT＝fwrite（fid，A，'precision'） 说明：其中COUNT返回所写的数据元素个数（可缺省），fid为文件句柄，A用来存放写入文件的数据，precision代表数据精度，常用的数据精度有：char、uchar、int、long、float、double等。缺省数据精度为uchar，即无符号字符格式。 例6.8 将一个二进制矩阵存入磁盘文件中。 >> a=[1 2 3 4 5 6 7 8 9]; >> fid=fopen('d:\test.bin','wb') %以二进制数据写入方式打开文件 fid = 3 %其值大于0，表示打开成功 >> fwrite(fid,a,'double') ans = 9 %表示写入了9个数据 >> fclose(fid) ans = 0 %表示关闭成功 2）读二进制文件 fread函数可以读取二进制文件的数据，并将数据存入矩阵。其调用格式为： [A，COUNT]=fread(fid，size，'precision') 说明：其中A是用于存放读取数据的矩阵、COUNT是返回所读取的数据元素个数、fid为文件句柄、size为可选项，若不选用则读取整个文件内容；若选用则它的值可以是下列值：N（读取N 个元素到一个列向量）、inf（读取整个文件）、[M，N]（读数据到M×N的矩阵中，数据按列存放）。precision用于控制所写数据的精度，其形式与fwrite函数相同。 %写一维数据至数据文件 n=0:pi/10:4*pi; y=sin(n); fip=fopen('C:\binary3.bin','wb'); fwrite(fip,Pxx,'double'); fclose(fip); %从数据文件读取一维数据 fip=fopen('C:\binary3.bin','rb'); [M,N]表示[SIN,num]=fread(fip,[2,20],'double');%inf表示读取文件中的所有数据，1列中列中，N 表示将读取的数据放置在将读取的数据放置在%M行N fclose(fip) %写二维数据至数据文件n=0:pi/10:4*pi; y1=sin(n);y2=sin(n);y3=0.5*sin(n); y=[y1;y2;y3]; fip=fopen('C:\binary4.bin','wb'); fwrite(fip,y,'double'); ，则表示存储数据正常fclose(fip); %返回指针的值为0 从数据文件读取二维数据% fip=fopen('C:\binary4.bin','rb'); 表示表示读取文件中的所有数据，[M,N][Array_2D,num]=fread(fip,inf,'double');%inf 1列中N行N列中，表示将读取的数据放置在%将读取的数据放置在M fclose(fip)fortran心得
C++中Txt文件读取和写入
Fortran进行批处理地方法
解码labview读写二进制文件格式
fortran新建,添加外部文件和简要读写格式说明
二进制文件和文本文件的详细以及如何生成二进制文件-推荐下载
fortran文件操作
C打开文件 文本方式 二进制方式
FORTRAN新建,添加外部文件和简要读写格式说明
【IT专家】Linux下二进制方式读写文件
fopen , fread fwrite 函数读写二进制文件
Matlab中如何实现二进制文件的读写
1使用Matlab产生二进制文件bin