回答箱 No.97-1:  「?」を使った入力で、回数が不確定な場合の自動化方法は？
  ◆ 質問箱 No.97  質問者:   藤原 良允  1999年06月 209号 P.29
      ◆ 質問箱 目次へ
No.97-01   「？」を使った入力で、回数が不確定な場合の自動化方法は？ 回答者
   内海 孝		 1999年07月
210号 P.20
   ◆ No.97(1999 06月号)の回答-01  (使用ソフト: The PIPS 00F.03)
   以前、4Gを使っているころ、Row関数を使って処理したことがあります。
   The PIPSでは、このような場合、Entry指令があるので簡便ですが、Row関数もあるので使ってみました。
   W系指令が実行されると、その時のカーソルの行番号がRowに入りますが[Esc]キーが押されるとRowに0が入ります。


 <TEST>
         DISP OPEN(30,29,80,29)/N,COLOR(G,RV), "入力終了したら[Esc]キー";
         G;MEMO/1;W;;;
$REP:    ?;IF ROW=0 THEN GOTO $GO;GOTO $REP;
$GO:     CLOSE;P;*;
         STOP

□

戻る