Últimos temas
» [MV] ¿Cómo mover un sprite?
por Frägarach Hoy a las 2:19 am

» Como cambio esto?...
por Shy_Cream Hoy a las 2:09 am

» El Dia Z - Demo
por EdwarPlay Ayer a las 8:08 pm

» Pokemon Destiny
por Greninja555 Ayer a las 5:46 pm

» Animación Habilidad de Enemigos RPGMAKER VX ACE
por Metatron Ayer a las 3:16 am

» [VX] Cambio de Resolución
por luistop12 Vie Sep 13, 2019 6:51 am

» ¿Como Mover al jugador mientras hay una conversación?
por Zachy Vie Sep 13, 2019 2:05 am

» ¿Como hacer un menú/Galería de imágenes? (RPG VxAce)
por ZororoWhite Jue Sep 12, 2019 7:57 pm

» Inherited Sins [Juego Completo] [Definitive Edition]
por Nina Jue Sep 12, 2019 7:47 pm

» Zaza no konpasu (La Brújula de Zaza) [VXACE]
por Pocari Sáb Sep 07, 2019 12:28 pm

» Ayuda con el ABS
por DarkarPro0102 Sáb Sep 07, 2019 8:32 am

» Pop! Horror City Complementos
por EdwarPlay Jue Sep 05, 2019 10:59 pm


[VX] Reintentar batalla

Ir abajo

[VX] Reintentar batalla Empty [VX] Reintentar batalla

Mensaje por Turbiosoft.acho el Jue Mar 06, 2014 7:06 pm

Este script fue creado por sandgolem. Permite que puedas reintentar la última batalla en la que has sido derrotado en vez de mandarte directamente al título, aunque viene una opción para ambas cosas.

[VX] Reintentar batalla Z9O2tC3

Ponlo encima de Main.

Código:
#==========================================================================
# * Battle Retry
#==========================================================================
# by sandgolem
# Traducción por:Turbiosoft.acho
# http://rmakercom.foroactivo.com/
# Versión 1 [VX]
# 26 de Enero de 2008
#==========================================================================
#  INSTRUCCIONES:

#  1- Pon el script encima de Main.
#  2- Edita el Battle_Retry Module (sólo las frases entre comas)
#==========================================================================
 
#==========================================================================
#  Battle_Retry Module
#==========================================================================
 
module GameBaker
  BattleRetryCommands = ['Reintentar batalla','Volver al título'] # Las frases que aparecerán.
  BattleRetryDisableSwitch = 0 #Interruptor que desactiva el script. Pon 0 para que no sea ninguno.
end
 
#==========================================================================
#  Game Interpreter
#==========================================================================
 
class Game_Interpreter
  alias_method :gamebaker_battleretry_interp601, :command_601
  def command_601
    if $gamebaker_retrywon
      @branch[@list[@index].indent] = 0
      $gamebaker_retrywon = nil
    end
    return gamebaker_battleretry_interp601
  end
 
  alias_method :gamebaker_battleretry_interp602, :command_602
  def command_602
    if $gamebaker_retryescaped
      @branch[@list[@index].indent] = 1
      $gamebaker_retryescaped = nil
    end
    return gamebaker_battleretry_interp602
  end
end
 
class Scene_File 
  def gamebaker_write_retrysave_data
    file = File.open('Data/retry.gb', 'wb')
    write_save_data(file)
    file.close
  end
 
  def gamebaker_read_retrysave_data
    file = File.open('Data/retry.gb', 'rb')
    read_save_data(file)
    file.close
  end
end
 
class Scene_Battle
  alias_method :gamebaker_battleretry_main, :main
  def main
    $gamebaker_retryescaped = nil
    $gamebaker_retrywon = nil
    if !$game_switches[GameBaker::BattleRetryDisableSwitch]
      if !$gamebaker_battleretry_inbattle & !$game_troop.can_lose
        $gamebaker_battleretry_inbattle = $game_troop
        gamebaker_scene_save_temp = Scene_File.new(true,true,true)
        gamebaker_scene_save_temp.gamebaker_write_retrysave_data
        gamebaker_scene_save_temp = nil
      end
    end
    gamebaker_battleretry_main
    if !$scene.is_a?(Scene_Gameover)
      File.delete('Data/retry.gb') if FileTest.exist?('Data/retry.gb')
      $gamebaker_battleretry_inbattle = nil
    end
  end
 
  alias_method :gamebaker_battleretry_battleend, :battle_end
  def battle_end(result)
    $gamebaker_retrywon = true if result == 0
    $gamebaker_retryescaped = true if result == 1
    gamebaker_battleretry_battleend(result)
  end
