3

当我的运行结束时，我需要在 fortran 中生成声音。我需要类似于c++ 中使用的"\a" 或 Beep( , ) 的东西。

4

2 回答 2

5

Try adding the following at the end of your program

print *, char(7)
于 2013-04-13T15:45:43.037 回答
-1

如果你想有点创意，你可以用一个音乐文件结束你的程序。在大多数 c:/windows/media 文件夹中，您可以找到许多 .wav 文件。在这种情况下，我将 tada.wav 文件复制到我的可执行文件的位置，以便它可以tada.wav在程序结束时在命令提示符下播放该文件。

如果您使用 Intel Fortran，那么这个实现应该可以工作：

  program zsound
  use ifport
  implicit none
  integer i
  character(100) :: musicfile

  musicfile = "tada.wav"


  !  Your Program goes here...


  ! CALL EXECUTE_COMMAND_LINE(musicfile)
  i = system(musicfile)

  end
于 2018-06-12T23:01:49.227 回答