整队新团来自脚本整合本人测试过

z2z4 · 发表于 2012-7-17 06:59:55

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

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

x

#==============================================================================
# □ パーティ編成システム (for VX Ace)
#------------------------------------------------------------------------------
# Version : 1_20111229
# by サリサ・タイクーン
# http://www.tycoon812.com/rgss/
#==============================================================================
$imported = {} if $imported.nil?
$imported["CommandParty"] = true
#==============================================================================
# □ 素材スイッチ
#==============================================================================
$rgsslab = {} if $rgsslab == nil
$rgsslab["队伍变更"] = true
if $rgsslab["队伍变更"]
#==============================================================================
# ■ Scene_Menu 插入菜单指令
#==============================================================================
class Scene_Menu < Scene_MenuBase
def command_formation
SceneManager.call(Scene_Party_Organization_System)
end
end
#==============================================================================
# □ カスタマイズポイント
#==============================================================================
module RGSSLAB end
module RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ○ 待機メンバーのソート機能
# trueにすると、待機メンバーの加入・離脱・パーティ編成システム画面において
# 常にID順にソートされるようになります。
#--------------------------------------------------------------------------
SORT = true
#--------------------------------------------------------------------------
# ○ 強制フラグ
# trueにすると、待機メンバーに加える際に、パーティメンバーにいる場合は
# 強制的に待機メンバーへ移動させます。
# （falseにすると、移動しない代わりに待機メンバーに加える事ができません）
#--------------------------------------------------------------------------
FORCE = true
#--------------------------------------------------------------------------
# ○ パーティ編成画面の一行辺りの待機メンバーの人数
# 横に並べる際に、何人目で改行するのかを設定します。
#
# 空欄（それを選ぶと外れると言う意味）の分も含まれる為
# 正確には、現在の待機メンバー＋１の数で割り当てられる事に
# ご注意下さい。
#--------------------------------------------------------------------------
COLUMN_MAX = 9
#--------------------------------------------------------------------------
# ○ 外す事のできないアクターの設定
# IMPOSSIBLLITYに外す事のできないアクターIDを記述します。
#
# ここに記述されたアクターIDは、編成画面において
# 選択する事ができなくなります。
#
# ・イベントコマンドのスクリプトでの変更方法
# $game_system.rgsslab028.impossibillity = [アクターID, …]
#--------------------------------------------------------------------------
IMPOSSIBILLITY = []
end
# カスタマイズポイントは、ここまで
#==============================================================================
# □ RGSSLAB::Party_Organization_System [module]
#==============================================================================
module RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ○ 素材設定用の定数定義
#--------------------------------------------------------------------------
MATERIAL_NAME = "队伍变更"
VERSION = 1
RELEASE = 20111229
end
#==============================================================================
# ■ Game_System [class]
#==============================================================================
class Game_System
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :rgsslab028
#--------------------------------------------------------------------------
# ● オブジェクト初期化 [エイリアス]
#--------------------------------------------------------------------------
alias party_organization_initialize initialize
def initialize
party_organization_initialize
@rgsslab028 = RgssLab_028.new
end
end
#==============================================================================
# □ RgssLab_028 [class]
#==============================================================================
class RgssLab_028
#--------------------------------------------------------------------------
# ○ モジュールの設定
#--------------------------------------------------------------------------
RGSSLAB_028 = RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ○ 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :impossibillity
#--------------------------------------------------------------------------
# ○ オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
@impossibillity = RGSSLAB_028::IMPOSSIBILLITY
end
end
#==============================================================================
# ■ Game_Party [class]
#==============================================================================
class Game_Party < Game_Unit
#--------------------------------------------------------------------------
# ○ モジュールの設定
#--------------------------------------------------------------------------
RGSSLAB_028 = RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :standby
attr_reader :actors
#--------------------------------------------------------------------------
# ● オブジェクト初期化 [エイリアス]
#--------------------------------------------------------------------------
alias party_organization_initialize initialize
def initialize
party_organization_initialize
@standby = []
end
#--------------------------------------------------------------------------
# ○ メンバーの入れ替え
# new_members : 新しいパーティメンバーの配列
#--------------------------------------------------------------------------
def all_members=(new_members)
@actors.clear
count = 0
for i in new_members
@actors[count] = i
count += 1
end
end
#--------------------------------------------------------------------------
# ○ 待機メンバーを加える
# actor_id : アクター ID
#--------------------------------------------------------------------------
def add_actor_organization_system(actor_id)
@standby.push(actor_id) unless @standby.include?(actor_id) && @actors.include?(actor_id)
@standby.uniq!
standby_sort
$game_player.refresh
setup_pos if $rgsslab["阵形导入"] && $rgsslab["阵形实施"]
end
#--------------------------------------------------------------------------
# ○ 待機メンバーを外す
# actor_id : アクター ID
#--------------------------------------------------------------------------
def remove_actor_organization_system(actor_id)
@standby.delete(actor_id)
standby_sort
$game_player.refresh
setup_pos if $rgsslab["阵形导入"] && $rgsslab["阵形实施"]
end
#--------------------------------------------------------------------------
# ○ 待機メンバーのソート
#--------------------------------------------------------------------------
def standby_sort
return unless RGSSLAB_028::SORT
@standby.sort!{|a, b|
a <=> b
}
end
end
#==============================================================================
# ■ Game_Interpreter [class]
#==============================================================================
class Game_Interpreter
#--------------------------------------------------------------------------
# ○ モジュールの設定
#--------------------------------------------------------------------------
RGSSLAB_028 = RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ○ 待機メンバーを加える
# actor_id : アクターID
#--------------------------------------------------------------------------
def add_standby(actor_id)
return if actor_id < 1
$game_party.remove_actor(actor_id) if $game_party.actors.include?(actor_id) && RGSSLAB_028::FORCE && $game_party.actors.size > 1
$game_party.add_actor_organization_system(actor_id)
end
#--------------------------------------------------------------------------
# ○ 待機メンバーを外す
# actor_id : アクターID
# back : パーティ加入フラグ
#--------------------------------------------------------------------------
def remove_standby(actor_id, back = true)
return if actor_id < 1
$game_party.add_actor(actor_id) if back && $game_party.standby.include?(actor_id)
$game_party.remove_actor_organization_system(actor_id)
end
#--------------------------------------------------------------------------
# ○ パーティ編成システムの呼び出し
#--------------------------------------------------------------------------
def call_standby
SceneManager.call(Scene_Party_Organization_System)
Fiber.yield
end
end
#==============================================================================
# □ Window_Party_Organization_Help [class]
#==============================================================================
class Window_Party_Organization_Help < Window_Base
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :text_index
#--------------------------------------------------------------------------
# ○ オブジェクト初期化 [オーバーライド]
#--------------------------------------------------------------------------
def initialize
super(0, 0, Graphics.width, fitting_height(1))
@text_index = 0
refresh
end
#--------------------------------------------------------------------------
# ○ リフレッシュ
#--------------------------------------------------------------------------
def refresh
contents.clear
case @text_index
when 0
str = "Ｃ按钮：决定　Ｂ按钮：编成终了"
rect = contents.text_size(str)
when 1
str = "Ｃ按钮：决定　Ｂ按钮：取消"
rect = contents.text_size(str)
end
contents.draw_text(4, 0, rect.width, line_height, str)
end
end
#==============================================================================
# □ Window_Party_Member
#==============================================================================
class Window_Party_Member < Window_Selectable
#--------------------------------------------------------------------------
# ○ オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
max = $game_party.all_members.size + 1
@column_max = max
@item_max = max
super(0, 96, Graphics.width, 80)
self.opacity = 0
self.index = 0
self.z = 101
refresh
end
#--------------------------------------------------------------------------
# ○ 桁数の取得 [オーバーライド]
#--------------------------------------------------------------------------
def col_max
return @column_max
end
#--------------------------------------------------------------------------
# ○ 項目数の取得 [オーバーライド]
#--------------------------------------------------------------------------
def item_max
return @item_max
end
#--------------------------------------------------------------------------
# ○ リフレッシュ [オーバーライド]
#--------------------------------------------------------------------------
def refresh
contents.clear
for actor in $game_party.all_members do draw_actor(actor, actor.index) end
end
#--------------------------------------------------------------------------
# ○ アクターグラフィックの描画
# actor : アクター
# index : 項目番号
#--------------------------------------------------------------------------
def draw_actor(actor, index)
if $game_system.rgsslab028.impossibillity.include?(actor.id)
draw_actor_graphic_impossibillity(actor, 16 + 48 * index, 40)
else
draw_actor_graphic(actor, 24 + 48 * index, 40)
end
end
#--------------------------------------------------------------------------
# ○ 入れ替えのできないアクターの歩行グラフィック描画
# actor : アクター
# x : 描画先 X 座標
# y : 描画先 Y 座標
#--------------------------------------------------------------------------
def draw_actor_graphic_impossibillity(actor, x, y)
return if actor.name == nil
bitmap = Cache.character(actor.character_name)
sign = actor.name[/^[\!\$]./]
if sign != nil and sign.include?('$')
cw = bitmap.width / 3
ch = bitmap.height / 4
else
cw = bitmap.width / 12
ch = bitmap.height / 8
end
n = actor.character_index
src_rect = Rect.new((n%4*3+1)*cw, (n/4*4)*ch, cw, ch)
self.contents.blt(x - cw / 2, y - ch, bitmap, src_rect, 64)
end
#--------------------------------------------------------------------------
# ○ カーソルの更新 [オーバーライド]
#--------------------------------------------------------------------------
def update_cursor
if @index < 0
self.cursor_rect.empty
else
self.cursor_rect.set(@index * 48, 0, 48, 48)
end
end
#--------------------------------------------------------------------------
# ○ 最大値の再設定
#--------------------------------------------------------------------------
def max_reset
@item_max = $game_party.members.size + 1
end
end
#==============================================================================
# □ Window_Standby_Member [class]
#==============================================================================
class Window_Standby_Member < Window_Selectable
#--------------------------------------------------------------------------
# ○ モジュールの設定
#--------------------------------------------------------------------------
RGSSLAB_028 = RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ○ オブジェクト初期化 [オーバーライド]
#--------------------------------------------------------------------------
def initialize
max = $game_party.standby.size
if max == 0
max = 1
else
max += 1
end
@column_max = RGSSLAB_028::COLUMN_MAX
@item_max = max
super(0, 208, Graphics.width, 128)
self.opacity = 0
self.index = -1
self.active = false
self.z = 101
refresh
end
#--------------------------------------------------------------------------
# ○ 桁数の取得 [オーバーライド]
#--------------------------------------------------------------------------
def col_max
return @column_max
end
#--------------------------------------------------------------------------
# ○ 項目数の取得 [オーバーライド]
#--------------------------------------------------------------------------
def item_max
return @item_max
end
#--------------------------------------------------------------------------
# ○ リフレッシュ [オーバーライド]
#--------------------------------------------------------------------------
def refresh
contents.clear
if @item_max > 0
self.contents = Bitmap.new(width - 32, row_max * 48)
end
count = 0
for actor in $game_party.standby
draw_actor($game_actors[actor], count)
count += 1
end
end
#--------------------------------------------------------------------------
# ○ アクターグラフィックの描画
# actor : アクター
# index : 項目番号
#--------------------------------------------------------------------------
def draw_actor(actor, index)
draw_actor_graphic(actor, 24 + 48 * (index % @column_max), 40 + (index / @column_max * 48))
end
#--------------------------------------------------------------------------
# ○ 先頭の行の取得 [オーバーライド]
#--------------------------------------------------------------------------
def top_row
return self.oy / line_height
end
#--------------------------------------------------------------------------
# ○ 先頭の行の設定 [オーバーライド]
# row : 先頭に表示する行
#--------------------------------------------------------------------------
def top_row=(row)
row = 0 if row < 0
row = row_max - 1 if row > row_max - 1
self.oy = row * line_height
end
#--------------------------------------------------------------------------
# ○ 1 ページに表示できる行数の取得 [オーバーライド]
#--------------------------------------------------------------------------
def page_row_max
#return (height - padding - padding_bottom) / line_height
return height / line_height
end
#--------------------------------------------------------------------------
# ○ カーソルの更新 [オーバーライド]
#--------------------------------------------------------------------------
def update_cursor
if @index < 0
self.cursor_rect.empty
return
end
row = @index / @column_max
if row < self.top_row
self.top_row = row
end
if row > self.top_row + (self.page_row_max - 1)
self.top_row = row - (self.page_row_max - 1)
end
x = @index % @column_max * 48
y = @index / @column_max * 48 - self.oy
self.cursor_rect.set(x, y, 48, 48)
end
#--------------------------------------------------------------------------
# ○ 最大値の再設定
#--------------------------------------------------------------------------
def max_reset
max = $game_party.standby.size
if max == 0
max = 1
else
max += 1
end
@item_max = max
end
end
#==============================================================================
# □ Window_Actor_Information [class]
#==============================================================================
class Window_Actor_Information < Window_Base
#--------------------------------------------------------------------------
# ○ オブジェクト初期化 [オーバーライド]
# actor : 一番最初のアクター情報
#--------------------------------------------------------------------------
def initialize(actor)
super(0, 322, Graphics.width, 78)
refresh(actor)
end
#--------------------------------------------------------------------------
# ○ リフレッシュ
# actor : アクター情報
#--------------------------------------------------------------------------
def refresh(actor)
contents.clear
if actor != nil
actor = $game_actors[actor] if actor.is_a?(Numeric)
draw_actor_graphic(actor, 22, 48)
draw_actor_name(actor, 64, 0)
draw_actor_class(actor, 208, 0)
draw_actor_level(actor, 64, 24)
draw_actor_hp(actor, 208, 24)
draw_actor_mp(actor, 336, 24)
end
end
end
#==============================================================================
# □ Window_Party_Organization [class]
#==============================================================================
class Window_Party_Organization < Window_Base
#--------------------------------------------------------------------------
# ○ オブジェクト初期化 [オーバーライド]
#--------------------------------------------------------------------------
def initialize
super(0, 48, Graphics.width, 274)
self.opacity = 255
refresh
end
#--------------------------------------------------------------------------
# ○ リフレッシュ
#--------------------------------------------------------------------------
def refresh
contents.clear
contents.draw_text(4, 0, 155, line_height, "作战成员")
contents.draw_text(4, 112, 155, line_height, "待机" )
end
end
#==============================================================================
# □ Scene_Party_Organization_System [class]
#==============================================================================
class Scene_Party_Organization_System < Scene_Base
#--------------------------------------------------------------------------
# ○ モジュールの設定
#--------------------------------------------------------------------------
RGSSLAB_028 = RGSSLAB::Party_Organization_System
#--------------------------------------------------------------------------
# ○ 開始処理
#--------------------------------------------------------------------------
def start
super
create_windows
@temporary_actor = nil
end
#--------------------------------------------------------------------------
# ○ ウィンドウの作成
#--------------------------------------------------------------------------
def create_windows
@help_window = Window_Party_Organization_Help.new
@party_member_window = Window_Party_Member.new
@standby_member_window = Window_Standby_Member.new
@information_window = Window_Actor_Information.new($game_party.all_members[0])
@organization_window = Window_Party_Organization.new
@party_member_window.active = true
end
#--------------------------------------------------------------------------
# ○ フレーム更新
#--------------------------------------------------------------------------
def update
super
if @party_member_window.active
update_party_member_window
return
end
if @standby_member_window.active
update_standby_member_window
return
end
end
#--------------------------------------------------------------------------
# ○ フレーム更新：パーティメンバーウィンドウ
#--------------------------------------------------------------------------
def update_party_member_window
@information_window.refresh($game_party.members[@party_member_window.index])
if Input.trigger?(Input::B)
Sound.play_cancel
SceneManager.return
return
end
if Input.trigger?(Input::C)
if $game_system.rgsslab028.impossibillity.include?($game_party.members[@party_member_window.index])
Sound.play_buzzer
return
end
Sound.play_ok
@temporary_actor = $game_party.members[@party_member_window.index]
@party_member_window.active = false
@standby_member_window.active = true
@standby_member_window.index = 0
@help_window.text_index = 1
@help_window.refresh
return
end
end
#--------------------------------------------------------------------------
# ○ フレーム更新：待機メンバーウィンドウ
#--------------------------------------------------------------------------
def update_standby_member_window
@information_window.refresh($game_party.standby[@standby_member_window.index])
if Input.trigger?(Input::B)
Sound.play_cancel
return_party_member_process
return
end
if Input.trigger?(Input::C)
temp = $game_party.standby[@standby_member_window.index]
if @temporary_actor != nil
if $game_party.standby[@standby_member_window.index] != nil
$game_party.standby[@standby_member_window.index] = @temporary_actor.id
temp_members = []
for i in $game_party.all_members
temp_members.push(i.id)
end
temp_members[@party_member_window.index] = temp
$game_party.all_members = temp_members
else
if $game_party.members.size == 1
Sound.play_buzzer
return
end
temp = $game_party.members[@party_member_window.index]
$game_party.remove_actor($game_party.members[@party_member_window.index].id)
$game_party.add_actor_organization_system(temp.id)
end
else
if $game_party.standby[@standby_member_window.index] == nil
Sound.play_buzzer
return
end
$game_party.add_actor($game_party.standby[@standby_member_window.index])
$game_party.remove_actor_organization_system($game_party.standby[@standby_member_window.index])
end
Sound.play_ok
$game_party.standby_sort
$game_player.refresh
@party_member_window.refresh
@standby_member_window.refresh
return_party_member_process
return
end
end
#--------------------------------------------------------------------------
# ○ パーティメンバーウィンドウ復帰処理
#--------------------------------------------------------------------------
def return_party_member_process
@temporary_actor = nil
@party_member_window.active = true
@standby_member_window.active = false
@standby_member_window.index = -1
@party_member_window.max_reset
@standby_member_window.max_reset
@help_window.text_index = 0
@help_window.refresh
end
end
end
class Game_Unit
def battle_party_change?
if $game_party.standby.size >= 1
return true
else
return false
end
end
end
class Scene_Battle
alias saba_kiseki_party_create_party_command_window create_party_command_window
def create_party_command_window
saba_kiseki_party_create_party_command_window
@party_command_window.set_handler(:party, method(:command_party))
end
def command_party
SceneManager.call(Scene_Party_Organization_System)
end
end
class Window_PartyCommand
alias saba_kiseki_party_make_command_list make_command_list
def make_command_list
saba_kiseki_party_make_command_list
add_party_command
end
def add_party_command
text="候补"
add_command(text, :party, $game_party.battle_party_change?)
end
end

