[RM脚本] 战斗中召喚队员(RTAB对应版)ver1.23

佐京楠。 · 发表于 2007-7-11 06:10:16

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

原站地址：http://zenith.ifdef.jp/rgss/rgss12.html
↑ 07/6/8　RTAB对应版的修正版本。　ver1.23
★ 说明：
貌似主站上有一召唤兽的范例工程，高手过目看下两者的区别吧~OTZ……

戦闘中に特定のアクターを召喚します。微妙にFF10チック。

召喚コモンイベントを設定したスキルを発動！<<--发动召唤技能..(?) =.=

フェリックスが召喚されました。<<--恩..某队员被召唤了.

<解説·使用方法>
　戦闘中にイベントの「スクリプト」で
　$scene.summon(actor_id, type)
　と記述することでアクターを召喚します。
　スキルやアイテムのコモンイベントに設定しましょう。
　※actor_id　→　召喚するアクターのID
　※type　→　召喚タイプ(召喚後のメンバー)
　　　0:召喚アクターのみ　
　　　1:召喚者＋召喚アクター
　　　2:パーティーメンバー＋召喚アクター
　　　3:召喚者と召喚アクターを入れ替える
　例：$scene.summon(6, 1)
　　→ID6のアクターを召喚し、
　　　　パーティーメンバーは召喚者と召喚アクターのみになる。
　
　召喚されたアクターが戦闘不能になるか戦闘が終了すると
　召喚状態が終了し、パーティーメンバーは召喚前と同じメンバーに戻ります。
　ちなみに、戦闘不能状態のアクターを召喚しようとしても何も起きません。

　また、同様に
　$game_party.summon_end
　と記述することで強制的に召喚状態が終了し、
　パーティーメンバーは召喚前と同じメンバーに戻ります。
　スキルやアイテムのコモンイベントに設定しましょう。

[中文版]
<解说·使用方法>
战斗中用活动的「脚本」
$scene.由于与summon(acto
r_id, type) 记述的事传唤actor。
　技艺和条款的common活动设定吧。
　※只actor_id →传唤的ac
tor的ID ※type →传唤类型(传
唤后的成员)0:传唤a
ctor与 1:传唤者+传
唤actor2:聚会成员+传唤actor
3:传唤者更换传唤actor的例
子:$scene.summon
(传唤6,1)→ID6acto
r、聚会成员与传唤者成为只传唤actor。
　
　传唤了的actor是不是战斗不能变成战斗结
束的话传唤状态结束，聚会成员返回与传唤前同样的成员。
　顺便，什么都也不起来打算传唤战斗不能状态的actor。

　同时，同样
$game_party.由于与s
ummon_end 记述的事强制地传唤状态
结束、聚会成员返回与传唤前同样的成员。
　技艺和条款的common活动设定吧。

RGSS脚本部分：

