とりゅふさんにメニューのソースコードを渡したときに2択だったので配列を使わなくても作れるパターンで渡したんですよね。 ついに配列を勉強する日が彼にもやって来たかという感じです。 まあまだ難しいというのであれば LOCATE 32,21+CURSOR*2:?"→" で組むという手もありますけどね。

記憶ゲーム「サイオン」 1音ずつ増える音を覚えて十字キーで真似しようゲーム。 【K4DNK3HJ】→ファイル名「SAION」 麻雀牌パズル「牌ニ曲取」 同じ牌を選んで取り除いて全部消そう。 【2KE4F3AJ】フォルダ名「HAI2MAGARI」

私が盛り込んだ唯一のゲーム性をコメントしてくれるもっさんさん超イケメンです！ Xボタンを何回でも押せるけど、でもね…という自分との闘いです。

「素材としての再配布は避けて」と書いているだけでアプリやゲームになら使っていいと書いてるので本気の麻雀ゲームとか作る人が出てきたらいいなとも思っています。

フォルダ内の「SOZAI.TXT」に書きましたが、麻雀牌、背景画像ともにフリーと宣言しているサイトからお借りして加工したものを使用しています。 麻雀牌の作成者のかたは画像単品で素材として再配布するのはやめてほしいと書かれていました。

『牌ニ曲取』をアップしました。【2KE4F3AJ】、フォルダ名「HAI2MAGARI」 れいさんのファイル転送ツールで麻雀牌の画像が持ってこれたのでパズルを作ってみました。

れいさんのファイル転送ツールの中ににROSE.DATというバラの画像ファイルが入っていました。プログラムを実行するとグラフィック面に展開されるのでSMILEツールで保存すればそのまま使えるグラフィックデータになると思います。

CLS WHILE 1 IF BUTTON(2)==16 THEN INC COUNT LOCATE 0,0:? COUNT BEEP 1 ENDIF IF SECOND==60*10 THEN BREAK INC SECOND WEND ? COUNT/10 最後は平均にしてみました

最初にSPOFS 0,35,35に表示してるのに少し下で全く使用しないHX、HYを使ってSPOFSしているからですね。

前の処理は一画面プログラムにするためにかなりはしょったのですが、大きい数字で移動してみて壁にぶつからなかったらそのまま反映させる。 ぶつかったときは1ドットずつずらして判定してどこまでOKか試すという処理が必要だと思います。

前渡した壁判定サンプルは組み込んだのでしょうか？CYを毎フレーム足してやれば落下処理になると思いますが。

あとLOAD命令はoutの前にFALSEをつけるとダイアログで確認がでなくなりますよ。 ムービー名が16文字じゃなくても大丈夫な作りや、指定のフレームにデータが足りないときは警告を出す仕組みは必要だと思います。再生側もフレーム数とフレームに対する合計のチェックぐらいはしましょう

落としましたが、止まるわけでもなく壁にめり込んだりしてるわけでもないので何を直したいのか分かりません。 もう一人のキャラクターとの当たり判定は無いようですね。

機能追加はしないで現状のバグ修正だけに限定したVer.3.2.1を出して欲しいですよね。 ああ、でもファイル名ソートは保存直後に見つけられなくなる問題はソート切り替え作るしかないのかな。

最後に再生ルーチンの「VIDEO」の修正。 22行目のFOR文を「FOR J=0 TO (DOT/4)-1」 24行目「I*DOT+J」を「I*DOT/4+J」に。 最後にに画像が正しくないのはコンバート時に4文字ずつパックしているのを逆向きに展開しなければいけないので「FOR k=0 TO 3」は「FOR k=3 TO 0 STEP -1」にすることで4ドットずつの並びが修正されました。 何もかもまとめて書こうとせずに少しずつ切り出して間違いがないかプリントしながら書いた方が混乱しないと思います。

ちゃんと再生できるところまで確認できました。 まず一番最初にムービーの元データに間違いがあります。2フレーム目のデータ「か」が7行しかありません。このせいでデータが足りずに配列の範囲エラーを起こしています。 コンバーターの「VIDEO_MAKE」にも間違いが一ヶ所。8行目の後ろ「-17」は-16の間違いですね。s$は改行を取り除いているので16文字目からムービーデータになるはずです。

脳のしわが増えるかもしれませんね。 32音で終わるようには作っているのですが自分でできるはずもなく…。いい感じのハードルを設定のが難しいです

私のところでは最初のレスでout of rangeでなくなりました。

あ、元は+16じゃなくて+17でしたね。 ファイル構造のメモ書きぐらいは欲しいです

26行目：FOR i=0 TO （dot-1） 28行目：配列の添字の中を[I*DOT/4+J+16] プリントしてデバッグしましょう