可搬用サブルーチン:指定した間隔でプロセスの実行を停止します。
モジュール:USE DFPORT
形式
CALL SLEEP (time)
time
(入力) INTEGER(4)。呼び出しプロセスを停止する時間 (秒単位)。
互換性
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
関連情報
例
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