rmxp_extractor 1.7 → 1.8

data/Scripts/Interpreter 1.rb

@@ -0,0 +1,320 @@
+#==============================================================================
+# ** Interpreter (part 1)
+#------------------------------------------------------------------------------
+#  This interpreter runs event commands. This class is used within the
+#  Game_System class and the Game_Event class.
+#==============================================================================
+
+class Interpreter
+  attr_accessor :index
+  @@chill_pill = false
+  #--------------------------------------------------------------------------
+  # * Object Initialization
+  #     depth : nest depth
+  #     main  : main flag
+  #--------------------------------------------------------------------------
+  def initialize(depth = 0, main = false)
+    @depth = depth
+    @main = main
+    # Depth goes up to level 100
+    if depth > 100
+      print("Common event call has exceeded maximum limit.")
+      exit
+    end
+    # Clear inner situation of interpreter
+    clear
+  end
+  #--------------------------------------------------------------------------
+  # * Clear
+  #--------------------------------------------------------------------------
+  def clear
+    @map_id = 0                       # map ID when starting up
+    @event_id = 0                     # event ID
+    @message_waiting = false          # waiting for message to end
+    @move_route_waiting = false       # waiting for move completion
+    @button_input_variable_id = 0     # button input variable ID
+    @wait_count = 0                   # wait count
+    @child_interpreter = nil          # child interpreter
+    @branch = {}                      # branch data
+    @event_name = nil                 # full event name
+  end
+  #--------------------------------------------------------------------------
+  # * Event Setup
+  #     list     : list of event commands
+  #     event_id : event ID
+  #--------------------------------------------------------------------------
+  def setup(list, event_id, common_event_name = nil)
+    # Clear inner situation of interpreter
+    clear
+    # Remember map ID
+    @map_id = $game_map.map_id
+    # Remember event ID
+    @event_id = event_id
+    # Remember list of event commands
+    @list = list
+    # Initialize index
+    @index = 0
+    # Clear branch data hash
+    @branch.clear
+    # Construct event name
+    if common_event_name == nil
+      if event_id != 0
+        @event_name = $game_map.map_name + "/" + $game_map.events[event_id].name
+      end
+    else
+      @event_name = "/" + common_event_name
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Determine if Running
+  #--------------------------------------------------------------------------
+  def running?
+    return @list != nil
+  end
+  #--------------------------------------------------------------------------
+  # * Starting Event Setup
+  #--------------------------------------------------------------------------
+  def setup_starting_event
+    # Refresh map if necessary
+    if $game_map.need_refresh
+      $game_map.refresh
+    end
+    # If common event call is reserved
+    if $game_temp.common_event_id > 0
+      # Set up event
+      common_event = $data_common_events[$game_temp.common_event_id]
+      setup(common_event.list, 0, common_event.name)
+      # Release reservation
+      $game_temp.common_event_id = 0
+      return
+    end
+    # Loop (map events)
+    for event in $game_map.events.values
+      # If running event is found
+      if event.starting
+        # If not auto run
+        if event.trigger < 3
+          # Clear starting flag
+          event.clear_starting
+          # Lock
+          event.lock
+        end
+        # Set up event
+        setup(event.list, event.id)
+        return
+      end
+    end
+    # Loop (common events)
+    for common_event in $data_common_events.compact
+      # If trigger is auto run, and condition switch is ON
+      if common_event.trigger == 1 and
+         $game_switches[common_event.switch_id] == true
+        # Set up event
+        setup(common_event.list, 0, common_event.name)
+        return
+      end
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Frame Update
+  #--------------------------------------------------------------------------
+  def update
+    # Initialize loop count
+    @loop_count = 0
+    # Loop
+    loop do
+      # Add 1 to loop count
+      @loop_count += 1
+      # If 100 event commands ran
+      if @loop_count > 100
+        # Call Graphics.update for freeze prevention
+        Graphics.update
+        @loop_count = 0
+      end
+      # Chill pill
+      if @@chill_pill
+        @@chill_pill = false
+        return
+      end
+      # If map is different than event startup time
+      if $game_map.map_id != @map_id
+        # Change event ID to 0
+        @event_id = 0
+      end
+      # If a child interpreter exists
+      if @child_interpreter != nil
+        # Update child interpreter
+        @child_interpreter.update
+        # If child interpreter is finished running
+        unless @child_interpreter.running?
+          # Delete child interpreter
+          @child_interpreter = nil
+        end
+        # If child interpreter still exists
+        if @child_interpreter != nil
+          return
+        end
+      end
+      # If waiting for message to end
+      if @message_waiting
+        return
+      end
+      # If waiting for move to end
+      if @move_route_waiting
+        # If player is forcing move route
+        if $game_player.move_route_forcing
+          return
+        end
+        # Loop (map events)
+        for event in $game_map.events.values
+          # If this event is forcing move route
+          if event.move_route_forcing
+            return
+          end
+        end
+        # Clear move end waiting flag
+        @move_route_waiting = false
+      end
+      # If waiting for button input
+      if @button_input_variable_id > 0
+        # Run button input processing
+        input_button
+        return
+      end
+      # If waiting
+      if @wait_count > 0
+        # Decrease wait count
+        @wait_count -= 1
+        return
+      end
+      # If a call flag is set for each type of screen
+      if $game_temp.name_calling
+        return
+      end
+      # If list of event commands is empty
+      if @list == nil
+        # If main map event
+        if @main
+          # Set up starting event
+          setup_starting_event
+        end
+        # If nothing was set up
+        if @list == nil
+          return
+        end
+      end
+      # If return value is false when trying to execute event command
+      if execute_command == false
+        return
+      end
+      # Advance index
+      @index += 1
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Button Input
+  #--------------------------------------------------------------------------
+  def input_button
+    # Determine pressed button
+    n = 0
+    for i in 1..18
+      if Input.trigger?(i)
+        n = i
+      end
+    end
+    # If button was pressed
+    if n > 0
+      # Change value of variables
+      $game_variables[@button_input_variable_id] = n
+      $game_map.need_refresh = true
+      # End button input
+      @button_input_variable_id = 0
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Setup Choices
+  #--------------------------------------------------------------------------
+  def setup_choices(parameters)
+    # Set choices
+    $game_temp.choices = parameters[0].map{|s| Language.tr(s.strip)}
+    # Set cancel processing
+    $game_temp.choice_cancel_type = parameters[1]
+    # Set callback
+    current_indent = @list[@index].indent
+    $game_temp.choice_proc = Proc.new { |n| @branch[current_indent] = n }
+  end
+  #--------------------------------------------------------------------------
+  # * Actor Iterator (consider all party members)
+  #     parameter : if 1 or more, ID; if 0, all
+  #--------------------------------------------------------------------------
+  def iterate_actor(parameter)
+    # If entire party
+    if parameter == 0
+      # Loop for entire party
+      for actor in $game_party.actors
+        # Evaluate block
+        yield actor
+      end
+    # If single actor
+    else
+      # Get actor
+      actor = $game_actors[parameter]
+      # Evaluate block
+      yield actor if actor != nil
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Enemy Iterator (consider all troop members)
+  #     parameter : If 0 or above, index; if -1, all
+  #--------------------------------------------------------------------------
+  def iterate_enemy(parameter)
+    # If entire troop
+    if parameter == -1
+      # Loop for entire troop
+      for enemy in $game_troop.enemies
+        # Evaluate block
+        yield enemy
+      end
+    # If single enemy
+    else
+      # Get enemy
+      enemy = $game_troop.enemies[parameter]
+      # Evaluate block
+      yield enemy if enemy != nil
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Battler Iterator (consider entire troop and entire party)
+  #     parameter1 : If 0, enemy; if 1, actor
+  #     parameter2 : If 0 or above, index; if -1, all
+  #--------------------------------------------------------------------------
+  def iterate_battler(parameter1, parameter2)
+    # If enemy
+    if parameter1 == 0
+      # Call enemy iterator
+      iterate_enemy(parameter2) do |enemy|
+        yield enemy
+      end
+    # If actor
+    else
+      # If entire party
+      if parameter2 == -1
+        # Loop for entire party
+        for actor in $game_party.actors
+          # Evaluate block
+          yield actor
+        end
+      # If single actor (N exposed)
+      else
+        # Get actor
+        actor = $game_party.actors[parameter2]
+        # Evaluate block
+        yield actor if actor != nil
+      end
+    end
+  end
+  # Chill out
+  def self.take_a_chill_pill
+    @@chill_pill = true
+  end
+end