#==============================================================================
#　Zenith RGSS12　召喚 ver1.23 RTAB対応版
#　　 by 水夜
#　　http://zenith.ifdef.jp/
#
# RTAB・・・歯車の城（ショウ様）http://members.jcom.home.ne.jp/cogwheel/
#------------------------------------------------------------------------------
# 戦闘中に特定のアクターを召喚する。
#==============================================================================
#==============================================================================
# □ カスタマイズポイント
#==============================================================================
module ZENITH12
# 召喚されたアクターの自動全回復タイミング
# 　0:自動全回復しない　1:召喚終了時に全回復　2:戦闘終了時に全回復
RECOVER_TYPE = 1
# 召喚中は、召喚に使用したスキル・アイテムをリストから消す
# (ただし、スキルの場合、リストからスキルが消えるのは使用者のみです)
SKILL_ITEM_LOSE = false
end
#==============================================================================
#　Sprite_Battler修正
# 戦闘中のアクター入れ替えで
# 「アクターを外す→再度加える」とするとバトラーが消えるバグを修正
#==============================================================================
class Sprite_Battler < RPG::Sprite
alias zenith_debug_update update
def update
# バトラーが nil の場合
if @battler == nil
@battler_name = nil
@battler_hue = nil
end
zenith_debug_update
end
end
class Game_Party
attr_accessor :summon_member # 召喚前のメンバー
attr_accessor :summon_skill # 召喚に使用したスキル
attr_accessor :summon_item # 召喚に使用したアイテム
#--------------------------------------------------------------------------
# ● 召喚によるアクター入れ替え
#--------------------------------------------------------------------------
def summon_change(actor_id, type, summoner)
# 召喚タイプによって分岐
case type
# 召喚アクターのみ
when 0
@actors = [$game_actors[actor_id]]
# 召喚者＋召喚アクター
when 1
@actors = [summoner, $game_actors[actor_id]]
# パーティーメンバー＋召喚アクター
when 2
add_actor(actor_id)
# 召喚者と召喚アクターを入れ替え
when 3
index = @actors.index(summoner)
@actors[index] = $game_actors[actor_id]
end
$game_actors[actor_id].at = 0
$game_actors[actor_id].atp = 0
$game_actors[actor_id].wait = 0
$scene.spell_reset($game_actors[actor_id])
$game_actors[actor_id].damage_pop = {}
$game_actors[actor_id].damage = {}
$game_actors[actor_id].damage_sp = {}
$game_actors[actor_id].critical = {}
$game_actors[actor_id].recover_hp = {}
$game_actors[actor_id].recover_sp = {}
$game_actors[actor_id].state_p = {}
$game_actors[actor_id].state_m = {}
$game_actors[actor_id].animation = []
# 召喚されたアクターを記憶
@summon_actor = $game_actors[actor_id]
if $game_temp.in_battle
$scene.status_window.update
end
end
#--------------------------------------------------------------------------
# ● 召喚終了によるメンバー復帰
#--------------------------------------------------------------------------
def summon_end
if @summon_member != nil
if ZENITH12::RECOVER_TYPE == 1
@summon_actor.recover_all
end
if @summon_skill != []
@summon_skill[0].learn_skill(@summon_skill[1])
end
if @summon_item != []
$game_party.gain_item(@summon_item[0], @summon_item[1])
end
size = @actors.size
@actors = @summon_member
if $game_temp.in_battle
$scene.status_window.update
$scene.status_window.refresh if size == @actors.size
$scene.command_delete if $scene.active_actor == @summon_actor
end
@summon_member = nil
@summon_actor = nil
end
end
end
class Scene_Battle
attr_reader :active_actor
#--------------------------------------------------------------------------
# ● アクション更新 (メインフェーズ)
#--------------------------------------------------------------------------
alias zenith12_action_phase action_phase
def action_phase(battler)
@active_battler = battler
zenith12_action_phase(battler)
end
#--------------------------------------------------------------------------
# ● 召喚
#--------------------------------------------------------------------------
def summon(actor_id, type)
unless $game_party.actors.include?($game_actors[actor_id])
# 多重召喚を防止
if @summon_actor != nil
$game_party.summon_end
end
$game_party.summon_member = []
# 召喚前のメンバー記憶
for i in 0...$game_party.actors.size
$game_party.summon_member[i] = $game_party.actors[i]
end
# アクター入れ替え
$game_party.summon_change(actor_id, type, @active_battler)
# 召喚されたアクターを記憶
@summon_actor = $game_actors[actor_id]
if @summon_actors == nil
@summon_actors = []
end
@summon_actors.push(@summon_actor)
@summon_actors.uniq!
$game_party.summon_skill = []
$game_party.summon_item = []
if ZENITH12::SKILL_ITEM_LOSE
case @active_battler.current_action.kind
when 1 # スキル
$game_party.summon_skill[0] = @active_battler
$game_party.summon_skill[1] = @skill.id
@active_battler.forget_skill(@skill.id)
when 2 # アイテム
$game_party.summon_item[0] = @item.id
$game_party.summon_item[1] = $game_party.item_number(@item.id)
$game_party.lose_item(@item.id, $game_party.summon_item[1])
end
end
end
end
#--------------------------------------------------------------------------
# ● メイン処理
#--------------------------------------------------------------------------
alias zenith12_main main
def main
$game_party.summon_skill = []
$game_party.summon_item = []
zenith12_main
$game_party.summon_end
if ZENITH12::RECOVER_TYPE == 2 and @summon_actors != nil
for i in @summon_actors
i.recover_all
end
end
@summon_actor = nil
@summon_actors = nil
end
#--------------------------------------------------------------------------
# ● 勝敗判定
#--------------------------------------------------------------------------
alias zenith12_fin? fin?
def fin?
if @summon_actor != nil and @summon_actor.dead?
$game_party.summon_end
$game_party.summon_skill = []
$game_party.summon_item = []
@summon_actor = nil
end
zenith12_fin?
end
end

复制代码

TXT文档下载地址：
http://rpg.blue/upload_program/files/zenith_rgss12rtab1.txt

佐京楠。 · 发表于 2007-7-11 06:10:16

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

原站地址：http://zenith.ifdef.jp/rgss/rgss12.html
↑ 07/6/8　RTAB对应版的修正版本。　ver1.23
★ 说明：
貌似主站上有一召唤兽的范例工程，高手过目看下两者的区别吧~OTZ……

戦闘中に特定のアクターを召喚します。微妙にFF10チック。

召喚コモンイベントを設定したスキルを発動！<<--发动召唤技能..(?) =.=

フェリックスが召喚されました。<<--恩..某队员被召唤了.

