新套装系统【紧急修复BUG】[发布预备]

凌冰 · 发表于 2008-7-31 07:30:48

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

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

x

【注：原来和装备扩展整合后出现错误提示已经修复】

原版本（留作纪念吧）
http://rpg.blue/viewthread.php?tid=77752
用了一些优化算法（几乎是重写了），但是FPS貌似没有什么差别
囧

#============新套装系统（支持装备扩展）============By 凌冰===================
module SUITS
#==============
#||初始化数组||
#==============
WEAPON = []
ARMORS = []
SKILLS = []
PAR_PLU = []
AUT_STA = []
GUA_ELE = []
GUA_STA = []
ELEMENT = []
PLU_STA = []
MIN_STA = []
#=============================================================================
#设置方法
#=============================================================================
#==============
#||第一套套装||
#==============
WEAPON[1] = [1,5]
#武器本套装的所有武器
#即一套套装里可以有多副武器
ARMORS[1] = [[1,2],[5],[13]]
#防具 |盾| |头| |体| |饰（缺省）|
#即一套套装里可以有多副同类防具
#支持装备扩展，可以继续往后写
#如果套装中不包含某类，前面的或者中间的要写成[]或nil，后面的可以缺省
SKILLS[1] = [43,80]
#技能
PAR_PLU[1] = [50,30,10,10,10,10,10,10,10,10]
# |血|灵|力|敏|速|魔|攻|防|御|敏|
AUT_STA[1] = [13,15]
#自动状态
GUA_ELE[1] = [1,2,3,4,5,6]
#属性防御
GUA_STA[1] = [3,5,6,7]
#状态防御
ELEMENT[1] = [3,5,7,10]
#攻击属性
PLU_STA[1] = [2,4,5]
#攻击附加状态
MIN_STA[1] = [1,7,9]
#攻击解除状态
#================设置完毕================
end
module RPG
#============================================================================
#补充设置自定义角色初始扩展装备的ID
#============================================================================
ARMOR5 = [0,0,0,0]#按照角色的ID顺序输入即可
ARMOR6 = [0,0,0,0]
ARMOR7 = [0,0,0,0]
ARMOR8 = [0,0,0,0]
end
module RPG
class Suit
attr_reader :id
attr_reader :weapon_id
attr_reader :armors_id
attr_reader :skills_id
attr_reader :plus
attr_reader :state
attr_reader :guard_e
attr_reader :guard_s
attr_reader :element
attr_reader :state_p
attr_reader :state_m
def initialize(suit_id)
@id = suit_id
@weapon_id = SUITS::WEAPON[@id]
@armors_id = SUITS::ARMORS[@id]
@skills_id = SUITS::SKILLS[@id]
@plus = SUITS::PAR_PLU[@id]
@state = SUITS::AUT_STA[@id]
@guard_e = SUITS::GUA_ELE[@id]
@guard_s = SUITS::GUA_STA[@id]
@element = SUITS::ELEMENT[@id]
@state_p = SUITS::PLU_STA[@id]
@state_m = SUITS::MIN_STA[@id]
end
end
def self.create
all_suits = []
for i in 1...SUITS::WEAPON.size
s = Suit.new(i)
all_suits[i] = s
end
return all_suits
end
end
#=============以上貌似多此一举= =|||==================
class Game_Actor < Game_Battler
alias setup_suit setup
def setup(actor_id)
actor = $data_actors[actor_id]
@weapon_id = actor.weapon_id
@armor1_id = actor.armor1_id
@armor2_id = actor.armor2_id
@armor3_id = actor.armor3_id
@armor4_id = actor.armor4_id
@armor5_id = actor.armor5_id if defined?(armor5_id) != nil
@armor6_id = actor.armor6_id if defined?(armor6_id) != nil
@armor7_id = actor.armor7_id if defined?(armor7_id) != nil
@armor8_id = actor.armor8_id if defined?(armor8_id) != nil
@all_suits = RPG::create
refresh_suit
setup_suit(actor_id)
for suit in 1...@all_suits.size
suit_skill_list = suits_plus(suit,16)
for i in suit_skill_list
learn_skill(i) if suit_whole?(suit)
end
state_id = suits_plus(suit,10)
for id in state_id
add_state(id, true) if suit_whole?(suit)
end
end
end
def refresh_suit
@all_armors_id = [@armor1_id,@armor2_id,@armor3_id,@armor4_id]
@all_armors_id.push(@armor5_id) if defined?(armor5_id) != nil
@all_armors_id.push(@armor6_id) if defined?(armor6_id) != nil
@all_armors_id.push(@armor7_id) if defined?(armor7_id) != nil
@all_armors_id.push(@armor8_id) if defined?(armor8_id) != nil
@suits_list = get_suits
if @suits_list == []
@suits_list.push(0)
end
end
def suit_whole?(suit_id)
suit = @all_suits[suit_id]
if suit == nil
return false
end
unless suit.weapon_id.include?(@weapon_id)
return false if !(suit.weapon_id == (nil or []))
end
for j in 0...suit.armors_id.size
if suit.armors_id[j] == (nil or [])
next
end
unless suit.armors_id[j].include?(@all_armors_id[j])
return false
end
end
return true
end
def get_suits
suits = []
for i in 1...@all_suits.size
if suit_whole?(i)
suits.push(i)
end
end
return suits
end
def suits_plus(id,parameter)
if id == 0
if parameter < 10
return 0
else
return []
end
end
suit = @all_suits[id]
if parameter < 10
return suit.plus[parameter]
else
case parameter
when 10
return suit.state
when 11
return suit.guard_e
when 12
return suit.guard_s
when 13
return suit.element
when 14
return suit.state_p
when 15
return suit.state_m
when 16
return suit.skills_id
else
return nil
end
end
end
alias base_maxhp_suit base_maxhp
def base_maxhp
n = base_maxhp_suit
for i in @suits_list
n += suits_plus(i,0)
end
return n
end
alias base_maxsp_suit base_maxsp
def base_maxsp
n = base_maxsp_suit
for i in @suits_list
n += suits_plus(i,1)
end
return n
end
alias base_str_suit base_str
def base_str
n = base_str_suit
for i in @suits_list
n += suits_plus(i,2)
end
return n
end
alias base_dex_suit base_dex
def base_dex
n = base_dex_suit
for i in @suits_list
n += suits_plus(i,3)
end
return n
end
alias base_agi_suit base_agi
def base_agi
n = base_agi_suit
for i in @suits_list
n += suits_plus(i,4)
end
return n
end
alias base_int_suit base_int
def base_int
n = base_int_suit
for i in @suits_list
n += suits_plus(i,5)
end
return n
end
alias base_atk_suit base_atk
def base_atk
n = base_atk_suit
for i in @suits_list
n += suits_plus(i,6)
end
return n
end
alias base_pdef_suit base_pdef
def base_pdef
n = base_pdef_suit
for i in @suits_list
n += suits_plus(i,7)
end
return n
end
alias base_mdef_suit base_mdef
def base_mdef
n = base_mdef_suit
for i in @suits_list
n += suits_plus(i,8)
end
return n
end
alias base_eva_suit base_eva
def base_eva
n = base_eva_suit
for i in @suits_list
n += suits_plus(i,9)
end
return n
end
alias suit_element_rate element_rate
def element_rate(element_id)
result = suit_element_rate(element_id)
for suit in @suits_list
suit_element_guard = suits_plus(suit,11)
result/= 2 if suit_element_guard.include?(element_id)
end
return result
end
alias suit_state_guard? state_guard?
def state_guard?(state_id)
result = suit_state_guard?(state_id)
for suit in @suits_list
suit_state_guard = suits_plus(suit,12)
result = suit_state_guard.include?(state_id)
end
return result
end
alias suit_element_set element_set
def element_set
result = suit_element_set
for suit in @suits_list
suit_element = suits_plus(suit,13)
for i in suit_element
result.push(i) if !result.include?(i)
end
end
return result
end
alias suit_plus_state_set plus_state_set
def plus_state_set
result = suit_plus_state_set
for suit in @suits_list
suit_plus_state = suits_plus(suit,14)
for i in suit_plus_state
result.push(i) if !result.include?(i)
end
end
return result
end
alias suit_minus_state_set minus_state_set
def minus_state_set
result = suit_minus_state_set
for suit in @suits_list
suit_minus_state = suits_plus(suit,15)
for i in suit_minus_state
result.push(i) if !result.include?(i)
end
end
return result
end
alias suit_equip equip
def equip(equip_type, id)
suit_equip(equip_type, id)
refresh_suit
for suit in 1...@all_suits.size
suit_skill_list = suits_plus(suit,16)
for i in suit_skill_list
learn_skill(i) if suit_whole?(suit)
forget_skill(i) if skill_learn?(i) and !suit_whole?(suit)
end
state_id = suits_plus(suit,10)
for id in state_id
add_state(id, true) if suit_whole?(suit)
remove_state(id, true) if state?(id) and !suit_whole?(suit)
end
end
end
end
module RPG
class Actor
def armor5_id
return (ARMOR5[@id-1] == nil ? 0 : ARMOR5[@id-1])
end
def armor6_id
return (ARMOR6[@id-1] == nil ? 0 : ARMOR6[@id-1])
end
def armor7_id
return (ARMOR7[@id-1] == nil ? 0 : ARMOR7[@id-1])
end
def armor8_id
return (ARMOR8[@id-1] == nil ? 0 : ARMOR8[@id-1])
end
end
end

