こういったREAD DATAの使い方が分かりません。 自分で試しに作ってみたのですがDATAを二文字以上入力すると何も起こらなくなってしまいます…

このＤＡＴＡ命令のデータををＲＥＡＤ命令で文字列変数に読み込むと、読み込んだ文字列変数に、２０文字の文字列が、一度に読み込まれます。（ＲＥＡＤ命令のすぐ後にプリント命令やＤＩＡＬＯＧ命令で変数の内容を表示すると確認できます） 一文字ずつ取り出したい場合は、ＭＩＤ＄（）関数などの文字列操作関数を使う必要があります。

READ P$ IF P$="1" THEN ブロック配置 みたいな感じにしてませんか？ もしこのようにしているのであれば、 "11111"と"1"は違う文字列なので、 2文字以上は何も起こりません。 MID命令で、1文字ずつ取り出して判定する必要があります。 違っていたらすみません。 プログラムの間違いを指摘して欲しいときは、プログラムを公開するか、スクショを投稿するといいですよ。そのほうが、的確な回答が返ってきます。

あ、P$=="1"です。

回答ありがとうございますm(_ _)m