<解説·使用方法>
　戦闘中にイベントの「スクリプト」で
　$scene.summon(actor_id, type)
　と記述することでアクターを召喚します。
　スキルやアイテムのコモンイベントに設定しましょう。
　※actor_id　→　召喚するアクターのID
　※type　→　召喚タイプ(召喚後のメンバー)
　　　0:召喚アクターのみ　
　　　1:召喚者＋召喚アクター
　　　2:パーティーメンバー＋召喚アクター
　　　3:召喚者と召喚アクターを入れ替える
　例：$scene.summon(6, 1)
　　→ID6のアクターを召喚し、
　　　　パーティーメンバーは召喚者と召喚アクターのみになる。
　
　召喚されたアクターが戦闘不能になるか戦闘が終了すると
　召喚状態が終了し、パーティーメンバーは召喚前と同じメンバーに戻ります。
　ちなみに、戦闘不能状態のアクターを召喚しようとしても何も起きません。

　また、同様に
　$game_party.summon_end
　と記述することで強制的に召喚状態が終了し、
　パーティーメンバーは召喚前と同じメンバーに戻ります。
　スキルやアイテムのコモンイベントに設定しましょう。

[中文版]
<解说·使用方法>
战斗中用活动的「脚本」
$scene.由于与summon(acto
r_id, type) 记述的事传唤actor。
　技艺和条款的common活动设定吧。
　※只actor_id →传唤的ac
tor的ID ※type →传唤类型(传
唤后的成员)0:传唤a
ctor与 1:传唤者+传
唤actor2:聚会成员+传唤actor
3:传唤者更换传唤actor的例
子:$scene.summon
(传唤6,1)→ID6acto
r、聚会成员与传唤者成为只传唤actor。
　
　传唤了的actor是不是战斗不能变成战斗结
束的话传唤状态结束，聚会成员返回与传唤前同样的成员。
　顺便，什么都也不起来打算传唤战斗不能状态的actor。

　同时，同样
$game_party.由于与s
ummon_end 记述的事强制地传唤状态
结束、聚会成员返回与传唤前同样的成员。
　技艺和条款的common活动设定吧。

RGSS脚本部分：

