自分でスプライトって作れるんですか?

やり方を、教えてください!!!

スプライト用のグラフィックデータを作って、 SPDEFで定義すればできますよ。

お手数をお掛けしますが、やり方をもう少し詳しく教えてくれませんかね・・・・・

自分は説明が下手なので、それは難しいです。 ただ、どういうことがしたいのか、 もっと具体的におっしゃってもらえると、 説明できるかもしれません。

方法は2つほどあります。 プログラム中でGPAGE 0,4として、 G系命令(pandaosaruさんが解説されています。)でお絵描きする方法 サンプル[8XD3V3LJ]やigyochanさんのゲームが参考になると思います。

もう１つは、はるさんの仰る通り、お絵描きツールでお絵描きして、読み込む方法。 やり方は、 　・お絵描きツールでお絵描きする。 　・適当な名前で保存する。 　・プログラムの最初の方で、LOAD "GRP4:(ファイル名)",0みたいな感じで読み込む。 　・必要があれば、SPDEFで大きさを指定 １つ目の方法は、ファイル単位で公開出来て、容量の節約になるという利点があります。しかし、複雑な絵だったり、数が多いと面倒です。 2つ目の方法は、複雑な絵や沢山のスプライトを用意するときに向いています。しかし、メインのプログラムと描いた絵を１つのプロジェクトにまとめることが多いため、容量も大きくなりがちです。

二つ目の方法 こうですか?

LOAD"GRP4:SP_0",0 としてみて下さい。

↑

できました。

で、どうやったら表示させることができますか?

SPSETで表示出来ますが、どんな絵を描いているのかによります。

こんなの

とりあえずスマイルツールを起動することをオススメします。

はい!開きました

おっとすれ違いガール() SPDEFという命令があってですね。 使い方はSPDEF 定義番号(好きな数字で良いですが、0から始まると便利),絵の左上のX座標,Y座標,幅,高さ で定義出来ます。その後 SPSET 管理番号,さっき定義した定義番号 で表示出来ます。

↑うーん・・よくわからないないので、お手数をおかけますがプログラムの例を、見せてもらえますか?

[8XD3V3LJ] 例えば、左上に描いた32*32のスプライトを表示したい場合 SPDEF　0,0,0,32,32　で定義して、 SPSET　0,0　で表示…0ばっかりで分かりづらいですね。その右に描いた同じサイズのスプライトを表示する場合 SPDEF　1,32,0,32,32　で定義して、 SPSET 1,1　で表示。最初のスプライトをもう１つ表示したい場合 SPSET　3,0　で表示 です。

こうゆう感じで教えてもらえると、うれしいです。

文字で、教えてもらうのはとても、役にたつと思います。しかし、それだと、ほぼ猿真似状態になってしまうので、上の画像のような感じにしてくれると、助かります。(わがままですみません・・m(_ _)m)

すみません。以後気を付けます。 こんな感じて大丈夫ですか？[QD3PBXTD]

?

もしかして公開キーご存知ないですか？ トップメニューの作品公開とダウンロードから公開キーを使ってダウンロードでダウンロード出来ます。3号からだとスクショが貼れないのでこのような形になりました。すみません。

あ・・・すみません僕の勘違いです。

なんかエラーが・・・座標は、あってるはずなのに・・・・・

どの命令でどのエラーが出たんですか?

スプライトは文字と違って座標でエラーが出ることは無いので、他の原因でしょうね。 勘でしか無いですが、引数(命令に渡す数)の数が違うと予想。

あ・・できました。

あの・・・Aを押してる間だけスプライトが、変わるコマンドは、どうしたらいいのですか? IF B AND #A THEN SPSET 0 では、できませんでした・・・

IF B AND #A THEN SPCHR 管理番号,変えた時の定義番号 ELSE SPCHR 管理番号,通常時の定義番号 (説明下手ですいません) でできると思います。

↑これすると、他のスプライトがつかえません!

他のスプライトとはなんですか?

Q3AXBXRD

こういうことなら"SET"を"CHR"に変えるだけでいいと思いますよ。

ok

スプライトは基本的には16×16ですが、32×32にも、できますか?

できます。 普通はSPDEFという命令を使って定義自体を変更しますが、 SPSETから直接行うこともできます。

SPDEFを使えば出来ますよ。

↑どうやったらいいのんですか?SPDEFの使い方は、あまりわかりません。

4/1日の僕のコメントに書かれてますよ。と言うのはちょっと不親切なので解説すると、 SPDEF　定義番号,左上のX座標,Y座標,幅,高さ で設定出来ますよ。 左上の座標はスマイルツールのお絵描きで確認出来るはずです。 例えば、256,256の位置を左上に描いた32*32のスプライトを定義する場合 SPDEF　0,256,256,32,32　’256,256の位置を左上に32*32の大きさを定義番号0(最初イチゴだったところ)に定義 です。実際に試してみてください。

