INPUT入力時のカーソル移動範囲を制限する

■INPUT入力時のカーソル移動範囲を制限する

　ワークエリアの&H68C7,&H68CD,&H68CEを設定してINPUT入力時のカーソル移動位置を制限する事が出来ます。

10　POKE&H68CD,A:POKE&H68CE,B:POKE&H68C8,A:POKE&H68C7,15:INPUT"",A$:
POKE&H68CD,0:POKE&H68CE,255:POKE&H68C7,7:IFA$=""THEN10ELSEPOKE&H68D7,0:RETURN

入力・・・Ａ（カーソル開始位置）　Ｂ(カーソル終了位置)　カーソル位置は　３２＊ｙ＋ｘ　です。
出力・・・Ａ＄(入力した内容)　※ＢＲＫキーを押すと、”０ｙ”など表示されますが問題ありません。　

まず、&H68CD番地に移動範囲開始カーソル位置を、&H68CE番地に移動範囲終了カーソル位置を指定します。
そして、&H68C7番地の3ビット目を立てる(1にする)だけ。
ここでは&H68C7番地の「１５」を書き込んでいますが、特定のビットを立てる場合は本来ならまず最初に値を取得して
立てたいビットをOR(論理和)して書き込んだ方が良いと思いますが、
&H68C7番地は通常「７」で固定されているようですので問題無いと思います。

※上記プログラムは、サブルーチンとしてお使いください。