XP 스크립트

#==============================================================================
# ■ 오토 매핑
#------------------------------------------------------------------------------
# ver 1.00(05/04/27) by 상입오두막 http://aea.to/hako/
#==============================================================================
=begin
 ■ 주로 사용하는 메소드
 
 automaps[id]       : id 차례의 오토 맵을 참조.
 
 visible            : 진정한이라고 하고 표시.
 scope              : 묘화 범위.
 complete           : 모두 통행 한 상태로 한다.
 delete             : 통행 기록을 지운다.
 move(x, y[, center]) : (x, y)에 이동. center가 진정한이라고 하고 원점 중심.
=end

class Game_AutoMap
  #--------------------------------------------------------------------------
  # ● 정수
  #--------------------------------------------------------------------------
  # 오토 맵의 작성을 허가하는 맵 ID의 배열
  AUTOMAPS_ID = [1, 2, 3, 4, 5]
  # 1 타일 근처의 한 변의 길이(pixel 단위)
  TILE_SIZE = 5
  # 통행이 끝난 상태라고 판단되는 범위의 크기(타일 단위)
  SCOPE = 0
end

class Sprite_AutoMap < Sprite
  #--------------------------------------------------------------------------
  # ● 정수
  #--------------------------------------------------------------------------
  # ※불투명도(알파치)를 0으로 하면(자) 무효가 됩니다.
  #-----------------------------------------------
  # 통행이 끝난 에리어의 색(Red, Green, Blue[, Alpha])
  COLOR_FLOOR = Color.new(100, 100, 255, 120)
  # 미통행/통행 불가의 에리어의 색
  COLOR_WALL = Color.new(0, 0, 50, 100)
  # 플레이어 심볼의 색
  COLOR_PLAYER = Color.new(255, 255, 0, 255)
  #-----------------------------------------------
  # 통행이 끝난 에리어에 붙이는 픽쳐 파일, 불투명도
  PASSED_FILE = ["filename", 0]
  # 미통행/통행 불가 에리어에 붙이는 픽쳐 파일, 불투명도
  IMPASSABLE_FILE = ["filename", 0]
  # 플레이어 심볼로서 표시하는 픽쳐 파일, 불투명도
  PLAYER_FILE = ["filename", 0]
end

#==============================================================================
# ■ Interpreter
#==============================================================================
class Interpreter
  #--------------------------------------------------------------------------
  # ● 오토 맵의 데이터를 취득
  #--------------------------------------------------------------------------
  def automaps
    $game_screen.automaps
  end
end

#==============================================================================
# ■ Game_Screen
#==============================================================================
class Game_Screen
  attr_accessor :automaps   # Game_AutoMap 오브젝트를 격납하는 Hash
  alias automapping_100_initialize initialize
  def initialize
    @automaps = {}
    automapping_100_initialize
  end
end

