キーボードから入力出来る文字はCHR$関数を使わなくても 文字列で表記すればいいと思いますが、プログラムを見ただけで 何と表示されるかをあえて分かりにくくしてるのかな？ DIA$="" REPEAT READ D: IF D!=-1 THEN DIA$=DIA$+CHR$(D) UNTIL D==-1 DATA 33879,2031,～,94,94 DATA -1'文字列の終了 入力する命令の数はこれで減らせます。