复制代码

设置如图

范例工程
http://rpg.blue/upload_program/files/新套装系统_97970493.rar

whw668 · 发表于 2008-8-1 00:38:55

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

越前リョーマ · 发表于 2008-8-1 00:45:34

菜单改过排版也可以吧？

凌冰 · 发表于 2008-8-1 00:52:19

以下引用越前リョーマ于2008-7-31 16:45:34的发言：

菜单改过排版也可以吧？

？？
什么意思
？？

越前リョーマ · 发表于 2008-8-1 00:53:16

以下引用凌冰于2008-7-31 16:52:19的发言：

以下引用越前リョーマ于2008-7-31 16:45:34的发言：

菜单改过排版也可以吧？

？？
什么意思
？？

我的意思是套装系统会不会和菜单脚本冲突？

凌冰 · 发表于 2008-8-1 00:56:31

以下引用越前リョーマ于2008-7-31 16:53:16的发言：

我的意思是套装系统会不会和菜单脚本冲突？

没有涉及到菜单的修改，所以应该问题不大

木许许 · 发表于 2008-8-1 19:19:08

这个好哇!是不是还可以实现单武器/防具附带技能的效果?

HзO · 发表于 2008-8-1 19:37:48

设置方法和原来的版本完全不一样了?
按照上述设置的意思是不是指第一套套装的武器为1或者5号有一样即可,防具为1,5,13或者2,5,13 ?然后武器加防具凑起来是1,1,5,13或者5,1,5,13或者1,2,5,13或者5,2,5,13都可以成为一套套装?
成套以后就学会43和80号技能??

凌冰 · 发表于 2008-8-1 20:01:13

以下引用木许许于2008-8-1 11:19:08的发言：

这个好哇!是不是还可以实现单武器/防具附带技能的效果?

可以，只要设置成单元件套装即可

以下引用HзO于2008-8-1 11:37:48的发言：

设置方法和原来的版本完全不一样了?
按照上述设置的意思是不是指第一套套装的武器为1或者5号有一样即可,防具为1,5,13或者2,5,13 ?然后武器加防具凑起来是1,1,5,13或者5,1,5,13或者1,2,5,13或者5,2,5,13都可以成为一套套装?
成套以后就学会43和80号技能??

[本贴由作者于 2008-8-1 11:46:17 最后编辑]

呵呵，没有原来那种直观

你的想法是对的{/jy}

卓越大白痴 · 发表于 2008-8-1 20:18:43

这东西太好拉楼主我爱你

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

新套装系统【紧急修复BUG】[发布预备]

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

开拓者

贵宾

第3届短篇游戏大赛主流游戏组亚军

第5届短篇游戏比赛亚军