【悬赏】找人写个装备武器改变职业的脚本

v2sam · 发表于 2010-6-18 14:17:16

回复提妲的帖子

嗯，指定的，是根据备注来决定学几号技能。

顺道找来沉影的脚本。

#==============================================================================
# 武器带技能 by 沉影不器
#------------------------------------------------------------------------------
# 武器备注栏写 skill=技能号表示武器带该技能.
# 允许同时带多技能 skill=技能号,技能号,技能号...
# 写法比较偷懒,bug未知
#==============================================================================
#==============================================================================
# ■ RPG::Weapon
#==============================================================================
module RPG
class Weapon < BaseItem
def skill_ids
return read_note('skill').split(/,/)
end
end
class Armor < BaseItem
def skill_ids
return read_note('skill').split(/,/)
end
end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
#--------------------------------------------------------------------------
# 技能绑定
#--------------------------------------------------------------------------
def skill_plus
@skills.clear
for i in self.class.learnings
learn_skill(i.skill_id) if i.level <= @level
end
unless @armor3_id == 0
ids = equips[3].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @armor4_id == 0
ids = equips[4].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @weapon_id == 0
ids = equips[0].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @armor1_id == 0
ids = equips[1].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @armor2_id == 0
ids = equips[2].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
end
#--------------------------------------------------------------------------
# ● 设置
#--------------------------------------------------------------------------
alias old_setup setup
def setup(actor_id)
old_setup(actor_id)
skill_plus
end
#--------------------------------------------------------------------------
# ● 更改装备
#--------------------------------------------------------------------------
def change_equip(equip_type, item, test = false)
last_item = equips[equip_type]
unless test
return if $game_party.item_number(item) == 0 if item != nil
$game_party.gain_item(last_item, 1)
$game_party.lose_item(item, 1)
end
item_id = item == nil ? 0 : item.id
case equip_type
when 0 # 武器
@weapon_id = item_id
unless two_hands_legal? # 违反双手拿取的情况下
change_equip(1, nil, test) # 解除反手的装备
end
when 1 # 盾
@armor1_id = item_id
unless two_hands_legal? # 违反双手拿取的情况下
change_equip(0, nil, test) # 解除反手的装备
end
when 2 # 头
@armor2_id = item_id
when 3 # 身体
@armor3_id = item_id
when 4 # 装饰品
@armor4_id = item_id
end
skill_plus
end
#--------------------------------------------------------------------------
# ● 废弃装备
#--------------------------------------------------------------------------
def discard_equip(item)
if item.is_a?(RPG::Weapon)
if @weapon_id == item.id
@weapon_id = 0
elsif two_swords_style and @armor1_id == item.id
@armor1_id = 0
end
elsif item.is_a?(RPG::Armor)
if not two_swords_style and @armor1_id == item.id
@armor1_id = 0
elsif @armor2_id == item.id
@armor2_id = 0
elsif @armor3_id == item.id
@armor3_id = 0
elsif @armor4_id == item.id
@armor4_id = 0
end
end
skill_plus
end
end

复制代码

darkdrium · 发表于 2010-6-18 14:58:34

本帖最后由 darkdrium 于 2010-6-18 15:01 编辑

使用该脚本显示read_note方法未定义，而且奇怪的是显示错误的armor行……

明白了，read_note在另外的页面定义的？先是plus_skill调用了armor的skill_ids。

v2sam · 发表于 2010-6-18 15:12:17

哈哈，这个我也不爱懂，天赋不在这上面= =

darkdrium · 发表于 2010-6-18 15:45:25

很忐忑的在沉影的脚本里添加了read_item方法，已经实现lz需要的效果

#==============================================================================
# 武器带技能 by 沉影不器
#------------------------------------------------------------------------------
# 武器备注栏写 skill=技能号表示武器带该技能.
# 允许同时带多技能 skill=技能号,技能号,技能号...
# 写法比较偷懒,bug未知
#==============================================================================
#==============================================================================
# ■ RPG::Weapon
#==============================================================================
module RPG
class BaseItem
def read_note(str)
[email protected]("\n")
note=notes.find do |line|
line.include?(str+'=')
end
if note
note.sub(str+"="){|m| ""}
else
""
end
end
end
class Weapon < BaseItem
def skill_ids
return read_note('skill').split(/,/)
end
def class_ids
read_note('class')
end
end
class Armor < BaseItem
def skill_ids
return read_note('skill').split(/,/)
end
end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
#--------------------------------------------------------------------------
# 技能绑定
#--------------------------------------------------------------------------
def skill_plus
@skills.clear
for i in self.class.learnings
learn_skill(i.skill_id) if i.level <= @level
end
unless @armor3_id == 0
ids = equips[3].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @armor4_id == 0
ids = equips[4].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @weapon_id == 0
ids = equips[0].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @armor1_id == 0
ids = equips[1].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
unless @armor2_id == 0
ids = equips[2].skill_ids
for s in ids
learn_skill(s.to_i)
end
end
end
#--------------------------------------------------------------------------
# ● 设置
#--------------------------------------------------------------------------
alias old_setup setup
def setup(actor_id)
old_setup(actor_id)
skill_plus
end
#--------------------------------------------------------------------------
# ● 更改装备
#--------------------------------------------------------------------------
def change_equip(equip_type, item, test = false)
last_item = equips[equip_type]
unless test
return if $game_party.item_number(item) == 0 if item != nil
$game_party.gain_item(last_item, 1)
$game_party.lose_item(item, 1)
end
item_id = item == nil ? 0 : item.id
case equip_type
when 0 # 武器
@weapon_id = item_id
if equips[0] && equips[0].read_note("class") != ""
self.class_id = equips[0].read_note("class").to_i
else
self.class_id = $data_actors[@actor_id].class_id
end
unless two_hands_legal? # 违反双手拿取的情况下
change_equip(1, nil, test) # 解除反手的装备
end
when 1 # 盾
@armor1_id = item_id
unless two_hands_legal? # 违反双手拿取的情况下
change_equip(0, nil, test) # 解除反手的装备
end
when 2 # 头
@armor2_id = item_id
when 3 # 身体
@armor3_id = item_id
when 4 # 装饰品
@armor4_id = item_id
end
skill_plus
end
#--------------------------------------------------------------------------
# ● 废弃装备
#--------------------------------------------------------------------------
def discard_equip(item)
if item.is_a?(RPG::Weapon)
if @weapon_id == item.id
@weapon_id = 0
elsif two_swords_style and @armor1_id == item.id
@armor1_id = 0
end
elsif item.is_a?(RPG::Armor)
if not two_swords_style and @armor1_id == item.id
@armor1_id = 0
elsif @armor2_id == item.id
@armor2_id = 0
elsif @armor3_id == item.id
@armor3_id = 0
elsif @armor4_id == item.id
@armor4_id = 0
end
end
skill_plus
end
end