data/Scripts/Interpreter 2.rb

@@ -0,0 +1,286 @@
+#==============================================================================
+# ** Interpreter (part 2)
+#------------------------------------------------------------------------------
+#  This interpreter runs event commands. This class is used within the
+#  Game_System class and the Game_Event class.
+#==============================================================================
+
+class Interpreter
+  #--------------------------------------------------------------------------
+  # * Event Command Execution
+  #--------------------------------------------------------------------------
+  def execute_command
+    # If last to arrive for list of event commands
+    if @index >= @list.size - 1
+      # End event
+      command_end
+      # Continue
+      return true
+    end
+    # Make event command parameters available for reference via @parameters
+    @parameters = @list[@index].parameters
+    # Branch by command code
+    case @list[@index].code
+    when 101  # Show Text
+      return command_101
+    when 102  # Show Choices
+      return command_102
+    when 402  # When [**]
+      return command_402
+    when 403  # When Cancel
+      return command_403
+    when 103  # Input Number
+      return command_103
+    when 104  # Change Text Options
+      return command_104
+    when 105  # Button Input Processing
+      return command_105
+    when 106  # Wait
+      return command_106
+    when 111  # Conditional Branch
+      return command_111
+    when 411  # Else
+      return command_411
+    when 112  # Loop
+      return command_112
+    when 413  # Repeat Above
+      return command_413
+    when 113  # Break Loop
+      return command_113
+    when 115  # Exit Event Processing
+      return command_115
+    when 116  # Erase Event
+      return command_116
+    when 117  # Call Common Event
+      return command_117
+    when 118  # Label
+      return command_118
+    when 119  # Jump to Label
+      return command_119
+    when 121  # Control Switches
+      return command_121
+    when 122  # Control Variables
+      return command_122
+    when 123  # Control Self Switch
+      return command_123
+    when 124  # Control Timer
+      return command_124
+    when 125  # Change Gold
+      return command_125
+    when 126  # Change Items
+      return command_126
+    when 127  # Change Weapons
+      return command_127
+    when 128  # Change Armor
+      return command_128
+    when 129  # Change Party Member
+      return command_129
+    when 131  # Change Windowskin
+      return command_131
+    when 132  # Change Battle BGM
+      return command_132
+    when 133  # Change Battle End ME
+      return command_133
+    when 134  # Change Save Access
+      return command_134
+    when 135  # Change Menu Access
+      return command_135
+    when 136  # Change Encounter
+      return command_136
+    when 201  # Transfer Player
+      return command_201
+    when 202  # Set Event Location
+      return command_202
+    when 203  # Scroll Map
+      return command_203
+    when 204  # Change Map Settings
+      return command_204
+    when 205  # Change Fog Color Tone
+      return command_205
+    when 206  # Change Fog Opacity
+      return command_206
+    when 207  # Show Animation
+      return command_207
+    when 208  # Change Transparent Flag
+      return command_208
+    when 209  # Set Move Route
+      return command_209
+    when 210  # Wait for Move's Completion
+      return command_210
+    when 221  # Prepare for Transition
+      return command_221
+    when 222  # Execute Transition
+      return command_222
+    when 223  # Change Screen Color Tone
+      return command_223
+    when 224  # Screen Flash
+      return command_224
+    when 225  # Screen Shake
+      return command_225
+    when 231  # Show Picture
+      return command_231
+    when 232  # Move Picture
+      return command_232
+    when 233  # Rotate Picture
+      return command_233
+    when 234  # Change Picture Color Tone
+      return command_234
+    when 235  # Erase Picture
+      return command_235
+    when 236  # Set Weather Effects
+      return command_236
+    when 241  # Play BGM
+      return command_241
+    when 242  # Fade Out BGM
+      return command_242
+    when 245  # Play BGS
+      return command_245
+    when 246  # Fade Out BGS
+      return command_246
+    when 247  # Memorize BGM/BGS
+      return command_247
+    when 248  # Restore BGM/BGS
+      return command_248
+    when 249  # Play ME
+      return command_249
+    when 250  # Play SE
+      return command_250
+    when 251  # Stop SE
+      return command_251
+    when 301  # Battle Processing
+      return command_301
+    when 601  # If Win
+      return command_601
+    when 602  # If Escape
+      return command_602
+    when 603  # If Lose
+      return command_603
+    when 302  # Shop Processing
+      return command_302
+    when 303  # Name Input Processing
+      return command_303
+    when 311  # Change HP
+      return command_311
+    when 312  # Change SP
+      return command_312
+    when 313  # Change State
+      return command_313
+    when 314  # Recover All
+      return command_314
+    when 315  # Change EXP
+      return command_315
+    when 316  # Change Level
+      return command_316
+    when 317  # Change Parameters
+      return command_317
+    when 318  # Change Skills
+      return command_318
+    when 319  # Change Equipment
+      return command_319
+    when 320  # Change Actor Name
+      return command_320
+    when 321  # Change Actor Class
+      return command_321
+    when 322  # Change Actor Graphic
+      return command_322
+    when 331  # Change Enemy HP
+      return command_331
+    when 332  # Change Enemy SP
+      return command_332
+    when 333  # Change Enemy State
+      return command_333
+    when 334  # Enemy Recover All
+      return command_334
+    when 335  # Enemy Appearance
+      return command_335
+    when 336  # Enemy Transform
+      return command_336
+    when 337  # Show Battle Animation
+      return command_337
+    when 338  # Deal Damage
+      return command_338
+    when 339  # Force Action
+      return command_339
+    when 340  # Abort Battle
+      return command_340
+    when 351  # Call Menu Screen
+      return command_351
+    when 352  # Call Save Screen
+      return command_352
+    when 353  # Game Over
+      return command_353
+    when 354  # Return to Title Screen
+      return command_354
+    when 355  # Script
+      return command_355
+    else      # Other
+      return true
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * End Event
+  #--------------------------------------------------------------------------
+  def command_end
+    # Clear list of event commands
+    @list = nil
+    # If main map event and event ID are valid
+    if @main and @event_id > 0
+      # Unlock event
+      $game_map.events[@event_id].unlock
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Command Skip
+  #--------------------------------------------------------------------------
+  def command_skip
+    # Get indent
+    indent = @list[@index].indent
+    # Loop
+    loop do
+      # If next event command is at the same level as indent
+      if @list[@index+1].indent == indent
+        # Continue
+        return true
+      end
+      # Advance index
+      @index += 1
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Get Character
+  #     parameter : parameter
+  #--------------------------------------------------------------------------
+  def get_character(parameter)
+    # Branch by parameter
+    case parameter
+    when -1  # player
+      return $game_player
+    when 0  # this event
+      events = $game_map.events
+      return events == nil ? nil : events[@event_id]
+    else  # specific event
+      events = $game_map.events
+      return events == nil ? nil : events[parameter]
+    end
+  end
+  #--------------------------------------------------------------------------
+  # * Calculate Operated Value
+  #     operation    : operation
+  #     operand_type : operand type (0: invariable 1: variable)
+  #     operand      : operand (number or variable ID)
+  #--------------------------------------------------------------------------
+  def operate_value(operation, operand_type, operand)
+    # Get operand
+    if operand_type == 0
+      value = operand
+    else
+      value = $game_variables[operand]
+    end
+    # Reverse sign of integer if operation is [decrease]
+    if operation == 1
+      value = -value
+    end
+    # Return value
+    return value
+  end
+end