# Auteur : Milow
class Game_Map
 
  alias add_ini initialize
  def initialize
    add_ini
    @block_x = 0
    @block_y = 0
    @block_w = 0
    @block_h = 0
    @block = false
  end
 
  def free_view
    @block_x = 0
    @block_y = 0
    @block_w = 0
    @block_h = 0
    @block = false
    set_display_pos($game_player.x * 256, $game_player.y * 256)
  end
 
  def block_view(x, y, width2, height2)
    @block_x = x
    @block_y = y
    @block_w = width2 >= 17 ? width2 : 17
    @block_h = height2 >= 13 ? height2 : 13
    @block = true
    set_display_pos((@block_x) * 256, (@block_y) * 256)
  end
 
  #--------------------------------------------------------------------------
  # * Scroll Down
  #    distance : scroll distance
  #--------------------------------------------------------------------------
  def scroll_down(distance)
    if @block
      last_y = @display_y
      @display_y = [@display_y + distance, ((@block_h - 13) + @block_y) * 256].min
      @parallax_y += @display_y - last_y
    else
      last_y = @display_y
      @display_y = [@display_y + distance, (height - 13) * 256].min
      @parallax_y += @display_y - last_y
    end
  end
  #--------------------------------------------------------------------------
  # * Scroll Left
  #    distance : scroll distance
  #--------------------------------------------------------------------------
  def scroll_left(distance)
    if @block
      last_x = @display_x
      @display_x = [@display_x - distance, @block_x * 256].max
      @parallax_x += @display_x - last_x
    else
      last_x = @display_x
      @display_x = [@display_x - distance, 0].max
      @parallax_x += @display_x - last_x
    end
  end
  #--------------------------------------------------------------------------
  # * Scroll Right
  #    distance : scroll distance
  #--------------------------------------------------------------------------
  def scroll_right(distance)
    if @block
      last_x = @display_x
      @display_x = [@display_x + distance, ((@block_w - 17) + @block_x) * 256].min
      @parallax_x += @display_x - last_x
    else
      last_x = @display_x
      @display_x = [@display_x + distance, (width - 17) * 256].min
      @parallax_x += @display_x - last_x
    end
  end
  #--------------------------------------------------------------------------
  # * Scroll Up
  #    distance : scroll distance
  #--------------------------------------------------------------------------
  def scroll_up(distance)
    if @block
      last_y = @display_y
      @display_y = [@display_y - distance, @block_y * 256].max
      @parallax_y += @display_y - last_y
    else
      last_y = @display_y
      @display_y = [@display_y - distance, 0].max
      @parallax_y += @display_y - last_y
    end
  end
end

class Game_Interpreter
  def block_view(x, y, width, height)
    $game_map.block_view(x, y, width, height)
  end
  def free_view
    $game_map.free_view
  end
end

block_view(x, y, width, heigth)

free_view