#==============================================================================
# ■ Game_AutoMap
#==============================================================================
class Game_AutoMap
  attr_accessor :player_pos   # 플레이어 좌표
  attr_accessor :showing      # 오토 맵 표시 플래그
  attr_accessor :scope        # 묘화 범위(플레이어로부터의 거리)
  attr_accessor :recording    # 오토 맵 기록 개시 플래그
  attr_reader :calling        # 외부 오토 맵 호출 플래그
  attr_reader :drawn_floor    # 오토 맵의 묘화 정보
  attr_reader :x              # 표시 위치 x
  attr_reader :y              # 표시 위치 y
  attr_reader :tile_size    # 타일의 크기
  attr_reader :width          # 맵의 폭
  attr_reader :height         # 맵의 높이
  attr_reader :passable       # 통행 가능 좌표
  attr_reader :id             # 맵의 ID
  attr_reader :name           # 맵의 이름
  attr_reader :permission     # 오토 맵 작성 허가 플래그
  #--------------------------------------------------------------------------
  # ● 오브젝트 초기화(새로운 맵으로 이동했을 때 실행)
  #--------------------------------------------------------------------------
  def initialize
    @permission = AUTOMAPS_ID.include? ($game_map.map_id)
    return if not @permission
    @recording = false
    @showing = false
    @calling = false
    @player_pos  = [-1, -1]
    @drawn_floor = Table.new($game_map.width, $game_map.height)
    @x = 0
    @y = 0
    @scope = SCOPE
    @tile_size = TILE_SIZE
    @width = $game_map.width
    @height = $game_map.height
    @passable = Table.new(@width, @height)
    for x in 0..@width
      for y in 0..@height
        if $game_map.passable? (x, y, 0)
          @passable[x, y] = 1 # 통행 가능하면 1
        end
      end
    end
    @id = $game_map.map_id
    mapinfo = load_data("Data/MapInfos.rxdata") # RPG::MapInfo(Hash, key:id)
    @name = mapinfo[$game_map.map_id]. name.dup
  end
  #--------------------------------------------------------------------------
  # ● 오토 맵의 기록 개시
  #--------------------------------------------------------------------------
  def setup
    @calling = false
    @player_pos  = [-1, -1]
    @recording = true
    return true
  end
  #--------------------------------------------------------------------------
  # ● 오토 맵의 표시/비표시
  #--------------------------------------------------------------------------
  def visible
    return @showing
  end
  def visible=(visible)
    @calling = (@id != $game_map.map_id)
    @recording = true
    @player_pos = [-1, -1]
    @showing = visible
  end
  #--------------------------------------------------------------------------
  # ● 오토 맵의 완성
  #--------------------------------------------------------------------------
  def complete
    for x in 0..@width
      for y in 0..@height
        @drawn_floor[x, y] = 1 if @passable[x, y] == 1
      end
    end
    return true
  end
  #--------------------------------------------------------------------------
  # ● 오토 맵의 소거
  #--------------------------------------------------------------------------
  def delete
    for x in 0..@width
      for y in 0..@height
        @drawn_floor[x, y] = 0
      end
    end
    @showing = false
    @player_pos = [-1, -1]
    @calling = false
    return true
  end
  #--------------------------------------------------------------------------
  # ● 오토 맵의 이동
  #--------------------------------------------------------------------------
  def move(x, y, center = false)
    if center
      @x = (640 - @width  * @tile_size) / 2
      @y = (480 - @height * @tile_size) / 2
    else
      @x = x
      @y = y
    end
    return true
  end
end

#==============================================================================
# ■ Spriteset_Map
#==============================================================================
class Spriteset_Map
  alias automapping_100_initialize initialize
  def initialize
    amaps = $game_screen.automaps
    # 현재의 맵의 오토 맵이 존재하지 않는다
    if not amaps.include? ($game_map.map_id)
      # 맵 ID를 키로서 Game_AutoMap 오브젝트를 생성
      amaps[$game_map.map_id] = Game_AutoMap.new
      # 오토 맵의 작성이 허가되어 있지 않은 경우
      if not amaps[$game_map.map_id]. permission
        amaps.delete($game_map.map_id)
      end
    end
    if amaps.include? ($game_map.map_id)
      # 0번에 현재의 맵을 관련짓는다
      amaps.delete(0)
      amaps[0] = amaps[$game_map.map_id]
      # 플레이어 위치의 기록을 개시
      amaps[$game_map.map_id]. setup
    end
    @viewport_automap = Viewport.new(0, 0, 640, 480)
    @viewport_automap.z = 198 # 오토 맵의 Z좌표
    @automap_sprites = []
    # 지금까지 작성된 모든 오토 맵의 스프라이트 생성
    for map_id in amaps.keys
      next if map_id == 0
      @automap_sprites << Sprite_AutoMap.new(@viewport_automap, amaps[map_id])
    end
    automapping_100_initialize
  end
  alias automapping_100_dispose dispose
  def dispose
    for sprite in @automap_sprites
      sprite.dispose
    end
    automapping_100_dispose
    @viewport_automap.dispose
  end
  alias automapping_100_update update
  def update
    for sprite in @automap_sprites
      sprite.update
    end
    automapping_100_update
    @viewport_automap.update
  end
end

