#include "rpgfunc.as"
;-------------------------------------------------
r={"
学校から帰ってきたベイ助は、
またすぐに外へ走っていった。
今日は何か祭りがあるわけでもないし、
有名な人がやって来るわけでもない。
人混みがあまり好きではないベイ助は、
そんなことよりむしろ友達と遊ぶ方が好きなのだ。
クー太
「おーっ、よく来たねっ！ 上がって上がって！」
ベイ助と同い年のクー太は、キーア族の長の弟だ。
人見知りの激しいキーア族と、
ベイ助はうまく付き合っていっている方である。
ベイ助
「今日は森が明るくて歩きやすかったよっ。
もう道覚えちゃった」
クー太
「ホント？ じゃあ……
今日はボクが森を案内してあげよっか」
ベイ助
「えっ、いいの？ やったぁ、行く行く！」
ベイ助にとって、昔から年上のライ太やベイ太は
友達みたいなものだったが、同い年のクー太と
仲良くなってみると、それまでの友達とは
何か違う気がして、魅了されていった。
"}
notesel r
repeat (notemax+3)/4
z=""
for i,0,4
noteget k,cnt*4+i
z+=k+"\n"
next
msg z
loop
send
4行おきに取り出して、文章の表示として出力するサンプル。 長い長いお話を作るときは多少は使えるかもしれません。 ただし、たとえば\N[1]を書くときは\\N[1]としなければならないので考え物ではありますが…… これは短いので、各行の説明をしてみましょう。 ３行目の「;-------------------------------------------------」は、ただの目印です。 全角２５字までしか入力できないので、その区切りが見やすいように書いただけです。 r={" 〜〜 "} というのは、r="〜〜" と同じで、複数行の文字列を代入するときの記法です。 こうすれば、随筆する要領で書けますよね。 notesel r で、rをバッファに指定します。 こうすれば、メモリノートパッド命令でrを使うことが出来ます。 repeat (notemax+3)/4 〜 loop で、(notemax+3)/4回繰り返し。 notemaxはrの行数で、それをそれぞれ4行ずつ取り出すので、notemax÷4を切り上げた回数だけ繰り返します。 Ａ、Ｂを自然数とすると、Ａ÷Ｂの切り上げは、（Ａ＋Ｂ−１）÷Ｂの切り捨てと同じなのですよ。 だから、notemax÷4の切り上げは、（notemax＋3）÷4ですので、回数をそう指定しています。 z="" で、出力用の文字列zを初期化 for i,0,4 〜 next は、繰り返しです。 BASICでいう、FOR I=0 to 3 〜 next Ｃでいう、for(i=0;i<4;i++){ 〜 } です。 変数iに0を代入し、nextまで行くとiに1を加算します。i＜4であれば、forの始めに戻って繰り返します。 つまり、4回繰り返すということです。repeat 4と同じですが、変数がcntでかぶるので、こうしています。 noteget k,cnt*4+i は、rのcnt×4＋i行目を取り出してkに代入する命令です。 cntはrepeat〜loop内での現在の繰り返し回数なので、イベント命令を出力した回数と等しくなります。 1個出力するごとに４行ずつ進んでいきますから、cnt×4としています。 ４行分取り出すため、cnt×4、cnt×4＋1、cnt×4＋2、cnt×4＋3行目をそれぞれ取り出す必要があります。 i＝0〜3ですから、cnt×4＋iと書けば、それぞれの行が取り出せるようになりますね。 z+=k+"\n" で、zに取り出したkを加算、改行します。「\n」は改行の印です。 できあがったzを、msg z を使って文章の表示として出力。 最後にsendすれば出来上がりです。 そういうプログラムですよこれは。
|
│├相互変換モジュール
[ リスト | 詳細 ]
RPGツクール200Xのイベント命令とHSPとの相互変換を行う
相互変換モジュールの特集です。
モジュールの具体的な解説はその３からになります↓
http://blogs.yahoo.co.jp/fermiumbay2/38560312.html?type=folderlist
相互変換モジュールの特集です。
モジュールの具体的な解説はその３からになります↓
http://blogs.yahoo.co.jp/fermiumbay2/38560312.html?type=folderlist
コメント（4）
|
前回作ったクイズゲームのプログラムを、実行ファイルにしてみましょう。 実行ファイルにすることで、HSPをインストールしていない方のパソコンでも プログラムを起動することが出来るようになります。 send命令はHSP構文をイベント命令に変換してプログラムを終了させるものでしたが、 新たにsend 1と設定することでプログラムを終了させずに変換のみ行うように作り替えました。 これをver1.01としてアップロードします。てきとうに扱ってやってください。 ver1.01ダウンロード 今回作成するプログラムでは使いませんが、ふつうソフトはイベント命令をコピーしたからといって ソフトそのものも終了してしまう必要はありませんから、コピー後に終了しないときは上記の設定を用います。 それでは、実際にプログラムを作成してみます。 このプログラムは、起動すると出題数を聞かれ、それを入力してOKボタンを押すと 例のイベント命令がクリップボードにコピーされるように設定してみます。 まず、出題数を可変にできるようにするため、 #define mondai 3 ;出題数はここで決める（5なら5問） の行を削除します。 これ以外にいじるのは前回のプログラムに加えて、「// 本体」から先のみとします。 // 本体 mondai = 3 // 出題数の初期設定は3 screen 0, 160, 120 // 160×120のサイズのウィンドウを表示 input mondai,,,5 // 最大5桁まで入力可能の入力ボックス button "ＯＫ", *start // 「ＯＫ」ボタン（押すと*startへ飛ぶ） stop // プログラムを一時停止 *start // ラベル 初期処理 出題 結果発表 // 本体おわり dialog "コピーしました。" ;確認メッセージ send ↑まず、mondaiの値ははじめ3としておきます。 screenはウィンドウを作成する命令で、第１引数にウィンドウIDを入れれば そのウィンドウを新たに作成することが可能となります。 プログラムを何も書かなくても現れるウィンドウは0番ウィンドウです。 そのため、0番ウィンドウの大きさを160×120にするためにscreen 0, 160, 120という命令を入れています。 すでに存在するウィンドウを指定した場合、そのウィンドウを再編集します。 inputは、入力ボックスを作成する命令です。第１引数に入力ボックスに対応する変数名を入れます。 mondaiの値を入力するボックスにしたいので、mondaiと入力しています。 第２、第３引数で入力ボックスの大きさを変更できますが、どうでもいいので省略しています。 第４引数で入力ボックスに入れられる最大文字数（半角）を指定できます。とりあえず5桁としておきます。 buttonは、ボタンを作成する命令です。第１引数にボタンに書かれる文字を書きます。 第２引数で、ボタンを押すとどこへ飛ぶのかを指定します。「*start」とはラベルです。 ２行下にある「*start」というラベルへ飛ぶことになります。 このままではプログラムは入力ボックス、ボタンを作成した直後にイベント命令の貼り付けに行ってしまうので ボタンを押すまでプログラムが動かないよう、stopを挟んでおきます。 stopは、その行でプログラムを一時停止させる命令です。そこで止まります。 ボタンを押すと*startラベルへ飛ぶので、そこから次の処理が始まります。 ボタン作るにはbutton、入力ボックス作るにはinput、ウィンドウ作るにはscreen、とか…… HSPはこのようなものを作るのが非常に簡単ですね。どうなってるんだろう。 これでプログラムは完成です。実行すると出題数を変更できるようになっていることが確認できるでしょう。 次に、これを実際に実行ファイルにしてみます。 実行ファイルにするのも簡単です。Ctrl＋F9押すだけです。 「実行ファイルを作成しました」と表示されたら成功です。 同ディレクトリに「hsptmp.exe」というスープのファイルが出来上がっているはずです。 これを起動させると、そのプログラムが実行されます。HSPをインストールしていない環境でもおおかた動きます。 この名前は変えてしまって良いでしょう。「クイズ.exe」とか。 プログラム内でこの名前の変更をするようにもできますが、割愛しておきます。 このことを応用すれば、RPGツクールの支援装置を自作することが可能となります。
多用する機能があるならば、何か作っておいて損はないかもしれません。 |
|
クイズゲームでも作ってみましょう。 HSPには、とても簡単に文字列を扱える「メモリノートパッド命令」というのがありますので、 それを用いると外部ファイルの読み込みや書き込みがとても簡単に行えます。 Ｃ言語だとファイルのポインタを作ってfscanfしてとか色々必要ですが、 HSPはこのようにすれば外部ファイルを読み込めます。 r = "" // 文字列変数rを定義 notesel r // rをバッファに指定 noteload "メモ帳.txt" // 「メモ帳.txt」の内容を読み込んでrに入れる これでrに読み込み完了です。 mes r とすれば、読み込んだすべての文字を表示できます。 各行を取り出すには、更に次のようにします。 k = "" // 文字列変数kを定義 repeat notemax // r（指定したバッファ）の行数ぶんrepeat noteget k, cnt // kにrのcnt行目を代入 mes k // kを表示 loop ↑このようにすれば、一行ずつ取り出せます。 一番初めの行を「0行目」と数えることに注意です。 システム変数notemaxは、バッファに指定した変数の行数が返ります。 バッファに指定した変数のサイズを得るには、notesizeを使います。 命令noteselでバッファ指定、noteloadでバッファにファイル読み込み、 notegetで指定した行の文字列を別の変数に代入します。 今回使うのは読み込みだけなので、とりあえずこれまでにしておきます。 それでは、実際にクイズゲームを作ってみます。こんなかんじです。 #include "rpgfunc.as"
#define mondai 3 ;出題数はここで決める（5なら5問）
goto *@f
// 各命令の定義
#deffunc 初期処理
msg "ここいらで、ちと問題と参りましょう。"
sl "喜んで、承認しましょう", "拒否します"
slcase 1
slcase 2
msg "帰れよ"
hangup
slend
r = "" : k = "" ;文字列変数rとkを定義
notesel r ;rをバッファに指定
noteload "もんだい.txt" ;「もんだい.txt」をrに入れる
max = notemax/5 ;変数maxに、「もんだい.txt」の行数÷5を代入
if mondai > max { ;出題数が問題の総数より多いなら
dialog "問題の総数" + max + "問に対し、\n出題数" + mondai + "問は多すぎます。", 1
end ;エラーで終了
}
varsel 1, 2 : var 0, 0, 0, 0 ;変数1番「問題数」と変数2番「正解数」を0にする
swi 1, max, 0 ;スイッチ1番〜max番までをOFFする
msg "では、問題です。"
return
#deffunc 出題
label 1 ;ラベル1番
varsel 3 : var 0, 3, 1, max ;変数3番「問題番号」に乱数1〜maxを代入
repeat max ;問題数分くりかえす
co 1, 3, 0, cnt+1 ;変数3番がcnt+1だと
co 0, cnt+1, 1 ;スイッチcnt+1番がONだと（出題済み）
golabel 1 ;ラベル1番に戻る
coend
noteget k, 5*cnt ;5*cnt行目をkに代入
msg k ;問題文表示
;si(0)〜si(2)にそれぞれ選択肢の文を代入
noteget k, 5*cnt+1 : si(0) = k
noteget k, 5*cnt+2 : si(1) = k
noteget k, 5*cnt+3 : si(2) = k
noteget k, 5*cnt+4 ;次の行を代入
seikai = int(k) ;正解の番号を数値に変換して取得
sl si(0), si(1), si(2), , 0 ;選択肢si(0)〜si(2)
repeat 3, 1
slcase cnt
if cnt = seikai { ;選択肢番号と正解番号が同じなら
msg "せいかい！"
varsel 2 : var 1, 0, 1 ;正解数に1加算
}
else{ ;違ったら
msg "まちがいー！"
}
loop
slend
swi cnt+1, , 1 // cnt+1番スイッチをON（同じ問題が出ないように）
coend
loop
varsel 1 : var 1, 0, 1 ;問題数に1加算
co 1, 1, 0, mondai, 4 ;変数1番「問題数」がmondai未満なら
golabel 1 ;ラベル1番に戻る
coend
return
#deffunc 結果発表
msg "終わりじゃ！\n結果発表をするぞ。"
msg "正解数は" + mondai + "問中\\V[2]問でございます。\nごちそうさまでした。"
return
// 各命令の定義おわり
*@
// 本体
初期処理
出題
結果発表
// 本体おわり
dialog "コピーしました。" ;確認メッセージ
send
「もんだい.txt」を読み込んで実行します。 「もんだい.txt」の例…… ベイ助の色は？ 青 黄 赤 3 ベイ太の初期レベルは？ ５ ６ ７ 2 ＢＡＤＥＮＤの総数は？ １２ １４ １５ 2 ベイ助が主人公なのは？ 愛花ちゃんのままごと First Challenger セーフティ･エリア 3 オイラーの定数は？ γ ｅ π 1 １行目に問題文、２行目、３行目、４行目に選択肢を書きます。 ５行目に、どの選択肢が正解かの値を書きます。1なら1番目。 こうしてプログラムを実行すれば、「もんだい.txt」から問題数を自動で読み込み、 出題数分だけ問題を出すイベント命令として出力されます。 同じ問題が重複して出題されないよう、各問題番号のスイッチをONするようにしています。 よって、問題数の分だけスイッチが必要なようにしています。 スイッチには変数の番号が使用できないためツクールで扱うには一つ一つ設定しなければなりませんが、 このようにプログラムに任せてしまうことで、何もしなくて良いことになります。 問題を編集するには「もんだい.txt」のみをいじれば良いです。 問題を作り終わったらプログラムを実行して貼り付ければ良いだけです。 （出題数を変える場合は、プログラムの一番上にあるmondaiの値を変えます） #defineは、マクロ定義というものです。ここではmondaiを3としなさいとしています。 dialogは、ダイアログボックスの表示です。 出題数の方が問題数より多いといけませんので、そのときは終了させるようにしています。 5*cntとか、5*cnt+1とかの理屈は、ツクールでバトルイベントの開始条件に 5xターンとか5x+1ターンとか設定するのと同じような感じです。 int()は、かっこの中身のものを整数型に変換する関数です。 文字列型の配列変数を作る命令はsdimというのですが、使わなくてもいきなり使えてしまえます。 配列は0番からスタートするので、0番の配列を初めに使っています。 si(0)が、siの0番、si(1)が、siの1番、si(2)が、siの2番、というわけです。 配列の番号はこのようにかっこを使うほか、si.0、si.1、si.2、といった書き方もできます。 けっこう中身は長いですが、まあまあ、単純なことをしています。
ツクールに貼り付けてしまえばこういうものだと分かることでしょう＾＾ |
|
イベント命令の簡略化についてやってみます。 ハノイの塔を作ってみましょう。 ハノイの塔ってなんだって？？ これは…… ウィキペディアをお読み下さい＾＾； いわゆる古典的なパズルですが、RPGツクールでさあ作ろうと思っても どこから手を付けていいかなかなか分かりづらいものです。 そこで、どのように作ろうか、大まかな手順をまず考えます。 � ）膺瑤魴茲瓩� �◆―猗�する �� ハノイの塔を画面に表示する �ぁ．�リアしていたら、終了する �ァ．�リアしていなかったら、板を移動して、��に戻る ↑こういった感じになるでしょうね。 私は今までこんなこと考えずに、ただ闇雲にイベント命令を組んでいっていたため、 システムが複雑になってわけがわからなくなってしまっていたのです。 いま作っているRPGが一向に進まないのもそのせいです。めちゃくちゃになってうんざりしてたのです。 そこで、ここでは相互変換モジュールを使って簡潔にシステムを書くことを目指しましょう。 『ハノイの塔.hsp』 #include "ハノイの塔.as" 質問 // 枚数をプレイヤーに入力してもらう 初期化 // 変数の初期化 cy 表示 // 板を表示 終了判定 // 残り回数が0になったら終了 移動 // 板を移動させる cyend send ↑ cy 〜 cyend は繰り返しの処理です。 上で書いた手順そのものではありませんか。そうです、そのものです。 こうやって、個々の処理をまとめていくことにより、簡潔にシステムを記述することができ、 なおかつバグが発生したときにどの命令が原因なのかというのを把握しやすくなります。 個々の命令がどうなっているかというと、こうなっています。 『ハノイの塔.as』 #include "rpgfunc.as" goto *@f #deffunc 質問 msg "枚数は？（1〜13）" number 2, 1 co 1, 1, 0, 0, 0 msg "それはダメだよ……" hangup coend co 1, 1, 0, 14, 1 msg "それはダメだよ……" hangup coend return #deffunc 初期化 varsel 2 : var 0, 0, 1, 0 varsel 3 : var 0, 1, 1, 0 varsel 3 : var 1, 0, 20, 0 cy varsel 2 : var 3, 0, 2, 0 varsel_var 3 : var 0, 0, 0, 0 varsel 3 : var 2, 0, 1, 0 co 1, 3, 0, 20, 0 varsel 2 : var 2, 0, 1, 0 cybreak coend cyend pic 1, "土台", , , , , , 1 return #deffunc 表示 varsel 4, 6 : var 0, 0, 205, 0 varsel 3 : var 0, 1, 1, 0 varsel 3 : var 1, 0, 20, 0 cy varsel 7 : var 0, 2, 3, 0 varsel 7 : var 3, 0, 105, 0 varsel 7 : var 1, 0, 55, 0 varsel 8 : var 0, 2, 3, 0 varsel 8 : var 1, 0, 4, 0 varsel_var 8 : var 2, 0, 10, 0 varsel 8 : var 0, 2, 8, 0 repeat 13, 1 co 1, 3, 0, 20 + cnt, 0 pic cnt + 1, "板" + cnt, 1, 7, 8 coend loop varsel 3 : var 2, 0, 1, 0 co 1, 3, 0, 20, 0 cybreak coend cyend pause 3 return #deffunc 終了判定 co 1, 2, 0, 0, 0 msgop 1, 0, 0, 1 msg "【終了】" msgop 0, 2, 0, 1 repeat 14, 1 picdel cnt loop hangup coend varsel 2 : var 2, 0, 1, 0 return #deffunc 移動 varsel 7 : var 0, 1, 2, 0 varsel 7 : var 5, 0, 2, 0 co 1, 7, 0, 0, 0 rem "【回数が奇数の場合】" varsel 21 : var 1, 0, 1, 0 varsel 21 : var 5, 0, 3, 0 coelse rem "【回数が偶数の場合】" varsel 3 : var 0, 0, 21, 0 varsel 7 : var 0, 0, -1, 0 cy varsel 8 : var 0, 2, 3, 0 co 1, 7, 1, 8, 5 co 1, 7, 0, -1, 0 varsel 7 : var 0, 1, 8, 0 coelse varsel_var 3 : var 0, 1, 7, 0 varsel_var 3 : var 1, 1, 8, 0 varsel_var 3 : var 2, 0, 3, 0 varsel_var 3 : var 3, 0, -1, 0 cybreak coend coend varsel 3 : var 1, 0, 1, 0 cyend coend return *@ 長い長い……でも、一つ一つの命令は簡潔しているので、 小さなかたまりが連なっているだけです。 拡張子「.as」にするとこれはヘッダファイルと呼ばれるものになります。 『ハノイの塔.as』というのは、『ハノイの塔.hsp』のヘッダファイルです。 分かりやすいように、同名にして拡張子だけ変えています。 「.as」の方に個々の命令をそれぞれ格納しておき、本体を「.hsp」の方だけに書けば、 非常に簡潔にまとまって見やすいものになると思います。 おかしなことが起こったら、デバッグの際にメッセージか何かを本体の方に入れれば どの命令がおかしいのか確認できますねぇ。 「.as」を取り込む命令が、「#include」になります。「.hsp」の先頭に書いてありますね。 その名の通り、ソースファイルを「含む」のです。 「.as」のソースすべてを「#include "ハノイの塔.as"」の一行で済ますわけですね。 「.hsp」の方を簡潔にするために、「.as」の先頭に「#include "rpgfunc.as"」と書いてあります。 もちろん、「.hsp」の方で書いても構いません。 このことからお分かり頂けますでしょうが、「rpgfunc.as」もまたヘッダファイルです。 これをインクルードすることによって、「msg」とか「send」とかが使えるようになるわけです。 「goto *@f」は、次の「*@」がある行まで飛ぶ、という命令です。 「goto *@f」から「*@」の間に、個々の命令の内容を記述していきます。 命令を作るには、「#deffunc 命令名」から「return」までの間に内容を記述します。 命令名には日本語が使えます。上の例でも使っていますが……命令名には引用符は付けません。 命令の内容はツクールの方で作成し、それを相互変換を用いて HSPにして「.as」に格納していく、といったことをすると良いでしょう。 動作確認をするときは「.hsp」の方で実行してすべての命令を クリップボードにコピーし、ツクールに貼り付けることにします。 修正する場合はHSPの方を手直しし（時々相互変換しながら）、再度動作確認をするときは ツクールに前回貼り付けた分をすべて削除して、新しく貼り付ければそれで済みます。 ↑ハノイの塔の個々の命令で何をやっているのかは割愛しています…… ご要望があればご説明しますが、ただ単に、ハノイの塔をやっているだけです＾＾； 「.hsp」を開いてF5を押してツクールに貼り付ければ、ちゃんと動作するはずです。 次の変数を使用しています。 変数 １番：枚数 変数 ２番：残り回数 変数 ３番：枚数一時 変数 ４番：柱１ y座標 変数 ５番：柱２ y座標 変数 ６番：柱３ y座標 変数 ７番：一時１ 変数 ８番：一時２ 変数２１番：位置（１枚目） 変数２２番：位置（２枚目） 変数２３番：位置（３枚目） 変数２４番：位置（４枚目） 変数２５番：位置（５枚目） 変数２６番：位置（６枚目） 変数２７番：位置（７枚目） 変数２８番：位置（８枚目） 変数２９番：位置（９枚目） 変数３０番：位置（１０枚目） 変数３１番：位置（１１枚目） 変数３２番：位置（１２枚目） 変数３３番：位置（１３枚目） このように命令を簡略化することにより、個々の命令そのものはどのようにして動いているのか知らなくても
「.hsp」だけを見れば大体こういう風に動いているのかと分かるというメリットもあります。 だんだんオブジェクト指向な感じになってきましたねええ。 |
|
空中に浮いたゲージを作ってみましょう。 これを作るにはゲージのすべての表示のパターンを作らなければならないので、 とても面倒な作業として敬遠されがちです。 しかし単調作業を大量に行う問題は、相互変換モジュールによってすべて解決します＾＾ まずは空中ゲージを作ってみましょう。 ゲージはこの記事で使っていたものを使い回します。 HSPを用いることで、大量の画像保存が容易となります。 画像そのものをHSPで作ることも当然できますが、説明が多くなってしまいますので、 ここではサンプルを挙げておきます。 「ゲージ」「ゲージ枠」「ゲージの上のゲージ枠」の３種類の画像を用意し、読み込ませると 自動ですべての場合のゲージ画像を生成するものです。 「ゲージの上のゲージ枠」とは、↑上の記事でいう「ゲージ枠2」のことです。 dim sx, 4 : dim sy, 4
dim pos_x, 4 : dim pos_y, 4
// ----↓変える場所-----------------------------------------------------
buffer 1 : picload "ゲージ.bmp" : sx.1 = ginfo_sx : sy.1 = ginfo_sy
buffer 2 : picload "ゲージ枠.bmp" : sx.2 = ginfo_sx : sy.2 = ginfo_sy
buffer 3 : picload "ゲージ枠2.bmp" : sx.3 = ginfo_sx : sy.3 = ginfo_sy
pos_x.1 = 2 : pos_y.1 = 2
pos_x.3 = 0 : pos_y.3 = 2
name = "空中ゲージ"
// ----↑変える場所-----------------------------------------------------
bgscr 0, sx.2, sy.2
repeat sx.1 + 1
pos 0, 0 : gcopy 2, 0, 0, sx.2, sy.2
pos pos_x.1-cnt, pos_y.1 : gcopy 1, 0, 0, sx.1, sy.1
pos pos_x.3 , pos_y.3 : gcopy 3, 0, 0, sx.3, sy.3
bmpsave name + strf("%02d",sx.1-cnt) + ".bmp"
wait 1
loop
dialog "保存完了しました。" : end
↑「変える場所」の所だけ変えてください。 初めの３行で画像ファイルの名前を入力し、座標(0，0)をゲージ枠の左上座標として、 ４行目に「ゲージ」（MAX時）の左上座標、５行目に「ゲージ枠2」の左上座標を入力、 ６行目に保存する画像ファイルの名前を入力します。 この場合は「ゲージ」が(2，2)、「ゲージ枠2」が(0，2)ですね。 このプログラムファイルは、どこかてきとうな場所に保存しておきましょう。 入力し終わったら、F5で実行してください。 プログラムを保存したディレクトリに、生成された画像が保存されていくはずです。 ゲージ0の画像から、80の画像まで、81個の画像が生成されました。 ちゃんとできているか、確認してくださいね＾＾； このままでは使えないので、減色ソフトなどを用いてこれらを減色してください。 私はNanさんのすすめから、Irfan viewというフリーソフトを使っています。 一括変換できるものがやっぱり望ましいでしょう…… そして、これら81個の画像をインポートするのですが、やっぱりめんどくさいです。 実はbmpはインポートしなくてもそのまま利用することができますので、 RPGツクールのPictureフォルダにそのままぶちこんでやりましょう。これでOKです。 うまくいくと、このように利用することができます。 減色とかしていないと、プレビューに表示されないことがありますので、ご確認ください。 さあ、ゲージの値によって表示するピクチャーを変える命令を作りましょう。 相互変換モジュールでこういったものを作るとき、 とりあえずまずてきとうに１個分の命令を作り、それを変換して改変するといった手法が良いと思います。 repeat 81
co 1, 14, 0, cnt, 0
pic 1, "空中ゲージ"+strf("%02d",cnt), , 55, 15
coend
loop
↑これで良いです。 条件分岐に用いる変数は１４番「ゲージx」としました。 このゲージの表示位置はもともと(42，6)だったのですが、試しに、(55，15)にしてみて、 ちゃんと空中に浮いたゲージになっているか確認しましょう。 このファイル名は「空中ゲージ」の名前の直後に「00」〜「80」といった 2桁の数が付くようになっています。 そうすると、単純に "空中ゲージ"+cnt としただけでは 「空中ゲージ0」とかいう名前になって、「空中ゲージ00」とはならないので、 値が2桁以下のときは必ず2桁で表示することができる関数のstrfを用います。 「strf("%02d",cnt)」と書くと、「cnt」という変数を2桁で表示するという意味になります。 C言語をやったことのある方なら、これはprintfそのものだとお分かりでしょう。 これはprintfと同じようなことができる関数です。 ということで、上のプログラムをsendすれば、RPGツクール用の命令になります。 コモンイベント「ゲージ移動」（開始条件：呼び出されたときのみ） ◆変数の操作：[0014:ゲージx]代入，変数[0013]の値 ◆条件分岐：変数[0013:ため量]が48以上 ◆変数の操作：[0014:ゲージx]代入，48 ◆ ：分岐修了 ◆変数の操作：[0014:ゲージx]乗算，80 ◆変数の操作：[0014:ゲージx]除算，48 ◇ ← ここで「貼り付け」 ↑◇の部分で、sendされたイベント命令を貼り付ければ完成です。 ため量をゲージの値に変換し、その値によって表示するピクチャーを変えます。 この場合はため量の限界値の方が小さい（48）ので、非効率ですが……例ですこれは。 この空中ゲージはピクチャー１番だけで表示できますので、初期設定の際に ゲージやゲージの枠を表示する命令は削除しておいてください。 実際にゲージが表示できることを確認しましょううね。 ただ、この命令は「ピクチャーの表示」が多用されますから、
重いパソコンの場合はうまく動かないでしょう。 実際にこのようなことをする場合は対策としてウェイトを入れるなど、工夫をする必要があります。 |
