SLEEP

可搬用サブルーチン:指定した間隔でプロセスの実行を停止します。

モジュールUSE DFPORT

形式

CALL SLEEP (time)

time
(入力) INTEGER(4)。呼び出しプロセスを停止する時間 (秒単位)。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

SLEEPQQ

	USE DFPORT
	integer(4) hold_time
	hold_time = 1 ! ループを実行させます。
	DO WHILE (hold_time .NE. 0)
	  write(*,'(A)') "Enter the number of seconds to suspend"
	  read(*,*) hold_time
	  CALL SLEEP (hold_time)
	END DO
	END