| どうも。上条です。
*プロローグ:
Global ユニット経験値
Exit
#Global変数はプロローグで宣言するだけでＯＫです。
*破壊 敵:
*破壊 中立:
#攻撃後イベントは破壊時には発動しないので、破壊イベントが必要です。
If Party(相手ユニットＩＤ) <> 味方 Exit
*攻撃後 全 味方:
#破壊イベントにあわせ、対象ユニットと相手ユニットを入れ替えました。
Local 敵ユニットランク 味方ユニットランク 敵ユニット経験値 ユニットニックネーム
#インクルード内だけで用いられる変数であれば、Local変数の宣言をしておくとよいでしょう。
ユニットニックネーム = Nickname(相手ユニットＩＤ) ランク上昇値
味方ユニットランク = Rank(相手ユニットＩＤ)
If 味方ユニットランク = 10 Exit
#これは一応。
敵ユニットランク = Rank(対象ユニットＩＤ)
味方ユニット経験値上限[相手ユニットＩＤ] = Int(Info(ユニット,相手ユニットＩＤ,経験値) * (5 + (味方ユニットランク * 0.5)))
#ランクに関わらず一定というのは…と思いましたので。
#不要だと思ったら戻してください。
敵ユニット経験値 = Int(Info(ユニット,対象ユニットＩＤ,経験値) * (1 + (敵ユニットランク * 0.05)))
#前のままですと、倍率がおかしいように思いましたので。
#ここはあくまで提案という形にしておきます。
If HP(対象ユニット) <> 0 Then
敵ユニット経験値 = Int(敵ユニット経験値 / 10)
EndIf
Incr ユニット経験値[相手ユニットＩＤ] 敵ユニット経験値
If ユニット経験値[相手ユニットＩＤ] > 味方ユニット経験値上限[相手ユニットＩＤ] Then
ランク上昇値 = 0
Do
Incr ランク上昇値
Incr ユニット経験値[相手ユニットＩＤ] (0 - 味方ユニット経験値上限[相手ユニットＩＤ])
Loop While (ユニット経験値[相手ユニットＩＤ] > 味方ユニット経験値上限[相手ユニットＩＤ])
#まずないのかもしれませんが、一度に２ランク以上上がる場合を想定しています。
RankUp 対象ユニットＩＤ ランク上昇値
AutoTalk
$(ユニットニックネーム)は$(敵ユニット経験値)を手に入れて;ランクが$(味方ユニットランク)から$(味方ユニットランク + ランク上昇値)にレベルアップ！！!
End
Else
AutoTalk
$(ユニットニックネーム)は$(敵ユニット経験値)の経験値を手に入れた！
End
EndIf
Exit
以上、勝手に改変させていただいた部分があることをお詫びいたします。
では、これにて。
|
新着情報