Project1
标题:
求个武器脚本
[打印本页]
作者:
黑鏻
时间:
2007-7-19 14:34
标题:
求个武器脚本
我想求个脚本，就是能在战斗中能随便卸下武器、防具，随便装备武器、防具，而且并不影响你的攻击权，还有，能不能把武器、防具做成可以在战斗中使用它的特效，使用了就不能进行攻击。 [LINE]1,#dddddd[/LINE]
本贴由论坛斑竹真·ZERO结贴，如楼主认为问题未解决，请重新将此贴编辑为“有事请教”，并回帖叙述疑点即可～ ^-^
作者:
黑鏻
时间:
2007-7-19 14:34
标题:
求个武器脚本
我想求个脚本，就是能在战斗中能随便卸下武器、防具，随便装备武器、防具，而且并不影响你的攻击权，还有，能不能把武器、防具做成可以在战斗中使用它的特效，使用了就不能进行攻击。 [LINE]1,#dddddd[/LINE]
本贴由论坛斑竹真·ZERO结贴，如楼主认为问题未解决，请重新将此贴编辑为“有事请教”，并回帖叙述疑点即可～ ^-^
作者:
天狼星1110
时间:
2007-7-19 20:42
前者解决方法为在战斗画面菜单中增加[装备]栏目,其解决思路见我教学[不是教学的教学],论坛搜索.还有..假如下次标题仍为[求脚本],无人问津依旧.
作者:
步兵中尉
时间:
2007-7-19 21:11
class Game_Actor < Game_Battler
C3_W_SKILL = []
C3_A1_SKILL = []
C3_A2_SKILL = []
C3_A3_SKILL = []
C3_A4_SKILL = []
#战斗图前缀后面会自动跟上角色的数据库编号。
#比如你使用上面的设定，你的1、2、3、4号角色可以用1号武器(铜剑)
#则你的battlers/下面应改有"剑_1.png"，"剑_2.png"，"剑_3.png"，"剑_4.png"
#一个武器可以重复设置多种技能，防具也是。
C3_A4_SKILL.push [2,2] #装饰品编号，附带技能编号
C3_A4_SKILL.push [3,3]
C3_A4_SKILL.push [4,4]
C3_A4_SKILL.push [5,5]
C3_A4_SKILL.push [6,6]
C3_A4_SKILL.push [7,7]
#--------------------------------------------------------------------------
# ● 变更装备
# 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，作者柳柳，转载和使用请保留此信息
#------------------------------------------------------------
复制代码
用上面的脚本就能够解决换装备的问题！
第二个问题的（装备附带技能）脚本如下：
class Game_Actor < Game_Battler
C3_W_SKILL = []
C3_A1_SKILL = []
C3_A2_SKILL = []
C3_A3_SKILL = []
C3_A4_SKILL = []
#战斗图前缀后面会自动跟上角色的数据库编号。
#比如你使用上面的设定，你的1、2、3、4号角色可以用1号武器(铜剑)
#则你的battlers/下面应改有"剑_1.png"，"剑_2.png"，"剑_3.png"，"剑_4.png"
#一个武器可以重复设置多种技能，防具也是。
C3_A4_SKILL.push [2,2] #装饰品编号，附带技能编号
C3_A4_SKILL.push [3,3]
C3_A4_SKILL.push [4,4]
C3_A4_SKILL.push [5,5]
C3_A4_SKILL.push [6,6]
C3_A4_SKILL.push [7,7]
#--------------------------------------------------------------------------
# ● 变更装备
# 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，作者柳柳，转载和使用请保留此信息
#------------------------------------------------------------
复制代码
还有问题就来问我吧！
欢迎光临 Project1 (https://rpg.blue/)
Powered by Discuz! X3.1