#==============================================================================
# ■ Sprite_AutoMap
#==============================================================================
class Sprite_AutoMap < Sprite
  #--------------------------------------------------------------------------
  # ● 오브젝트 초기화
  #   viewport :뷰포트,  automap :Game_AutoMap
  #--------------------------------------------------------------------------
  def initialize(viewport, automap)
    super(viewport)
    @automap = automap
    w = @automap.width * @automap.tile_size
    h = @automap.height * @automap.tile_size
    self.bitmap = Bitmap.new(w, h)
    # 전송용의 구형
    @rect = Rect.new(0, 0, 0, 0)
    # 오토 맵의 화상
    if PASSED_FILE[1] > 0
      @floor_bitmap = RPG::Cache.picture(PASSED_FILE[0])
    end
    if IMPASSABLE_FILE[1] > 0
      @wall_bitmap = RPG::Cache.picture(IMPASSABLE_FILE[0])
    end
    # 플레이어 심볼 묘화
    @player_symbol = Sprite.new(viewport)
    if PLAYER_FILE[1] > 0
      @player_symbol.bitmap = RPG::Cache.picture(PLAYER_FILE[0])
      @player_symbol.ox=(@player_symbol.bitmap.width - @automap.tile_size)/2
      @player_symbol.oy = @player_symbol.bitmap.height / 2
      @player_symbol.visible = false
    else
      @player_symbol.bitmap = Bitmap.new(w, h)
    end
    update
  end
  #--------------------------------------------------------------------------
  # ● 프레임 갱신
  #--------------------------------------------------------------------------
  def update
    if not @automap.recording
      return
    end
    # 플레이어의 위치가 같은(이동하고 있지 않다) 경우
    if @automap.player_pos == [$game_player.x, $game_player.y]
      return
    end
    self.x = @player_symbol.x = @automap.x
    self.y = @player_symbol.y = @automap.y
    self.visible = @player_symbol.visible = @automap.showing
    @automap.player_pos = [$game_player.x, $game_player.y]
    len = @automap.tile_size
    # 별맵으로부터의 호출의 경우
    if @automap.calling
      # 통행이 끝난 에리어 묘화
      if PASSED_FILE[1] > 0
        draw_passable_picture(len)
      elsif COLOR_FLOOR.alpha > 0
        draw_passable(len)
      end
      # 미통행/통행 불가 에리어 묘화
      if IMPASSABLE_FILE[1] > 0
        draw_impassable_picture(len)
      elsif COLOR_WALL.alpha > 0
        draw_impassable(len)
      end
      return
    end
    # 묘화 범위 취득
    x_min = [0, $game_player.x - @automap.scope]. max
    x_max = [@automap.width, $game_player.x + @automap.scope]. min
    y_min = [0, $game_player.y - @automap.scope]. max
    y_max = [@automap.height, $game_player.y + @automap.scope]. min
    for x in x_min..x_max
      for y in y_min..y_max
        # 미통행 and 통행 가능
        if @automap.drawn_floor[x, y] == 0 and @automap.passable[x, y] == 1
          # 그 좌표를 보존
          @automap.drawn_floor[x, y] = 1
        end
      end
    end
    if @automap.showing
      self.bitmap.clear
      # 통행이 끝난 에리어 묘화
      if PASSED_FILE[1] > 0
        draw_passable_picture(len)
      elsif COLOR_FLOOR.alpha > 0
        draw_passable(len)
      end
      # 미통행/통행 불가 에리어 묘화
      if IMPASSABLE_FILE[1] > 0
        draw_impassable_picture(len)
      elsif COLOR_WALL.alpha > 0
        draw_impassable(len)
      end
      # 플레이어 심볼 갱신
      if PLAYER_FILE[1] > 0 or COLOR_PLAYER.alpha > 0
        player_symbol_update
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 통행 에리어 묘화
  #--------------------------------------------------------------------------
  def draw_passable(len)
    for x in 0..@automap.width
      for y in 0..@automap.height
        # 보존된 좌표가 1 의 경우
        if @automap.drawn_floor[x, y] == 1
          # 타일 묘화
          self.bitmap.fill_rect(x*len, y*len, len, len, COLOR_FLOOR)
        end
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 통행 에리어(픽쳐) 묘화
  #--------------------------------------------------------------------------
  def draw_passable_picture(len)
    for x in 0..@automap.width
      for y in 0..@automap.height
        # 보존된 좌표가 1 의 경우
        if @automap.drawn_floor[x, y] == 1
          @rect.set((x*len) %@floor_bitmap.width, (y*len) %@floor_bitmap.height,
                    len, len)
          # 타일 묘화
          self.bitmap.blt(x*len, y*len,
            @floor_bitmap, @rect, PASSED_FILE[1])
        end
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 미통행/통행 불가 에리어 묘화
  #--------------------------------------------------------------------------
  def draw_impassable(len)
    for x in 0..@automap.width
      for y in 0..@automap.height
        # 보존된 좌표가 0 의 경우
        if @automap.drawn_floor[x, y] == 0
          # 타일 묘화
          self.bitmap.fill_rect(x*len, y*len, len, len, COLOR_WALL)
        end
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 미통행/통행 불가 에리어(픽쳐) 묘화
  #--------------------------------------------------------------------------
  def draw_impassable_picture(len)
    for x in 0..@automap.width
      for y in 0..@automap.height
        # 보존된 좌표가 0 의 경우
        if @automap.drawn_floor[x, y] == 0
          @rect.set((x*len) %@wall_bitmap.width, (y*len) %@wall_bitmap.height,
                    len, len)
          # 타일 묘화
          self.bitmap.blt(x*len, y*len, @wall_bitmap, @rect, IMPASSABLE_FILE[1])
        end
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 플레이어 심볼 갱신
  #--------------------------------------------------------------------------
  def player_symbol_update
    len = @automap.tile_size
    x = $game_player.x * len
    y = $game_player.y * len
    # 픽쳐
    if PLAYER_FILE[1] > 0
      @player_symbol.x += x
      @player_symbol.y += y
      @player_symbol.opacity = PLAYER_FILE[1]
    else
      @player_symbol.bitmap.clear
      @player_symbol.bitmap.fill_rect(x, y, len, len, COLOR_PLAYER)
    end
  end
  #--------------------------------------------------------------------------
  # ● 해방
  #--------------------------------------------------------------------------
  def dispose
    if self.bitmap != nil
      # 다른 맵으로 이동했을 경우는 비표시로 한다
      if $scene.is_a? (Scene_Map)
        @automap.showing = false
        @automap.recording = false
      end
      @automap.player_pos = [-1, -1]
      self.bitmap.dispose
      self.bitmap = nil
      @player_symbol.bitmap.dispose
      @player_symbol.bitmap = nil
    end
    super
  end
