如何实现每次战斗只有1个人出战 - Project1

module DemonsTap
M_战斗结束后等待的时间 = 25
module_function
def attk(event)
actor = $game_party.actors[0]
$game_player.straighten
@w = Window_Demons.new
@w.opacity = 160
@w.refresh(actor,event)
@t = Window_Text.new
@t.x = 320 - @t.width / 2
@t.y = @w.y + @w.height
unless @sprite.nil?
@sprite.bitmap.dispose
@sprite.dispose
end
while true
d = event.enemy.attack_effect(actor)
event.animation_id = actor.animation2_id
@w.refresh(actor,event)
unless d == "Miss"
@t.refresh("#{actor.name}对#{event.enemy.name}造成了#{d}点伤害")
else
@t.refresh("#{event.enemy.name}躲开了#{actor.name}的攻击")
end
for i in 1..$data_animations[event.animation_id].frame_max * 2
$scene.spriteset.update
Graphics.update
end
if event.enemy.hp <= 0
@t.refresh("击败了#{event.enemy.name}")
@t.refresh("获得#{event.enemy.gold}G") if event.enemy.gold > 0
@t.refresh("获得#{event.enemy.exp}Exp") if event.enemy.exp > 0
$game_party.gain_gold(event.enemy.gold)
actor.exp += event.enemy.exp
M_战斗结束后等待的时间.times{Graphics.update}
@结果 = 'WIN'
break
end
if event.enemy.skill?
d = actor.skill_effect(event.enemy, event.enemy.skill)
aniID = event.enemy.skill.animation2_id
unless d == "Miss"
t = "#{event.enemy.name}使用了#{event.enemy.skill.name}对#{actor.name}造成了#{d}点伤害"
else
t = "#{event.enemy.name}使用了#{event.enemy.skill.name}但#{actor.name}躲开了"
end
eaniId = event.enemy.skill.animation1_id
else
d = actor.attack_effect(event.enemy)
aniID = event.enemy.animation2_id
unless d == "Miss"
t = "#{event.enemy.name}对#{actor.name}造成了#{d}点伤害"
else
t = "#{actor.name}躲开了#{event.enemy.name}的攻击"
end
eaniId = 0
end
@w.refresh(actor,event)
event.animation_id = eaniId
$game_player.animation_id = aniID
@t.refresh(t)
for i in 1..$data_animations[$game_player.animation_id].frame_max * 2
$scene.spriteset.update
Graphics.update
end
if actor.hp <= 0
@t.refresh("#{actor.name}战败")
M_战斗结束后等待的时间.times{Graphics.update}
@结果 = 'LOSE'
break
end
end
case @结果
when 'WIN'
key = [$game_map.map_id, event.id, 'A']
$game_self_switches[key] = true
$game_map.need_refresh = true
when 'LOSE'
if $game_party.actors.size > 1
$game_party.remove_actor($game_party.actors[0].id)
else
$scene = Scene_Gameover.new
end
end
@w.dispose
@t.dispose
end
end

复制代码