Foros de Emudesc

#==================================================================#
#==================================================================#
#  #*****************#        Efecto de camara v1.1, permite      #
#  #*** By Falcao ***#        mover las camaras del juego al      #                  
#  #*****************#        antojo del usuario                  #
#        RMXP                                                    #
# makerpalace.onlinegoo.com        V 1.5                          #
#==================================================================#

module Camara

# Boton para activar la camara (Tecla "D" del teclado)
Button = Input::Z  

# Velocidad de desplazamiento de la camara (del 1 al 10)
Speed = 5

#Interruptor que desabilita o abilita el script (on, off)
CamaraDisable = 50

end

$xrxs = {} if $xrxs == nil
  
class Game_System
  attr_accessor :camara
  alias falcaoscroll_initialize initialize
  def initialize
    falcaoscroll_initialize
    @camara = false
  end
end

class Active_Arrow 
  def initialize
    @arrow_up = Sprite.new
    @arrow_up.bitmap = RPG::Cache.icon("047-Skill04")
    @arrow_up.x = 325
    @arrow_up.y = 40
    @arrow_up.z = 200
    @arrow_up.angle = 180
    @arrow_up.visible = false
    
    @arrow_left = Sprite.new
    @arrow_left.bitmap = RPG::Cache.icon("047-Skill04")
    @arrow_left.x = 32
    @arrow_left.y = 220
    @arrow_left.z = 200
    @arrow_left.angle = 270
    @arrow_left.visible = false
    
    @arrow_down = Sprite.new
    @arrow_down.bitmap = RPG::Cache.icon("047-Skill04")
    @arrow_down.x = 316
    @arrow_down.y = 446
    @arrow_down.z = 200
    @arrow_down.visible = false
    
    @arrow_right = Sprite.new
    @arrow_right.bitmap = RPG::Cache.icon("047-Skill04")
    @arrow_right.x = 600
    @arrow_right.y = 242
    @arrow_right.z = 200
    @arrow_right.angle = 90
    @arrow_right.visible = false
  end
  def update
    if $game_system.camara == true
    case Input.dir4
    when 2
      @arrow_up.zoom_x = 1;  @arrow_up.zoom_y = 1
      @arrow_left.zoom_x = 1;  @arrow_left.zoom_y = 1
      @arrow_right.zoom_x = 1;  @arrow_right.zoom_y = 1
      @arrow_down.zoom_x = 1.4; @arrow_down.zoom_y = 1.4
    when 4
      @arrow_up.zoom_x = 1;  @arrow_up.zoom_y = 1
      @arrow_right.zoom_x = 1;  @arrow_right.zoom_y = 1
      @arrow_down.zoom_x = 1;  @arrow_down.zoom_y = 1
      @arrow_left.zoom_x = 1.4; @arrow_left.zoom_y = 1.4
    when 6
      @arrow_up.zoom_x = 1;  @arrow_up.zoom_y = 1
      @arrow_left.zoom_x = 1;  @arrow_left.zoom_y = 1
      @arrow_down.zoom_x = 1;  @arrow_down.zoom_y = 1
      @arrow_right.zoom_x = 1.4; @arrow_right.zoom_y = 1.4
    when 8
      @arrow_left.zoom_x = 1;  @arrow_left.zoom_y = 1
      @arrow_right.zoom_x = 1;  @arrow_right.zoom_y = 1
      @arrow_down.zoom_x = 1;  @arrow_down.zoom_y = 1
      @arrow_up.zoom_x = 1.4; @arrow_up.zoom_y = 1.4
    end
    @arrow_up.visible = true
      @arrow_left.visible = true
      @arrow_down.visible = true
      @arrow_right.visible = true
    else
      @arrow_up.visible = false
      @arrow_left.visible = false
      @arrow_down.visible = false
      @arrow_right.visible = false
    end
  end
  def dispose
    @arrow_up.dispose
    @arrow_up.bitmap.dispose
    @arrow_left.dispose
    @arrow_left.bitmap.dispose
    @arrow_down.dispose
    @arrow_down.bitmap.dispose
    @arrow_right.dispose
    @arrow_right.bitmap.dispose
  end
end

class Game_Player < Game_Character
  include Camara
  alias falcaocamara_update update
  def update
    falcaocamara_update
      if Input.trigger?(Button) and @camera_action == nil and
        $game_switches[CamaraDisable] == false
        if $xrxs["xas"] == true
        $game_switches[6] = true
        $game_map.refresh
      end
      @walk_anime = false
      $game_system.camara = true
      @camera_action = 1
    elsif Input.trigger?(Button) and @camera_action == 1 and
      $game_switches[CamaraDisable] == false
      center(x, y)
      if $xrxs["xas"] == true
        $game_switches[6] = false
        $game_map.refresh
      end
      @move_speed = 4
      @walk_anime = true
      $game_system.camara = false
      @camera_action = nil
    end
    if $game_system.camara == true
      @move_speed = -20
    unless $game_temp.message_window_showing
      case Input.dir4
      when 2
        turn_down
        $game_map.start_scroll(2, 1,Speed)
      when 4
        turn_left
        $game_map.start_scroll(4, 1,Speed)
      when 6
        turn_right
        $game_map.start_scroll(6, 1,Speed)
      when 8
        turn_up
        $game_map.start_scroll(8, 1,Speed)
      end
    end  
  end
end
end

class Scene_Map
  alias falcaoscroll_main main
  def main
    @arrow_active = Active_Arrow.new
    falcaoscroll_main
    @arrow_active.dispose
  end
  alias falcaoscroll_update update
  def update
    @arrow_active.update
    falcaoscroll_update
  end
end

# Boton para activar la camara (Tecla "D" del teclado)
Button = Input::Z  

# Velocidad de desplazamiento de la camara (del 1 al 10)
Speed = 5

#Interruptor que desabilita o abilita el script (on, off)
CamaraDisable = 50