1.XEVIOUSの敵の様に下に下がりつつも自機を追いかけるにはどうしたらいですか？ 2.RPGの様にウインドウ内に一文字ずつ表示させるにはどうすればいいですか？ 答えてくれると有難いです。 またわからないことが増えたらコメントします。

2の質問 こんな感じでどうですか？思ってたのと違っていたらすみません。

質問2 つ自作命令 自分はこれ使ってます。 DEF PRTW ST$ VAR L,I,M$ L=LEN(ST$) FOR I = 0 TO L-1 M$=MID$(ST$,I,1) ?M$ WAIT 5 NEXT END

質問1についてですが、 既に自機を追いかける処理ができているようであれば、そこにY座標を加算する計算を入れればOKです。

もう解決はできていると思いますが、一応作ってみたのでコンソールとグラフィックです。

A$="ABCDEF" FOR I=0 TO LEN(A$)-1 PRINT A$[I]; VSYNC 6 NEXT 文字を1文字ずつ表示するならこんな方法もあります。 改行やスクロールの処理を挟みたいのであれば、いったん文字変数に格納してから分岐してやればOK。

配列宣言をしていない文字変数は添字を使うと1次元配列に1文字ずつ入っているのと同じなんですね。

3, @LOOP B=BUTTON LOCATE X,26:?"→" IF B==#LEFT THEN X=29:BEEP GOTO@LOOP では反応しないのですが… 4,ボタンを同時に押したと受け取るにはどうすれば良いですか？

3> VSYNC 1が無いので上手く動いていないと思われます。あと、B=BUTTONではなく、B=BUTTON()です。 4> たとえばAとBの同時押しの場合、最も簡単な方法はB==#A+#Bでしょう。

3>>以下のことが当てはまるのかな? ・ループ内にCLSをいれてない ・Xの値が書いてない ・プログラムのロードが早い　つまりVSYNCが必要

あと、IF式の中に:コロンがあるからかな？

あ、３は解決しましたー このラベル以外にX値は書いています。

IFにコロン入れても問題ないと思いますが・・・

受付終了します。 ありがとうございました。 また疑問が増えましたら投稿するのでよろしくお願いします。