老哥们，救救弟弟我，forrtl: severe (47): write to READONLY file,

fcode

可能1，其他进程占用了该文件，导致你不能写入。
可能2，你自己占用了该文件，没有关闭就再次打开写入。

请注意循环和 Open，Close语句的关系。通常是这样的：
Open(...
Do i = 1 , N
  write(...
End Do
Close(...

fcode

代码不长的话，发出来。