Mundo Maker
¡Bienvenid@ a Mundo Maker!

¿Quieres aprender todo sobre el RPG Maker?



Regístrate y forma parte de Mundo Maker.

[RMXP] Debug Extras

Ver el tema anterior Ver el tema siguiente Ir abajo

RPG Maker XP [RMXP] Debug Extras

Mensaje por Wecoc el 2012-12-14, 22:22

[RMXP] Debug Extras

Bueno esto es un edit muy facil del Scene Debug que lo que hace es que debajo de toda la lista de Interruptores y Variables, salga un Otros con algunas cosas dentro. Yo lo uso bastante en Birdsite y va bien. Evidentemente, como el Debug, solo sirve para probar cosas, no para el propio juego.
Se podrían poner más cosas en el script si os interesara, pero por defecto puse las siguientes:

- Mapa
- Vida
- Vida Max
- Magia
- Magia Max
- Nivel
- Dinero

Cambiando eso en el Debug se cambia directamente en el juego por lo que es más facil hacer tests.
Notas a tener en cuenta:

- Si cambias de mapa, se teletransportará a x e y (1,1). Eso no tiene que ser problema en principio, porque como tienes el Control para andar por todas partes...
- Si pones un mapa que su id no existe, dará error y se irá todo al carajo :(( así que cuidado
- Vida Max nunca es más pequeño que Vida, y con Magia Max igual, se cambia directamente.
- Cuando cambias el Nivel, se cambia directamente la Vida Max y la Magia Max a los que corresponde ese nivel (así es más facil testear dificultad de enemigos).
- Haciendo enter en PV y PM los devuelve directamente al mismo valor que PV max y PM max.
- L y R ( AvPag y RePag) funcionan igualmente.

Script:

Código:
#==============================================================================
# Debug Extras
#------------------------------------------------------
# ((Script original hecho para el juego Birdsite))
# Este script añade cosas al Debug para poder probar ciertas cosas del
# juego más a nuestro gusto.
# Autor: Wecoc (no es necesario darme créditos
#==============================================================================

#==============================================================================
# ** Window_DebugLeft
#==============================================================================

class Window_DebugLeft < Window_Selectable
  def refresh
    if self.contents != nil
      self.contents.dispose
      self.contents = nil
    end
    @switch_max = ($data_system.switches.size - 1 + 9) / 10
    @variable_max = ($data_system.variables.size - 1 + 9) / 10
    @item_max = 1 + @switch_max + @variable_max
    self.contents = Bitmap.new(width - 32, @item_max * 32)
    for i in 0...@switch_max
      text = sprintf("I [%04d-%04d]", i*10+1, i*10+10)
      self.contents.draw_text(4, i * 32, 152, 32, text)
    end
    for i in 0...@variable_max
      text = sprintf("V [%04d-%04d]", i*10+1, i*10+10)
      self.contents.draw_text(4, (@switch_max + i) * 32, 152, 32, text)
    end
    self.contents.draw_text(4,(@switch_max+@variable_max)*32,152,32,"Otros")
  end
  #--------------------------------------------------------------------------
  # * Get Mode
  #--------------------------------------------------------------------------
  def mode
    if self.index < @switch_max
      return 0
    elsif self.index < @switch_max+@variable_max
      return 1
    else
      return 2
    end
  end
end

#==============================================================================
# ** Window_DebugRight
#==============================================================================

class Window_DebugRight < Window_Selectable
  #--------------------------------------------------------------------------
  # * Public Instance Variables
  #--------------------------------------------------------------------------
  attr_reader  :mode                    # mode (0: switch, 1: variable)
  attr_reader  :top_id                  # ID shown on top
  attr_accessor :var_map
  attr_accessor :var_hp
  attr_accessor :var_maxhp
  attr_accessor :var_sp
  attr_accessor :var_maxsp
  attr_accessor :var_level
  attr_accessor :var_money
  #--------------------------------------------------------------------------
  # * Object Initialization
  #--------------------------------------------------------------------------
  def initialize
    super(192, 0, 448, 352)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.index = -1
    self.active = false
    @item_max = 10
    @mode = 0
    @top_id = 1
    @var_map  = $game_map.map_id
    @var_hp    = $game_party.actors[0].hp
    @var_maxhp = $game_party.actors[0].maxhp
    @var_sp    = $game_party.actors[0].sp
    @var_maxsp = $game_party.actors[0].maxsp
    @var_level = $game_party.actors[0].level
    @var_money = $game_party.gold
    refresh
  end
  #--------------------------------------------------------------------------
  # * Refresh
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    for i in 0..9
      if @mode == 0 # Interruptores
        name = $data_system.switches[@top_id+i]
        status = $game_switches[@top_id+i] ? "[ON]" : "[OFF]"
        if name == nil
          name = ''
        end
        id_text = sprintf("%04d:", @top_id+i)
        width = self.contents.text_size(id_text).width
      elsif @mode == 1 # Variables
        name = $data_system.variables[@top_id+i]
        status = $game_variables[@top_id+i].to_s
        if name == nil
          name = ''
        end
        id_text = sprintf("%04d:", @top_id+i)
        width = self.contents.text_size(id_text).width
      elsif @mode == 2 # Otros
        case i
        when 0
          name = "Mapa"
          status = @var_map.to_s
        when 1
          name = "Vida"
          status = @var_hp.to_s
        when 2
          name = "Vida max"
          status = @var_maxhp.to_s
        when 3
          name = "Magia"
          status = @var_sp.to_s
        when 4
          name = "Magia max" 
          status = @var_maxsp.to_s
        when 5
          name = "Nivel"
          status = @var_level.to_s
        when 6
          name = "Dinero"
          status = @var_money.to_s
        else
          name = status = ''
        end
        id_text = ''
        width = 0
      end
      self.contents.draw_text(4, i * 32, width, 32, id_text)
      self.contents.draw_text(12 + width, i * 32, 296 - width, 32, name)
      self.contents.draw_text(312, i * 32, 100, 32, status, 2)
    end
  end
end

#==============================================================================
# ** Scene_Debug
#------------------------------------------------------------------------------
#  This class performs debug screen processing.
#==============================================================================

class Scene_Debug
  #--------------------------------------------------------------------------
  # * Frame Update (when left window is active)
  #--------------------------------------------------------------------------
  def update_left
    # If B button was pressed
    if Input.trigger?(Input::B)
      # Play cancel SE
      $game_system.se_play($data_system.cancel_se)
      # Switch to map screen
      $scene = Scene_Map.new

      if @right_window.var_map != $game_map.map_id
        # Teletransportar
        $game_temp.player_transferring = true
        $game_temp.player_new_map_id = @right_window.var_map
        $game_temp.player_new_x = 1
        $game_temp.player_new_y = 1
        $game_temp.player_new_direction = 0
      end
     
      if @right_window.var_money != $game_party.gold
        $game_party.gain_gold(@right_window.var_money-$game_party.gold)
      end
     
      if @right_window.var_level != $game_party.actors[0].level
        $game_party.actors[0].level = @right_window.var_level
      end
     
      if @right_window.var_maxhp != $game_party.actors[0].maxhp
        $game_party.actors[0].maxhp = @right_window.var_maxhp
      end
      if @right_window.var_maxsp != $game_party.actors[0].maxsp
        $game_party.actors[0].maxsp = @right_window.var_maxsp
      end

      if @right_window.var_hp != $game_party.actors[0].hp
        $game_party.actors[0].hp = @right_window.var_hp
      end
      if @right_window.var_sp != $game_party.actors[0].sp
        $game_party.actors[0].sp = @right_window.var_sp
      end
      return
    end
    # If C button was pressed
    if Input.trigger?(Input::C)
      # Play decision SE
      $game_system.se_play($data_system.decision_se)
      # Display help
      if @left_window.mode == 0
        text1 = "C (Intro) : Activar / Desactivar"
        @help_window.contents.draw_text(4, 0, 406, 32, text1)
      else
        text1 = "Izq : -1  Dcha : +1"
        text2 = "L (Re.Pag) : -10"
        text3 = "R (Av.Pag) : +10"
        @help_window.contents.draw_text(4, 0, 406, 32, text1)
        @help_window.contents.draw_text(4, 32, 406, 32, text2)
        @help_window.contents.draw_text(4, 64, 406, 32, text3)
      end
      # Activate right window
      @left_window.active = false
      @right_window.active = true
      @right_window.index = 0
      return
    end
  end
  #--------------------------------------------------------------------------
  # * Frame Update (when right window is active)
  #--------------------------------------------------------------------------
  def update_right
    # If B button was pressed
    if Input.trigger?(Input::B)
      # Play cancel SE
      $game_system.se_play($data_system.cancel_se)
      # Activate left window
      @left_window.active = true
      @right_window.active = false
      @right_window.index = -1
      # Erase help
      @help_window.contents.clear
      return
    end
    # Get selected switch / variable ID
    current_id = @right_window.top_id + @right_window.index
    # If switch
    if @right_window.mode == 0
      # If C button was pressed
      if Input.trigger?(Input::C)
        # Play decision SE
        $game_system.se_play($data_system.decision_se)
        # Reverse ON / OFF
        $game_switches[current_id] = (not $game_switches[current_id])
        @right_window.refresh
        return
      end
    end
    # If variable
    if @right_window.mode == 1
      # If right button was pressed
      if Input.repeat?(Input::RIGHT)
        # Play cursor SE
        $game_system.se_play($data_system.cursor_se)
        # Increase variables by 1
        $game_variables[current_id] += 1
        # Maximum limit check
        if $game_variables[current_id] > 99999999
          $game_variables[current_id] = 99999999
        end
        @right_window.refresh
        return
      end
      # If left button was pressed
      if Input.repeat?(Input::LEFT)
        # Play cursor SE
        $game_system.se_play($data_system.cursor_se)
        # Decrease variables by 1
        $game_variables[current_id] -= 1
        # Minimum limit check
        if $game_variables[current_id] < -99999999
          $game_variables[current_id] = -99999999
        end
        @right_window.refresh
        return
      end
      # If R button was pressed
      if Input.repeat?(Input::R)
        # Play cursor SE
        $game_system.se_play($data_system.cursor_se)
        # Increase variables by 10
        $game_variables[current_id] += 10
        # Maximum limit check
        if $game_variables[current_id] > 99999999
          $game_variables[current_id] = 99999999
        end
        @right_window.refresh
        return
      end
      # If L button was pressed
      if Input.repeat?(Input::L)
        # Play cursor SE
        $game_system.se_play($data_system.cursor_se)
        # Decrease variables by 10
        $game_variables[current_id] -= 10
        # Minimum limit check
        if $game_variables[current_id] < -99999999
          $game_variables[current_id] = -99999999
        end
        @right_window.refresh
        return
      end
    end
   
    if @right_window.mode == 2
      if Input.repeat?(Input::RIGHT)
        $game_system.se_play($data_system.cursor_se)
        case @right_window.index
        when 0 # MAPA
          @right_window.var_map += 1
          #if @right_window.var_map >
        when 1 # PV
          @right_window.var_hp += 1
          if @right_window.var_hp > 9999999
            @right_window.var_hp = 9999999
          end
          if @right_window.var_hp > @right_window.var_maxhp
            @right_window.var_maxhp = @right_window.var_hp
          end
        when 2 # MAX PV
          @right_window.var_maxhp += 1
          if @right_window.var_maxhp > 9999999
            @right_window.var_maxhp = 9999999
          end
        when 3 # PM
          @right_window.var_sp += 1
          if @right_window.var_sp > 9999999
            @right_window.var_sp = 9999999
          end
          if @right_window.var_sp > @right_window.var_maxsp
            @right_window.var_maxsp = @right_window.var_sp
          end
        when 4 # MAX PM
          @right_window.var_maxsp += 1
          if @right_window.var_maxsp > 9999999
            @right_window.var_maxsp = 9999999
          end
        when 5 # NIVEL
          @right_window.var_level += 1
          if @right_window.var_level > 99
            @right_window.var_level = 99
          end
          actor = $data_actors[1]
          @right_window.var_maxhp=actor.parameters[0,@right_window.var_level]
          @right_window.var_maxsp=actor.parameters[1,@right_window.var_level]
        when 6 # DINERO
          @right_window.var_money += 10
        end
        @right_window.refresh
        return
      end
      if Input.repeat?(Input::LEFT)
        $game_system.se_play($data_system.cursor_se)
        case @right_window.index
        when 0 # MAPA
          @right_window.var_map -= 1
          if @right_window.var_map < 0
            @right_window.var_map = 0
          end
        when 1 # PV
          @right_window.var_hp -= 1
          if @right_window.var_hp < 0
            @right_window.var_hp = 0
          end
        when 2 # MAX PV
          @right_window.var_maxhp -= 1
          if @right_window.var_maxhp < 0
            @right_window.var_maxhp = 0
          end
          if @right_window.var_hp > @right_window.var_maxhp
            @right_window.var_hp = @right_window.var_maxhp
          end
        when 3 # PM
          @right_window.var_sp -= 1
          if @right_window.var_sp < 0
            @right_window.var_sp = 0
          end
        when 4 # MAX PM
          @right_window.var_maxsp -= 1
          if @right_window.var_maxsp < 0
            @right_window.var_maxsp = 0
          end
          if @right_window.var_sp > @right_window.var_maxsp
            @right_window.var_sp = @right_window.var_maxsp
          end
        when 5 # NIVEL
          @right_window.var_level -= 1
          if @right_window.var_level < 1
            @right_window.var_level = 1
          end
          actor = $data_actors[1]
          @right_window.var_maxhp=actor.parameters[0,@right_window.var_level]
          if @right_window.var_hp > @right_window.var_maxhp
            @right_window.var_hp = @right_window.var_maxhp
          end
          @right_window.var_maxsp=actor.parameters[1,@right_window.var_level]
          if @right_window.var_sp > @right_window.var_maxsp
            @right_window.var_sp = @right_window.var_maxsp
          end
        when 6 # DINERO
          @right_window.var_money -= 10
          if @right_window.var_money < 0
            @right_window.var_money = 0
          end
        end
        @right_window.refresh
        return
      end
      # If R button was pressed
      if Input.repeat?(Input::R)
        $game_system.se_play($data_system.cursor_se)
        case @right_window.index
        when 0 # MAPA
          @right_window.var_map += 10
          #if @right_window.var_map >
        when 1 # PV
          @right_window.var_hp += 10
          if @right_window.var_hp > 9999999
            @right_window.var_hp = 9999999
          end
          if @right_window.var_hp > @right_window.var_maxhp
            @right_window.var_maxhp = @right_window.var_hp
          end
        when 2 # MAX PV
          @right_window.var_maxhp += 10
          if @right_window.var_maxhp > 9999999
            @right_window.var_maxhp = 9999999
          end
        when 3 # PM
          @right_window.var_sp += 10
          if @right_window.var_sp > 9999999
            @right_window.var_sp = 9999999
          end
          if @right_window.var_sp > @right_window.var_maxsp
            @right_window.var_maxsp = @right_window.var_sp
          end
        when 4 # MAX PM
          @right_window.var_maxsp += 10
          if @right_window.var_maxsp > 9999999
            @right_window.var_maxsp = 9999999
          end
        when 5 # NIVEL
          @right_window.var_level += 10
          if @right_window.var_level > 99
            @right_window.var_level = 99
          end
          actor = $data_actors[1]
          @right_window.var_maxhp=actor.parameters[0,@right_window.var_level]
          @right_window.var_maxsp=actor.parameters[1,@right_window.var_level]
        when 6 # DINERO
          @right_window.var_money += 100
        end
        @right_window.refresh
        return
      end
      # If L button was pressed
      if Input.repeat?(Input::L)
        $game_system.se_play($data_system.cursor_se)
        case @right_window.index
        when 0 # MAPA
          @right_window.var_map -= 10
          if @right_window.var_map < 0
            @right_window.var_map = 0
          end
        when 1 # PV
          @right_window.var_hp -= 10
          if @right_window.var_hp < 0
            @right_window.var_hp = 0
          end
        when 2 # MAX PV
          @right_window.var_maxhp -= 10
          if @right_window.var_maxhp < 0
            @right_window.var_maxhp = 0
          end
          if @right_window.var_hp > @right_window.var_maxhp
            @right_window.var_hp = @right_window.var_maxhp
          end
        when 3 # PM
          @right_window.var_sp -= 10
          if @right_window.var_sp < 0
            @right_window.var_sp = 0
          end
        when 4 # MAX PM
          @right_window.var_maxsp -= 10
          if @right_window.var_maxsp < 0
            @right_window.var_maxsp = 0
          end
          if @right_window.var_sp > @right_window.var_maxsp
            @right_window.var_sp = @right_window.var_maxsp
          end
        when 5 # NIVEL
          @right_window.var_level -= 10
          if @right_window.var_level < 1
            @right_window.var_level = 1
          end
          actor = $data_actors[1]
          @right_window.var_maxhp=actor.parameters[0,@right_window.var_level]
          if @right_window.var_hp > @right_window.var_maxhp
            @right_window.var_hp = @right_window.var_maxhp
          end
          @right_window.var_maxsp=actor.parameters[1,@right_window.var_level]
          if @right_window.var_sp > @right_window.var_maxsp
            @right_window.var_sp = @right_window.var_maxsp
          end
        when 6 # DINERO
          @right_window.var_money -= 100
          if @right_window.var_money < 0
            @right_window.var_money = 0
          end
        end
        @right_window.refresh
        return
      end
      if Input.trigger?(Input::C)
        $game_system.se_play($data_system.cursor_se)
        case @right_window.index
        when 1 # PV
          @right_window.var_hp = @right_window.var_maxhp
        when 3 # PM
          @right_window.var_sp = @right_window.var_maxsp
        end
        @right_window.refresh
        return
      end
    end
  end
end

No hace falta que me deis créditos para usarlo.
Se pega encima de main y ya está.
avatar
Wecoc
Administrador
Administrador



Créditos 12282

Gracias : 645

Volver arriba Ir abajo

RPG Maker XP Re: [RMXP] Debug Extras

Mensaje por Eron el 2012-12-30, 00:49

Lo pongo aquí si te parece bien, porque también son Debug Extras.

----------------

He hecho un script de Debug yo también y lo quiero compartir =DD Wecoc me ayudó mucho por MP.
No es mi primer script exactamente pero no tengo tanta experiencia como la mayoría de vosotros, hasta ahora solo he modificado algunas cosas random x'D
NO PIDO CRÉDITOS

El script trata de una ventana transparente con texto que updatea lo que va haciendo el intérprete cuando estás en $DEBUG. En otras palabras, muestra en una ventana el proceso del engine por pasos, así que puede resultar útil según qué situación.

No lee las listas de los eventos en proceso paralelo ni de los eventos comunes porque no supe hacerlo.

Poniendo en una anotación de evento "p_debug" se mostrará la lista entera leída hasta el momento por si se necesitara ver más de 10 líneas.

El texto sale de abajo a arriba porque se va "actualizando" x'DD Os pongo el engine al lado.


Así se ve con la anotación p_debug. No creo que sea muy útil porque cuesta de entender puesto así. A mí me cuesta vaya xD


Código:

Código:
# --------------------------------------------------------------------------
# Debug show hecho por Eron, con ayuda de Wecoc, versión 0.9
# - No son necesarios créditos.
# -------------------------------------------------------------------
# Este script muestra en una ventana el proceso del engine, así que puede
# resultar útil según qué situación.

# - Solo se muestra cuando está en modo $DEBUG.
# - Muestra hasta 10 líneas de proceso.
# - No se leeran las listas de los eventos en proceso paralelo ni de los eventos
#  comunes =(
# - Poniendo en una anotación de evento "p_debug" se mostrará la lista entera
#  leída hasta el momento (por si se necesitara ver más de 10 líneas)
# --------------------------------------------------------------------------
 
class Debug_Show < Window_Base
  attr_accessor :info
  def initialize
    super(0, 0, 320, 280)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.opacity = 0
    @info = [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil]
    refresh
  end
  def refresh
    self.contents.clear
    self.contents.font.size = 17
    self.contents.font.bold = true
    self.contents.font.color = Color.new(255,255,255)
    i1 = @info[@info.size-1]
    i2 = @info[@info.size-2]
    i3 = @info[@info.size-3]
    i4 = @info[@info.size-4]
    i5 = @info[@info.size-5]
    i6 = @info[@info.size-6]
    i7 = @info[@info.size-7]
    i8 = @info[@info.size-8]
    i9 = @info[@info.size-9]
    i10 = @info[@info.size-10]
    self.contents.draw_text(0,0,320,32,i1) unless i1 == nil
    self.contents.draw_text(0,20,320,32,i2) unless i2 == nil
    self.contents.draw_text(0,40,320,32,i3) unless i3 == nil
    self.contents.draw_text(0,60,320,32,i4) unless i4 == nil
    self.contents.draw_text(0,80,320,32,i5) unless i5 == nil
    self.contents.draw_text(0,100,320,32,i6) unless i6 == nil
    self.contents.draw_text(0,120,320,32,i7) unless i7 == nil
    self.contents.draw_text(0,140,320,32,i8) unless i8 == nil
    self.contents.draw_text(0,160,320,32,i9) unless i9 == nil
    self.contents.draw_text(0,180,320,32,i10) unless i10 == nil
  end
  def insertinfo(string)
    @info.push string
    refresh
  end
  def printinfo
    p @info.compact
  end
end

class Interpreter
  attr_accessor :db_window
  alias ini initialize
  def initialize(*args)
    ini(*args)
    @db_window = nil
  end
  def db_window
    return @db_window
  end
  def execute_command
    if @index >= @list.size - 1
      command_end
      return true
    end
    @parameters = @list[@index].parameters
    case @list[@index].code
    when 101: return command_101
    when 102: return command_102
    when 402: return command_402
    when 403: return command_403
    when 103: return command_103
    when 104: return command_104
    when 105: return command_105
    when 106: return command_106
    when 108: return command_108
    when 111: return command_111
    when 411: return command_411
    when 112: return command_112
    when 413: return command_413
    when 113: return command_113
    when 115: return command_115
    when 116: return command_116
    when 117: return command_117
    when 118: return command_118
    when 119: return command_119
    when 121: return command_121
    when 122: return command_122
    when 123: return command_123
    when 124: return command_124
    when 125: return command_125
    when 126: return command_126
    when 127: return command_127
    when 128: return command_128
    when 129: return command_129
    when 131: return command_131
    when 132: return command_132
    when 133: return command_133
    when 134: return command_134
    when 135: return command_135
    when 136: return command_136
    when 201: return command_201
    when 202: return command_202
    when 203: return command_203
    when 204: return command_204
    when 205: return command_205
    when 206: return command_206
    when 207: return command_207
    when 208: return command_208
    when 209: return command_209
    when 210: return command_210
    when 221: return command_221
    when 222: return command_222
    when 223: return command_223
    when 224: return command_224
    when 225: return command_225
    when 231: return command_231
    when 232: return command_232
    when 233: return command_233
    when 234: return command_234
    when 235: return command_235
    when 236: return command_236
    when 241: return command_241
    when 242: return command_242
    when 245: return command_245
    when 246: return command_246
    when 247: return command_247
    when 248: return command_248
    when 249: return command_249
    when 250: return command_250
    when 251: return command_251
    when 301: return command_301
    when 601: return command_601
    when 602: return command_602
    when 603: return command_603
    when 302: return command_302
    when 303: return command_303
    when 311: return command_311
    when 312: return command_312
    when 313: return command_313
    when 314: return command_314
    when 315: return command_315
    when 316: return command_316
    when 317: return command_317
    when 318: return command_318
    when 319: return command_319
    when 320: return command_320
    when 321: return command_321
    when 322: return command_322
    when 331: return command_331
    when 332: return command_332
    when 333: return command_333
    when 334: return command_334
    when 335: return command_335
    when 336: return command_336
    when 337: return command_337
    when 338: return command_338
    when 339: return command_339
    when 340: return command_340
    when 351: return command_351
    when 352: return command_352
    when 353: return command_353
    when 354: return command_354
    when 355: return command_355
    else      # Other
      return true
    end
  end
end

class Scene_Map
  def main
    @spriteset = Spriteset_Map.new
    @db = Debug_Show.new if $DEBUG
    @message_window = Window_Message.new
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @spriteset.dispose
    @db.dispose
    @message_window.dispose
    if $scene.is_a?(Scene_Title)
      Graphics.transition
      Graphics.freeze
    end
  end
  alias up update unless $@
  def update
    up
    @db.update if $DEBUG
    $game_system.map_interpreter.db_window = @db
  end
end

if $DEBUG
class Interpreter
  unless $@
    alias command_101_db command_101
    alias command_104_db command_104
    alias command_105_db command_105
    alias command_106_db command_106
    alias command_111_db command_111
    alias command_113_db command_113
    alias command_119_db command_119
    alias command_121_db command_121
    alias command_122_db command_122
    alias command_123_db command_123
    alias command_124_db command_124
    alias command_125_db command_125
    alias command_126_db command_126
    alias command_127_db command_127
    alias command_128_db command_128
    alias command_129_db command_129
    alias command_131_db command_131
    alias command_132_db command_132
    alias command_133_db command_133
    alias command_134_db command_134
    alias command_135_db command_135
    alias command_136_db command_136
    alias command_201_db command_201
    alias command_202_db command_202
    alias command_203_db command_203
    alias command_204_db command_204
    alias command_205_db command_205
    alias command_206_db command_206
    alias command_207_db command_207
    alias command_208_db command_208
    alias command_209_db command_209
    alias command_210_db command_210
    alias command_221_db command_221
    alias command_222_db command_222
    alias command_223_db command_223
    alias command_224_db command_224
    alias command_225_db command_225
    alias command_231_db command_231
    alias command_232_db command_232
    alias command_233_db command_233
    alias command_234_db command_234
    alias command_235_db command_235
    alias command_236_db command_236
    alias command_241_db command_241
    alias command_242_db command_242
    alias command_245_db command_245
    alias command_246_db command_246
    alias command_247_db command_247
    alias command_248_db command_248
    alias command_249_db command_249
    alias command_250_db command_250
    alias command_251_db command_251
    alias command_311_db command_311
    alias command_312_db command_312
    alias command_313_db command_313
    alias command_314_db command_314
    alias command_315_db command_315
    alias command_316_db command_316
    alias command_317_db command_317
    alias command_318_db command_318
    alias command_319_db command_319
    alias command_320_db command_320
    alias command_321_db command_321
    alias command_322_db command_322
    alias command_355_db command_355
  end
   
  def command_101
    command_101_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Message")
    end
  end
 
  def command_104
    command_104_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Text options")
    end
  end
 
  def command_105
    command_105_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Key VAR 0"+@parameters[0].to_s)
    end
  end
 
  def command_106
    command_106_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Wait "+@parameters[0].to_s)
    end
  end

  def command_108
    db_window.printinfo if @parameters[0].include?("p_debug")
  end
 
  def command_111
    unless db_window == nil
    case @parameters[0]
    when 0  # switch
      if @parameters[2] == 0
        if $game_switches[@parameters[1]] == true
          db_window.insertinfo("EV"+@event_id.to_s+"- If I["+
          @parameters[1].to_s+"] == ON => (YES)" )
        else
          db_window.insertinfo("EV"+@event_id.to_s+"- If I["+
          @parameters[1].to_s+"] == ON => (NO)" )
        end
      else
        if $game_switches[@parameters[1]] == false
          db_window.insertinfo("EV"+@event_id.to_s+"- If I["+
          @parameters[1].to_s+"] == OFF => (YES)")
        else
          db_window.insertinfo("EV"+@event_id.to_s+"- If I["+
          @parameters[1].to_s+"] == OFF => (NO)")
        end
      end
     
    when 1  # variable
      case @parameters[4]
      when 0  # ==
        if @parameters[2] == 0
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] == "+ @parameters[3].to_s+" => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] == "+ @parameters[3].to_s+" => (NO)")
          end
        else
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] == V["+@parameters[3].to_s+"] => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] == V["+@parameters[3].to_s+"] => (NO)")
          end
        end
      when 1  # >=
        if @parameters[2] == 0
          if $game_variables[@parameters[1]] >= @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] >= "+ @parameters[3].to_s+" => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] >= "+ @parameters[3].to_s+" => (NO)")
          end
        else
          if $game_variables[@parameters[1]] >= $game_variables[@parameters[3]]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] >= V["+@parameters[3].to_s+"] => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] >= V["+@parameters[3].to_s+"] => (NO)")
          end
        end
      when 2  # <=
        if @parameters[2] == 0
          if $game_variables[@parameters[1]] <= @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] <= "+ @parameters[3].to_s+" => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] <= "+ @parameters[3].to_s+" => (NO)")
          end
        else
          if $game_variables[@parameters[1]] <= $game_variables[@parameters[3]]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] <= V["+@parameters[3].to_s+"] => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] <= V["+@parameters[3].to_s+"] => (NO)")
          end
        end
      when 3  # >
        if @parameters[2] == 0
          if $game_variables[@parameters[1]] > @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] > "+ @parameters[3].to_s+" => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] > "+ @parameters[3].to_s+" => (NO)")
          end
        else
          if $game_variables[@parameters[1]] > $game_variables[@parameters[3]]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] > V["+@parameters[3].to_s+"] => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] > V["+@parameters[3].to_s+"] => (NO)")
          end
        end
      when 4  # <
        if @parameters[2] == 0
          if $game_variables[@parameters[1]] < @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] < "+ @parameters[3].to_s+" => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] < "+ @parameters[3].to_s+" => (NO)")
          end
        else
          if $game_variables[@parameters[1]] < $game_variables[@parameters[3]]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] < V["+@parameters[3].to_s+"] => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] < V["+@parameters[3].to_s+"] => (NO)")
          end
        end
      when 5  # !=
        if @parameters[2] == 0
          if $game_variables[@parameters[1]] != @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] != "+ @parameters[3].to_s+" => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] != "+ @parameters[3].to_s+" => (NO)")
          end
        else
          if $game_variables[@parameters[1]] != $game_variables[@parameters[3]]
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] != V["+@parameters[3].to_s+"] => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If V["+
            @parameters[1].to_s+"] != V["+@parameters[3].to_s+"] => (NO)")
          end
        end
      end
     
    when 2  # self switch
      case @parameters[1]
      when "A" # A
        if @parameters[2] == 0
          if $game_self_switches[@parameters[1]] == true
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[A] == ON => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[A] == ON => (NO)")
          end
        else
          if $game_self_switches[@parameters[1]] == false
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[A] == OFF => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[A] == OFF => (NO)")
          end
        end
      when "B" # B
        if @parameters[2] == 0
          if $game_self_switches[@parameters[1]] == true
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[B] == ON => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[B] == ON => (NO)")
          end
        else
          if $game_self_switches[@parameters[1]] == false
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[B] == OFF => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[B] == OFF => (NO)")
          end
        end
      when "C" # C
        if @parameters[2] == 0
          if $game_self_switches[@parameters[1]] == true
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[C] == ON => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[C] == ON => (NO)")
          end
        else
          if $game_self_switches[@parameters[1]] == false
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[C] == OFF => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[C] == OFF => (NO)")
          end
        end
      when "D" # D
        if @parameters[2] == 0
          if $game_self_switches[@parameters[1]] == true
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[D] == ON => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[D] == ON => (NO)")
          end
        else
          if $game_self_switches[@parameters[1]] == false
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[D] == OFF => (YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If I[D] == OFF => (NO)")
          end
        end
      end
     
    when 3  # timer
      if @parameters[2] == 0
        if @parameters[0] >= @parameters[1]
          db_window.insertinfo("EV"+@event_id.to_s+"- If Time >= "+
          @parameters[1].to_s+" sec =>(YES)")
        else
          db_window.insertinfo("EV"+@event_id.to_s+"- If Time >= "+
          @parameters[1].to_s+" sec =>(NO)")
        end
      else
        if @parameters[0] <= @parameters[1]
          db_window.insertinfo("EV"+@event_id.to_s+"- If Time <= "+
          @parameters[1].to_s+" sec =>(YES)")
        else
          db_window.insertinfo("EV"+@event_id.to_s+"- If Time <= "+
          @parameters[1].to_s+" sec =>(NO)")
        end
      end
     
    when 4  # actor
      actor = $game_actors[@parameters[1]]
      if actor != nil
        case @parameters[2]
        when 0  # in party
          if $game_party.actors.include?(actor)
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" in party =>(YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" in party =>(NO)")
          end
        when 1  # name
          if actor.name == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" name "+@parameters[3]+" =>(YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" name "+@parameters[3]+" =>(NO)")
          end
        when 2  # skill
          if actor.skill_learn?(@parameters[3])
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" skill "+@parameters[3].to_s+" =>(YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" skill "+@parameters[3].to_s+" =>(NO)")
          end
        when 3  # weapon
          if actor.weapon_id == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" weapon "+@parameters[3].to_s+" =>(YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" weapon "+@parameters[3].to_s+" =>(NO)")
          end
        when 4  # armor
          if actor.armor1_id == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor1 "+@parameters[3].to_s+" =>(YES)")
            return
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor1 "+@parameters[3].to_s+" =>(NO)")
          end
          if actor.armor2_id == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor2 "+@parameters[3].to_s+" =>(YES)")
            return
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor2 "+@parameters[3].to_s+" =>(NO)")
          end
          if actor.armor3_id == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor3 "+@parameters[3].to_s+" =>(YES)")
            return
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor3 "+@parameters[3].to_s+" =>(NO)")
          end
          if actor.armor4_id == @parameters[3]
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor4 "+@parameters[3].to_s+" =>(YES)")
            return
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" armor4 "+@parameters[3].to_s+" =>(NO)")
          end
        when 5  # state
          if actor.state?(@parameters[3])
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" state "+@parameters[3].to_s+" =>(YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If ACT"+
            @parameters[1].to_s+" state "+@parameters[3].to_s+" =>(NO)")
          end
        end
      end
     
    #when 5  # enemy
    #  enemy = $game_troop.enemies[@parameters[1]]
    #  if enemy != nil
    #    case @parameters[2]
    #    when 0  # appear
    #      result = (enemy.exist?)
    #    when 1  # state
    #      result = (enemy.state?(@parameters[3]))
    #    end
    #  end

    when 6  # character
      character = get_character(@parameters[1])
      if character != nil
        if character.direction == @parameters[2]
          if @parameters[1] == -1
            db_window.insertinfo("EV"+@event_id.to_s+"- If PLAYER direction "+
            @parameters[2].to_s+" =>(YES)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If EV"+
            @parameters[1].to_s+" direction "+@parameters[2].to_s+" =>(YES)")
          end
        else
          if @parameters[1] == -1
            db_window.insertinfo("EV"+@event_id.to_s+"- If PLAYER direction "+
            @parameters[2].to_s+" =>(NO)")
          else
            db_window.insertinfo("EV"+@event_id.to_s+"- If EV"+
            @parameters[1].to_s+" direction "+@parameters[2].to_s+" =>(NO)")
          end
        end
      end
     
    when 7  # gold
      if @parameters[2] == 0
        if $game_party.gold >= @parameters[1]
          db_window.insertinfo("EV"+@event_id.to_s+"- If GOLD >= "+
          @parameters[1].to_s+" =>(YES)")
        else
          db_window.insertinfo("EV"+@event_id.to_s+"- If GOLD >= "+
          @parameters[1].to_s+" =>(NO)")
        end
      else
        if $game_party.gold <= @parameters[1]
          db_window.insertinfo("EV"+@event_id.to_s+"- If GOLD <= "+
          @parameters[1].to_s+" =>(YES)")
        else
          db_window.insertinfo("EV"+@event_id.to_s+"- If GOLD <= "+
          @parameters[1].to_s+" =>(NO)")
        end
      end
     
    when 8  # item
      if $game_party.item_number(@parameters[1]) > 0
        db_window.insertinfo("EV"+@event_id.to_s+"- If item "+
        @parameters[1].to_s+" >0 =>(YES)")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- If item "+
        @parameters[1].to_s+" >0 =>(NO)")
      end
     
    when 9  # weapon
      if $game_party.weapon_number(@parameters[1]) > 0
        db_window.insertinfo("EV"+@event_id.to_s+"- If weapon "+
        @parameters[1].to_s+" >0 =>(YES)")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- If weapon "+
        @parameters[1].to_s+" >0 =>(NO)")
      end
     
    when 10  # armor
      if $game_party.armor_number(@parameters[1]) > 0
        db_window.insertinfo("EV"+@event_id.to_s+"- If armor "+
        @parameters[1].to_s+" >0 =>(YES)")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- If armor "+
        @parameters[1].to_s+" >0 =>(NO)")
      end
     
    when 11  # button
      result = (Input.press?(@parameters[1]))
      if Input.press?(@parameters[1])
        db_window.insertinfo("EV"+@event_id.to_s+"- If Key "+
        @parameters[1].to_s+" press =>(YES)")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- If Key "+
        @parameters[1].to_s+" press =>(NO)")
      end
     
    when 12  # script
      if eval(@parameters[1])
        db_window.insertinfo("EV"+@event_id.to_s+"- If (script) =>(YES)")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- If (script) =>(NO)")
      end
    end
    end
    command_111_db
  end
