怎么用金钱来抵挡伤害的武器

wabbyzw · 发表于 2012-2-14 19:17:35

本帖最后由 wabbyzw 于 2012-2-14 19:18 编辑

杂兵天下发表于 2012-2-13 10:56
让我来接手这个问题吧
话说你有没有用LunaticDamage
有没有听说过LunaticDamage？

钱不够则不能发动，然后治疗有金钱盾的人也不会加钱，还是麻烦您把能抵挡中毒、出血、眩晕、石化这四种状态做出来。
中毒就是每回合掉血，7回合后自动回复。
出血就是每回合掉血，攻击力减少，6回合后自动回复。
眩晕就是不能攻击，5回合后自动回复。
石化就是不能攻击，加倍掉血，不能获得EXP，3回合后自动回复。
麻烦啦~
如果做出来就认可，做不出来也认可，谢谢啦~

杂兵天下 · 发表于 2012-2-14 19:42:28

class Game_Actor
def execute_damage(user)
if @hp_damage > 0
remove_states_shock
calc_me = @hp_damage/5.0
calc_me = calc_me.to_i
if $data_armors[@armor1_id].name=="金钱盾" && $game_party.gold >= calc_me
@hp_damage -= calc_me
$game_party.gain_gold(-calc_me)
end
end
self.hp -= @hp_damage
self.mp -= @mp_damage
if @absorbed
user.hp += @hp_damage
user.mp += @mp_damage
end
end#用金钱盾抵御非状态伤害。
def slip_damage_effect
if slip_damage? and @hp > 0
@hp_damage = apply_variance(maxhp / 10, 10)
@hp_damage = @hp - 1 if @hp_damage >= @hp
if $data_armors[@armor1_id].name=="金钱盾"
calc_me = @hp_damage/5.0
calc_me = calc_me.to_i
if $game_party.gold >= calc_me && @hp_damage>0
@hp_damage -= calc_me
$game_party.gain_gold(-calc_me)
end
end
self.hp -= @hp_damage
end
end#用金钱盾抵御流血、中毒状态伤害。
def apply_state_changes(obj)
plus = obj.plus_state_set
minus = obj.minus_state_set
for i in plus
next if state_resist?(i)
next if dead?
next if i == 1 and @immortal
if state?(i)
@remained_states.push(i)
next
end
if rand(100) < state_probability(i)
@querenaddstate=true
if $data_armors[@armor1_id].name=="金钱盾"
calc_me = 10000000#大额度的金钱，不要改动。
calc_me = 100 if i==8#此处假设8是眩晕状态的ID，需要消耗100钱抵挡
calc_me = 50 if i==9#此处假设9是石化状态的ID，需要消耗50钱抵挡
unless($game_party.gold<calc_me)
$game_party.gain_gold(-calc_me)
@querenaddstate=false
end
end
if @querenaddstate
add_state(i)
@added_states.push(i)
end
end
end
for i in minus
next unless state?(i)
remove_state(i)
@removed_states.push(i)
end
for i in @added_states & @removed_states
@added_states.delete(i)
@removed_states.delete(i)
end
end
end

复制代码

iisnow · 发表于 2012-2-25 12:13:14

杂兵天下发表于 2012-2-13 10:56
让我来接手这个问题吧
话说你有没有用LunaticDamage
有没有听说过LunaticDamage？

首先脚本大致完成了功能，但是又几个小问题；
1.先扣除钱还是HP伤害，顺序反了吧
20-25行应该改为

if $game_party.gold >= calc_me
@hp_damage -= calc_me
else
@hp_damage -= $game_party.gold
end
$game_party.gain_gold(-calc_me)

复制代码

2.然后是判据，如果角色不带上防具，脚本时会报错的：
所以17行改为：

if $data_armors[@armor1_id] == X #X就是金钱盾的id
#或者
if $data_armors[@armor1_id] && $data_armors[@armor1_id].name=="金钱盾"

复制代码

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

[已经解决] 怎么用金钱来抵挡伤害的武器

点评

点评

开拓者

贵宾