技能Di问题

爆炎的月月鸟 · 发表于 2008-1-17 21:57:31

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

爆炎的月月鸟 · 发表于 2008-1-17 22:13:54

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

劍之飛龍☆ · 发表于 2008-1-17 22:01:56

#------------------------------------------------------------
# 脚本来自www.66rpg.com，作者柳柳，转载和使用请保留此信息
#------------------------------------------------------------
class Game_Actor < Game_Battler
C3_W_SKILL = []
C3_A1_SKILL = []
C3_A2_SKILL = []
C3_A3_SKILL = []
C3_A4_SKILL = []
#C3_W_SKILL.push [1,0,] 咳应该武器的技能吧
#C3_A1_SKILL.push [1,15] #盾编号，附带技能编号
#C3_A2_SKILL.push [6,15] #头盔编号，附带技能编号
#C3_A3_SKILL.push [14,15] #甲编号，附带技能编号
#C3_A4_SKILL.push [25,15] #装饰品编号，附带技能编号
#--------------------------------------------------------------------------
# ● 变更装备
# equip_type : 装备类型
# id : 武器 or 防具 ID (0 为解除装备)
#--------------------------------------------------------------------------
def equip(equip_type, id)
case equip_type
when 0 # 武器
if id == 0 or $game_party.weapon_number(id) > 0
old_weapon_id = @weapon_id
weapon_i = 0
for weapon_i in C3_W_SKILL
if weapon_i[0] == old_weapon_id
if weapon_i[1] != 0
forget_skill(weapon_i[1])
end
end
end
for weapon_i in C3_W_SKILL
if weapon_i[0] == id
if weapon_i[1] != 0
learn_skill(weapon_i[1])
end
if weapon_i[2] != ""
@battler_name = weapon_i[2]+@actor_id.to_s
else
@battler_name = $data_actors[@actor_id].battler_name
end
end
end
$game_party.gain_weapon(@weapon_id, 1)
@weapon_id = id
$game_party.lose_weapon(id, 1)
end
when 1 # 盾
if id == 0 or $game_party.armor_number(id) > 0
old_am_id = @armor1_id
am_i = 0
for am_i in C3_A1_SKILL
if am_i[0] == old_am_id
if am_i[1] != 0
forget_skill(am_i[1])
end
end
end
for am_i in C3_A1_SKILL
if am_i[0] == id
if am_i[1] != 0
learn_skill(am_i[1])
end
end
end
update_auto_state($data_armors[@armor1_id], $data_armors[id])
$game_party.gain_armor(@armor1_id, 1)
@armor1_id = id
$game_party.lose_armor(id, 1)
end
when 2 # 头
if id == 0 or $game_party.armor_number(id) > 0
old_am_id = @armor2_id
am_i = 0
for am_i in C3_A2_SKILL
if am_i[0] == old_am_id
if am_i[1] != 0
forget_skill(am_i[1])
end
end
end
for am_i in C3_A2_SKILL
if am_i[0] == id
if am_i[1] != 0
learn_skill(am_i[1])
end
end
end
update_auto_state($data_armors[@armor2_id], $data_armors[id])
$game_party.gain_armor(@armor2_id, 1)
@armor2_id = id
$game_party.lose_armor(id, 1)
end
when 3 # 身体
if id == 0 or $game_party.armor_number(id) > 0
old_am_id = @armor3_id
am_i = 0
for am_i in C3_A3_SKILL
if am_i[0] == old_am_id
if am_i[1] != 0
forget_skill(am_i[1])
end
end
end
for am_i in C3_A3_SKILL
if am_i[0] == id
if am_i[1] != 0
learn_skill(am_i[1])
end
end
end
update_auto_state($data_armors[@armor3_id], $data_armors[id])
$game_party.gain_armor(@armor3_id, 1)
@armor3_id = id
$game_party.lose_armor(id, 1)
end
when 4 # 装饰品
if id == 0 or $game_party.armor_number(id) > 0
old_am_id = @armor4_id
am_i = 0
for am_i in C3_A4_SKILL
if am_i[0] == old_am_id
if am_i[1] != 0
forget_skill(am_i[1])
end
end
end
for am_i in C3_A4_SKILL
if am_i[0] == id
if am_i[1] != 0
learn_skill(am_i[1])
end
end
end
update_auto_state($data_armors[@armor4_id], $data_armors[id])
$game_party.gain_armor(@armor4_id, 1)
@armor4_id = id
$game_party.lose_armor(id, 1)
end
end
end
end
#------------------------------------------------------------
# 脚本来自www.66rpg.com，作者柳柳，转载和使用请保留此信息
#------------------------------------------------------------

复制代码

作过小小的修改.......

劍之飛龍☆ · 发表于 2008-1-17 22:00:45

主站上有脚本啊..

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

技能Di问题

浏览过的版块