Continua abajo.
avatar
Eron
Principiante
Principiante

0/3

Créditos 3599

Gracias : 60

Volver arriba Ir abajo

RPG Maker XP Re: [RMXP] Debug Extras

Mensaje por Eron el 2012-12-30, 00:54

Código:

  def command_113
    command_113_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Break loop")
    end
  end

  def command_115
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Exit event")
    end
    command_end
    return true
  end
 
  def command_116
    if @event_id > 0
      unless db_window == nil
      db_window.insertinfo("EV"+@event_id.to_s+"- Erase event")
      end
      $game_map.events[@event_id].erase
    end
    @index += 1
    return false
  end

  def command_117
    common_event = $data_common_events[@parameters[0]]
    if common_event != nil
      @child_interpreter = Interpreter.new(@depth + 1)
      @child_interpreter.setup(common_event.list, @event_id)
      unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Call CommonEV"+@parameters[0].to_s)
      end
    end
    return true
  end
 
  def command_119
    command_119_db
    label_name = @parameters[0]
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- To Label "+label_name)
    end
  end
 
  def command_121
    command_121_db
    unless db_window == nil
    if @parameters[2] == 0
      if @parameters[0] == @parameters[1]
        db_window.insertinfo("EV"+@event_id.to_s+"- I["+
        @parameters[0].to_s+"] = ON")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- I["+
        @parameters[0].to_s+" to "+@parameters[1].to_s+"] = ON")
      end
    else
      if @parameters[0] == @parameters[1]
        db_window.insertinfo("EV"+@event_id.to_s+"- I["+
        @parameters[0].to_s+"] = OFF")
      else
        db_window.insertinfo("EV"+@event_id.to_s+"- I["+
        @parameters[0].to_s+" to "+@parameters[1].to_s+"] = OFF")
      end
    end
    end
  end
 
  def command_122
    command_122_db
    unless db_window == nil
    var = ""
    operation = ""
    val = ""
    if @parameters[0] == @parameters[1]
      var = @parameters[0].to_s
    else
      var = @parameters[0].to_s+" to "+@parameters[1].to_s
    end
   
    case @parameters[2]
      when 0: operation = "="
      when 1: operation = "+="
      when 2: operation = "-="
      when 3: operation = "*="
      when 4: operation = "/="
      when 5: operation = "%="
    end
   
    case @parameters[3]
    when 0: val = @parameters[4].to_s
    when 1: val = "V["+@parameters[4].to_s+"]"
    when 2: val = "rand("+@parameters[4].to_s+","+@parameters[5].to_s+")"
    when 3: val = "item "+ @parameters[4].to_s
    when 4: val = "ACT"+ @parameters[4].to_s+" "
      case @parameters[5]
        when 0: val += "Lv"
        when 1: val += "Exp"
        when 2: val += "HP"
        when 3: val += "SP"
        when 4: val += "HP max"
        when 5: val += "SP max"
        when 6: val += "Str"
        when 7: val += "Dex"
        when 8: val += "Agi"
        when 9: val += "Int"
        when 10: val += "Atk"
        when 11: val += "PDef"
        when 12: val += "MDef"
        when 13: val += "Eva"
      end
    when 5: val = "?! enemy"
    when 6  # character
      if @parameters[4] == -1
        val = "PLAYER "
      else
        val = "EV"+ @parameters[4].to_s+" "
      end
      case @parameters[5]
        when 0: val += "X"
        when 1: val += "Y"
        when 2: val += "Dir"
        when 3: val += "Scr X"
        when 4: val += "Scr Y"
        when 5: val += "Terrain"
      end
    when 7  # other
      case @parameters[4]
        when 0: val = "map ID"
        when 1: val = "Party size"
        when 2: val = "GOLD"
        when 3: val = "STEPS"
        when 4: val = "PLAYTime"
        when 5: val = "Time"
        when 6: val = "Save count"
      end
    end
   
    db_window.insertinfo("EV"+@event_id.to_s+"- V["+var+"] "+operation+" "+val)
   
    result = []
    if @parameters[0] == @parameters[1]
      result = $game_variables[@parameters[0]]
    else
      for i in @parameters[0]..@parameters[1]-1
        result.push ($game_variables[i].to_s+",")
      end
      result.push ($game_variables[@parameters[1]].to_s)
    end
    db_window.insertinfo("EV"+@event_id.to_s+"- ( V["+var+"] = "+result.to_s+" )")
    end
  end
 
  def command_123
    command_123_db
    unless db_window == nil
    if @parameters[1] == 0
      case @parameters[0]
        when "A": db_window.insertinfo("EV"+@event_id.to_s+"- I[A] = ON")
        when "B": db_window.insertinfo("EV"+@event_id.to_s+"- I[B] = ON")
        when "C": db_window.insertinfo("EV"+@event_id.to_s+"- I[C] = ON")
        when "D": db_window.insertinfo("EV"+@event_id.to_s+"- I[D] = ON")
      end
    else
      case @parameters[0]
        when "A": db_window.insertinfo("EV"+@event_id.to_s+"- I[A] = OFF")
        when "B": db_window.insertinfo("EV"+@event_id.to_s+"- I[B] = OFF")
        when "C": db_window.insertinfo("EV"+@event_id.to_s+"- I[C] = OFF")
        when "D": db_window.insertinfo("EV"+@event_id.to_s+"- I[D] = OFF")
      end
    end
    end
  end
 
  def command_124
    command_124_db
    unless db_window == nil
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+"- Time start "+
      @parameters[1].to_s+" sec")
    end
    if @parameters[0] == 1
      db_window.insertinfo("EV"+@event_id.to_s+"- Time stop")
    end
    end
  end
 
  def command_125
    command_125_db
    unless db_window == nil
    if @parameters[0] == 0
      operation = "+= "
    else
      operation = "-= "
    end
    if @parameters[1] == 0
      type = @parameters[2].to_s
    else
      type = "V["+@parameters[2].to_s+"]"
    end
    db_window.insertinfo("EV"+@event_id.to_s+"- GOLD "+operation+type+
    " (="+$game_party.gold.to_s+")")
    end
  end

  def command_126
    command_126_db
    unless db_window == nil
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    db_window.insertinfo("EV"+@event_id.to_s+"- item "+@parameters[0].to_s+
    operation+type+" (="+$game_party.item_number(@parameters[0]).to_s+")")
    end
  end

  def command_127
    command_127_db
    unless db_window == nil
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    db_window.insertinfo("EV"+@event_id.to_s+"- weapon "+@parameters[0].to_s+
    operation+type+" (="+$game_party.weapon_number(@parameters[0]).to_s+")")
    end
  end

  def command_128
    command_128_db
    unless db_window == nil
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    db_window.insertinfo("EV"+@event_id.to_s+"- armor "+@parameters[0].to_s+
    operation+type+" (="+$game_party.armor_number(@parameters[0]).to_s+")")
    end
  end
 
  def command_129
    command_129_db
    unless db_window == nil
    if @parameters[1] == 0
      operation = "- Add ACT"
      if @parameters[2] == 0
        add = ""
      else
        add = " (to Level 1)"
      end
    else
      operation = "- Remove ACT"
      add = ""
    end
    db_window.insertinfo("EV"+@event_id.to_s+operation+@parameters[0].to_s+add)
    end
  end

  def command_131
    command_131_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Change Windowskin")
    end
  end

  def command_132
    command_132_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Change Battle BGM")
    end
  end

  def command_133
    command_133_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Change Victory ME")
    end
  end

  def command_134
    command_134_db
    unless db_window == nil
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" - Save access OFF")
    else
      db_window.insertinfo("EV"+@event_id.to_s+" - Save access ON")
    end
    end
  end

  def command_135
    command_135_db
    unless db_window == nil
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" - Menu access OFF")
    else
      db_window.insertinfo("EV"+@event_id.to_s+" - Menu access ON")
    end
    end
  end

  def command_136
    command_136_db
    unless db_window == nil
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" - Battle Enctr. OFF")
    else
      db_window.insertinfo("EV"+@event_id.to_s+" - Battle Enctr. ON")
    end
    end
  end
 
  def command_201
    command_201_db
    unless db_window == nil
    if @parameters[5] == 0
      trans = " (Trans YES)"
    else
      trans = " (Trans NO)"
    end
    if @parameters[0] == 0
      if @parameters[4] == 0
        loc = "MAP: "+@parameters[1].to_s+" X: "+@parameters[2].to_s+
              " Y: "+@parameters[3].to_s
      else
        loc = "MAP: "+@parameters[1].to_s+" X: "+@parameters[2].to_s+
        " Y: "+@parameters[3].to_s+" DIR: "+@parameters[4].to_s
      end
    else
      if @parameters[4] == 0
        loc = "MAP: V["+@parameters[1].to_s+"] X: V["+@parameters[2].to_s+
        "] Y: V["+@parameters[3].to_s+"]"
      else
        loc = "MAP: V["+@parameters[1].to_s+"] X: V["+@parameters[2].to_s+
        "] Y: V["+@parameters[3].to_s+"] DIR: "+@parameters[4].to_s
      end
    end
    db_window.insertinfo("EV"+@event_id.to_s+" - "+loc+trans)
    end
  end
 
  def command_202
    command_202_db
    unless db_window == nil
    if @parameters[0] == 0
      ev = "EV"+@event_id.to_s
    else
      ev = "EV"+@parameters[0].to_s
    end
    if @parameters[1] == 0
      if @parameters[4] == 0
        loc = " X: "+@parameters[2].to_s+" Y: "+@parameters[3].to_s
      else
        loc = " X: "+@parameters[2].to_s+" Y: "+@parameters[3].to_s+
        " DIR: "+@parameters[4].to_s
      end
    elsif @parameters[1] == 1
      if @parameters[4] == 0
        loc = " X: V["+@parameters[2].to_s+"] Y: V["+@parameters[3].to_s+"]"
      else
        loc = " X: V["+@parameters[2].to_s+"] Y: V["+@parameters[3].to_s+
        "] DIR: "+@parameters[4].to_s
      end
    else
      if @parameters[4] == 0
        loc = " X: EV"+@parameters[2].to_s+".x Y: EV"+@parameters[2].to_s+".y"
      else
        loc = " X: EV"+@parameters[2].to_s+".x Y: EV"+@parameters[2].to_s+".y"+
        " DIR: "+@parameters[4].to_s
      end
    end
    db_window.insertinfo("EV"+@event_id.to_s+" - "+ev+loc)
    end
  end
 
  def command_203
    command_203_db
    unless db_window == nil
    dir = " DIR: "+@parameters[0].to_s
    dist = " DIST: "+@parameters[1].to_s
    speed = " SPEED: "+@parameters[2].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - SCROLL"+dir+dist+speed)
    end
  end
 
  def command_204
    command_204_db
    unless db_window == nil
    case @parameters[0]
    when 0
      db_window.insertinfo("EV"+@event_id.to_s+" - Change Map Panorama")
    when 1
      db_window.insertinfo("EV"+@event_id.to_s+" - Change Map Fog")
    when 2
      db_window.insertinfo("EV"+@event_id.to_s+" - Change Map Battleback")
    end
    end
  end
 
  def command_205
    command_205_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Change Fog Color")
    end
  end

  def command_206
    command_206_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Change Fog Opacity")
    end
  end
 
  def command_207
    command_207_db
    unless db_window == nil
    case @parameters[0]
    when -1: ev = "PLAYER"
    when 0 : ev = "EV"+@event_id.to_s
    else
      ev = "EV"+@parameters[0].to_s
    end   
    ani = " "+@parameters[1].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - Animation "+ev+ani)
    end
  end

  def command_208
    command_208_db
    unless db_window == nil
    if @parameters[0] == 0
      para = "YES"
    else
      para = "NO"
    end
    db_window.insertinfo("EV"+@event_id.to_s+" - PLAYER Transp. "+para)
    end
  end
 
  def command_209
    command_209_db
    unless db_window == nil
    case @parameters[0]
    when -1: ev = "PLAYER"
    when 0 : ev = "EV"+@event_id.to_s
    else
      ev = "EV"+@parameters[0].to_s
    end
    db_window.insertinfo("EV"+@event_id.to_s+" - "+ev+" Move Route")
    end
  end
 
  def command_210
    command_210_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+"- Wait Route")
    end
  end
 
  def command_221
    command_221_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Prepare Transition")
    end
  end

  def command_222
    command_222_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Execute Transition")
    end
  end
 
  def command_223
    command_223_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Screen Tone Change")
    end
  end

  def command_224
    command_224_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Screen Flash")
    end
  end

  def command_225
    command_225_db
    unless db_window == nil
    power = " POWER: "+@parameters[0].to_s
    speed = " SPEED: "+@parameters[1].to_s
    time = " TIME: "+@parameters[2].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - Shake"+power+speed+time)
    end
  end
 
  def command_231
    command_231_db
    unless db_window == nil
    num = @parameters[0].to_s
    if @parameters[3] == 0
      pos = "X: "+@parameters[4].to_s+" Y: "+@parameters[5].to_s
    else
      pos = "X: V["+@parameters[4].to_s+"] Y: V["+@parameters[5].to_s+"]"
    end
    if @parameters[6] == 100 and @parameters[7] == 100
      zoom = ""
    else
      zoom = " Z_X: "+@parameters[6].to_s+" Z_Y: "+@parameters[7].to_s
    end
    if @parameters[8] == 255
      opac = ""
    else
      opac = " OPAC: "+@parameters[8].to_s
    end
    db_window.insertinfo("  "+pos+zoom+opac)
    db_window.insertinfo("EV"+@event_id.to_s+" - Picture "+num)
    end
  end
 
  def command_232
    number = @parameters[0] + ($game_temp.in_battle ? 50 : 0)
    if @parameters[3] == 0
      if @parameters[4] == $game_screen.pictures[number].x and
          @parameters[5] == $game_screen.pictures[number].y
        coord = 0
      else
        coord = 1
      end
    else
      if $game_variables[@parameters[4]] == $game_screen.pictures[number].x and
          $game_variables[@parameters[5]] == $game_screen.pictures[number].y
        coord = 0
      else
        coord = 1
      end
    end
    if @parameters[6] == $game_screen.pictures[number].zoom_x and
        @parameters[7] == $game_screen.pictures[number].zoom_y
      zoom_coord = 0
    else
      zoom_coord = 1
    end
    if @parameters[8] == $game_screen.pictures[number].opacity
      opachh = 0
    else
      opachh = 1
    end
    if @parameters[9] == $game_screen.pictures[number].blend_type
      blendhh = 0
    else
      blendhh = 1
    end
    command_232_db
    unless db_window == nil
    num = @parameters[0].to_s
    duration = " TIME: "+@parameters[1].to_s
    if coord == 1
      if @parameters[3] == 0
        pos = "X: "+@parameters[4].to_s+" Y: "+@parameters[5].to_s
      else
        pos = "X: V["+@parameters[4].to_s+"] Y: V["+@parameters[5].to_s+"]"
      end
    else
      pos = ""
    end
    if zoom_coord == 1
      zoom = " Z_X: "+@parameters[6].to_s+" Z_Y: "+@parameters[7].to_s
    else
      zoom = ""
    end
    if opachh == 1
      opac = " OPAC: "+@parameters[8].to_s
    else
      opac = ""
    end
    if blendhh == 1
      blend = " BLEND: "+@parameters[9].to_s
    else
      blend = ""
    end
    db_window.insertinfo("  "+pos+zoom+opac+blend)
    db_window.insertinfo("EV"+@event_id.to_s+" - Move Picture "+num+duration)
    end
  end

  def command_233
    command_233_db
    unless db_window == nil
    num = @parameters[0].to_s
    speed = " SPEED: "+@parameters[1].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - Rotate Picture "+num+speed)
    end
  end

  def command_234
    command_234_db
    unless db_window == nil
    num = @parameters[0].to_s
    duration = " TIME: "+@parameters[2].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - Change Pic. Color "+num+duration)
    end
  end

  def command_235
    command_235_db
    unless db_window == nil
    num = @parameters[0].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - Erase Picture "+num)
    end
  end
 
  def command_236
    command_236_db
    unless db_window == nil
    if @parameters[0] == 0
      duration = " TIME: "+@parameters[2].to_s
      db_window.insertinfo("EV"+@event_id.to_s+" - STOP Weather"+duration)
    else
      type = " TYPE: "+@parameters[0].to_s
      power = " POWER: "+@parameters[1].to_s
      duration = " TIME: "+@parameters[2].to_s
      db_window.insertinfo("EV"+@event_id.to_s+" - Weather"+type+power+duration)
    end
    end
  end

  def command_241
    command_241_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Play BGM")
    end
  end

  def command_242
    command_242_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Fade Out BGM")
    end
  end

  def command_245
    command_245_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Play BGS")
    end
  end

  def command_246
    command_246_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Fade Out BGS")
    end
  end

  def command_247
    command_247_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Memorize BGM/BGS")
    end
  end

  def command_248
    command_248_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Restore BGM/BGS")
    end
  end

  def command_249
    command_249_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Play ME")
    end
  end

  def command_250
    command_250_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Play SE")
    end
  end

  def command_251
    command_251_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Stop SE")
    end
  end
 
  # Faltan llamadas a otras escenas (debug innecesario)
 
  def command_311
    command_311_db
    unless db_window == nil
    if @parameters[0] == 0
      actor = " ALL "
    else
      actor = " ACT"+@parameters[0].to_s+" "
    end
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"HP"+operation+type)
    else
      hp = ($game_actors[@parameters[0]].hp).to_s
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"HP"+operation+
      type+" =("+hp+")")
    end
    end
  end
 
  def command_312
    command_312_db
    unless db_window == nil
    if @parameters[0] == 0
      actor = " ALL "
    else
      actor = " ACT"+@parameters[0].to_s+" "
    end
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"SP"+operation+type)
    else
      sp = ($game_actors[@parameters[0]].sp).to_s
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"SP"+operation+
      type+" =("+sp+")")
    end
    end
  end
 
  def command_313
    command_313_db
    unless db_window == nil
    if @parameters[0] == 0
      actor = " ALL "
    else
      actor = " ACT"+@parameters[0].to_s+" "
    end
    state = @parameters[2].to_s
    if @parameters[1] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"Add State "+state)
    else
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"Remove State "+state)
    end
    end
  end

  def command_314
    command_314_db
    unless db_window == nil
    if @parameters[0] == 0
      actor = " ALL "
    else
      actor = " ACT"+@parameters[0].to_s+" "
    end
    db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"Recover All")
    end
  end
 
  def command_315
    command_315_db
    unless db_window == nil
    if @parameters[0] == 0
      actor = " ALL "
    else
      actor = " ACT"+@parameters[0].to_s+" "
    end
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"EXP"+operation+type)
    else
      exp = ($game_actors[@parameters[0]].exp).to_s
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"EXP"+operation+
      type+" =("+exp+")")
    end
    end
  end

  def command_316
    command_316_db
    unless db_window == nil
    if @parameters[0] == 0
      actor = " ALL "
    else
      actor = " ACT"+@parameters[0].to_s+" "
    end
    if @parameters[1] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V["+@parameters[3].to_s+"]"
    end
    if @parameters[0] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"LEVEL"+operation+type)
    else
      level = ($game_actors[@parameters[0]].level).to_s
      db_window.insertinfo("EV"+@event_id.to_s+" -"+actor+"LEVEL"+operation+
      type+" =("+level+")")
    end
    end
  end

  def command_317
    command_317_db
    unless db_window == nil
    act = " ACT"+@parameters[0].to_s+
    if @parameters[2] == 0
      operation = " += "
    else
      operation = " -= "
    end
    if @parameters[3] == 0
      type = @parameters[4].to_s
    else
      type = "V["+@parameters[4].to_s+"]"
    end
    actor = $game_actors[@parameters[0]]
    case @parameters[1]
    when 0
      para = "MaxHP"
      val = actor.maxhp.to_s
    when 1
      para = "MaxSP"
      val = actor.maxsp.to_s
    when 2
      para = "Str"
      val = actor.str.to_s
    when 3
      para = "Dex"
      val = actor.dex.to_s
    when 4
      para = "Agi"
      val = actor.agi.to_s
    when 5
      para = "Int"
      val = actor.int.to_s
    end
    db_window.insertinfo("EV"+@event_id.to_s+" - "+act+" Parameter "+para+
    operation+type+" =("+val+")")
    end
  end

  def command_318
    command_318_db
    unless db_window == nil
    act = " ACT"+@parameters[0].to_s+" "
    skill = @parameters[2].to_s
    if @parameters[1] == 0
      db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Learn Skill "+skill)
    else
      db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Forget Skill "+skill)
    end
    end
  end

  def command_319
    command_319_db
    unless db_window == nil
    act = " ACT"+@parameters[0].to_s+" "
    if @parameters[2] == 0
      case @parameters[1]
      when 0
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Unequip Weapon")
      when 1
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Unequip Shield")
      when 2
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Unequip Head")
      when 3
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Unequip Body")
      when 4
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Unequip Accessory")
      end
    else
      item = @parameters[2].to_s
      case @parameters[1]
      when 0
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Equip Weapon "+item)
      when 1
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Equip Shield "+item)
      when 2
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Equip Head "+item)
      when 3
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Equip Body "+item)
      when 4
        db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Equip Accessory "+item)
      end
    end
    end
  end

  def command_320
    command_320_db
    unless db_window == nil
    act = " ACT"+@parameters[0].to_s+" "
    name = @parameters[1].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Change Name: "+name)
    end
  end

  def command_321
    command_321_db
    unless db_window == nil
    act = " ACT"+@parameters[0].to_s+" "
    clase = @parameters[1].to_s
    db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Change Class "+clase)
    end
  end

  def command_322
    command_322_db
    unless db_window == nil
    act = " ACT"+@parameters[0].to_s+" "
    db_window.insertinfo("EV"+@event_id.to_s+" - "+act+"Change Graphic")
    end
  end
 
  # Faltan llamadas a otras escenas (debug innecesario)

  def command_355
    command_355_db
    unless db_window == nil
    db_window.insertinfo("EV"+@event_id.to_s+" - Call Script")
    end
  end

