太鼓の達人のようなゲームを作っています。 譜面を流したいのですが、どうすればよいですか？

Dataを使いますか？

譜面を改編しやすくなるのでその方がいいかと。 あとREADも必要ですね。

Read って読むだけに使う訳じゃないんですね。

どんな使い方をしますか?

READはDATAとセットで使います。 このようにREADはDATAの値を読み取ってくれます。 ACLS WHILE 1 READ D$ IF D$==""THEN END ?D$ WEND DATA "データ1","でーた2","DATA3","次でおわるよ",""

できました。 でもこれでどうやって、譜面を作り動かすのですか？

一応、あるゲームと同じ形で書いてます。できればこれ使いたいです。

↑さいたま2000w

はい。さいたま2000安定しないので、練習用に。

もしかしてscrollつかう？

SCROOLは全体が動いてしまうので、文字列でPRINTするのが自分はいいですね。 まず譜面データをひとつの文字列変数に連結して、そのあとMID$()を使って画面に表示するぶんだけとって、PRINT&LOCATEで表示という感じです。 自分の中では。

補足 MID$を使ってというのは、 PRINT MID$(譜面データ,経過時間,画面に表示する分の文字数) ということです。

文字データをsprite にして流したいのですが、その場合も同様ですか?

コンソールだと思っていました。すみません。 スプライトの場合は話が違います。 まずデータをひとつの文字列変数に入れ(ここは同じ)、文字列変数の(経過時間)文字目を取得して、それがドンかカッだったら、SPUSED()を使いSPSETし、画面外から流れるようにSPANIMをするばいいはずです。

すみません文字列変数に入れるとか経過時間とかがよくわかりません。 分かりやすく説明していただけませんか?

データを文字列変数に入れるのは　read a$ でokですか？

分かりにくい説明ごめんなさい。 それは、DATA "(譜面データ)"を連ねて書いていたら、その複数のデータを全てまとめて一つの文字列変数(なんちゃら$)に事前に入れるということです。 そのあとメインループを作り、まずデータのn文字目を取得します。(NOTE$=A$[I] INC I　みたいに。) ちなみにA$[n]とすると、A$のn文字目が取得できます。 その文字がドンとカッのどっちかをIFで判断して、SPSET ドンかカッの定義番号 OUT 管理番号　とすれば自動的に未使用のSPを定義してくれます。 そして、SPANIMを右の画面外から左に流れていくようにすれば出来ます。

補足です。 経過時間というのは、ループの中に1づつ増えていく変数を指しています。 I=I+1とかINC TIMEとか変数名は分かりやすい方でどうぞ。 分からないことがあったら質問どうぞ。

データをなんちゃら$に入れるのは、readを使いますよね？

エラーになってしまいますがどこがダメなのか分かりません。Subscript out of rangeです。

すみません少し抜けていました。 そのエラーはLが文字列の文字数を越えてしまったからです。 なので、譜面を終了するプログラムが必要です。 なので、データの最後にお好きな文字をいれ、IF文で終わらせましょう。 あと、それだと曲が一瞬で終わってしまうので、待つプログラムも必要でした。 それはFORとVSYNCを使えばできます。

同じエラーが起きてしまうのですが、どこが違うのでしょうか？

同じエラーは出ないはずですが…。 自分ではわかりません。すみません。 とりあえず IF NOTE$=="E" THEN END を IF NOTE$=="E"THEN END か IF NOTE$=="E"THEN END ENDIF としましょう。 それではENDIFが無く、エラーになります。

ENDIFの位置をかえて、あと色々やりました。

最初のデータの行しか読み込めないのですが、何故でしょう？

最初の方で繰り返しREADしているのですが...

RESTONEをループの外に置くようにしてください。 RESTONEはあくまでデータの場所を指定する命令なので、ループの中に置くと、データの先頭しか読み取れません。

直しました。先端しか読み取れないのは直ったのですが、 今度は最後の音符しか流れてくれません...

説明不足でした。すみません。 READはデータを読み取るだけで文字列をくっつけるのはしてくれないので、 READ A$のところを READ 好きな変数$ A$=A$+好きな変数$ とすれば大丈夫です。

ありがとうございます。流せました！ 申し訳ないのですが、もう少し付き合っていただけますか？ 今僕がやっているのは、gosubでサブルーチンを呼び出して、そこで譜面を流しているのですが、譜面を流している間にボタンの判定ができません。どうすればよいでしょうか？(多分曲がすぐに終わってしまわないようにVSYNC ループを置いているせいだと思います。)

VSYNCループの中でボタンを取得すればいいと思います。

あと、工夫して複数の音符を一度に出せるようにしたのですが、すぐエラーになります。out of ringe だったような気がします。

やっぱりそうなりますかー。もっと省略したいのですがねー。

SPSET 定義番号 OUT 変数 とすれば、自動で使っていない番号のSPを出してくれます。 変数には管理番号が入ります。 これをFORで活用すれば大丈夫です。

あれ...すみません。FORで、活用が分からなかったので、とりあえず、変えてみました。エラーが起きました。 すみません!　また教えてください。何度もすみません！

それは多分SPの数がいっぱいになったからでしょう。 なので使い終わったSPを消していくようにすればいいのです。 SPUSEDとSPCLRとSPCHR()を使ってできます。 SPCHR()はアニメーション状態を取得する関数ですが、簡単にいうとその番号のSPが動いてるか動いてないか答えてくれるものです。 位置を変えているのであれば、SPCHR(管理番号)==#CHRXYで判断できます。 SPUSED()はそのSPを使っているかを答えてくれるものです。 SPCLRはSPを消してくれるものです。 これらとFORで全SPを調べていけばいいのです。