end
------------------------------------------------------------------------절취선[절취선까지 할시엔 오류끔]-------------------------------------------------------------
스크립트 사용법:파일 첨부해놧음

Comment '16'

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 6153
881 전투 펫 시스템(ABS 3.4v포함) 23 file 백호 2009.02.22 3458
880 메뉴 자작 메뉴 스크립트들(L's Simple CMS and menu scenes) (SDK 호환?) 10 Alkaid 2010.09.02 3455
879 미니맵 스크립트 이용하여 미니맵 만들기 16 file 아방스 2007.11.09 3451
878 전투 CTB by Charlie Fleed 3.2 - FF10 스타일의 전투 시스템 7 Alkaid 2010.10.14 3447
877 능력치 올리기 스크립트 21 file 아방스 2007.11.09 3447
» 미니맵 던전용 미니맵 스크립트[사용법 추가] 16 file 배포 2008.03.02 3443
875 이동 및 탈것 3D 캐릭 스크립트 7 백호 2009.02.22 3442
874 HUD 맵이름표시 ps인간 2009.01.23 3441
873 미니맵 미니맵(중복률100%? 한글번역!) 17 백호 2009.02.21 3423
872 메시지 ◆메세지 윈도우 개조 -KGC_MessageAlter◆ 3 백호 2009.02.22 3422
871 기타 FPLE 2 - First Person Labyrinth Explorer by MGC 1 Alkaid 2012.01.17 3415
870 이동 및 탈것 멈췄을때 행동. 17 file Bera 2010.10.17 3408
869 메뉴 스탯올리기 시스템 (액알가능) 27 file 백호 2009.02.22 3403
868 기타 한글 입력 스크립트 입니다. (vx -> xp) 23 file 헤르코스 2009.04.18 3396
867 메뉴 [자작]명성치 사용 스크립트 16 Rainsy 2009.03.22 3390
866 전투 ATB전투 5 백호 2009.02.22 3369
865 파티 [최강전사님 제공] 파티가 따라오게 하는 스크립트 24 file 아방스 2007.11.09 3365
864 아이템 아이템 인벤토리 2 file 백호 2009.02.22 3354
863 이동 및 탈것 최단경로 찾아가기 - (마우스 사용) 18 file 허걱 2009.02.02 3351
862 스탯 포인트 시스템 3차수정 ( ' 백호 ' 님이 올리신 자료 수정.) 26 카이어덱터 2010.01.04 3344
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 ... 52 Next
/ 52