end

end

Siento el doble post.
avatar
Eron
Principiante
Principiante

0/3

Créditos 3599

Gracias : 60

Volver arriba Ir abajo

RPG Maker XP Re: [RMXP] Debug Extras

Mensaje por orochii el 2012-12-30, 02:29

Para códigos largos podrías subir el código en algo así como dropbox (para subirlo como .rb o .txt), o uno de esos lugares tipo paste-it. De hecho... voy a seguir haciéndolo así... seh xD.

En fin, el de Wecoc pues bien, y el Eron interesante una ventana tipo consola,
Orochii Zouveleki
avatar
orochii
Reportero

0/3

Créditos 7791

Gracias : 461

Volver arriba Ir abajo

RPG Maker XP Re: [RMXP] Debug Extras

Mensaje por Wecoc el 2013-10-12, 12:42

Te lo acorté, creo que en éste caso lo óptimo es ponerlo así. También había algún bug.
Código:
# --------------------------------------------------------------------------
# Debug show hecho por Eron, con ayuda de Wecoc, versión 0.9
# - No son necesarios créditos.
# -------------------------------------------------------------------
# Este script muestra en una ventana el proceso del engine, así que puede
# resultar útil según qué situación.
# - Solo se muestra cuando está en modo $DEBUG.
# - Muestra hasta 10 líneas de proceso.
# - No se leeran las listas de los eventos en proceso paralelo ni de los eventos comunes =(
# - Poniendo en una anotación de evento "p_debug" se mostrará la lista entera
#  leída hasta el momento (por si se necesitara ver más de 10 líneas)
# --------------------------------------------------------------------------
 