すみません!プログラムに変えていただけませんか？ #CHRXY のとことかがネットで調べてもわかりません!

FOR I=0 TO 255 ***** IF SPUSED(I)==1THEN IF SPCHR(I)!=#CHRXY THEN SPCLR I EMDIF ENDIF NEXT これに流れるSP以外にSPを使っていたら、 IF I==(使っているSPの管理番号) THEN CONTENUE を*****に置いて下さい。 複数ある場合は、 I==(1つめのSPの管理番号)に&&I==(2つめのSPの管理番号)&&I==(3つめ)……… をつけて下さい。

If spchr(l)!=#CHRXY then の行でシステムエラーが起きるのですがなぜでしょうか？ ()のなかはLですよね...

。

おおっと思いっきりいろいろと間違えてました。 正しくはSPCHR()ではなく、 IF SPCHK() != #CHKXY THEN~です。

ミス。 SPCHK()の中にl(エル)を入れてSPCHK(l)としてください。

エラーは直ったのですが、画像の通り、ドンがずっと流れていってます。これはSPが「動いていない」とすぐに判断して消しているせいですか？

Dataの最初の音符をドンからカッに変えたら、最初の音符はカッに変わったのですが、次からの音符は変えてみても、変わりませんでした。

譜面を読み込めていないのでしょうか？

そう思ったら確認するのが吉です。 ?NOTE$などをし、しっかり譜面が読み込めてるか確認することが重要です。 これに限らず、思った動きをしないときは、変数を表示したり、IF文で音を鳴らしたりするのは、かなり大事です。

?a$ではありませんか？ ?a$でやると、全部の譜面が出ました。 ということは流す方に問題ありと言うことですね？

しょぼーんさんから教えてくださったfor l=0 to 255~next の文を抜くと、sprite の数が一杯になってしまう代わりに、譜面がちゃんと流れるようになりました。

IをFOR～NEXT以外に使っていませんか？ 使っていたら、変数の値が変わってしまうので、別の変数名にしましょう。 自分が過去にIを使ったプログラムをアドバイスしていたら、すみませんでした。こちらのミスです。

できました。ありがとうございます。 あの、何度もすみませんがもう少しお願いします。 この前、ボタンを押しても反応しないときがあるといったと思うのですが、 VSYNC ループにボタンの判定をいれてもなおりません。 今回の「同じlを使っていた...」みたいなミスがありそうなことはありませんか? 同じようにfor ~next の文を消しただけでは直りません。

ボタンの取得だけでなく、処理も入れてますか？ VSYNCループはメインループと思って下さい。

処理とは何ですか？ 無知ですみません．

要はプログラムや動作のことです。 IF文やFOR～NEXTもPRINTも全部処理です。 SPを処理するプログラム、処理が出来ていない、のように使います。 ちなみにプログラム全体をソースといいます。 間違っていたらすみません。

入れてました。遅れてしまいすみません。

入れていたのですが、なぜ出来ないんでしょうか？

多分譜面を流すループのvicic？が、ボタンを押すタイミングと合っているのではないでしょうか？ visicを取るとドンとカッの幅が極端に狭くなってしまいました。

VSYNCでした。

恐らくそれだと思います。 なので、MAINCNTというものを使います。 MAINCNTというシステム変数(最初から値が決まっている変数)は、現在のフレーム数を取得できるのですが、簡単にいうと、プチコン起動してどれぐらい1/10秒が経ったかを表すものです。 これを使えば、 IF (MAINCNT MOD 60)==0THEN ～～～ で、1秒毎に処理を行うことができます。 これを曲のテンポに合わせて60のところを変え、GOSUB @FUMENをつければいいのです。

これであってますかね？ どうなったら正解なのかもよくわかりません。すみません。

そこはテンポと何分音符刻みかで違ってきます。 x=テンポ/60/(何分/4) 例えばテンポが120で32分音符刻みでしたら、 x=120/60/(32/4)*60 x=2/8*60 x=15 なので、MOD 16とすればいいのです。

返信が遅れてほんとにすみません！ なぜ、x=15でmod 16となるのですか？

あ、多分誤字ってますね。 本当にすみません。 MOD 15が正しいと思われます。

あ、すみません。32分刻みって何でしょうか？

ドンの間隔から16分かなと思い、やってみたのですが、それだと本家よりももっと遅いです。

● ● ● ● ● ● ● ● ● 4分 ● ● ● ● ● ● ● ● ● ● ● ● ● ● ● ● ● 8分 ●●●●●●●●●●●●●●●●●●●●●●●●●●●●●●●●● 16分

説明足りずすみません。 32分刻みというのは32分音符での数え方ということです。 1小節を32分に分け、音符を並べるということです。

あれ?16分だから16入れたら、遅すぎる!何で？

どこに16を入れましたか？ あと、テンポが本家より遅いかもしれません。 googleとかで曲のテンポを調べてはどうでしょうか。

Modの後に入れました。多分200ですね。

間違いました。120/60/(□/4)*60 で□のところに入れました。

16はそこであっています。 なので、テンポが遅いのかもしれません。 120の所をいじってはみてはどうですか？

50ですね。 50だと遅すぎる！