-コモンイベントを自作するや改造するときなどに参考にするコード。
-要バックアップ。別途にWRPGを入れて使うのがいいか(？)。
-※こちらはテキストベースです。コモンファイルのものは[[自作コモンイベント]]に追加編集してください。
#contents
//更新時メモ
//08-11-04
//いくら視覚的に分かりやすくても煩雑になってきているので改良を考え中。それと解説がおかしい箇所は直してくださいorz
*アニメーションのサンプル例 [#e9f0edc5]
-ピクチャ番号10000を使って5フレーム間隔でアニメーションさせるコモン。
-ピクチャ番号や各Evｾﾙﾌは必要に応じて変更。
入力は整数:4,文字列:1で
ｾﾙﾌ0,1が表示座標,2,3が画像の分割数,
5が画像ファイル名
■変数操作: このｺﾓﾝEvｾﾙﾌ4 = このｺﾓﾝEvｾﾙﾌ2 * このｺﾓﾝEvｾﾙﾌ3
■ピクチャ表示：10000 ﾌｧｲﾙ(このｺﾓﾝEvｾﾙﾌ5) X:このｺﾓﾝEvｾﾙﾌ0 Y:このｺﾓﾝEvｾﾙﾌ1 0(0)ﾌﾚｰﾑ ※位置は中心,分割数は横このｺﾓﾝEvｾﾙﾌ2,縦このｺﾓﾝEvｾﾙﾌ3
■変数操作: このｺﾓﾝEvｾﾙﾌ10 = 1 + 0
■変数操作: このｺﾓﾝEvｾﾙﾌ11 = 0 + 0
■回数付きループ [ このｺﾓﾝEvｾﾙﾌ4 ]回
｜■ピクチャ移動：10000 相対X:0 Y:0 0(このｺﾓﾝEvｾﾙﾌ11)ﾌﾚｰﾑ ※パターンはこのｺﾓﾝEvｾﾙﾌ10,他は同値
｜■変数操作: このｺﾓﾝEvｾﾙﾌ10 += 1 + 0
｜■変数操作: このｺﾓﾝEvｾﾙﾌ11 += 5 + 0
｜■
◇ループここまで◇
■ピクチャ消去：10000 0(このｺﾓﾝEvｾﾙﾌ11)フレーム
■
*ロード時、最後にセーブしたデータに初期位置を合わせる改造例 [#e9458fce]
-ｺﾓﾝEV054 323行目に以下を追加(目印は「▼ セーブの場合」)
-各セーブデータのこの変数を比較し、最も数値の大きい位置にカーソルを合わせる。
｜｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ51 = Sys77:現在の[年] * 10000
｜｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ51 += Sys78:現在の[月] * 100
｜｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ51 += Sys79:現在の[日] + 0
｜｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ52 = Sys80:現在の[時] * 10000
｜｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ52 += Sys81:現在の[分] * 100
｜｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ52 += Sys82:現在の[秒] + 0
*タイトル画面の前にロゴを表示してみる [#l2e17f96]
-最初に読み出されるマップは0番なので0番のイベントから呼び出すなり書き込むなりする。
-タイトルに戻るを選ぶと毎回ロゴが表示されて喧しいのでタイトル画面をマップ1番に指定している。
-ピクチャ表示番号やウェイト数値は任意のものを指定する(サンプルは0番)。
Evｾﾙﾌ5=ロゴファイルを指定
Evｾﾙﾌ6=ブラックアウトなら黒塗り画像。ホワイトアウトなら白塗り画像を指定
■ﾄﾗﾝｼﾞｼｮﾝﾀｲﾌﾟ指定:[なんかのﾄﾗﾝｼﾞｼｮﾝ]100ﾌﾚｰﾑ
■ﾄﾗﾝｼﾞｼｮﾝ準備
■ﾄﾗﾝｼﾞｼｮﾝ実行
■ﾋﾟｸﾁｬ表示:0ﾌｧｲﾙ (このｺﾓﾝEvｾﾙﾌ5) X:0 Y:0 0(0)ﾌﾚｰﾑ ※位置は中心
■ｳｪｲﾄ:100
■ﾄﾗﾝｼﾞｼｮﾝ指定:[なんかのﾄﾗﾝｼﾞｼｮﾝ]100ﾌﾚｰﾑ
■ﾄﾗﾝｼﾞｼｮﾝ準備
■ﾄﾗﾝｼﾞｼｮﾝ実行
■ﾋﾟｸﾁｬ消去:0(0フレーム)
■ﾋﾟｸﾁｬ表示:0ﾌｧｲﾙ (このｺﾓﾝEvｾﾙﾌ6) X:0 Y:0 0(0)ﾌﾚｰﾑ ※位置は中心
■ｳｪｲﾄ:100
■ﾋﾟｸﾁｬ消去:1(0フレーム)
■ﾄﾗﾝｼﾞｼｮﾝﾀｲﾌﾟ指定:[瞬間移動]50ﾌﾚｰﾑ
■ﾄﾗﾝｼﾞｼｮﾝ準備
■場所移動 マップ1番 位置適当
■ﾄﾗﾝｼﾞｼｮﾝ実行
▼以降タイトル画面起動時のイベントをがちゃがちゃ挿入
*キーを押したときに動するイベントと押し続けた場合の変数を求める [#ga9598f2]
-サンプルでは「決定キー」となっているが変更すれば特定キーでイベントを起こせる。
-押された分の変数を求めているので求めた変数を用いて色々動かせる。
**押しただけの場合を取り扱う一例 [#ke7cf6f7]
-「入力待ち」ではないので押しっぱなしにしても動く
ｺﾓﾝEvｾﾙﾌ0は決定キー(10)が押されているか否か
ｺﾓﾝEvｾﾙﾌ1は現在イベントを実行中か否か
■ループ開始
｜■キー入力：このｺﾓﾝEvｾﾙﾌ変数0 / 決定(10)
｜■条件分岐(変数):【1】このｺﾓﾝEvｾﾙﾌ0がこのｺﾓﾝEvｾﾙﾌ1以外
｜◇分岐： 【1】[このｺﾓﾝEvｾﾙﾌ0がこのｺﾓﾝEvｾﾙﾌ1以外]の場合↓
｜｜■条件分岐(変数): 【1】このｺﾓﾝEvｾﾙﾌ0が10と同じ
｜｜◇分岐： 【1】[このｺﾓﾝEvｾﾙﾌ0が10と同じ]の場合↓
｜｜｜■処理実行
｜｜◇分岐終了◇
｜｜■
｜◇分岐終了◇
｜■変数操作: このｺﾓﾝEvｾﾙﾌ1 = このｺﾓﾝEvｾﾙﾌ0 + 0
｜■ウェイト：1 フレーム
｜■
◇ループここまで◇
**押し続けていた場合の変数を求めてみる一例 [#y8c0e438]
-通常変数V0を用いてどれだけ決定キーが押されているかを調べるサンプル。
V0とは決定キーを押し続けていた場合に変動する変数(初期値0/上限2)
こちらは1ずつ加算される。
■キー入力：このｺﾓﾝEvｾﾙﾌ変数0 / 決定(10)
■条件分岐(変数): 【1】このｺﾓﾝEvｾﾙﾌ0が0と同じ
◇分岐： 【1】 [ このｺﾓﾝEvｾﾙﾌ0が0と同じ ]の場合↓
｜■変数操作: V0[GetKey_Z] = 0 + 0
｜■
◇上記以外
｜■変数操作: V0[GetKey_Z] += 1 + 0
｜■変数操作: V0[GetKey_Z] 上限= 2 + 0
｜■
◇分岐終了◇
並列実行ならばシンプルに考えてこちらを先に動かしてしまうといいかもしれない。
V0とは決定キーが押されたフレーム数の分だけ10になる変数(押されていないときは0)
単純にキーが押されているかいないかだけを取りたいなら、
そのイベント内で別に入力待ち無しのキー入力コマンドを使用すればよい。
■ループ開始
｜■変数操作：V0=0
｜■キー入力：V0/決定キー(入力待ち)
｜■
◇ループここまで◇
*時間計測のサンプル例 [#d590c01d]
-フレームではなくﾐﾘ秒単位の時間計測をしてウェイトをかけるためのコモンです。
-ﾐﾘ秒単位とは言っても、1フレームの長さより短い単位では計測できません。
-FPSに左右されずにほぼ正確なウェイトがかけれるので、音楽と画面表示との同期などに使用できるかと思います。
入力は整数:2
ｾﾙﾌ0:処理内容(選択肢手動設定で、0:基点設定、1:指定時間までウェイト)
ｾﾙﾌ1:待ち時間(ﾐﾘ秒)
■条件分岐(変数): 【1】このｺﾓﾝEvｾﾙﾌ0が0と同じ 【2】このｺﾓﾝEvｾﾙﾌ0が1と同じ
◇分岐： 【1】 [ このｺﾓﾝEvｾﾙﾌ0が0と同じ ]の場合↓
｜▼ 時間計測の基点を設定する。とりあえずここは現在のプレイ時間を保存するだけ
｜■変数操作: このｺﾓﾝEvｾﾙﾌ10 = Sys29:[読]プレイ時間（1秒単位） + 0
｜■変数操作: このｺﾓﾝEvｾﾙﾌ11 = Sys30:[読]プレイ時間(ﾐﾘ秒単位) + 0
｜■
◇分岐： 【2】 [ このｺﾓﾝEvｾﾙﾌ0が1と同じ ]の場合↓
｜▼ 基点からの時間経過が待ち時間(ﾐﾘ秒)を超えるまでウェイトする
｜■ループ開始
｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ12 = Sys29:[読]プレイ時間（1秒単位） - このｺﾓﾝEvｾﾙﾌ10
｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ12 *= 1000 + 0
｜｜■変数操作: このｺﾓﾝEvｾﾙﾌ12 += Sys30:[読]プレイ時間(ﾐﾘ秒単位) - このｺﾓﾝEvｾﾙﾌ11
｜｜■条件分岐(変数): 【1】このｺﾓﾝEvｾﾙﾌ12がこのｺﾓﾝEvｾﾙﾌ1以上
｜｜ ◇分岐： 【1】 [ このｺﾓﾝEvｾﾙﾌ12がこのｺﾓﾝEvｾﾙﾌ1以上 ]の場合↓
｜｜｜■ループ中断
｜｜｜■
｜｜◇分岐終了◇◇
｜｜■ウェイト：1 フレーム
｜｜■
｜◇ループここまで◇◇
｜■
◇分岐終了◇◇
■
*データベースコピーの例 [#i862476f]
-汎用性を付けたデータベースコピーのコモン。
-コピー元udbﾀｲﾌﾟに100〜、300〜を指定することで、可変DB、システムDBからのコピーも可能。
入力は整数:4
ｾﾙﾌ0:ｺﾋﾟｰ元udbﾀｲﾌﾟ
ｾﾙﾌ1:ｺﾋﾟｰ元ﾃﾞｰﾀNo.
ｾﾙﾌ2:ｺﾋﾟｰ先cdbﾀｲﾌﾟ
ｾﾙﾌ3:ｺﾋﾟｰ先ﾃﾞｰﾀNo.
■DB読込(ﾕｰｻﾞ)： このｺﾓﾝEvｾﾙﾌ10 = ﾕｰｻﾞDB[ﾀｲﾌﾟこのｺﾓﾝEvｾﾙﾌ0の内容数]
■変数操作: このｺﾓﾝEvｾﾙﾌ11 = 1100000000 + 0
■変数操作: このｺﾓﾝEvｾﾙﾌ11 += このｺﾓﾝEvｾﾙﾌ2 * 1000000
■変数操作: このｺﾓﾝEvｾﾙﾌ11 += このｺﾓﾝEvｾﾙﾌ3 * 100
■変数操作: このｺﾓﾝEvｾﾙﾌ12 = 0 + 0
■回数付きループ [ このｺﾓﾝEvｾﾙﾌ10 ]回
｜■DB読込(ﾕｰｻﾞ)： V[このｺﾓﾝEvｾﾙﾌ11] = ﾕｰｻﾞDB[このｺﾓﾝEvｾﾙﾌ0:このｺﾓﾝEvｾﾙﾌ1:このｺﾓﾝEvｾﾙﾌ12]
｜■変数操作: このｺﾓﾝEvｾﾙﾌ10〜このｺﾓﾝEvｾﾙﾌ11 += 1 + 0
｜■
◇ループここまで◇◇
■
*データベースのデータ入れ替えの例 [#p0a293b1]
-データ1とデータ2を入れ替えます。
入力は整数:3
ｾﾙﾌ0:可変DBﾀｲﾌﾟ番号
ｾﾙﾌ1:データ1
ｾﾙﾌ2:データ2
■DB読込(可変)： このｺﾓﾝEvｾﾙﾌ10 = 可変DB[ﾀｲﾌﾟこのｺﾓﾝEvｾﾙﾌ0の内容数]
■変数操作: このｺﾓﾝEvｾﾙﾌ11 = 1100000000 + 0
■変数操作: このｺﾓﾝEvｾﾙﾌ11 += このｺﾓﾝEvｾﾙﾌ0 * 1000000
■変数操作: このｺﾓﾝEvｾﾙﾌ11 += このｺﾓﾝEvｾﾙﾌ1 * 100
■変数操作: このｺﾓﾝEvｾﾙﾌ12 = 0 + 0
■回数付きループ [ このｺﾓﾝEvｾﾙﾌ10 ]回
｜■変数操作: このｺﾓﾝEvｾﾙﾌ13 = V[このｺﾓﾝEvｾﾙﾌ11] + 0
｜■文字列操作：このｺﾓﾝEvｾﾙﾌ5 = "\cdb[\cself[0]:\cself[1]:\cself[12]]"
｜■変数操作: V[このｺﾓﾝEvｾﾙﾌ11] = 0 + 0
｜■文字列操作：このｺﾓﾝEvｾﾙﾌ6 = "\cdb[\cself[0]:\cself[1]:\cself[12]]"
｜■DB読込(可変)： V[このｺﾓﾝEvｾﾙﾌ11] = 可変DB[このｺﾓﾝEvｾﾙﾌ0:このｺﾓﾝEvｾﾙﾌ2:このｺﾓﾝEvｾﾙﾌ12]
｜■条件分岐(文字): 【1】このｺﾓﾝEvｾﾙﾌ変数6 が"" と同じ 【2】このｺﾓﾝEvｾﾙﾌ変数6 が"0" と同じ
｜ ◇分岐： 【1】 [ このｺﾓﾝEvｾﾙﾌ変数6 が"" と同じ ]の場合↓
｜｜■可変DB書込：DB[このｺﾓﾝEvｾﾙﾌ0:このｺﾓﾝEvｾﾙﾌ2:このｺﾓﾝEvｾﾙﾌ12] = このｺﾓﾝEvｾﾙﾌ5
｜｜■
｜ ◇分岐： 【2】 [ このｺﾓﾝEvｾﾙﾌ変数6 が"0" と同じ ]の場合↓
｜｜■可変DB書込：DB[このｺﾓﾝEvｾﾙﾌ0:このｺﾓﾝEvｾﾙﾌ2:このｺﾓﾝEvｾﾙﾌ12] = このｺﾓﾝEvｾﾙﾌ13
｜｜■
｜◇分岐終了◇◇
｜■変数操作: このｺﾓﾝEvｾﾙﾌ11〜このｺﾓﾝEvｾﾙﾌ12 += 1 + 0
｜■
◇ループここまで◇◇
■
-補足説明&br;
一見ではおそらく理解できないだろうと思います。この処理は一体何なんだろうと思うようなものがいくつかあるでしょう。&br;
データの型が文字列か整数かによって処理方法が変わるためにこのような方法を取っています。&br;
まずは6、7行目。この時点では、データの型は不明です。そこで、とりあえずバックアップを取っておきます。&br;
この代入方法では、型が違っていてもエラーは発生しません。ただし、文字列をｾﾙﾌ13に代入しても0になるだけです。&br;
8行目では、バックアップを取ったデータに0を代入しています。&br;
この方法で文字列変数に数値を代入すると普通はエラーが発生しますが、なぜか0を代入したときに限ってエラーが発生しません。&br;
その代わり、文字列の内容は空になります。&br;
つまり、データ型が文字列の場合は内容が""に、整数の場合は0になるわけです。&br;
後はこれを文字列として比較することで、データ型の判別ができる、というわけです。&br;
*開平法によるルート計算 [#x2bbf037]
-ほんの十数行でできるルート近似値の計算。
-入力値（開く数）＝ｺﾓﾝEvｾﾙﾌ0、結果＝このｺﾓﾝEvｾﾙﾌ20
■変数操作: このｺﾓﾝEvｾﾙﾌ10 = -1 + 0
■変数操作: このｺﾓﾝEvｾﾙﾌ20 = 0 + 0
■ループ開始
｜■条件分岐(変数): 【1】このｺﾓﾝEvｾﾙﾌ0が0以下
｜ ◇分岐： 【1】 [ このｺﾓﾝEvｾﾙﾌ0が0以下 ]の場合↓
｜｜■ループ中断
｜｜■
｜◇分岐終了◇◇
｜■変数操作: このｺﾓﾝEvｾﾙﾌ10 += 2 + 0
｜■変数操作: このｺﾓﾝEvｾﾙﾌ0 -= このｺﾓﾝEvｾﾙﾌ10 + 0
｜■変数操作: このｺﾓﾝEvｾﾙﾌ20 += 1 + 0
｜■
◇ループここまで◇◇
■
-精度を高めたい場合は入力値としてこのｺﾓﾝEvｾﾙﾌ1を小数点以下桁数とし、一行目で
■変数操作: このｺﾓﾝEvｾﾙﾌ11 = 1 + 0
■ループ開始
｜■条件分岐(変数): 【1】このｺﾓﾝEvｾﾙﾌ1が0以下
｜ ◇分岐： 【1】 [ このｺﾓﾝEvｾﾙﾌ1が0以下 ]の場合↓
｜｜■ループ中断
｜｜■
｜◇分岐終了◇◇
｜■変数操作: このｺﾓﾝEvｾﾙﾌ11 *= 100 + 0
｜■変数操作: このｺﾓﾝEvｾﾙﾌ1 -= 1 + 0
｜■
◇ループここまで◇◇
■このｺﾓﾝEvｾﾙﾌ0 *= このｺﾓﾝEvｾﾙﾌ11 + 0
とでもしてやれば良い。&br;
ただし、あまり小数点以下桁数を増やすと開平中に1フレーム当たりの処理が50000を越えてしまうので、1000周に一回程度のウェイトを挟んでやると良いかもしれない。
トップ
使い方