class Debug_Show < Window_Base
  attr_accessor :info
 
  def initialize
    super(0, 0, 320, 280)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.opacity = 0
    @info = [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil]
    refresh
  end
 
  def refresh
    self.contents.clear
    self.contents.font.size = 17
    self.contents.font.bold = true
    self.contents.font.color = Color.new(255,255,255)
    for i in 1..10
      unless @info[@info.size-i] == nil
        self.contents.draw_text(0, (i-1)*20, 320, 32, @info[@info.size-i])
      end
    end
  end
 
  def insertinfo(string)
    @info.push string
    refresh
  end
 
  def printinfo
    p @info.compact
  end
end

class Interpreter
  attr_accessor :db_window
 
  alias eron_debug_show_ini initialize
  def initialize(*args)
    eron_debug_show_ini(*args)
    @db_window = nil
  end
 
  def db_window
    return @db_window
  end
 
  def execute_command
    if @index >= @list.size - 1
      command_end
      return true
    end
    @parameters = @list[@index].parameters
    send("command_#{@list[@index].code}") rescue nil
    return true
  end
end

class Scene_Map
  def main
    @spriteset = Spriteset_Map.new
    @db = Debug_Show.new
    @db.visible = $DEBUG
    @message_window = Window_Message.new
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      break if $scene != self
    end
    Graphics.freeze
    @spriteset.dispose
    @db.dispose
    @message_window.dispose
    if $scene.is_a?(Scene_Title)
      Graphics.transition
      Graphics.freeze
    end
  end
 
  alias eron_debug_show_up update unless $@
  def update
    eron_debug_show_up
    if $DEBUG
      @db.update
    end
    $game_system.map_interpreter.db_window = @db
  end