おk

こんなものまでなら、作れるようになれました。 Q34XB41D

スティックで、スプライトを移動させて、ジャンプすると、下に落ちる物を作りたいんですけど、なぜか、できません。

少しずれてるかもしれませんが、気になった点 ･B%=B%+0,9　’ピリオドとコンマを間違えている気がします。つまりエラー。仮にピリオドだとしても整数型の変数なので、0.9を足しても切り捨てられます。つまりB%の値は変化しません。 ･仕様かも知れませんが、スティックとAボタンが両方でY座標を変化させれる点が気になります。 ･IF (略)SY=Y－10　’Yはスティックの情報なので、範囲は+-1ぐらい。それから10が引かれるので、SYは-10ぐらいになります。つまりボタンが押されると、画面がいに瞬間移動します。

もういっちょ。 A%=BUTTON(2)　’場所がおかしい。 もしかして:次の行も。

一様動くようにできました。 しかし、重力を発生させることができません・・・ IFでAボタンでスプライトをジャンプさせることも、できません!! どうしたらいいでしょう?

昨日偶然サンプルになりそうなゲームを作ってました。 プロジェクト名[BLOOD_1GP] 公開キー[R33833J] プロジェクトの中に入っているBLOOD_FALL というファイルがそれです。BIGで動くか分かりません。 短さを求めていたので、絶望的に読みづらいです。なので、次のコメントに解説をのせておきます。

まず。重力やジャンプという概念を付けるときには、地面という概念はほぼ必用です。 僕のFALLでは、GLINEで表現しています。 スプライトがその地面をすり抜けないようにするには、スプライトが画面外に出ないようにするのと、同じような感じで出来ます。FALLの場合MIN関数を使っています。 SPSET 0,6 GLINE　0,216,480,216　'画面にy=216の線を描く (中略) WHILE 1　'無限ループ 　(中略) 　SX=SX+X　'x座標更新 　SY=MIN(SY-Y,200)　'Y座標更新。ただし、Yは地面-16より大きくならない。 WEND

次に重力(加速度)を付けます。ジャンプやバウンドも重力(加速度)で表現出来ます。 2つ前のみならいプログラマーさんのコメントの変数B%がそれにあたります。ただし、小数点以下の小さい数を扱うので、%は付けてはいけません。落下中落ちる速さは少しづつ増えていくので、WHILE~WEND内(←これ重要)でBの値を少しづつ増やしていけば良いでしょう。 (前略) WHILE 1 　(中略) 　B=B+0.05　'落ちる速さが増える 　SX=SX+X　'X座標更新 　SY=MIN(SX-Y+K,200)　'落ちていく。 WEND

誤字 誤　SY=MIN(SX-Y+K,200) 正　SY=MIN(SX-Y+B,200) 加速度さえ出来てしまえば、ジャンプは簡単に出来ます。 WHILE~WENDの中で(←ここ大事)ボタンが押されたかを判定して、押されたらBの値をマイナスにすれば良いのです。 WHILE 1 　WAIT　'ループ遅延 　A%=BUTTON(2)　'ボタンを取得 　(中略)　 　IF (A%　AND 16)==16　THEN 　 'Aボタンが押されたなら。 　　B=-3　'ジャンプ(ジャンプ力3) 　ENDIF WEND ただし、ジャンプ中に何度もジャンプ出来てしまうので、気になるなら解決方法を解説しますよ。

前から思っていたんですが、 クレーンさんのプログラムの"　"はエラーになります。 なので、"　"を" "に置き換えて読むといいですよ。 (というかもう置き換えて読んでいますね)

ありがとうございます

☺️

☺️ 上のコメントの"一様"は"一応"ですよね? 前に自分も同じ間違えをしたことがあります。

←正直違いが分からない人 そうそう。加速度と説明しましたが、 加速度はB=B+0.05の部分だけで変数B自体はただの速度なんですよね。 ジャンプのサンプル作ってみました。 公開キー[EKDEVK3V]

なんかできない・・・・

↑

B%=BUTTON(2)はWHILE~WENDの中に入れてください。(超重要) あとWHILE直後にWAITもしくはVSYNKを入れることをおすすめします。

ブラッドさん 全角か半角かの違いです。 プチコンでは全角文字はエラーになります。

みならいプログラマーさん ACLS PRINT "ダイス WHILE 1 B=BUTTON(2) IF B AND #A THEN A%=RND(5)+1 PRINT A% ENDIF WEND というようにしたらいいと思います。 貴方のプログラムをなるべく崩さずに書きました。

プチコンに全角文字や半角文字の区別があったことに驚きです。