ТЕМА: Карта подземелья (XP)

class Map
  #--------------------------------------------------------------------------
  attr_reader   :id
  attr_reader   :name
  attr_reader   :x
  attr_reader   :y
  attr_reader   :plx
  attr_reader   :ply
  attr_reader   :left
  attr_reader   :right
  attr_reader   :up
  attr_reader   :down
 
  def initialize(id, name, x, y, plx, ply, l, r, u, d) 
    @id = id
    @name = name
    @x = x
    @y = y
    @plx = plx
    @ply = ply
    @left = l
    @right = r
    @up = u
    @down = d
  end
end

class Game_Party # просто добавлен как доп partial файл
 
# дописываем в основной класс моменты, связанные с картой
  attr_reader   :maps # тип Map
 
  def initialize
    ...
    @maps = []
  end
 
# реализуем методы для работы с картой
# добавить карту (этот метод запускаем в autorun событии каждой карты с нужными значениями)
  def addmap(id, name, x, y, plx, ply, l, r, u, d) 
    map = Map.new(id, name, x, y, plx, ply, l, r, u, d) 
    @maps.push(map)
  end
 
  def clearmaps
    @maps = []
  end
 
  def showmap
# в классе Game_Temp я завел две переменные, тут их проставляю
    $game_temp.current_map = $game_map.map_id # текущая выделенная карта (изначально - та, где сейчас герой)
    $game_temp.map_showing = true # показать карту
  end
 
  def hidemap
    $game_temp.map_showing = false  # спрятать карту
  end
 
# этот метод принимает значение крестовины (вниз == 2, влево == 4, вправо == 6, вверх == 8 - это стандартные значения BUTTON INPUT в XP) и определяет карту, которую надо подсветить.
 
  def movemap(dir)
     for i in 0...@maps.size
       if @maps[i].id == $game_temp.current_map
         newid = -1
         if dir == 4
           newid = @maps[i].left
         end
         if dir == 6
           newid = @maps[i].right
         end
         if dir == 8
           newid = @maps[i].up
         end
         if dir == 2
           newid = @maps[i].down
         end
 
         if newid != -1
           for i in 0...@maps.size
             if @maps[i].id == newid
               $game_temp.current_map = newid
 
             end
           end
         end
         return
       end 
     end
  end
end

$game_party.addmap(2, 'Тюремные камеры', 430, 28, 448, 50, -1, -1, -1, 1)

class Spriteset_Map
  # в первой части класса в initialize заводим поверхности для рисования
 
# снова viewport3, чтобы находилось выше всего
 
 # подложка
    @map_surface = Plane.new(@viewport3)
    @map_surface.z = 5001
# карта
    @maps = Plane.new(@viewport3)
    @maps.z = 5002
# тут инициализируем битмапы. Я сначала умудрился делать это в update и словил переполнение памяти через пару минут игры :)
    @map_surface.bitmap = Bitmap.new(640, 480)
    @maps.bitmap = Bitmap.new(640, 480)
 
 
# в методе dispose не забываем удалять поверхности
 
    @map_surface.dispose
    @maps.dispose
 
# наконец, в update, после тумана, я рисую
# очищаем битмапы, иначе при выходе из режима карты у нас могут остаться левые следы
 
    @map_surface.bitmap.clear 
    @maps.bitmap.clear
# рисуем, если включен режим показа карты (вызван $game_party.showmap)
    if $game_temp.map_showing
      show_map
    end 
 
# в отдельном файле реализация отрисовки
 
 
  def show_map  
# рисуем подложку (в моем случае - пожелтевший пергамент)
    map = RPG::Cache.picture("mapsurface")
    @map_surface.bitmap.blt(0, 0, map, Rect.new(0, 0, map.width, map.height))
 
    for i in 0..$game_party.maps.size-1
# бежим по всем открытым картам и рисуем. Координаты мы записали заранее для каждой карты
      mmap = $game_party.maps[i]
      mmappic = RPG::Cache.picture('map' + mmap.id.to_s)
      @map_surface.bitmap.blt(mmap.x, mmap.y, mmappic, Rect.new(0, 0, mmappic.width, mmappic.height))
 
# теперь подсвечиваем выделенную карту и пишем её описание 
      if $game_temp.current_map == mmap.id
        @maps.bitmap.fill_rect(mmap.x+2, mmap.y+2, mmappic.width-4, mmappic.height-4,
          Color.new(255, 255, 255, 128)) 
 
 
        @map_surface.bitmap.font.size = 24 
        @map_surface.bitmap.font.color = Color.new(89, 64, 49, 255)
        w = @map_surface.bitmap.text_size(mmap.name).width
        x = 320 - w / 2 # для центрирования
        @map_surface.bitmap.draw_text(x, 4, 400, 24, mmap.name, 0)
      end
 # а на текущей карте рисуем отметку, что мы находимся здесь
      if $game_map.map_id == mmap.id
        mhero = RPG::Cache.picture('mhero') # тут у меня фигнюшка, утыренная с какого-то виндовскина
        w = mhero.width
        h = mhero.height
        # положение отметки мы тоже заблаговременно завели в классе карты
        @maps.bitmap.blt(mmap.plx - w / 2, mmap.ply - h / 2, mhero, Rect.new(0, 0, w, h))
      end
    end
  end
end

    if $game_temp.map_showing
        @spriteset.update
         $game_map.update
      $game_system.map_interpreter.update
 
      $game_system.update
      $game_screen.update
      return
    end