end

if $DEBUG
class Interpreter
  unless $@
    for i in 101..355
      method = "command_#{i}".to_sym
      alias_method("command_#{i}_db".to_sym, method) if method_defined?(method)
    end
  end
 
  def event_str
    return "EV" + @event_id.to_s
  end
 
  def command_101
    command_101_db
    db_window.insertinfo(event_str + "- Message")
  end
 
  def command_104
    command_104_db
    db_window.insertinfo(event_str + "- Text options")
  end
 
  def command_105
    command_105_db
    var = sprintf("%03d", @parameters[0])
    db_window.insertinfo(event_str + "- Key VAR 0" + var)
  end
 
  def command_106
    command_106_db
    db_window.insertinfo(event_str + "- Wait " + @parameters[0].to_s)
  end

  def command_108
    command_108_db
    db_window.printinfo if @parameters[0].include?("p_debug")
  end
 
  def command_111
    case @parameters[0]
    when 0  # switch
      switch = sprintf("%03d", @parameters[1])
      if @parameters[2] == 0
        if $game_switches[@parameters[1]] == true
          db_window.insertinfo(event_str + "- If I[#{switch}] == ON => (YES)")
        else
          db_window.insertinfo(event_str + "- If I[#{switch}] == ON => (NO)" )
        end
      else
        if $game_switches[@parameters[1]] == false
          db_window.insertinfo(event_str + "- If I[#{switch}] == OFF => (YES)")
        else
          db_window.insertinfo(event_str + "- If I[#{switch}] == OFF => (NO)")
        end
      end
    when 1  # variable
      var = sprintf("%03d", @parameters[1])
      case @parameters[4]
      when 0  # ==
        if @parameters[2] == 0
          val = @parameters[3].to_s
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo(event_str + "- If V[#{var}] == #{val} => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] == #{val} => (NO)")
          end
        else
          val = sprintf("%03d", @parameters[3])
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo(event_str + "- If V[#{var}] == V[#{val}] => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] == V[#{val}] => (NO)")
          end
        end
      when 1  # >=
        if @parameters[2] == 0
          val = @parameters[3].to_s
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo(event_str + "- If V[#{var}] >= #{val} => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] >= #{val} => (NO)")
          end
        else
          val = sprintf("%03d", @parameters[3])
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo(event_str + "- If V[#{var}] >= V[#{val}] => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] >= V[#{val}] => (NO)")
          end
        end
      when 2  # <=
        if @parameters[2] == 0
          val = @parameters[3].to_s
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo(event_str + "- If V[#{var}] <= #{val} => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] <= #{val} => (NO)")
          end
        else
          val = sprintf("%03d", @parameters[3])
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo(event_str + "- If V[#{var}] <= V[#{val}] => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] <= V[#{val}] => (NO)")
          end
        end
      when 3  # >
        if @parameters[2] == 0
          val = @parameters[3].to_s
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo(event_str + "- If V[#{var}] > #{val} => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] > #{val} => (NO)")
          end
        else
          val = sprintf("%03d", @parameters[3])
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo(event_str + "- If V[#{var}] > V[#{val}] => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] > V[#{val}] => (NO)")
          end
        end
      when 4  # <
        if @parameters[2] == 0
          val = @parameters[3].to_s
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo(event_str + "- If V[#{var}] < #{val} => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] < #{val} => (NO)")
          end
        else
          val = sprintf("%03d", @parameters[3])
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo(event_str + "- If V[#{var}] < V[#{val}] => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] < V[#{val}] => (NO)")
          end
        end
      when 5  # !=
        if @parameters[2] == 0
          val = @parameters[3].to_s
          if $game_variables[@parameters[1]] == @parameters[3]
            db_window.insertinfo(event_str + "- If V[#{var}] != #{val} => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] != #{val} => (NO)")
          end
        else
          val = sprintf("%03d", @parameters[3])
          if $game_variables[@parameters[1]] == $game_variables[@parameters[3]]
            db_window.insertinfo(event_str + "- If V[#{var}] != V[#{val}] => (YES)")
          else
            db_window.insertinfo(event_str + "- If V[#{var}] != V[#{val}] => (NO)")
          end
        end
      end
    when 2  # self switch
      val = @parameters[1]
      if @parameters[2] == 0
        if $game_self_switches[@parameters[1]] == true
          db_window.insertinfo(event_str + "- If I[#{val}] == ON => (YES)")
        else
          db_window.insertinfo(event_str + "- If I[#{val}] == ON => (NO)")
        end
      else
        if $game_self_switches[@parameters[1]] == false
          db_window.insertinfo(event_str + "- If I[#{val}] == OFF => (YES)")
        else
          db_window.insertinfo(event_str + "- If I[#{val}] == OFF => (NO)")
        end
      end
    when 3  # timer
      time = @parameters[1].to_s
      if @parameters[2] == 0
        if @parameters[0] >= @parameters[1]
          db_window.insertinfo(event_str + "- If Time >= #{time} sec =>(YES)")
        else
          db_window.insertinfo(event_str + "- If Time >= #{time} sec =>(NO)")
        end
      else
        if @parameters[0] <= @parameters[1]
          db_window.insertinfo(event_str + "- If Time <= #{time} sec =>(YES)")
        else
          db_window.insertinfo(event_str + "- If Time <= #{time} sec =>(NO)")
        end
      end
    when 4  # actor
      actor = $game_actors[@parameters[1]]
      act = @parameters[1].to_s
      par = @parameters[3].to_s
      if actor != nil
        case @parameters[2]
        when 0  # in party
          if $game_party.actors.include?(actor)
            db_window.insertinfo(event_str + "- If ACT#{act} in party =>(YES)")
          else
            db_window.insertinfo(event_str + "- If ACT#{act} in party =>(NO)")
          end
        when 1  # name
          name = @parameters[3]
          if actor.name == name
            db_window.insertinfo(event_str + "- If ACT#{act} name #{par} =>(YES)")
          else
            db_window.insertinfo(event_str + "- If ACT#{act} name #{par} =>(NO)")
          end
        when 2  # skill
          if actor.skill_learn?(@parameters[3])
            db_window.insertinfo(event_str + "- If ACT#{act} skill #{par} =>(YES)")
          else
            db_window.insertinfo(event_str + "- If ACT#{act} skill #{par} =>(NO)")
          end
        when 3  # weapon
          if actor.weapon_id == @parameters[3]
            db_window.insertinfo(event_str + "- If ACT#{act} weapon #{par} =>(YES)")
          else
            db_window.insertinfo(event_str + "- If ACT#{act} weapon #{par} =>(NO)")
          end
        when 4  # armor
          if actor.armor1_id == @parameters[3]
            db_window.insertinfo(event_str + "- If ACT#{act} armor1 #{par} =>(YES)")
            return
          else
            db_window.insertinfo(event_str + "- If ACT#{act} armor1 #{par} =>(NO)")
          end
          if actor.armor2_id == @parameters[3]
            db_window.insertinfo(event_str + "- If ACT#{act} armor2 #{par} =>(YES)")
            return
          else
            db_window.insertinfo(event_str + "- If ACT#{act} armor2 #{par} =>(NO)")
          end
          if actor.armor3_id == @parameters[3]
            db_window.insertinfo(event_str + "- If ACT#{act} armor3 #{par} =>(YES)")
            return
          else
            db_window.insertinfo(event_str + "- If ACT#{act} armor3 #{par} =>(NO)")
          end
          if actor.armor4_id == @parameters[3]
            db_window.insertinfo(event_str + "- If ACT#{act} armor4 #{par} =>(YES)")
            return
          else
            db_window.insertinfo(event_str + "- If ACT#{act} armor4 #{par} =>(NO)")
          end
        when 5  # state
          if actor.state?(@parameters[3])
            db_window.insertinfo(event_str + "- If ACT#{act} state #{par} =>(YES)")
          else
            db_window.insertinfo(event_str + "- If ACT#{act} state #{par} =>(NO)")
          end
        end
      end
    when 6  # character
      character = get_character(@parameters[1])
      if character != nil
        if @parameters[1] == -1
          ev = "PLAYER"
        else
          ev = "EV" + sprintf("%03d", @parameters[1])
        end
        dir = @parameters[2]
        if character.direction == @parameters[2]
          db_window.insertinfo(event_str + "- If #{ev} direction #{dir} =>(YES)")
        else
          db_window.insertinfo(event_str + "- If #{ev} direction #{dir} =>(NO)")
        end
      end
    when 7  # gold
      if @parameters[2] == 0
        gold = @parameters[1]
        if $game_party.gold >= @parameters[1]
          db_window.insertinfo(event_str + "- If GOLD >= #{gold} =>(YES)")
        else
          db_window.insertinfo(event_str + "- If GOLD >= #{gold} =>(NO)")
        end
      else
        if $game_party.gold <= @parameters[1]
          db_window.insertinfo(event_str + "- If GOLD <= #{gold} =>(YES)")
        else
          db_window.insertinfo(event_str + "- If GOLD <= #{gold} =>(NO)")
        end
      end
    when 8  # item
      item = @parameters[1]
      if $game_party.item_number(@parameters[1]) > 0
        db_window.insertinfo(event_str + "- If item #{item} > 0 =>(YES)")
      else
        db_window.insertinfo(event_str + "- If item #{item} > 0 =>(NO)")
      end
    when 9  # weapon
      item = @parameters[1]
      if $game_party.weapon_number(@parameters[1]) > 0
        db_window.insertinfo(event_str + "- If weapon #{item} > 0 =>(YES)")
      else
        db_window.insertinfo(event_str + "- If weapon #{item} > 0 =>(NO)")
      end
    when 10  # armor
      item = @parameters[1]
      if $game_party.armor_number(@parameters[1]) > 0
        db_window.insertinfo(event_str + "- If armor #{item} > 0 =>(YES)")
      else
        db_window.insertinfo(event_str + "- If armor #{item} > 0 =>(NO)")
      end
    when 11  # button
      result = (Input.press?(@parameters[1]))
      key = @parameters[1]
      if Input.press?(@parameters[1])
        db_window.insertinfo(event_str + "- If Key #{key} press =>(YES)")
      else
        db_window.insertinfo(event_str + "- If Key #{key} press =>(NO)")
      end
    when 12  # script
      if eval(@parameters[1])
        db_window.insertinfo(event_str + "- If (script) =>(YES)")
      else
        db_window.insertinfo(event_str + "- If (script) =>(NO)")
      end
    end
    command_111_db
  end
 
  def command_113
    command_113_db
    db_window.insertinfo(event_str + "- Break loop")
  end

  def command_115
    db_window.insertinfo(event_str + "- Exit event")
    command_115_db
  end
 
  def command_116
    db_window.insertinfo(event_str + "- Erase event")
    command_116_db
  end

  def command_117
    db_window.insertinfo(event_str + "- Call CommonEV" + @parameters[0].to_s)
    command_117_db
  end
 
  def command_119
    command_119_db
    db_window.insertinfo(event_str + "- To Label " + @parameters[0])
  end
 
  def command_121
    command_121_db
    if @parameters[2] == 0
      if @parameters[0] == @parameters[1]
        switch = sprintf("%03d", @parameters[0])
        db_window.insertinfo(event_str + "- I[#{switch}] = ON")
      else
        s = sprintf("%03d", @parameters[0]) ; e = sprintf("%03d", @parameters[1])
        db_window.insertinfo(event_str + "- I[#{s} to #{e}] = ON")
      end
    else
      if @parameters[0] == @parameters[1]
        switch = sprintf("%03d", @parameters[0])
        db_window.insertinfo(event_str + "- I[#{switch}] = OFF")
      else
        s = sprintf("%03d", @parameters[0]) ; e = sprintf("%03d", @parameters[1])
        db_window.insertinfo(event_str + "- I[#{s} to #{e}] = OFF")
      end
    end
  end
 
  def command_122
    command_122_db
    var = "" ; operation = "" ; val = ""
    if @parameters[0] == @parameters[1]
      var = sprintf("%03d", @parameters[0])
    else
      s = sprintf("%03d", @parameters[0])
      e = sprintf("%03d", @parameters[1])
      var = "#{s} to #{e}"
    end
    case @parameters[2]
      when 0: operation = "="
      when 1: operation = "+="
      when 2: operation = "-="
      when 3: operation = "*="
      when 4: operation = "/="
      when 5: operation = "%="
    end
    case @parameters[3]
    when 0: val = @parameters[4].to_s
    when 1: val = "V["+sprintf("%03d", @parameters[4])+"]"
    when 2: val = "rand("+@parameters[4].to_s+","+@parameters[5].to_s+")"
    when 3: val = "item "+ @parameters[4].to_s
    when 4: val = "ACT"+ @parameters[4].to_s+" "
      case @parameters[5]
        when 0: val += "Lv"
        when 1: val += "Exp"
        when 2: val += "HP"
        when 3: val += "SP"
        when 4: val += "HP max"
        when 5: val += "SP max"
        when 6: val += "Str"
        when 7: val += "Dex"
        when 8: val += "Agi"
        when 9: val += "Int"
        when 10: val += "Atk"
        when 11: val += "PDef"
        when 12: val += "MDef"
        when 13: val += "Eva"
      end
    when 5: val = "?! enemy"
    when 6  # character
      val = @parameters[4] == -1 ? "PLAYER " : @parameters[4].to_s+" "
      case @parameters[5]
        when 0: val += "X"
        when 1: val += "Y"
        when 2: val += "Dir"
        when 3: val += "Scr X"
        when 4: val += "Scr Y"
        when 5: val += "Terrain"
      end
    when 7  # other
      case @parameters[4]
        when 0: val = "map ID"
        when 1: val = "Party size"
        when 2: val = "GOLD"
        when 3: val = "STEPS"
        when 4: val = "PLAYTime"
        when 5: val = "Time"
        when 6: val = "Save count"
      end
    end
    db_window.insertinfo(event_str + "- V[#{var}] #{operation} #{val}")
    result = []
    if @parameters[0] == @parameters[1]
      result = $game_variables[@parameters[0]]
    else
      for i in @parameters[0]..@parameters[1]-1
        result.push ($game_variables[i].to_s+",")
      end
      result.push ($game_variables[@parameters[1]].to_s)
    end
    db_window.insertinfo(event_str + "- ( V[#{var}] = #{result} )")
  end
 
  def command_123
    command_123_db
    switch = sprintf("%03d", @parameters[0])
    if @parameters[1] == 0
      db_window.insertinfo(event_str + "- I[#{switch}] = ON")
    else
      db_window.insertinfo(event_str + "- I[#{switch}] = OFF")
    end
  end
 
  def command_124
    command_124_db
    if @parameters[0] == 0
      time = @parameters[1]
      db_window.insertinfo(event_str + "- Time start #{time} sec")
    end
    if @parameters[0] == 1
      db_window.insertinfo(event_str + "- Time stop")
    end
  end
 
  def command_125
    command_125_db
    op = @parameters[0] == 0 ? "+=" : "-="
    if @parameters[1] == 0
      type = @parameters[2].to_s
    else
      type = "V[" + sprintf("%03d", @parameters[2]) + "]"
    end
    gold = $game_party.gold
    db_window.insertinfo(event_str + "- GOLD #{op} #{type} (=#{gold})")
  end

  def command_126
    command_126_db
    op = @parameters[1] == 0 ? "+=" : "-="
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    item = @parameters[0]
    number = $game_party.item_number(@parameters[0])
    db_window.insertinfo(event_str + "- item #{item} #{op} #{type} (=#{number})")
  end

  def command_127
    command_127_db
    op = @parameters[1] == 0 ? "+=" : "-="
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    item = @parameters[0]
    number = $game_party.weapon_number(@parameters[0])
    db_window.insertinfo(event_str + "- weapon #{item} #{op} #{type} (=#{number})")
  end

  def command_128
    command_128_db
    op = @parameters[1] == 0 ? "+=" : "-="
    if @parameters[2] == 0
      type = @parameters[3].to_s
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    item = @parameters[0]
    number = $game_party.armor_number(@parameters[0])
    db_window.insertinfo(event_str + "- armor #{item} #{op} #{type} (=#{number})")
  end
 
  def command_129
    command_129_db
    if @parameters[1] == 0
      op = "- Add ACT"
      add = @parameters[2] == 0 ? "" : " (to Level 1)"
    else
      op = "- Remove ACT"
      add = ""
    end
    db_window.insertinfo(event_str + op + @parameters[0].to_s + add)
  end

  def command_131
    command_131_db
    db_window.insertinfo(event_str + " - Change Windowskin")
  end

  def command_132
    command_132_db
    db_window.insertinfo(event_str + " - Change Battle BGM")
  end

  def command_133
    command_133_db
    db_window.insertinfo(event_str + " - Change Victory ME")
  end

  def command_134
    command_134_db
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " - Save access OFF")
    else
      db_window.insertinfo(event_str + " - Save access ON")
    end
  end

  def command_135
    command_135_db
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " - Menu access OFF")
    else
      db_window.insertinfo(event_str + " - Menu access ON")
    end
  end

  def command_136
    command_136_db
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " - Battle Enctr. OFF")
    else
      db_window.insertinfo(event_str + " - Battle Enctr. ON")
    end
  end
 
  def command_201
    command_201_db
    trans = @parameters[5] == 0 ? "(Trans YES)" : "(Trans NO)"
    dir = @parameters[4]
    if @parameters[0] == 0
      map = @parameters[1]
      x = @parameters[2]
      y = @parameters[3]
      if @parameters[4] == 0
        loc = "MAP: #{map} X: #{x} Y: #{y}"
      else
        loc = "MAP: #{map} X: #{x} Y: #{y} DIR: #{dir}"
      end
    else
      map = sprintf("%03d", @parameters[1])
      x = sprintf("%03d", @parameters[2])
      y = sprintf("%03d", @parameters[3])
      if @parameters[4] == 0
        loc = "MAP: V[#{map}] X: V[#{x}] Y: V[#{y}]"
      else
        loc = "MAP: V[#{map}] X: V[#{x}] Y: V[#{y}] DIR: #{dir}"
      end
    end
    db_window.insertinfo(event_str + " - #{loc} #{trans}")
  end
 
  def command_202
    command_202_db
    ev = @parameters[0] == 0 ? event_str : "EV"+@parameters[0].to_s
    dir = @parameters[4]
    if @parameters[1] == 0
      x = @parameters[2]
      y = @parameters[3]
      if @parameters[4] == 0
        loc = "X: #{x} Y: #{y}"
      else
        loc = "X: #{x} Y: #{y} DIR: #{dir}"
      end
    elsif @parameters[1] == 1
      x = sprintf("%03d", @parameters[2])
      y = sprintf("%03d", @parameters[3])
      if @parameters[4] == 0
        loc = " X: V[#{x}] Y: V[#{y}]"
      else
        loc = " X: V[#{x}] Y: V[#{y}] DIR: #{dir}"
      end
    else
      oev = @parameters[2]
      if @parameters[4] == 0
        loc = " X: EV#{oev}.x Y: EV#{oev}.y"
      else
        loc = " X: EV#{oev}.x Y: EV#{oev}.y"+" DIR: #{dir}"
      end
    end
    db_window.insertinfo(event_str + " - #{ev} #{loc}")
  end
 
  def command_203
    command_203_db
    dir = " DIR: " + @parameters[0].to_s
    dist = " DIST: " + @parameters[1].to_s
    speed = " SPEED: " + @parameters[2].to_s
    db_window.insertinfo(event_str + " - SCROLL"+dir+dist+speed)
  end
 
  def command_204
    command_204_db
    case @parameters[0]
    when 0
      db_window.insertinfo(event_str + " - Change Map Panorama")
    when 1
      db_window.insertinfo(event_str + " - Change Map Fog")
    when 2
      db_window.insertinfo(event_str + " - Change Map Battleback")
    end
  end
 
  def command_205
    command_205_db
    db_window.insertinfo(event_str + " - Change Fog Color")
  end

  def command_206
    command_206_db
    db_window.insertinfo(event_str + " - Change Fog Opacity")
  end
 
  def command_207
    command_207_db
    case @parameters[0]
      when -1: ev = "PLAYER"
      when 0 : ev = "EV" + @event_id.to_s
      else ; ev = "EV" + @parameters[0].to_s
    end 
    ani = " " + @parameters[1].to_s
    db_window.insertinfo(event_str + " - Animation " + ev + ani)
  end

  def command_208
    command_208_db
    para = @parameters[0] == 0 ? "YES" : "NO"
    db_window.insertinfo(event_str + " - PLAYER Transp. " + para)
  end
 
  def command_209
    command_209_db
    case @parameters[0]
      when -1: ev = "PLAYER"
      when 0 : ev = "EV" + @event_id.to_s
      else ; ev = "EV" + @parameters[0].to_s
    end
    db_window.insertinfo(event_str + " - " + ev + " Move Route")
  end
 
  def command_210
    command_210_db
    db_window.insertinfo(event_str + "- Wait Route")
  end
 
  def command_221
    command_221_db
    db_window.insertinfo(event_str + " - Prepare Transition")
  end

  def command_222
    command_222_db
    db_window.insertinfo(event_str + " - Execute Transition")
  end
 
  def command_223
    command_223_db
    db_window.insertinfo(event_str + " - Screen Tone Change")
  end

  def command_224
    command_224_db
    db_window.insertinfo(event_str + " - Screen Flash")
  end

  def command_225
    command_225_db
    power = " POWER: "+@parameters[0].to_s
    speed = " SPEED: "+@parameters[1].to_s
    time = " TIME: "+@parameters[2].to_s
    db_window.insertinfo(event_str + " - Shake" + power + speed + time)
  end
 
  def command_231
    command_231_db
    num = @parameters[0].to_s
    if @parameters[3] == 0
      x = @parameters[4]
      y = @parameters[5]
      pos = "X: #{x} Y: #{y}"
    else
      x = sprintf("%03d", @parameters[4])
      y = sprintf("%03d", @parameters[5])
      pos = "X: V[#{x}] Y: V[#{y}]"
    end
    if @parameters[6] == 100 and @parameters[7] == 100
      zoom = ""
    else
      zx = @parameters[6]
      zy = @parameters[7]
      zoom = " Z_X: #{zx} Z_Y: #{zy}"
    end
    opac = @parameters[8] == 255 ? "" : " OPAC: "+@parameters[8].to_s
    db_window.insertinfo("  "+pos+zoom+opac)
    db_window.insertinfo(event_str + " - Picture "+num)
  end
 
  def command_232
    number = @parameters[0] + ($game_temp.in_battle ? 50 : 0)
    px = $game_screen.pictures[number].x
    py = $game_screen.pictures[number].y
    if @parameters[3] == 0
      x = @parameters[4]
      y = @parameters[5]
    else
      x = $game_variables[@parameters[4]]
      y = $game_variables[@parameters[5]]
    end
    coord = ([x, y] == [px, py]) ? 0 : 1
    zx = @parameters[6]
    zy = @parameters[7]
    pzx = $game_screen.pictures[number].zoom_x
    pzy = $game_screen.pictures[number].zoom_y
    zoom_coord = ([zx, zy] == [pzx, pzy]) ? 0 : 1
    opachh = parameters[8] == $game_screen.pictures[number].opacity ? 0 : 1
    blendhh = @parameters[9] == $game_screen.pictures[number].blend_type ? 0 : 1
    command_232_db
    num = @parameters[0].to_s
    duration = " TIME: "+@parameters[1].to_s
    if coord == 1
      if @parameters[3] == 0
        pos = "X: #{x} Y: #{y}"
      else
        x = sprintf("%03d", @parameters[4])
        y = sprintf("%03d", @parameters[5])
        pos = "X: V[#{x}] Y: V[#{y}]"
      end
    else
      pos = ""
    end
    zoom = zoom_coord == 1 ? " Z_X: #{zx} Z_Y: #{zy}" : ""
    opac = opachh == 1 ? " OPAC: "+@parameters[8].to_s : ""
    blend = blendhh == 1 ? " BLEND: "+@parameters[9].to_s : ""
    db_window.insertinfo("  "+pos+zoom+opac+blend)
    db_window.insertinfo(event_str + " - Move Picture "+num+duration)
  end

  def command_233
    command_233_db
    num = @parameters[0].to_s
    speed = " SPEED: " + @parameters[1].to_s
    db_window.insertinfo(event_str + " - Rotate Picture "+num+speed)
  end

  def command_234
    command_234_db
    num = @parameters[0].to_s
    duration = " TIME: "+@parameters[2].to_s
    db_window.insertinfo(event_str + " - Change Pic. Color "+num+duration)
  end

  def command_235
    command_235_db
    num = @parameters[0].to_s
    db_window.insertinfo(event_str + " - Erase Picture "+num)
  end
 
  def command_236
    command_236_db
    if @parameters[0] == 0
      duration = " TIME: "+@parameters[2].to_s
      db_window.insertinfo(event_str + " - STOP Weather"+duration)
    else
      type = " TYPE: "+@parameters[0].to_s
      power = " POWER: "+@parameters[1].to_s
      duration = " TIME: "+@parameters[2].to_s
      db_window.insertinfo(event_str + " - Weather"+type+power+duration)
    end
  end

  def command_241
    command_241_db
    db_window.insertinfo(event_str + " - Play BGM")
  end

  def command_242
    command_242_db
    db_window.insertinfo(event_str + " - Fade Out BGM")
  end

  def command_245
    command_245_db
    db_window.insertinfo(event_str + " - Play BGS")
  end

  def command_246
    command_246_db
    db_window.insertinfo(event_str + " - Fade Out BGS")
  end

  def command_247
    command_247_db
    db_window.insertinfo(event_str + " - Memorize BGM/BGS")
  end

  def command_248
    command_248_db
    db_window.insertinfo(event_str + " - Restore BGM/BGS")
  end

  def command_249
    command_249_db
    db_window.insertinfo(event_str + " - Play ME")
  end

  def command_250
    command_250_db
    db_window.insertinfo(event_str + " - Play SE")
  end

  def command_251
    command_251_db
    db_window.insertinfo(event_str + " - Stop SE")
  end
 
  def command_311
    command_311_db
    actor = @parameters[0] == 0 ? " ALL " : " ACT"+@parameters[0].to_s+" "
    operation = @parameters[1] == 0 ? " += " : " -= "
    if @parameters[2] == 0
      type = @parameters[3]
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " -"+actor+"HP"+operation+type)
    else
      hp = ($game_actors[@parameters[0]].hp).to_s
      db_window.insertinfo(event_str + " -"+actor+"HP"+operation+type+" =(#{hp})")
    end
  end
 
  def command_312
    command_312_db
    actor = @parameters[0] == 0 ? " ALL " : " ACT"+@parameters[0].to_s+" "
    operation = @parameters[1] == 0 ? " += " : " -= "
    if @parameters[2] == 0
      type = @parameters[3]
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " -"+actor+"SP"+operation+type)
    else
      sp = ($game_actors[@parameters[0]].sp).to_s
      db_window.insertinfo(event_str + " -"+actor+"SP"+operation+type+" =(#{sp})")
    end
  end
 
  def command_313
    command_313_db
    actor = @parameters[0] == 0 ? " ALL " : " ACT"+@parameters[0].to_s+" "
    state = @parameters[2].to_s
    if @parameters[1] == 0
      db_window.insertinfo(event_str + " -"+actor+"Add State "+state)
    else
      db_window.insertinfo(event_str + " -"+actor+"Remove State "+state)
    end
  end

  def command_314
    command_314_db
    actor = @parameters[0] == 0 ? " ALL " : " ACT"+@parameters[0].to_s+" "
    db_window.insertinfo(event_str + " -"+actor+"Recover All")
  end
 
  def command_315
    command_315_db
    actor = @parameters[0] == 0 ? " ALL " : " ACT"+@parameters[0].to_s+" "
    op = @parameters[1] == 0 ? " += " : " -= "
    if @parameters[2] == 0
      type = @parameters[3]
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " -"+actor+"EXP"+op+type)
    else
      exp = ($game_actors[@parameters[0]].exp).to_s
      db_window.insertinfo(event_str + " -"+actor+"EXP"+op+type+" =(#{exp})")
    end
  end

  def command_316
    command_316_db
    actor = @parameters[0] == 0 ? " ALL " : " ACT"+@parameters[0].to_s+" "
    op = @parameters[1] == 0 ? " += " : " -= "
    if @parameters[2] == 0
      type = @parameters[3]
    else
      type = "V[" + sprintf("%03d", @parameters[3]) + "]"
    end
    if @parameters[0] == 0
      db_window.insertinfo(event_str + " -"+actor+"LEVEL"+op+type)
    else
      level = ($game_actors[@parameters[0]].level).to_s
      db_window.insertinfo(event_str + " -"+actor+"LEVEL"+op+type+" =(#{level})")
    end
  end

  def command_317
    command_317_db
    act = " ACT"+@parameters[0].to_s+" "
    op = @parameters[2] == 0 ? " += " : " -= "
    if @parameters[3] == 0
      type = @parameters[4]
    else
      type = "V[" + sprintf("%03d", @parameters[4]) + "]"
    end
    actor = $game_actors[@parameters[0]]
    case @parameters[1]
      when 0 ; para = "MaxHP" ; val = actor.maxhp.to_s
      when 1 ; para = "MaxSP" ; val = actor.maxsp.to_s
      when 2 ; para = "Str" ; val = actor.str.to_s
      when 3 ; para = "Dex" ; val = actor.dex.to_s
      when 4 ; para = "Agi" ; val = actor.agi.to_s
      when 5 ; para = "Int" ; val = actor.int.to_s
    end
    db_window.insertinfo(event_str + " - "+act+" Param "+para+op+type+" =(#{val})")
  end

  def command_318
    command_318_db
    act = " ACT"+@parameters[0].to_s+" "
    skill = @parameters[2].to_s
    if @parameters[1] == 0
      db_window.insertinfo(event_str + " - "+act+"Learn Skill "+skill)
    else
      db_window.insertinfo(event_str + " - "+act+"Forget Skill "+skill)
    end
  end

  def command_319
    command_319_db
    act = " ACT"+@parameters[0].to_s+" "
    if @parameters[2] == 0
      case @parameters[1]
      when 0 : db_window.insertinfo(event_str + " - "+act+"Unequip Weapon")
      when 1 : db_window.insertinfo(event_str + " - "+act+"Unequip Shield")
      when 2 : db_window.insertinfo(event_str + " - "+act+"Unequip Head")
      when 3 : db_window.insertinfo(event_str + " - "+act+"Unequip Body")
      when 4 : db_window.insertinfo(event_str + " - "+act+"Unequip Accessory")
      end
    else
      item = @parameters[2].to_s
      case @parameters[1]
      when 0 : db_window.insertinfo(event_str + " - "+act+"Equip Weapon "+item)
      when 1 : db_window.insertinfo(event_str + " - "+act+"Equip Shield "+item)
      when 2 : db_window.insertinfo(event_str + " - "+act+"Equip Head "+item)
      when 3 : db_window.insertinfo(event_str + " - "+act+"Equip Body "+item)
      when 4 : db_window.insertinfo(event_str + " - "+act+"Equip Accessory "+item)
      end
    end
  end

  def command_320
    command_320_db
    act = " ACT"+@parameters[0].to_s+" "
    name = @parameters[1].to_s
    db_window.insertinfo(event_str + " - "+act+"Change Name: "+name)
  end

  def command_321
    command_321_db
    act = " ACT"+@parameters[0].to_s+" "
    clase = @parameters[1].to_s
    db_window.insertinfo(event_str + " - "+act+"Change Class "+clase)
  end

  def command_322
    command_322_db
    act = " ACT"+@parameters[0].to_s+" "
    db_window.insertinfo(event_str + " - "+act+"Change Graphic")
  end
 
  def command_355
    command_355_db
    db_window.insertinfo(event_str + " - Call Script")
  end
end
end
avatar
Wecoc
Administrador
Administrador



Créditos 12282

Gracias : 645

Volver arriba Ir abajo

RPG Maker XP Re: [RMXP] Debug Extras

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


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