复制代码

z2z4 · 发表于 2012-7-17 07:02:05

本帖最后由 z2z4 于 2012-7-17 07:02 编辑

本人第1次为66RPG 做贡献虽然我是脚本盲不过我也懂得一点希望大家喜欢

‘‘──z2z4于2012-7-17 07:02补充以下内容：

我会继续测试一些脚本来发布
’’

V5の小Su · 发表于 2012-7-17 07:34:46

╮(╯▽╰)╭，孩纸你发错区了，把这个脚本发到地球村吧。

z2z4 · 发表于 2012-7-17 07:45:06

V5の小Su 发表于 2012-7-17 07:34
╮(╯▽╰)╭，孩纸你发错区了，把这个脚本发到地球村吧。

就当分享脚本把

54酱 · 发表于 2012-7-17 08:53:00

本帖最后由 54酱于 2012-7-17 08:53 编辑

原创技术发布区

LZ你敢说自己不是语死早么？

z2z4 · 发表于 2012-7-17 08:58:17

54酱发表于 2012-7-17 08:53
LZ你敢说自己不是语死早么？

我标题写的很清楚 - -

荷包PIG蛋 · 发表于 2012-7-17 09:01:58

LZ这是要做LE同人游戏么。。。

忧雪の伤 · 发表于 2012-7-17 09:20:12

2) 您所提供的脚本、事件、教程，即默认为您原创。如果发现抄袭行为，或者带有较大嫌疑，对本版有管理权限的会员有权锁帖 24 小时，并在这段时间内进行查实。如属对他人发布的更新，有大幅度修改的可以另开新帖，否则请在原帖回复（锁帖的话请 PM 在任版主），原则上二次更新发布要经过原本作者的同意。

UI> 请楼主于 24 小时内自行删帖，谢谢。

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

[RMVA发布] 整队新团来自脚本整合本人测试过

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

贵宾

[RMVA发布] 整队新团 来自脚本整合 本人测试过

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

贵宾

[RMVA发布] 整队新团来自脚本整合本人测试过