なんじゃこりゃ？！

ファイル名の入力を求めるメッセージを、なぜ標準出力ではなくconに書き出しているのか？
標準出力として予約されている装置番号6番が、なぜファイルとしてopenされるのか？
なぜファイル名が' 'なのか？（自分で適宜書き換えろってことなのか？
それとも、file=' 'とすると、自動的にファイル名を尋ねてくれるコンパイラがあるのか？）

22、24行目のfile=' 'を自分で書き直す必要があると思う。
おそらく8番が入力データが入ったファイルで、6番が出力を書き出すファイルだろうから、適宜じぶんで書き直して。

自分なら念のため、装置番号の使われ方を調べるために"read.*8"とか"write.*6"がコード内で使われているところを検索する。
grep -ine"read.*8" ./*.for
それを頼りに、プログラムの挙動を追跡する。macでgrepって使えるのかな？