GETC

可搬用関数：通常コンソールに接続されている外部装置 5 から次の利用可能な文字を読み取ります。

モジュール：USE DFPORT

形式

result = GETC (char)

char
(出力) CHARACTER*(*)。GETC を呼び出した後に最初にキーボードで押された文字。装置 5 がコンソールに接続されている場合，ENTER キーが押されるまで文字は返されません。

結果

結果の型は INTEGER(4) です。結果は，成功した場合が 0 で，ファイル終了を検知した場合が -1 です。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

GETCHARQQ，GETSTRQQ，可搬用ライブラリー

例

	use dfport
	character ans,errtxt*40
	print *, 'Enter a character: '
	ISTAT = GETC (ans)

	if (istat) then
	  call gerror(errtxt)
	end if