end
 
class Scene_Gameover
  alias_method :gamebaker_battleretry_gameovermain, :main
  def main
    if $gamebaker_battleretry_inbattle
      $data_system.gameover_me.play
      @sprite = Sprite.new
      @sprite.bitmap = Cache.system("GameOver")
      Graphics.transition(60)
      @command_window = Window_Command.new(192,GameBaker::BattleRetryCommands)
      @command_window.back_opacity = 160
      @command_window.x = 260 - @command_window.width / 2
      @command_window.y = 248
      loop do
        Graphics.update
        Input.update
        gamebaker_retry_update
        break if $scene != self
      end
      @command_window.dispose
      Graphics.freeze
      @sprite.bitmap.dispose
      @sprite.dispose
      Graphics.transition(30)
      Graphics.freeze
    else
      gamebaker_battleretry_gameovermain
    end
  end
 
  def gamebaker_retry_update
    @command_window.update
    if Input.trigger?(Input::C)
      case @command_window.index
      when 0
        $game_system.battle_bgm.play
        gamebaker_scene_save_temp = Scene_File.new(true,true,true)
        gamebaker_scene_save_temp.gamebaker_read_retrysave_data
        gamebaker_scene_save_temp = nil
        $game_troop = $gamebaker_battleretry_inbattle
        $scene = Scene_Battle.new
      when 1
        File.delete('Data/retry.gb') if FileTest.exist?('Data/retry.gb')
        $gamebaker_battleretry_inbattle = nil
        $scene = Scene_Title.new
      end
    end
  end
end

_________________

¡Apoya PCII colocando esta barrita en tu firma!
[VX] Reintentar batalla JZxmSi
Turbiosoft.acho apoya a...:
[VX] Reintentar batalla AvSsi3
[VX] Reintentar batalla TpIA16
[VX] Reintentar batalla VqJJJp
[VX] Reintentar batalla BU4sOt

Y a los juegos de Zoro y Japo (?)


Turbiosoft.acho
Turbiosoft.acho
Admin
Admin

Femenino
Rmakercom
RPG Maker : Ace
Mensajes : 1287
Monedas : 4378
Reputación : 195
Localización : En el glorioso y magistral Zulo.

Volver arriba Ir abajo

[VX] Reintentar batalla Empty Re: [VX] Reintentar batalla

Mensaje por RikuZala el Jue Mar 06, 2014 10:51 pm

Me mola, buena esa.
Me suena de lejos que estas cosas pueden dar fallos en otros scripts si reintentas la batalla. ¿Alguna noticia de eso?
RikuZala
RikuZala
PJ de Relleno
PJ de Relleno

Masculino
RPG Maker : Ace
Mensajes : 28
Monedas : 73
Reputación : 14
Edad : 33
Localización : The end of time.

Volver arriba Ir abajo

[VX] Reintentar batalla Empty Re: [VX] Reintentar batalla

Mensaje por Turbiosoft.acho el Jue Mar 06, 2014 11:00 pm

Aún no me ha dado ningún fallo. Pero lo iré probando con más scripts y si veo algo lo notificaré por aquí.

_________________

¡Apoya PCII colocando esta barrita en tu firma!
[VX] Reintentar batalla JZxmSi
Turbiosoft.acho apoya a...:
[VX] Reintentar batalla AvSsi3
[VX] Reintentar batalla TpIA16
[VX] Reintentar batalla VqJJJp
[VX] Reintentar batalla BU4sOt

Y a los juegos de Zoro y Japo (?)


Turbiosoft.acho
Turbiosoft.acho
Admin
Admin

Femenino
Rmakercom
RPG Maker : Ace
Mensajes : 1287
Monedas : 4378
Reputación : 195
Localización : En el glorioso y magistral Zulo.

Volver arriba Ir abajo

[VX] Reintentar batalla Empty Re: [VX] Reintentar batalla

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.