MINERVA superseeded IF/Prolog.
Please see
http://www.ifcomputer.co.jp/MINERVA
for details.
We discontinued to sell IF/Prolog Dec 31. 2003.
For current customers, we continue to provide
professional support for IF/Prolog until Dec 31, 2008.
ttyget0(-文字コード)
ttyget_until(+終了文字コード_式,-アトム,-最終文字コード)
ttyget0/1は、get0/1に類似しています。これは、標準入力から次の文字を読み込みます。IF/Prologの起動時に標準入力がリダイレクトされていなければ、標準入力はキ−ボ−ドです。
例題では、see/1は現在入力にレダイレクトされますが、ttyget/0は標準入力から読み込みを続けることに注意して下さい。
ttyget_until/3は、get_until/3に類似しています。これは、「終了文字コ−ド_式」、あるいはend_of_fileが読み込まれるまで、標準入力から読み込みます。標準入力は、IF/Prolog起動時にリダイレクトされなければ、標準入力はキ−ボ−ドです。この述語では、完全なファイルをひとつのアトムとして読み込むことができます。例題は、ちょうど１行に読み込みを行なうように使われています。
「終了文字コ−ド_式」は、文字コ−ドの式でなければなりません。
「アトム」は、読まれた文字列に単一化されます。
「最終文字コ−ド」は、最後に読まれた文字（end_of_fileあるいは終了文字コ−ド_式）の文字コ−ドに単一化されます。
?- see(myfile), ttyget0(X), ttyget0(Y),seen.
ab.
X = 97
Y = 98
yes
?- ttyget_until(10,Line,L).
This is input from the user
Line = 'This is input from the user'
L = 10
yes
?- _
| 