#==============================================================================
#　Zenith RGSS12　召喚 ver1.23 RTAB対応版
#　　 by 水夜
#　　http://zenith.ifdef.jp/
#
# RTAB・・・歯車の城（ショウ様）http://members.jcom.home.ne.jp/cogwheel/
#------------------------------------------------------------------------------
# 戦闘中に特定のアクターを召喚する。
#==============================================================================
#==============================================================================
# □ カスタマイズポイント
#==============================================================================
module ZENITH12
# 召喚されたアクターの自動全回復タイミング
# 　0:自動全回復しない　1:召喚終了時に全回復　2:戦闘終了時に全回復
RECOVER_TYPE = 1
# 召喚中は、召喚に使用したスキル・アイテムをリストから消す
# (ただし、スキルの場合、リストからスキルが消えるのは使用者のみです)
SKILL_ITEM_LOSE = false
end
#==============================================================================
#　Sprite_Battler修正
# 戦闘中のアクター入れ替えで
# 「アクターを外す→再度加える」とするとバトラーが消えるバグを修正
#==============================================================================
class Sprite_Battler < RPG::Sprite
alias zenith_debug_update update
def update
# バトラーが nil の場合
if @battler == nil
@battler_name = nil
@battler_hue = nil
end
zenith_debug_update
end
end
class Game_Party
attr_accessor :summon_member # 召喚前のメンバー
attr_accessor :summon_skill # 召喚に使用したスキル
attr_accessor :summon_item # 召喚に使用したアイテム
#--------------------------------------------------------------------------
# ● 召喚によるアクター入れ替え
#--------------------------------------------------------------------------
def summon_change(actor_id, type, summoner)
# 召喚タイプによって分岐
case type
# 召喚アクターのみ
when 0
@actors = [$game_actors[actor_id]]
# 召喚者＋召喚アクター
when 1
@actors = [summoner, $game_actors[actor_id]]
# パーティーメンバー＋召喚アクター
when 2
add_actor(actor_id)
# 召喚者と召喚アクターを入れ替え
when 3
index = @actors.index(summoner)
@actors[index] = $game_actors[actor_id]
end
$game_actors[actor_id].at = 0
$game_actors[actor_id].atp = 0
$game_actors[actor_id].wait = 0
$scene.spell_reset($game_actors[actor_id])
$game_actors[actor_id].damage_pop = {}
$game_actors[actor_id].damage = {}
$game_actors[actor_id].damage_sp = {}
$game_actors[actor_id].critical = {}
$game_actors[actor_id].recover_hp = {}
$game_actors[actor_id].recover_sp = {}
$game_actors[actor_id].state_p = {}
$game_actors[actor_id].state_m = {}
$game_actors[actor_id].animation = []
# 召喚されたアクターを記憶
@summon_actor = $game_actors[actor_id]
if $game_temp.in_battle
$scene.status_window.update
end
end
#--------------------------------------------------------------------------
# ● 召喚終了によるメンバー復帰
#--------------------------------------------------------------------------
def summon_end
if @summon_member != nil
if ZENITH12::RECOVER_TYPE == 1
@summon_actor.recover_all
end
if @summon_skill != []
@summon_skill[0].learn_skill(@summon_skill[1])
end
if @summon_item != []
$game_party.gain_item(@summon_item[0], @summon_item[1])
end
size = @actors.size
@actors = @summon_member
if $game_temp.in_battle
$scene.status_window.update
$scene.status_window.refresh if size == @actors.size
$scene.command_delete if $scene.active_actor == @summon_actor
end
@summon_member = nil
@summon_actor = nil
end
end
end
class Scene_Battle
attr_reader :active_actor
#--------------------------------------------------------------------------
# ● アクション更新 (メインフェーズ)
#--------------------------------------------------------------------------
alias zenith12_action_phase action_phase
def action_phase(battler)
@active_battler = battler
zenith12_action_phase(battler)
end
#--------------------------------------------------------------------------
# ● 召喚
#--------------------------------------------------------------------------
def summon(actor_id, type)
unless $game_party.actors.include?($game_actors[actor_id])
# 多重召喚を防止
if @summon_actor != nil
$game_party.summon_end
end
$game_party.summon_member = []
# 召喚前のメンバー記憶
for i in 0...$game_party.actors.size
$game_party.summon_member[i] = $game_party.actors[i]
end
# アクター入れ替え
$game_party.summon_change(actor_id, type, @active_battler)
# 召喚されたアクターを記憶
@summon_actor = $game_actors[actor_id]
if @summon_actors == nil
@summon_actors = []
end
@summon_actors.push(@summon_actor)
@summon_actors.uniq!
$game_party.summon_skill = []
$game_party.summon_item = []
if ZENITH12::SKILL_ITEM_LOSE
case @active_battler.current_action.kind
when 1 # スキル
$game_party.summon_skill[0] = @active_battler
$game_party.summon_skill[1] = @skill.id
@active_battler.forget_skill(@skill.id)
when 2 # アイテム
$game_party.summon_item[0] = @item.id
$game_party.summon_item[1] = $game_party.item_number(@item.id)
$game_party.lose_item(@item.id, $game_party.summon_item[1])
end
end
end
end
#--------------------------------------------------------------------------
# ● メイン処理
#--------------------------------------------------------------------------
alias zenith12_main main
def main
$game_party.summon_skill = []
$game_party.summon_item = []
zenith12_main
$game_party.summon_end
if ZENITH12::RECOVER_TYPE == 2 and @summon_actors != nil
for i in @summon_actors
i.recover_all
end
end
@summon_actor = nil
@summon_actors = nil
end
#--------------------------------------------------------------------------
# ● 勝敗判定
#--------------------------------------------------------------------------
alias zenith12_fin? fin?
def fin?
if @summon_actor != nil and @summon_actor.dead?
$game_party.summon_end
$game_party.summon_skill = []
$game_party.summon_item = []
@summon_actor = nil
end
zenith12_fin?
end
end

复制代码

TXT文档下载地址：
http://rpg.blue/upload_program/files/zenith_rgss12rtab1.txt

kaze · 发表于 2007-7-11 15:50:02

<解说·使用方法>
战斗中用活动的「脚本」
$scene.由于与summon(acto
r_id, type) 记述的事传唤actor。
　技艺和条款的common活动设定吧。
　※只actor_id →传唤的ac
tor的ID ※type →传唤类型(传
唤后的成员)0:传唤a
ctor与 1:传唤者+传
唤actor2:聚会成员+传唤actor
3:传唤者更换传唤actor的例
子:$scene.summon
(传唤6,1)→ID6acto
r、聚会成员与传唤者成为只传唤actor。
　
　传唤了的actor是不是战斗不能变成战斗结
束的话传唤状态结束，聚会成员返回与传唤前同样的成员。
　顺便，什么都也不起来打算传唤战斗不能状态的actor。

　同时，同样
$game_party.由于与s
ummon_end 记述的事强制地传唤状态
结束、聚会成员返回与传唤前同样的成员。
　技艺和条款的common活动设定吧。

PS:顶一个

雨中萧萧 · 发表于 2007-7-11 17:05:50

提示: 作者被禁止或删除内容自动屏蔽

孤独de思念 · 发表于 2007-7-16 02:23:46

用事件加入队伍就好拉更简单

帐号		自动登录	找回密码
密码			注册会员