复制代码

darkdrium · 发表于 2010-6-18 15:47:58

本帖最后由 darkdrium 于 2010-6-18 15:56 编辑

回复 v2sam 的帖子

动了两处，在module rpg处添加了BaseItem的read_note方法
还有更改武器的106-110行

使用方法，在备注中一行写skill=xx,xx,xx技能，回车换行，写class=xx。不写class=xx的恢复默认职业

ps：class和skill顺序可以变动
再ps：未完善异常处理，猜测如果你把职业id写的大于职业数量会出错

v2sam · 发表于 2010-6-18 16:24:57

啊，如果是备注行的识别，我还有另外一个脚本支持识别备注的标记，所以不用特地去写这个了。谢谢XDD

darkdrium · 发表于 2010-6-18 16:26:45

回复 v2sam 的帖子
:L 很显然由于你没给出备注识别脚本，导致我只好自己写了- -

v2sam · 发表于 2010-6-18 16:52:36

哈哈，对不起啊，补上：

#==============================================================================
# 读取rmvx备注栏指定字段 by 沉影不器
# -----------------------------------------------------------------------------
# 使用方法:
# 在vx数据库比如1号物品的备注栏里书写: 耐久度 = 10
# 读取时使用: p $data_items[1].read_note('耐久度')
# 几点注意:
# ① 忽略空格
# ② 返回值为文本格式
#==============================================================================
module RPG
#=============================================================================
# ■ BaseItem
#=============================================================================
class BaseItem
#-------------------------------------------------------------------------
# ○ 读取rmvx备注栏指定字段
# section : 字段名
# ignore_caps : 忽略大小写(仅字段名)
#-------------------------------------------------------------------------
def read_note(section, ignore_caps = false)
result = ''
# 忽略大小写时,全部转大写
section.upcase! if ignore_caps
# 转symbol方便比较
s = section.to_sym
self.note.each_line{|line|
temp = line.split(/=/)
# 去掉干扰字符
temp.each {|i| i.strip!}
temp[0].upcase! if ignore_caps
if temp[0].to_sym == s
unless temp[1] == nil
result = temp[1]
end
# 如果希望同名字段值覆盖前面的字段,去掉下一行
break
end
}
return result
end
end
#=============================================================================
# ■ Enemy
#=============================================================================
class Enemy
#-------------------------------------------------------------------------
# ○ 读取rmvx备注栏指定字段
# section : 字段名
# ignore_caps : 忽略大小写(仅字段名)
#-------------------------------------------------------------------------
def read_note(section, ignore_caps = false)
result = ''
# 忽略大小写时,全部转大写
section.upcase! if ignore_caps
# 转symbol方便比较
s = section.to_sym
self.note.each_line{|line|
temp = line.split(/=/)
# 去掉干扰字符
temp.each {|i| i.strip!}
temp[0].upcase! if ignore_caps
if temp[0].to_sym == s
unless temp[1] == nil
result = temp[1]
end
# 如果希望同名字段值覆盖前面的字段,去掉下一行
break
end
}
return result
end
end
#=============================================================================
# ■ State
#=============================================================================
class State
#-------------------------------------------------------------------------
# ○ 读取rmvx备注栏指定字段
# section : 字段名
# ignore_caps : 忽略大小写(仅字段名)
#-------------------------------------------------------------------------
def read_note(section, ignore_caps = false)
result = ''
# 忽略大小写时,全部转大写
section.upcase! if ignore_caps
# 转symbol方便比较
s = section.to_sym
self.note.each_line{|line|
temp = line.split(/=/)
# 去掉干扰字符
temp.each {|i| i.strip!}
temp[0].upcase! if ignore_caps
if temp[0].to_sym == s
unless temp[1] == nil
result = temp[1]
end
# 如果希望同名字段值覆盖前面的字段,去掉下一行
break
end
}
return result
end
end
end

复制代码

darkdrium · 发表于 2010-6-18 19:23:41

回复 v2sam 的帖子
那么只要106-110行就可以。
读取备注脚本上，我的思路跟沉影大大的比较相似，区别就是他做的比我完善多了……bow，差距啊差距，所幸接口统一，他的read_note返回结果和我的一样

小幽的马甲 · 发表于 2010-6-18 20:05:43

总觉得那个脚本的防具带技能那块是我加进去的T_T
顺便，我想知道如何处理二刀流= =

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

[已经过期] 【悬赏】找人写个装备武器改变职业的脚本

浏览过的版块

极短26参与

极短25参与

极短23参与

极短21参与

开拓者

贵宾

第一届化妆舞会最佳服饰奖