Auteur: Yukihiro matsumoto
#============================================
# ¡ Game_Map
#--------------------------------------------
# @ƒ}ƒbƒv‚ðˆµ‚¤ƒNƒ‰ƒX‚Å‚·BƒXƒNƒ[ƒ‹‚â’Ês‰Â””»’è‚È‚Ç‚Ì‹@”‚ðŽ‚Á‚Ä‚¢‚Ü‚·B
# ‚±‚̃Nƒ‰ƒX‚̃Cƒ“ƒXƒ^ƒ“ƒX‚Í $game_map ‚ÅŽQÆ‚³‚ê‚Ü‚·B
#============================================
class Game_Map
#------------------------------------------
# œ ŒöŠJƒCƒ“ƒXƒ^ƒ“ƒX•Ï”
#------------------------------------------
attr_accessor :tileset_name # ƒ^ƒCƒ‹ƒZƒbƒg ƒtƒ@ƒCƒ‹–¼
attr_accessor :autotile_names # ƒI[ƒgƒ^ƒCƒ‹ ƒtƒ@ƒCƒ‹–¼
attr_accessor :panorama_name # ƒpƒmƒ‰ƒ} ƒtƒ@ƒCƒ‹–¼
attr_accessor :panorama_hue # ƒpƒmƒ‰ƒ} F‘Š
attr_accessor :fog_name # ƒtƒHƒO ƒtƒ@ƒCƒ‹–¼
attr_accessor :fog_hue # ƒtƒHƒO F‘Š
attr_accessor :fog_opacity # ƒtƒHƒO •s“§–¾“x
attr_accessor :fog_blend_type # ƒtƒHƒO ƒuƒŒƒ“ƒh•û–@
attr_accessor :fog_zoom # ƒtƒHƒO Šg‘å—¦
attr_accessor :fog_sx # ƒtƒHƒO SX
attr_accessor :fog_sy # ƒtƒHƒO SY
attr_accessor :battleback_name # ƒoƒgƒ‹ƒoƒbƒN ƒtƒ@ƒCƒ‹–¼
attr_accessor :display_x # •Ž¦ X À•W * 128
attr_accessor :display_y # •Ž¦ Y À•W * 128
attr_accessor :need_refresh # ƒŠƒtƒŒƒbƒVƒ…—v‹ƒtƒ‰ƒO
attr_reader :passages # ’Ês ƒe[ƒuƒ‹
attr_reader :priorities # ƒvƒ‰ƒCƒIƒŠƒeƒB ƒe[ƒuƒ‹
attr_reader :terrain_tags # ’nŒ`ƒ^ƒO ƒe[ƒuƒ‹
attr_reader :events # ƒCƒxƒ“ƒg
attr_reader :fog_ox # ƒtƒHƒO Œ´“_ X À•W
attr_reader :fog_oy # ƒtƒHƒO Œ´“_ Y À•W
attr_reader :fog_tone # ƒtƒHƒO F’²
#------------------------------------------
# œ ƒIƒuƒWƒFƒNƒg‰Šú‰»
#------------------------------------------
def initialize
@map_id = 0
@display_x = 0
@display_y = 0
end
#------------------------------------------
# œ ƒZƒbƒgƒAƒbƒv
# map_id : ƒ}ƒbƒv ID
#------------------------------------------
def setup(map_id)
# ƒ}ƒbƒv ID ‚ð @map_id ‚É‹L‰¯
@map_id = map_id
# ƒ}ƒbƒv‚ðƒtƒ@ƒCƒ‹‚©‚çƒ[ƒh‚µA@map ‚ÉÝ’è
@map = load_data(sprintf("Data/Map%03d.rxdata", @map_id))
# ŒöŠJƒCƒ“ƒXƒ^ƒ“ƒX•Ï”‚Ƀ^ƒCƒ‹ƒZƒbƒg‚Ìî•ñ‚ðÝ’è
tileset = $data_tilesets[@map.tileset_id]
@tileset_name = tileset.tileset_name
@autotile_names = tileset.autotile_names
@panorama_name = tileset.panorama_name
@panorama_hue = tileset.panorama_hue
@fog_name = tileset.fog_name
@fog_hue = tileset.fog_hue
@fog_opacity = tileset.fog_opacity
@fog_blend_type = tileset.fog_blend_type
@fog_zoom = tileset.fog_zoom
@fog_sx = tileset.fog_sx
@fog_sy = tileset.fog_sy
@battleback_name = tileset.battleback_name
@passages = tileset.passages
@priorities = tileset.priorities
@terrain_tags = tileset.terrain_tags
# •Ž¦À•W‚ð‰Šú‰»
@display_x = 0
@display_y = 0
# ƒŠƒtƒŒƒbƒVƒ…—v‹ƒtƒ‰ƒO‚ðƒNƒŠƒA
@need_refresh = false
# ƒ}ƒbƒvƒCƒxƒ“ƒg‚̃f[ƒ^‚ðÝ’è
@events = {}
for i in @map.events.keys
@events[i] = Game_Event.new(@map_id, @map.events[i])
end
# ƒRƒ‚ƒ“ƒCƒxƒ“ƒg‚̃f[ƒ^‚ðÝ’è
@common_events = {}
for i in 1...$data_common_events.size
@common_events[i] = Game_CommonEvent.new(i)
end
# ƒtƒHƒO‚ÌŠeî•ñ‚ð‰Šú‰»
@fog_ox = 0
@fog_oy = 0
@fog_tone = Tone.new(0, 0, 0, 0)
@fog_tone_target = Tone.new(0, 0, 0, 0)
@fog_tone_duration = 0
@fog_opacity_duration = 0
@fog_opacity_target = 0
# ƒXƒNƒ[ƒ‹î•ñ‚ð‰Šú‰»
@scroll_direction = 2
@scroll_rest = 0
@scroll_speed = 4
end
#------------------------------------------
# œ ƒ}ƒbƒv ID ‚̎擾
#------------------------------------------
def map_id
return @map_id
end
#------------------------------------------
# œ •‚̎擾
#------------------------------------------
def width
return @map.width
end
#------------------------------------------
# œ ‚‚³‚̎擾
#------------------------------------------
def height
return @map.height
end
#------------------------------------------
# œ ƒGƒ“ƒJƒEƒ“ƒgƒŠƒXƒg‚̎擾
#------------------------------------------
def encounter_list
return @map.encounter_list
end
#------------------------------------------
# œ ƒGƒ“ƒJƒEƒ“ƒg•à”‚̎擾
#------------------------------------------
def encounter_step
return @map.encounter_step
end
#------------------------------------------
# œ ƒ}ƒbƒvƒf[ƒ^‚̎擾
#------------------------------------------
def data
return @map.data
end
#------------------------------------------
# œ BGM / BGS Ž©“®Ø‚è‘Ö‚¦
#------------------------------------------
def autoplay
if @map.autoplay_bgm
$game_system.bgm_play(@map.bgm)
end
if @map.autoplay_bgs
$game_system.bgs_play(@map.bgs)
end
end
#------------------------------------------
# œ ƒŠƒtƒŒƒbƒVƒ…
#------------------------------------------
def refresh
# ƒ}ƒbƒv ID ‚ª—LŒø‚È‚ç
if @map_id > 0
# ‚·‚ׂẴ}ƒbƒvƒCƒxƒ“ƒg‚ðƒŠƒtƒŒƒbƒVƒ…
for event in @events.values
event.refresh
end
# ‚·‚ׂẴRƒ‚ƒ“ƒCƒxƒ“ƒg‚ðƒŠƒtƒŒƒbƒVƒ…
for common_event in @common_events.values
common_event.refresh
end
end
# ƒŠƒtƒŒƒbƒVƒ…—v‹ƒtƒ‰ƒO‚ðƒNƒŠƒA
@need_refresh = false
end
#------------------------------------------
# œ ‰º‚ɃXƒNƒ[ƒ‹
# distance : ƒXƒNƒ[ƒ‹‚·‚é‹——£
#------------------------------------------
def scroll_down(distance)
@display_y = [@display_y + distance, (self.height - 15) * 128].min
end
#------------------------------------------
# œ ¶‚ɃXƒNƒ[ƒ‹
# distance : ƒXƒNƒ[ƒ‹‚·‚é‹——£
#------------------------------------------
def scroll_left(distance)
@display_x = [@display_x - distance, 0].max
end
#------------------------------------------
# œ ‰E‚ɃXƒNƒ[ƒ‹
# distance : ƒXƒNƒ[ƒ‹‚·‚é‹——£
#------------------------------------------
def scroll_right(distance)
@display_x = [@display_x + distance, (self.width - 20) * 128].min
end
#------------------------------------------
# œ ã‚ɃXƒNƒ[ƒ‹
# distance : ƒXƒNƒ[ƒ‹‚·‚é‹——£
#------------------------------------------
def scroll_up(distance)
@display_y = [@display_y - distance, 0].max
end
#------------------------------------------
# œ —LŒøÀ•W”»’è
# x : X À•W
# y : Y À•W
#------------------------------------------
def valid?(x, y)
return (x >= 0 and x < width and y >= 0 and y < height)
end
#------------------------------------------
# œ ’Ês‰Â””»’è
# x : X À•W
# y : Y À•W
# d : •ûŒü (0,2,4,6,8,10)
# ¦ 0,10 = ‘S•ûŒü’Ês•s‰Â‚Ìꇂ𔻒è (ƒWƒƒƒ“ƒv‚È‚Ç)
# self_event : Ž©•ª (ƒCƒxƒ“ƒg‚ª’Ês”»’è‚ð‚·‚éê‡)
#------------------------------------------
def passable?(x, y, d, self_event = nil)
# —^‚¦‚ç‚ꂽÀ•W‚ªƒ}ƒbƒvŠO‚Ìê‡
unless valid?(x, y)
# ’Ês•s‰Â
return false
end
# •ûŒü (0,2,4,6,8,10) ‚©‚ç áŠQ•¨ƒrƒbƒg (0,1,2,4,8,0) ‚É•ÏŠ·
bit = (1 << (d / 2 - 1)) & 0x0f
# ‚·‚ׂẴCƒxƒ“ƒg‚Ń‹[ƒv
for event in events.values
# Ž©•ªˆÈŠO‚̃^ƒCƒ‹‚ÆÀ•W‚ªˆê’v‚µ‚½ê‡
if event.tile_id >= 0 and event != self_event and
event.x == x and event.y == y and not event.through
# áŠQ•¨ƒrƒbƒg‚ªƒZƒbƒg‚³‚ê‚Ä‚¢‚éê‡
if @passages[event.tile_id] & bit != 0
# ’Ês•s‰Â
return false
# ‘S•ûŒü‚ÌáŠQ•¨ƒrƒbƒg‚ªƒZƒbƒg‚³‚ê‚Ä‚¢‚éê‡
elsif @passages[event.tile_id] & 0x0f == 0x0f
# ’Ês•s‰Â
return false
# ‚»‚êˆÈŠO‚Å ƒvƒ‰ƒCƒIƒŠƒeƒB‚ª 0 ‚Ìê‡
elsif @priorities[event.tile_id] == 0
# ’Ês‰Â
return true
end
end
end
# ƒŒƒCƒ„[‚Ìã‚©‚燂ɒ²‚ׂ郋[ƒv
for i in [2, 1, 0]
# ƒ^ƒCƒ‹ ID ‚ðŽæ“¾
tile_id = data[x, y, i]
# ƒ^ƒCƒ‹ ID Žæ“¾Ž¸”s
if tile_id == nil
# ’Ês•s‰Â
return false
# áŠQ•¨ƒrƒbƒg‚ªƒZƒbƒg‚³‚ê‚Ä‚¢‚éê‡
elsif @passages[tile_id] & bit != 0
# ’Ês•s‰Â
return false
# ‘S•ûŒü‚ÌáŠQ•¨ƒrƒbƒg‚ªƒZƒbƒg‚³‚ê‚Ä‚¢‚éê‡
elsif @passages[tile_id] & 0x0f == 0x0f
# ’Ês•s‰Â
return false
# ‚»‚êˆÈŠO‚Å ƒvƒ‰ƒCƒIƒŠƒeƒB‚ª 0 ‚Ìê‡
elsif @priorities[tile_id] == 0
# ’Ês‰Â
return true
end
end
# ’Ês‰Â
return true
end
#------------------------------------------
# œ –΂ݔ»’è
# x : X À•W
# y : Y À•W
#------------------------------------------
def bush?(x, y)
if @map_id != 0
for i in [2, 1, 0]
tile_id = data[x, y, i]
if tile_id == nil
return false
elsif @passages[tile_id] & 0x40 == 0x40
return true
end
end
end
return false
end
#------------------------------------------
# œ ƒJƒEƒ“ƒ^[”»’è
# x : X À•W
# y : Y À•W
#------------------------------------------
def counter?(x, y)
if @map_id != 0
for i in [2, 1, 0]
tile_id = data[x, y, i]
if tile_id == nil
return false
elsif @passages[tile_id] & 0x80 == 0x80
return true
end
end
end
return false
end
#------------------------------------------
# œ ’nŒ`ƒ^ƒO‚̎擾
# x : X À•W
# y : Y À•W
#------------------------------------------
def terrain_tag(x, y)
if @map_id != 0
for i in [2, 1, 0]
tile_id = data[x, y, i]
if tile_id == nil
return 0
elsif @terrain_tags[tile_id] > 0
return @terrain_tags[tile_id]
end
end
end
return 0
end
#------------------------------------------
# œ Žw’èˆÊ’u‚̃Cƒxƒ“ƒg ID Žæ“¾
# x : X À•W
# y : Y À•W
#------------------------------------------
def check_event(x, y)
for event in $game_map.events.values
if event.x == x and event.y == y
return event.id
end
end
end
#------------------------------------------
# œ ƒXƒNƒ[ƒ‹‚ÌŠJŽn
# direction : ƒXƒNƒ[ƒ‹‚·‚é•ûŒü
# distance : ƒXƒNƒ[ƒ‹‚·‚é‹——£
# speed : ƒXƒNƒ[ƒ‹‚·‚鑬“x
#------------------------------------------
def start_scroll(direction, distance, speed)
@scroll_direction = direction
@scroll_rest = distance * 128
@scroll_speed = speed
end
#------------------------------------------
# œ ƒXƒNƒ[ƒ‹’†”»’è
#------------------------------------------
def scrolling?
return @scroll_rest > 0
end
#------------------------------------------
# œ ƒtƒHƒO‚ÌF’²•ÏX‚ÌŠJŽn
# tone : F’²
# duration : ŽžŠÔ
#------------------------------------------
def start_fog_tone_change(tone, duration)
@fog_tone_target = tone.clone
@fog_tone_duration = duration
if @fog_tone_duration == 0
@fog_tone = @fog_tone_target.clone
end
end
#------------------------------------------
# œ ƒtƒHƒO‚Ì•s“§–¾“x•ÏX‚ÌŠJŽn
# opacity : •s“§–¾“x
# duration : ŽžŠÔ
#------------------------------------------
def start_fog_opacity_change(opacity, duration)
@fog_opacity_target = opacity * 1.0
@fog_opacity_duration = duration
if @fog_opacity_duration == 0
@fog_opacity = @fog_opacity_target
end
end
#------------------------------------------
# œ ƒtƒŒ[ƒ€XV
#------------------------------------------
def update
# •K—v‚È‚çƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
if $game_map.need_refresh
refresh
end
# ƒXƒNƒ[ƒ‹’†‚Ìê‡
if @scroll_rest > 0
# ƒXƒNƒ[ƒ‹‘¬“x‚©‚çƒ}ƒbƒvÀ•WŒn‚Å‚Ì‹——£‚É•ÏŠ·
distance = 2 ** @scroll_speed
# ƒXƒNƒ[ƒ‹‚ðŽÀs
case @scroll_direction
when 2 # ‰º
scroll_down(distance)
when 4 # ¶
scroll_left(distance)
when 6 # ‰E
scroll_right(distance)
when 8 # ã
scroll_up(distance)
end
# ƒXƒNƒ[ƒ‹‚µ‚½‹——£‚ðŒ¸ŽZ
@scroll_rest -= distance
end
# ƒ}ƒbƒvƒCƒxƒ“ƒg‚ðXV
for event in @events.values
event.update
end
# ƒRƒ‚ƒ“ƒCƒxƒ“ƒg‚ðXV
for common_event in @common_events.values
common_event.update
end
# ƒtƒHƒO‚̃XƒNƒ[ƒ‹ˆ—
@fog_ox -= @fog_sx / 8.0
@fog_oy -= @fog_sy / 8.0
# ƒtƒHƒO‚ÌF’²•ÏXˆ—
if @fog_tone_duration >= 1
d = @fog_tone_duration
target = @fog_tone_target
@fog_tone.red = (@fog_tone.red * (d - 1) + target.red) / d
@fog_tone.green = (@fog_tone.green * (d - 1) + target.green) / d
@fog_tone.blue = (@fog_tone.blue * (d - 1) + target.blue) / d
@fog_tone.gray = (@fog_tone.gray * (d - 1) + target.gray) / d
@fog_tone_duration -= 1
end
# ƒtƒHƒO‚Ì•s“§–¾“x•ÏXˆ—
if @fog_opacity_duration >= 1
d = @fog_opacity_duration
@fog_opacity = (@fog_opacity * (d - 1) + @fog_opacity_target) / d
@fog_opacity_duration -= 1
end
end
end |
|
