mcgluszak

[Author: Aleworks] AIM Patch XP v1.00

Sep 1st, 2011
121
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Ruby 5.68 KB | None | 0 0
  1. #=============================================================================
  2. # *** AWorks Input Module Patch XP(AIM:PXP)
  3. #=============================================================================
  4. # Created by AWorks
  5. # Version: 1.00 XP
  6. # Last Update: 26/01/2009 (day/month/year)
  7. #=============================================================================
  8. #==== Description ====
  9. # This patch is for making AIM compatible with the default interpreter script
  10. # of RPG Maker XP when using the Conditional Branch and Button Input Processing
  11. # commands.
  12. #=============================================================================
  13. #==== Requeriments ====
  14. # * RPG Maker XP
  15. # * AIM (AWorks Input Module)
  16. #   - Version: 3.00
  17. #=============================================================================
  18.  
  19. #=============================================================================
  20. # ** Interpreter
  21. #=============================================================================
  22. class Interpreter
  23.   #---------------------------------------------------------------------------
  24.   # * Input Button
  25.   #---------------------------------------------------------------------------
  26.   def input_button
  27.     n = 1 if Input.trigger?(Input::LOWER_LEFT)
  28.     n = 3 if Input.trigger?(Input::LOWER_RIGHT)
  29.     n = 7 if Input.trigger?(Input::UPPER_LEFT)
  30.     n = 9 if Input.trigger?(Input::UPPER_RIGHT)
  31.     n = 2 if Input.trigger?(Input::DOWN)
  32.     n = 4 if Input.trigger?(Input::LEFT)
  33.     n = 6 if Input.trigger?(Input::RIGHT)
  34.     n = 8 if Input.trigger?(Input::UP)
  35.     n = 11 if Input.trigger?(Input::A)
  36.     n = 12 if Input.trigger?(Input::B)
  37.     n = 13 if Input.trigger?(Input::C)
  38.     n = 14 if Input.trigger?(Input::X)
  39.     n = 15 if Input.trigger?(Input::Y)
  40.     n = 16 if Input.trigger?(Input::Z)
  41.     n = 17 if Input.trigger?(Input::L)
  42.     n = 18 if Input.trigger?(Input::R)
  43.     if !n.nil?
  44.       $game_variables[@button_input_variable_id] = n
  45.       $game_map.need_refresh = true
  46.       @button_input_variable_id = 0
  47.     end
  48.   end
  49.   #---------------------------------------------------------------------------
  50.   # * Conditional Branch
  51.   #---------------------------------------------------------------------------
  52.   def command_111
  53.     result = false
  54.     case @parameters[0]
  55.     when 0
  56.       result = ($game_switches[@parameters[1]] == (@parameters[2] == 0))
  57.     when 1
  58.       value1 = $game_variables[@parameters[1]]
  59.       if @parameters[2] == 0
  60.         value2 = @parameters[3]
  61.       else
  62.         value2 = $game_variables[@parameters[3]]
  63.       end
  64.       case @parameters[4]
  65.       when 0
  66.         result = (value1 == value2)
  67.       when 1
  68.         result = (value1 >= value2)
  69.       when 2
  70.         result = (value1 <= value2)
  71.       when 3
  72.         result = (value1 > value2)
  73.       when 4
  74.         result = (value1 < value2)
  75.       when 5
  76.         result = (value1 != value2)
  77.       end
  78.     when 2
  79.       if @event_id > 0
  80.         key = [$game_map.map_id, @event_id, @parameters[1]]
  81.         if @parameters[2] == 0
  82.           result = ($game_self_switches[key] == true)
  83.         else
  84.           result = ($game_self_switches[key] != true)
  85.         end
  86.       end
  87.     when 3
  88.       if $game_system.timer_working
  89.         sec = $game_system.timer / Graphics.frame_rate
  90.         if @parameters[2] == 0
  91.           result = (sec >= @parameters[1])
  92.         else
  93.           result = (sec <= @parameters[1])
  94.         end
  95.       end
  96.     when 4
  97.       actor = $game_actors[@parameters[1]]
  98.       if actor != nil
  99.         case @parameters[2]
  100.         when 0
  101.           result = ($game_party.actors.include?(actor))
  102.         when 1
  103.           result = (actor.name == @parameters[3])
  104.         when 2
  105.           result = (actor.skill_learn?(@parameters[3]))
  106.         when 3
  107.           result = (actor.weapon_id == @parameters[3])
  108.         when 4
  109.           result = (actor.armor1_id == @parameters[3] or
  110.                     actor.armor2_id == @parameters[3] or
  111.                     actor.armor3_id == @parameters[3] or
  112.                     actor.armor4_id == @parameters[3])
  113.         when 5
  114.           result = (actor.state?(@parameters[3]))
  115.         end
  116.       end
  117.     when 5
  118.       enemy = $game_troop.enemies[@parameters[1]]
  119.       if enemy != nil
  120.         case @parameters[2]
  121.         when 0
  122.           result = (enemy.exist?)
  123.         when 1
  124.           result = (enemy.state?(@parameters[3]))
  125.         end
  126.       end
  127.     when 6
  128.       character = get_character(@parameters[1])
  129.       if character != nil
  130.         result = (character.direction == @parameters[2])
  131.       end
  132.     when 7
  133.       if @parameters[2] == 0
  134.         result = ($game_party.gold >= @parameters[1])
  135.       else
  136.         result = ($game_party.gold <= @parameters[1])
  137.       end
  138.     when 8
  139.       result = ($game_party.item_number(@parameters[1]) > 0)
  140.     when 9
  141.       result = ($game_party.weapon_number(@parameters[1]) > 0)
  142.     when 10
  143.       result = ($game_party.armor_number(@parameters[1]) > 0)
  144.     when 11
  145.       case @parameters[1]
  146.       when 2
  147.         n = Input::DOWN
  148.       when 4
  149.         n = Input::LEFT
  150.       when 6
  151.         n = Input::RIGHT
  152.       when 8
  153.         n = Input::UP
  154.       when 11
  155.         n = Input::A
  156.       when 12
  157.         n = Input::B
  158.       when 13
  159.         n = Input::C
  160.       when 14
  161.         n = Input::X
  162.       when 15
  163.         n = Input::Y
  164.       when 16
  165.         n = Input::Z
  166.       when 17
  167.         n = Input::L
  168.       when 18
  169.         n = Input::R
  170.       end
  171.       result = Input.press?(n)
  172.     when 12
  173.       result = eval(@parameters[1])
  174.     end
  175.     @branch[@list[@index].indent] = result
  176.     if @branch[@list[@index].indent] == true
  177.       @branch.delete(@list[@index].indent)
  178.       return true
  179.     end
  180.     return command_skip
  181.   end
  182. end
Advertisement
Add Comment
Please, Sign In to add comment