這個日本的漫畫式對話要怎麼使用呢? - Project1

=begin
吹きだしウィンドウＶＸＡｃｅ
2011.12.25　tamura改造
２０１２年０２月２８日　改訂
※このスクリプトは、ちいさな本屋様（http://xrxs.at-ninja.jp/）
が製作されたものをtamuraがＡＣＥ用に改造した物です。
原版：
▽▽▽ XRXSv2. メッセージ表示フルグレードアップVX ▽▽▽
publish 2010/ 3/ 2
update - 11/ 1/10a
※※警告※※
「立ち絵機能」をＯＮにしている時に、立ち絵を表示せずに、ウィンドウ位置を
右か左に変更した時、テールのＹ座標がずれるようです。
原因は調査中です。立ち絵を表示しない時は、イベントコマンド「注釈」で、
「立ち絵表示 off」と記述して立ち絵機能をＯＦＦにしておいてください。
●機能一覧
?イベントコマンド「スクリプト」で、$win_x $win_yに値を入力すると、
　（$win_x　、$win_y）の位置にウィンドウを表示する。画面左上が（０，０）。
?キーボードのＱ（装備画面で前のキャラに戻るボタン）を押すと、
　ウィンドウが消える。Ｑか決定、キャンセルキーで元に戻る。
?文章のどこでもいいので、以下の表記を行う。
? \name[]　：　[]の中の文字を、ウィンドウ左上に小さく表示する。
\h[-1] :　プレーヤーの上にウィンドウをポップ。
\h[0] :　現在アクティブのイベントの上にウィンドウをポップ。
\h[1] : ＩＤが１番のイベントの上にウィンドウをポップする。
hは大文字でもＯＫ。
ウィンドウは通常の大きさのまま、テールだけ表示したい場合は、
\t[-2] :　ウィンドウが上下に表示される時は、Ｘ座標をMINAS_TWE_X_POSで固定。
$win_x　で左右に表示される時は、Ｙ座標がウィンドウの中心やや下で固定。
\t[-3] :　ウィンドウが上下に表示される時は、Ｘ座標をMINAS_THREE_X_POSで固定。
$win_x　で左右に表示される時は、Ｙ座標がウィンドウの中心やや下で固定。
\t[-1] :　プレーヤーの上に向かってテール表示。
\t[0] :　現在アクティブのイベントに向かってテール表示。
\t[1] : ＩＤが１番のイベントの上に向かってテール表示。
\O[128] ：　文字を透明にする。128はalphaの値で、０で透明、２５５で通常。
\D ：　文字に影をつける
\hold ：　メッセージ表示の、最後の文章に限定。
　　　　　メッセージが終わっても、ウィンドウを閉じずに残します。
　　　　　他のメッセージが表示されて次へ送られる時に消えます。
　　　　　なお、ホールドされているウィンドウは、Ｑボタンで消せません。
●その他
?ＡＣＥに標準装備されている機能は通常通り使用できます。
?Ａ１殿（http://a1tktk.web.fc2.com/）の立ち絵スクリプトに対応しています。
　このスクリプトの上に「RGSS3用A1共通処理」
　このスクリプトの下に「空メッセージでウィンドウを開かない」「立ち絵表示」を
　配置して下さい。
　残念ながら、「ネームウィンドウ」は使えません。上記\nameをお使いください。
※立ち絵を表示しない時は、注釈で「立ち絵表示 off」とした方が無難です。
?イベントの下から話しかけたら上へポップ、上から話しかけたら下へポップするという
　機能を追加。カスタマイズポイントで　POP_DIRECTION = ture　と変更のこと。
●廃止機能　
?\Iがすでに使われているので、イタリック文字変換を廃止。
?スピード変更、改行、最後に入手したアイテムの表示を、ＡＣＥ化にともない廃止。
【改訂履歴】
2012.01.10 ?ウィンドウを消したまま次のウィンドウを自動で表示すると、
ネームウィンドウが表示されるのを修正。
2012.01.11 ?ネームウィンドウが出しっぱなしになるのを修正。
2012.01.12 ?メニューを出してから決定ボタンを押すとネームウィンドウがでる不具合の修正。
2012.02.01　?ネームウィンドウのオープン＆クローズのタイミングを変更。
　　　　　　?hold機能を追加。
2012.02.10　?キャラポップした時、一行ずつしか表示されない不具合を修正。
2012.02.14　?アイテム名などの文字数が正常に取得できなかったのを修正。
2012.02.21　?話しかけられた方向によって、ポップ方向を変えられるようにした。
2012.02.25　?すべてのシーン遷移の際はテールを破棄（イベント中でショップ起動など）
2012.02.28　?エスケープ文字の処理が上手くいかない問題について暫定対策。
=end
#==============================================================================
# カスタマイズポイント
#==============================================================================
#=begin
class Window_Message < Window_Base
#
# 基本行数
#
MAX_LINE = 4
#
# \p[] - キャラポップの高さ
#
CHARPOP_HEIGHT = 40
#
# \name[] - 名前枠 X,Y座標
#
NAME_WINDOW_OFFSET_X = 0
NAME_WINDOW_OFFSET_Y = -24
#
#
MINAS_TWE_X_POS = 100 #　$t[-2]のときの、テールのＸ座標。
MINAS_THREE_X_POS = 444 #　$t[-3]のときの、テールのＸ座標。
POP_DIRECTION = false #イベントの方向を考慮。
end
#==============================================================================
# 参照機能
#==============================================================================
class Game_Temp
attr_accessor :last_gain_material
attr_accessor :last_gain_holder
end
#==============================================================================
# フルグレードアップベース - 制御文字?基本機能
#==============================================================================
class Window_Message < Window_Base
attr_accessor :tail
#--------------------------------------------------------------------------
# ● 特殊文字の変換 + 準備
# 変換?消去してもいい部分を処理、フラグのセット。
#--------------------------------------------------------------------------
alias xrxsv2_convert_escape_characters convert_escape_characters
def convert_escape_characters(text)
#@textsが使いずらいので、ここで別変数に保管。
@all_texts = []
str = text.gsub(/\\/) { "\e" }
@all_texts = str.split("\n")
# 初期化
contents.font.size = Font.default_size
contents.font.bold = Font.default_italic
contents.font.italic = Font.default_bold
contents.font.shadow = Font.default_shadow
@type_wait = 0
@line_widths = []
@line_aligns = []
self.pop_character = nil
# ウィンドウ保持指定\holdがあるか？
@window_hold = (text.gsub!(/\\hold/) { "" } != nil)
# \info
@info_mode = (text.gsub!(/\\info/) { "" } != nil)
# 改行削除指定\_があるか？
if (/\\_(.*?)\x00/.match(@text)) != nil
$game_message.choice_start -= 1
text.gsub!(/\\_(.*?)\x00/) { $1.to_s }
end
# \name 判定
if text.sub!(/\\[Nn]ame\[(.*?)\]/) { "" }
name = $1
bitmap = @name_sprite.bitmap
w = [bitmap.text_size(name).width, 1].max
bitmap.dispose
@name_sprite.bitmap = Bitmap.new(w - -8, 32)
bitmap = @name_sprite.bitmap
bitmap.draw_text(0, 0, bitmap.width, bitmap.height, name)
@name_window.width = w + 16
@name_window.create_contents
@name_window.open if @name_window.openness == 0
if self.visible #名前だけ表示されるのを防止。
@name_window.visible = true
@name_sprite.visible = true
else
@name_window.visible = false
@name_sprite.visible = false
end
else
@name_window.visible = false
@name_sprite.visible = false
@name_sprite.bitmap.dispose
@name_sprite.bitmap = Bitmap.new(32,32)
end
$name = $1 #あれこれで使うので、ネームウィンドウに表示予定の名前を取得。
# キャラボップモード
if text.gsub!(/\\[Hh]\[-1\]/) { "" }
self.pop_character = -1
elsif text.gsub!(/\\[Hh]\[([0-9]+)\]/) { "" }
self.pop_character = $1.to_i
elsif text.gsub!(/\\[Hh]/) { "" }
self.pop_character = 0
#テール表示モード
elsif text.gsub!(/\\[Tt]\[-1\]/) { "" }
self.tail_character = -1
elsif text.gsub!(/\\[Tt]\[-2\]/) { "" }
self.tail_character = -2
elsif text.gsub!(/\\[Tt]\[-3\]/) { "" }
self.tail_character = -3
elsif text.gsub!(/\\[Tt]\[([0-9]+)\]/) { "" }
self.tail_character = $1.to_i
elsif text.gsub!(/\\[Tt]/) { "" }
self.tail_character = 0
else
self.pop_character = nil
end
# 制御文字処理
text = xrxsv2_convert_escape_characters(text)
text.gsub!(/\\[Ss]\[([0-9]+)\]/i) { "\eS[#{$1}]" }
text.gsub!(/\\[Oo]\[([0-9]+)\]/i) { "\eO[#{$1}]" }
text.gsub!(/\\last_holder/i) { "\e18" }
text.gsub!(/\\last_material/i) { "\e19" }
text.gsub!(/\\B/) { "\eB" }
text.gsub!(/\\D/) { "\eD" }
#text.gsub!(/\\n/) { "\n" }
#
# ライン情報の取得
rxs = ["\x01","\x02","\x03","\x04","\x05","\x06","\x07","\x08",
/\[([0-9]+)\]/,
"\x11","\x12","\x13","\x14", "\x15", "\x16", "\x17", "\x18","\x19"]
lines = text.split("\x00")
@lines_max = lines.size
for i in 0...@lines_max
line = lines[i]
for rx in rxs
line.gsub!(rx) {""}
end
@line_aligns[i] =
line.sub!(/\\center/) {""} ? CENTER :
line.sub!(/\\right/) {""} ? RIGHT :
AUTO
# 行の横幅の取得と設定
cx = text_width_no_escape(line,text) #test
#cx = contents.text_size(line,text).width
@line_widths[i] = cx
end
# 位置揃え制御文字の削除
text.gsub!(/\\center/) {""}
text.gsub!(/\\right/) {""}
# キャラポップ時のウィンドウリサイズ
reszie_window_for_pop
del_tail # if @tail != nil
# $mes_id が空のときと戦闘中はふきだしを表示しない
if defined?($game_system.show_stand_picture) #立ち絵に対応。
$mes_id = -1 if $game_system.show_stand_picture == true
end
if $mes_id != nil and not $game_party.in_battle
# ふきだしのテールを描画
skin = "Window"
if @background == 0
#画像の準備
@tail = Sprite.new
@tail.visible = false
# 位置を取得
tale_pos = get_tale_pos
if $win_x != nil
if $win_x > 0
@tail.bitmap = Cache.system(skin + "-right")
@tail.x = tale_pos[]
@tail.y = tale_pos[1]
@tail.z = self.z + 1
elsif $win_x < 0
@tail.bitmap = Cache.system(skin + "-left")
@tail.x = tale_pos[]
@tail.y = tale_pos[1]
@tail.z = self.z + 1
else
create_tail_up_under
end
else
create_tail_up_under
end
# エクストラスプライトに登録
@extra_sprites = [] if @extra_sprites.nil?
@extra_sprites.push(@tail) if @tail != nil
# 更新
update_tail
end
end
open_and_wait #リサイズが終わった時点でウィンドウオープン。
return text
end
#--------------------------------------------------------------------------
# ● 文字の長さを取得する。エスケープ文字は含まない。
# line : 表示しようとしている全ての文字列。
# text : その列の文字。
#--------------------------------------------------------------------------
def text_width_no_escape(line , text_o)
add = 0
text = Marshal.load(Marshal.dump(text_o))
text.gsub!(/\ehold/) { "" }
text.gsub!(/\einfo/) { "" }
# 改行削除指定\_があるか？
if (/\\_(.*?)\x00/.match(@text)) != nil
$game_message.choice_start -= 1
text.gsub!(/\\_(.*?)\x00/) { "" }
end
# \name 判定
text.sub!(/\e[Nn]ame\[(.*?)\]/) { "" }
text.gsub!(/\e[Hh]\[-1\]/) { "" }
text.gsub!(/\e[Hh]\[([0-9]+)\]/) { "" }
text.gsub!(/\e[Hh]/) { "" }
text.gsub!(/\e[Tt]\[-1\]/) { "" }
text.gsub!(/\e[Tt]\[-2\]/) { "" }
text.gsub!(/\e[Tt]\[-3\]/) { "" }
text.gsub!(/\e[Tt]\[([0-9]+)\]/) { "" }
text.gsub!(/\e[Tt]/) { "" }
# 制御文字処理
text.gsub!(/\e[Ss]\[([0-9]+)\]/i) { "" }
text.gsub!(/\e[Oo]\[([0-9]+)\]/i) { "" }
text.gsub!(/\elast_holder/i) { "" }
text.gsub!(/\elast_material/i) { "" }
#text.gsub!(/\eV/) { "" } #変数に置き換える。
#text.gsub!(/\eN/) { "" } #名前へ置き換える。
#text.gsub!(/\eP/) { "" } #名前へ置き換える。
#text.gsub!(/\eG/) { "" } #金額へ置き換える。
#text.gsub!(/\eC/) { "" }
text.gsub!(/\eB/) { "" }
text.gsub!(/\eD/) { "" }
if text =~ /\eI/
loop do
if str = text.sub!(/\eI\[(\d+)\]/){ "" }
add += 24
else
break
end
end
end
#text.gsub!(/\\n/) { "\n" }
text.sub!(/\ecenter/) {""}
text.sub!(/\eright/) {""}
text.gsub!(/\ecenter/) {""}
text.gsub!(/\eright/) {""}
text = xrxsv2_convert_escape_characters(text)
basic_width = text_size(text).width + add
esc = text.scan(/\e(\S)/)
return ( basic_width - esc.size * (contents.font.size - 4) ) #\eの幅は20？
end
#--------------------------------------------------------------------------
# ● 最も長い列の長さを調べる。エスケープ文字は含まない。
#--------------------------------------------------------------------------
def max_width
text_size = []
for i in 0 ... @all_texts.size
text_size.push text_width_no_escape(@all_texts[i],@all_texts[i]) + 20
end
return text_size.max
end
#--------------------------------------------------------------------------
# ● 吹きだしテールが上か下の場合の画像を準備。
#--------------------------------------------------------------------------
def create_tail_up_under
skin = "Window"
tale_pos = get_tale_pos
case @position
when 0 # 上
@tail.bitmap = Cache.system(skin + "-top")
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
@tail.z = self.z + 1
when 1 # 中
@tail.dispose
@tail = nil
when 2 # 下
@tail.bitmap = Cache.system(skin + "-under")
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
@tail.z = self.z + 1
end
end
#--------------------------------------------------------------------------
# ● 全テキストの処理
#--------------------------------------------------------------------------
def process_all_text
#open_and_wait #リサイズがあるので、すぐにウィンドウをオープンしない。
text = convert_escape_characters($game_message.all_text)
pos = {}
new_page(text, pos)
process_character(text.slice!(0, 1), text, pos) until text.empty?
end
#--------------------------------------------------------------------------
# ● メッセージの更新 *
#--------------------------------------------------------------------------
def update_message
@wait_count = @type_wait
loop do
c = @text.slice!(/./m)
case update_message_type(c)
when 1
break
when 2
next
end
break unless @show_fast or @line_show_fast
end
end
#--------------------------------------------------------------------------
# 一文字の描画 (返り値 1:break, 2:next)
#--------------------------------------------------------------------------
#=begin
def process_escape_character(code, text, pos)
case code.upcase
when '$'
@gold_window.open
when '.'
wait(15)
when '|'
wait(60)
when '!'
input_pause
when '>'
@line_show_fast = true
when '<'
@line_show_fast = false
when '^'
@pause_skip = true
#when 'n' # 改行
# new_line
# max = MAX_LINE
# max = 14 if self.pop_character != nil
# if @line_count >= max # 行数が最大のとき
# unless @text.empty? # さらに続きがあるなら
# self.pause = true # 入力待ちを入れる
#return 1
# end
# end
#when 'S' # \S[n] (スピード変更)
# text.sub!(/\[([0-9]+)\]/, "")
# @type_wait = $1.to_i
# return 2
when 'O' # \O 文字を透明にする。
text.sub!(/\[([0-9]+)\]/, "")
contents.font.color.alpha = $1.to_i
#return 2
when 'D' #\D 文字に影をつける
contents.font.shadow ^= true
#when '18'
# name = ($game_temp.last_gain_holder.name rescue "")
# update_message_type_draw_at(name)
#when '19'
# item = ($game_temp.last_gain_material.item rescue nil)
# draw_item_name(item, @contents_x, @contents_y)
# @contents_x += 196
else
super
end
end
#=end
#--------------------------------------------------------------------------
# ● 改ページ処理
#--------------------------------------------------------------------------
alias xrxsv2_new_page new_page
def new_page(text, pos)
xrxsv2_new_page(text, pos)
update_charpop_window
end
#--------------------------------------------------------------------------
# ● 改行位置の取得
#--------------------------------------------------------------------------
#def new_line_x
# $game_message.face_name.empty? ? 0 : 112
#end
#--------------------------------------------------------------------------
# ● 改行処理
#--------------------------------------------------------------------------
alias xrxsv2_new_line_x new_line_x
def new_line
xrxsv2_new_line
set_align
end
#--------------------------------------------------------------------------
# 位置揃え
#--------------------------------------------------------------------------
def set_align
w = @line_widths[@line_count].to_i
a = @line_aligns[@line_count]
case a
when CENTER
@contents_x = @contents_x + ((contents.width - @contents_x) - w) / 2
when RIGHT
@contents_x = contents.width - w
end
end
#--------------------------------------------------------------------------
# ● ファイバーのメイン処理　☆再定義
#--------------------------------------------------------------------------
def fiber_main
$game_message.visible = true
update_background
update_placement
loop do
process_all_text if $game_message.has_text?
process_input
$game_message.clear
@gold_window.close
process_hold #ホールドウィンドウの処理。
Fiber.yield
break unless text_continue?
end
close_and_wait
$game_message.visible = false
@fiber = nil
end
#--------------------------------------------------------------------------
# 定数
#--------------------------------------------------------------------------
AUTO = 0
LEFT = 1
CENTER = 2
RIGHT = 3
end
#==============================================================================
# アクティブイベント取得
#==============================================================================
class Game_Interpreter
attr_reader :event_id
end
#==============================================================================
# 各種機能の追加 - キャラポップ/ネーム/ホールド
#==============================================================================
class Window_Message < Window_Base
#--------------------------------------------------------------------------
# ● カーソルの更新 *
#--------------------------------------------------------------------------
def update_cursor
if @index >= 0
x = ($game_message.face_name.empty? ? 0 : 112)
y = ($game_message.choice_start + @index) * WLH - 1
w = contents.width - x
if self.pop_character != nil
x += 28
w -= 20
end
self.cursor_rect.set(x, y, w, WLH)
else
self.cursor_rect.empty
end
end
#--------------------------------------------------------------------------
# キャラクターの取得
# parameter : パラメータ
#--------------------------------------------------------------------------
def get_character(parameter)
# パラメータで分岐
case parameter
when -1 # プレイヤー
return $game_player
when 0 # 現在アクティブなイベント
id = $game_map.interpreter.event_id
events = $game_map.events
return events == nil ? nil : events[id]
else # 特定のイベント
events = $game_map.events
return events == nil ? nil : events[parameter]
end
end
#--------------------------------------------------------------------------
# (メッセージ終了時)ホールドの処理
#--------------------------------------------------------------------------
def process_hold
if @window_hold
@held_windows.push(Window_Copy.new(self))
@held_windows.push(Window_Copy.new(@name_window))
@held_windows.push(Sprite_Copy.new(@name_sprite))
@held_windows.push(Sprite_Copy.new(@back_sprite))
for sprite in @extra_sprites
next if sprite.disposed?
@held_windows.push(Sprite_Copy.new(sprite))
end
@extra_sprites.clear
self.openness = 0
#@name_window.openness = 0
@back_sprite.visible = false
else
@held_windows.each {|object| object.dispose}
@held_windows.clear
end
#@name_window.close
#@name_sprite.visible = false
end
#--------------------------------------------------------------------------
# キャラポップ位置の設定と取得
#--------------------------------------------------------------------------
def pop_character=(character_id)
@pop_character = character_id
end
def pop_character
return @pop_character
end
#--------------------------------------------------------------------------
# キャラポップ時のウィンドウリサイズ
#--------------------------------------------------------------------------
def reszie_window_for_pop
#キャラポップ
if self.pop_character != nil
max_x = @line_widths.max.to_i
n = max_x + 32
n += $game_message.face_name.empty? ? 0 : 122
m = $game_message.face_name.empty? ? 0 : 96
w = @name_sprite.bitmap.width
#self.width = [n, w].max
self.width = max_width
#self.height = [@lines_max * line_height, m].max + 32
self.height = [@all_texts.size * line_height, m].max + 32
create_contents
update_charpop_window
elsif @info_mode
@line_aligns[0] = CENTER
self.x = - 8
self.width = Graphics.width + 16
self.height = 56
create_contents
else
self.x = 0
self.width = Graphics.width
self.height = MAX_LINE * line_height + 32
update_placement #位置情報修正。
create_contents
end
end
#--------------------------------------------------------------------------
# ● 背景スプライトの作成
#--------------------------------------------------------------------------
alias xrxsv2_create_back_sprite create_back_sprite
def create_back_sprite
xrxsv2_create_back_sprite
@back_sprite.zoom_x = 1.0 * Graphics.width / @back_sprite.bitmap.width
@name_window = Window_Base.new(0,0,112,36)
@name_window.visible = false
@name_sprite = Sprite.new
@name_sprite.bitmap = Bitmap.new(32,32)
@name_sprite.visible = false
self.x = self.x
self.y = self.y
self.z = self.z
@held_windows = []
@extra_sprites = []
end
#--------------------------------------------------------------------------
# ● 背景スプライトの解放
#--------------------------------------------------------------------------
alias xrxsv2_dispose_back_sprite dispose_back_sprite
def dispose_back_sprite
xrxsv2_dispose_back_sprite
@name_window.dispose if @name_window != nil #メニュー画面を出そうとするとエラー？
@name_sprite.dispose if @name_sprite != nil
for window in @held_windows
window.dispose
end
end
#--------------------------------------------------------------------------
# ● 背景スプライトの更新
#--------------------------------------------------------------------------
alias xrxsv2_update_back_sprite update_back_sprite
def update_back_sprite
@name_window.update
xrxsv2_update_back_sprite
update_charpop_window
end
#--------------------------------------------------------------------------
# ウィンドウの位置と不透明度の設定 (キャラポップ)
#--------------------------------------------------------------------------
def update_charpop_window
if self.pop_character
character = get_character(self.pop_character)
return if character == nil
# [X座標]
n = self.width / 2
n = [n, @name_skin.width + 16].max if @current_name != nil
w = @name_sprite.bitmap.width
x = character.screen_x - [[n, w].max, self.width - 32].min
# [Y座標]
if self.pop_character == 0 and POP_DIRECTION #イベントの方向を考慮。
if character.direction == 2 #下向き
@position = 0 #上にポップ
elsif character.direction == 8 #上向き
@position = 2 #下にポップ
end
end
case @position
when 0
y = character.screen_y - CHARPOP_HEIGHT - self.height
else
y = character.screen_y + 16
end
x_max = Graphics.width - 4 - self.width
x_min = 4
y_max = Graphics.height - self.height
y_min = 4
self.x = [[x, x_max].min, x_min].max
self.y = [[y, y_max].min, y_min].max
end
end
#--------------------------------------------------------------------------
# 位置の連動
#--------------------------------------------------------------------------
def x=(n)
super
if @name_window
@name_window.x = n + NAME_WINDOW_OFFSET_X
@name_sprite.x = n + NAME_WINDOW_OFFSET_X + 8
end
end
def y=(n)
super
if @name_window
@name_window.y = n + NAME_WINDOW_OFFSET_Y
@name_sprite.y = n + NAME_WINDOW_OFFSET_Y + 2
end
end
def z=(n)
super
if @name_window
@name_window.z = n + 11#1　テールの上に表示されるので、Ｚを水増しする。
@name_sprite.z = n + 12#2
end
end
#--------------------------------------------------------------------------
# ● ファイバーのメイン処理
#--------------------------------------------------------------------------
def fiber_main_namewin
fiber_main_namewin_default
@name_window.openness = 0
@name_sprite.bitmap.clear
$name = ""
end
alias :fiber_main_namewin_default :fiber_main
alias :fiber_main :fiber_main_namewin
end
#==============================================================================
# 伸縮対応
#==============================================================================
class Window_Message < Window_Base
#--------------------------------------------------------------------------
# ● ウィンドウの背景と位置の設定 [再定義]
#--------------------------------------------------------------------------
def reset_window
@background = $game_message.background
@position = $game_message.position
if @background == 0 # 通常ウィンドウ
self.opacity = 255
else # 背景を暗くする、透明にする
self.opacity = 0
end
case @position
when 0 # 上
self.y = 0
@gold_window.y = 360
when 1 # 中
self.y = (Graphics.height - self.height) / 2
@gold_window.y = 0
when 2 # 下
self.y = Graphics.height - self.height
@gold_window.y = 0
end
end
end
#==============================================================================
# □ Window_Copy
#------------------------------------------------------------------------------
# 指定のウィンドウのコピーを作成します。
#==============================================================================
class Window_Copy < Window_Base
#--------------------------------------------------------------------------
# ○ オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(window)
super(window.x, window.y, window.width, window.height)
self.contents = window.contents.dup unless window.contents.nil?
self.opacity = window.opacity
self.back_opacity = window.back_opacity
self.z = window.z - 3
self.visible = window.visible
end
end
#==============================================================================
# □ Sprite_Copy
#------------------------------------------------------------------------------
# 指定のスプライトのコピーを作成します。
#==============================================================================
class Sprite_Copy < Sprite
#--------------------------------------------------------------------------
# ○ オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(sprite)
super()
self.bitmap = sprite.bitmap.dup unless sprite.bitmap.nil?
self.opacity = sprite.opacity
self.x = sprite.x
self.y = sprite.y
self.z = sprite.z - 3
self.ox = sprite.ox
self.oy = sprite.oy
self.zoom_x = sprite.zoom_x
self.visible = sprite.visible
end
end
#■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
#■吹きだしテールの表示ルーチン。
#■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
#==============================================================================
#　＋＋＋　「＋ふきだし表示」VX　＋＋＋
# by パラ犬　　http://2d6.parasite.jp/
# ×
# row http://xms.rdy.jp/
#
# publish 2010/ 3/ 2
# update -
#
#------------------------------------------------------------------------------
# 　ほぼどんなメッセージウィンドウに対しても後付け可能な「ふきだし表示」です。
# 　また、テール部分のみの自動追尾機能を持ちます。
# 　　ふきだし表示をするには、
# 　テール用画像「Window-top」「Window-under」を
# 　「Graphics/System」フォルダにインポートしておく必要があります。
#==============================================================================
# ■ Window_Message
#==============================================================================
class Window_Message < Window_Base
#--------------------------------------------------------------------------
# ● メッセージの開始
#--------------------------------------------------------------------------
alias parashelf_update_all_windows update_all_windows
def update_all_windows
parashelf_update_all_windows
update_tail
end
#--------------------------------------------------------------------------
# クローズ [オーバーライド]
#--------------------------------------------------------------------------
def close
super
del_tail
@name_window.close if @name_window != nil #ネームウィンドウのクローズ動作。
end
#--------------------------------------------------------------------------
# ● 背景スプライトの更新
#--------------------------------------------------------------------------
alias parashelf_update_back_sprite update_back_sprite
def update_back_sprite
parashelf_update_back_sprite
update_tail
end
#--------------------------------------------------------------------------
# ○ フレーム更新 (ふきだしテールの更新)
#--------------------------------------------------------------------------
def update_tail
# ふきだしモードではイベントの動きに追従
if $mes_id != nil and @tail != nil
tale_pos = get_tale_pos
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
update_tail_bitmap
end
end
##--------------------------------------------------------------------------
# ○ ふきだしテールの画像を更新。
#--------------------------------------------------------------------------
def update_tail_bitmap
skin = "Window"
if $win_x != nil
if $win_x > 0
@tail.bitmap = Cache.system(skin + "-right")
elsif $win_x < 0
@tail.bitmap = Cache.system(skin + "-left")
else
case @position
when 0 # 上
@tail.bitmap = Cache.system(skin + "-top")
when 2 # 下
@tail.bitmap = Cache.system(skin + "-under")
end
end
else
case @position
when 0 # 上
@tail.bitmap = Cache.system(skin + "-top")
when 2 # 下
@tail.bitmap = Cache.system(skin + "-under")
end
end
# 可視状態
if self.visible == true
@tail.visible = self.openness == 255
else
@tail.visible = false
end
end
#--------------------------------------------------------------------------
# ○ テールの位置を計算
#--------------------------------------------------------------------------
def get_tale_pos
if defined?($game_system.show_stand_picture) #A1立ち絵スクリプトを入れている。
if $game_system.show_stand_picture #立ち絵on
pos = get_tale_pos_stand_pic
else
pos = get_tale_pos_normal
end
else
pos = get_tale_pos_normal
end
return pos
end
#--------------------------------------------------------------------------
# ○ テールの位置を計算/立ち絵使用時。※NAME_CHANGEの編集必須。
#--------------------------------------------------------------------------
def get_tale_pos_stand_pic
if $game_message.face_name != "" and @tail != nil
name = A1_System::StandPicture::NAME_CHANGE[$game_message.face_name]
chara = name[$game_message.face_index][0]
if @stand_pic[chara] != nil #立ち絵無しの場合通常通り。
x = @stand_pic[chara].pic_sprite.x + @stand_pic[chara].pic_sprite.width / 2
y = get_tale_pos_normal_updown
update_tail_bitmap
else
return get_tale_pos_normal #立ち絵が見つからない場合は通常通り。
end
else
return get_tale_pos_normal #立ち絵が見つからない場合は通常通り。
end
return [x,y]
end
#--------------------------------------------------------------------------
# ○ テールの位置を計算/立ち絵未使用時。
#--------------------------------------------------------------------------
def get_tale_pos_normal
if $mes_id == (-2) #左右の場合は高さはウィンドウ中心。上下ならやや左に配置。
if $win_x != nil
if $win_x > 0
x = $win_x - @tail.width / 2
y = self.y + self.height / 2 - @tail.height / 2
elsif $win_x < 0
x = self.width - @tail.width / 2
y = self.y + self.height / 2 - @tail.height / 2
else
x = MINAS_TWE_X_POS
y = get_tale_pos_normal_updown
end
else
x = MINAS_TWE_X_POS
y = get_tale_pos_normal_updown
end
elsif $mes_id <= (-3) #左右の場合は高さはウィンドウ中心。上下ならやや左に配置。
if $win_x != nil
if $win_x > 0
x = $win_x - @tail.width / 2
y = self.y + self.height / 2
elsif $win_x < 0
x = self.width - @tail.width / 2
y = self.y + self.height / 2
else
x = MINAS_THREE_X_POS
y = get_tale_pos_normal_updown
end
else
x = MINAS_THREE_X_POS
y = get_tale_pos_normal_updown
end
else
character = get_character($mes_id)
x = [[character.screen_x - 16, self.x].max, self.x + self.width - 32].min
if $win_x != nil
if $win_x > 0
x = $win_x - @tail.width / 2
y = character.screen_y
elsif $win_x < 0
x = self.width
y = character.screen_y
else
y = get_tale_pos_normal_updown
end
else
y = get_tale_pos_normal_updown
end
end
return [x, y]
end
#--------------------------------------------------------------------------
# ○ テールが上下の時、かつ[-2][-3]でない時のy座標の取得。
#--------------------------------------------------------------------------
def get_tale_pos_normal_updown
case @position
when 0
y = self.y + self.height - @tail.height / 2
else
y = self.y - @tail.height / 2
end
return y
end
#--------------------------------------------------------------------------
# ○ ふきだしを破棄
#--------------------------------------------------------------------------
def del_tail
if @tail != nil
@tail.dispose
@tail = nil
end
end
end
#
# ▼▲▼ XRXS 9拡張CO-X. ふきだし自動設定 ▼▲▼
#==============================================================================
# ■ Window_Message
#==============================================================================
class Window_Message < Window_Base
#--------------------------------------------------------------------------
# ○ ポップキャラクターの設定
#--------------------------------------------------------------------------
def pop_character=(character_id)
@pop_character = character_id
$mes_id = character_id
end
#--------------------------------------------------------------------------
# ○ テールキャラクターの設定
#--------------------------------------------------------------------------
def tail_character=(character_id)
#@pop_character = character_id
$mes_id = character_id
end
end
#==============================================================================
# ■ Scene_Menu
#------------------------------------------------------------------------------
# 　メニューを開いてからウィンドウが出るとネームウィンドウが表示される不具合修正。
#==============================================================================
#class Scene_Menu < Scene_MenuBase
# def terminate_hukidasi_menyu
# @name_window.openness = 0 if @name_window != nil
# terminate_hukidasi_menyu_default
# end
# alias :terminate_hukidasi_menyu_default :terminate
# alias :terminate :terminate_hukidasi_menyu
#end
#■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
#■ウィンドウ非表示ルーチン
#■吹きだしテールとネームウィンドウに対応。
#■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
#==============================================================================
# L（キーボードのＱ）を押すと、メッセージウィンドウを表示?非表示
#==============================================================================
class Window_Message < Window_Base
def update_winoff
unless $game_party.in_battle #バトル中は無効。
if Input.trigger?(Input::L)
if self.visible == true
self.visible = false
@tail.visible = false if @tail != nil
else
self.visible = true
end
if @name_window != nil
if @name_window.visible == false and $name != nil and $name != ""
@name_window.visible = true
@name_sprite.visible = true
else
@name_window.visible = false
@name_sprite.visible = false
end
end
elsif Input.trigger?(Input::C) or Input.trigger?(Input::B)
self.visible = true if self.visible == false
@tail.visible = true if @tail != nil and @tail.visible == false
if @name_window != nil and $name != nil
if $name != ""
@name_window.visible = true
@name_sprite.visible = true
end
end
end
end
update_winoff_default
end
alias :update_winoff_default :update
alias :update :update_winoff
end
#■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
#■ウィンドウ表示位置指定ルーチン
#■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□
#===========================================================================
#イベントコマンド「スクリプト」を使い、
#$win_x=100　
#$win_y=100
#と入力すれば、ウィンドウを（１００、１００）の位置に表示します。
#使わない時は
#$win_x=nil
#などとnilを入力しておいてください。
#===========================================================================
class Window_Message < Window_Base
#--------------------------------------------------------------------------
# ● ウィンドウの背景と位置の設定 [再定義]
#--------------------------------------------------------------------------
def update_placement_position
update_placement_position_default
if $win_x != nil
if $win_x > 0
self.x = $win_x
self.width -= $win_x
else
self.x = 0
self.width += $win_x
end
end
if $win_y != nil
self.y = $win_y
end
end
alias_method :update_placement_position_default, :update_placement
alias_method :update_placement, :update_placement_position
end
#==============================================================================
# ■ SceneManager
#------------------------------------------------------------------------------
# 　シーン遷移のさい、テールを破棄する。
#==============================================================================
module SceneManager
#--------------------------------------------------------------------------
# ● 呼び出し
#--------------------------------------------------------------------------
def self.call_sceman_hukidasi(scene_class)
if defined?(self.scene.message_window)
self.scene.message_window.del_tail if self.scene.message_window.tail != nil
end
@stack.push(@scene)
@scene = scene_class.new
end
#--------------------------------------------------------------------------
# ● クラスメソッドのエイリアス
#--------------------------------------------------------------------------
class << self
alias :call_sceman_hukidasi_default :call
alias :call :call_sceman_hukidasi
end
end
#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
# 　戦闘トランジションのさい、テールを破棄。
#==============================================================================
class Scene_Map < Scene_Base
attr_accessor :message_window
#--------------------------------------------------------------------------
# ● 戦闘前トランジション実行
#--------------------------------------------------------------------------
def perform_battle_transition_hukidasi
@message_window.del_tail #テールの破棄
perform_battle_transition_hukidasi_default
end
alias_method :perform_battle_transition_hukidasi_default, :perform_battle_transition
alias_method :perform_battle_transition, :perform_battle_transition_hukidasi
end

复制代码

イベント吹き出し event_id

#===========================================================================
# ◆ A1 Scripts ◆
#    吹き出しメッセージ（RGSS3）
#
# バージョン   ： 1.00 (2012/01/12)
# 作者         ： A1
# URL　　　　　： [url=http://a1tktk.web.fc2.com/]http://a1tktk.web.fc2.com/[/url]
#---------------------------------------------------------------------------
# 機能：
# ・吹き出しメッセージを表示します
#---------------------------------------------------------------------------
# 更新履歴　　 ：2012/01/12 Ver1.00 リリース
#---------------------------------------------------------------------------
# 設置場所      
#    A1共通スクリプト以下
#    (ネームウィンドウ以下)
#
# 必要スクリプト
#    A1共通スクリプトVer4.00以上
#
# 必要ファイル
#    Window_Popup.png  ※ Graphics/System にインポート
#---------------------------------------------------------------------------
# 使い方
#   ■ 設定項目 に設定
#
#   イベントコマンド「注釈」に記述
#
#     並列吹き出し
#
#       指定後1回のの文章を並列吹き出しとして表示します
#       並列吹き出しは、吹き出し表示中でもプレイヤーの移動や
#       イベントコマンドの実行・続行が可能です
#
#       また、他の吹き出しと同時に閉じることがなくなります
#
#     イベント吹き出し event_id
#
#       イベントを直接指定して吹き出しを表示します
#
#     吹き出しクローズ key
#
#       指定した吹き出しを閉じます
#       設定項目で設定した [歩行グラフィック名]_[歩行グラフィックIndex] を
#       key に指定します
#
#       例：吹き出しクローズ Actor4_0
#
#     吹き出しクローズ [イベント,event_id]
#
#       イベント吹き出しで表示した吹き出しを閉じます
#
#       例：吹き出しクローズ [イベント,5]
#
#           ※先に「イベント吹き出し」でevent_id 5 のイベントに
#             吹き出しを表示させているものとします
#
#     吹き出し使用 on|off
#
#       吹き出しの使用を切り替えます
#       on で吹き出し使用、off で吹き出し使用しなくなります
#
#
#   メッセージウィンドウコマンド
#
#     \CC[count] ：クローズカウントを設定します(フレーム数)
#                  設定項目のデフォルト値より優先されます
#
#     \KP        ：吹き出しのヒレが「考え中」になります
#
#     \PR        ：並列吹き出し状態として表示した吹き出しの
#                  並列吹き出し状態をメッセージ終了後に解除します
#
#                  解除された場合、他の吹き出しと同時に閉じるようになります
#==============================================================================
$imported ||= {}
$imported["A1_PopupMassage"] = true
if $imported["A1_Common_Script"]
old_common_script("吹き出しメッセージ", "4.00") if common_version < 4.00
#==============================================================================
# ■ 設定項目
#==============================================================================
module A1_System::CnildMassageWindowConfig
  #--------------------------------------------------------------------------
  # 顔グラフィックと歩行グラフィックの対応
  #
  #  "[顔グラフィック名]_[Index]" => "[歩行グラフィック名]_[Index]" ※Index毎に設定
  #  "[顔グラフィック名]"         => "[歩行グラフィック名]_[Index]" ※該当顔グラフィック全てに適用
  #
  #  歩行グラフィックは配列で複数指定することが可能です
  #--------------------------------------------------------------------------
  LINK_FACE       = {
   # 顔グラフィック => 歩行グラフィック
    "Actor4_0"      => "Actor4_0",
    "Actor4_4"      => "Actor4_4",
    "Actor4_5"      => "Actor4_5",
  }
  #--------------------------------------------------------------------------
  # 文字入力待ちでないウィンドウが閉じるまでの時間(フレーム)のデフォルト値
  #   -1 にすると手動で閉じるかイベント終了まで閉じません
  #   -1 にすると「並列吹き出し」にしたウィンドウは手動で閉じるまでずっと閉じません
  #--------------------------------------------------------------------------
  DEFAULT_CLOSE_COUNT = -1
  #--------------------------------------------------------------------------
  # 吹き出しメッセージ使用のデフォルト値
  #--------------------------------------------------------------------------
  DEFAULT_ENABLE_POPUP = true
end
#==============================================================================
# ■ Cache
#------------------------------------------------------------------------------
# 　各種グラフィックを読み込み、Bitmap オブジェクトを作成、保持するモジュール
# です。読み込みの高速化とメモリ節約のため、作成した Bitmap オブジェクトを内部
# のハッシュに保存し、同じビットマップが再度要求されたときに既存のオブジェクト
# を返すようになっています。
#==============================================================================
 
module Cache
  #--------------------------------------------------------------------------
  # ○ 顔グラフィックの取得
  #--------------------------------------------------------------------------
  def self.half_face(filename)
    load_file_name = "Graphics/Faces/#{filename}"
    key            = "#{load_file_name}_halfface"
    load_resize_bitmap(load_file_name, key, [-0.5, -0.5])
  end
end
#==============================================================================
# ■ Window_Message
#------------------------------------------------------------------------------
# 　文章表示に使うメッセージウィンドウです。
#==============================================================================
 
class Window_Message < Window_Base
  #--------------------------------------------------------------------------
  # ○ 定数
  #--------------------------------------------------------------------------
  LINK_FACE = A1_System::CnildMassageWindowConfig::LINK_FACE
  #--------------------------------------------------------------------------
  # ○ 子メッセージウィンドウのキーを取得
  #--------------------------------------------------------------------------
  def child_key
    return event_id_key if $game_temp.event_popup_id
    key = LINK_FACE["#{$game_message.face_name}_#{$game_message.face_index}"]
    key = LINK_FACE["#{$game_message.face_name}"] unless key
    return key
  end
  #--------------------------------------------------------------------------
  # ○ イベントIDからキーを設定
  #--------------------------------------------------------------------------
  def event_id_key
    key = "event_id_key_#{$game_temp.event_popup_id}"
    $game_temp.event_popup_id = nil
    return key
  end
  #--------------------------------------------------------------------------
  # ☆ 全ウィンドウの作成
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_create_all_windows create_all_windows
  def create_all_windows
    a1_child_message_window_wm_create_all_windows
    @child_message_window = {}
  end
  #--------------------------------------------------------------------------
  # ☆ 全ウィンドウの解放
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_dispose_all_windows dispose_all_windows
  def dispose_all_windows
    a1_child_message_window_wm_dispose_all_windows
    @child_message_window.values.each {|window| window.dispose }
  end
  #--------------------------------------------------------------------------
  # ☆ 全ウィンドウの更新
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_update_all_windows update_all_windows
  def update_all_windows
    a1_child_message_window_wm_update_all_windows
    @child_message_window.values.each {|window| window.update }
    close_window = $game_message.close_message
    @child_message_window[close_window].close if close_window && @child_message_window[close_window]
    $game_message.close_message = nil
  end
  #--------------------------------------------------------------------------
  # ☆ 全テキストの処理
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_process_all_text process_all_text
  def process_all_text
    @use_child = false
    return a1_child_message_window_wm_process_all_text unless need_setup?
    @child_key = child_key
    return if setup_child_message if @child_key && !@child_key.empty?
    a1_child_message_window_wm_process_all_text
  end
  #--------------------------------------------------------------------------
  # ○ 子メッセージウィンドウのセットアップが必要？
  #--------------------------------------------------------------------------
  def need_setup?
    return false if $game_party.in_battle 
    return false if @my_child_window
    return $game_system.enable_child_msg
  end
  #--------------------------------------------------------------------------
  # ○ 子メッセージウィンドウのセットアップ
  #--------------------------------------------------------------------------
  def setup_child_message
    @child_message_window[@child_key] ||= create_child_message
    return false unless @child_message_window[@child_key].link_event
    close
    process_child_message_window(@child_message_window[@child_key])
    return true
  end
  #--------------------------------------------------------------------------
  # ○ 子メッセージウィンドウの作成
  #--------------------------------------------------------------------------
  def create_child_message
    window = Window_ChildMessage.new
    return set_link_event_id(window, $1.to_i) if @child_key =~ /event_id_key_(\d+)/
    return window if link_player(window)
    $game_map.events.values.each {|event| break if link_event(event, window) }
    return window
  end
  #--------------------------------------------------------------------------
  # ○ リンクするプレイヤーの取得
  #--------------------------------------------------------------------------
  def link_player(window)
    return true if link_event($game_player, window)
    $game_player.followers.each {|follower| return true if link_event(follower, window) }
    return false
  end
  #--------------------------------------------------------------------------
  # ○ リンクするイベントの取得
  #--------------------------------------------------------------------------
  def link_event(event, window)
    return false unless search_link_event(event.character_name, event.character_index)
    set_link_event(window, event)
    return true
  end
  #--------------------------------------------------------------------------
  # ○ リンクするイベントの検索
  #--------------------------------------------------------------------------
  def search_link_event(name, index)
    return "#{name}_#{index}" == @child_key unless @child_key.is_a?(Array)
    @child_key.each {|key| return true if "#{name}_#{index}" == key }
    return false
  end
  #--------------------------------------------------------------------------
  # ○ リンクするイベントの設定(ID)
  #--------------------------------------------------------------------------
  def set_link_event_id(window, event_id)
    window.link_event = $game_map.events[event_id]
    return window
  end
  #--------------------------------------------------------------------------
  # ○ リンクするイベントの設定
  #--------------------------------------------------------------------------
  def set_link_event(window, event)
    window.link_event = event
  end
  #--------------------------------------------------------------------------
  # ○ 子メッセージウィンドウの処理
  #--------------------------------------------------------------------------
  def process_child_message_window(window)
    @child_window = window
    window.position     = $game_message.position
    text                = convert_escape_characters($game_message.all_text)
    text_width          = $a1_common.text_width(window.contents.font, text)
    $game_message.texts = text.split("\n")
    window.set_face_info($game_message.face_name, $game_message.face_index)
    window.set_width(window.new_line_x + text_width + standard_padding * 2)
    window.background   = $game_message.background
    window.create_contents
    setup_priority(window)
    window.process_all_text
    @use_child = true
  end
  #--------------------------------------------------------------------------
  # ○ 子メッセージウィンドウの表示優先度の設定
  #--------------------------------------------------------------------------
  def setup_priority(now_window)
    @priority_order ||= []
    @priority_order.delete(@child_key)
    @priority_order.insert(0, @child_key)
    @priority_order.each_with_index {|key, i | @child_message_window[key].priority = @priority_order.size - i }
  end
  #--------------------------------------------------------------------------
  # ○ クローズカウントのセット
  #--------------------------------------------------------------------------
  def set_close_count(value)
    @child_window.close_count = value
    return ""
  end
  #--------------------------------------------------------------------------
  # ○ ポップアップ種別のセット
  #--------------------------------------------------------------------------
  def set_popup_kind
    @child_window.popup_kind = 1
    return ""
  end
  #--------------------------------------------------------------------------
  # ☆ 入力待ち処理
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_input_pause input_pause
  def input_pause
    return if @use_child
    a1_child_message_window_wm_input_pause
  end
  #--------------------------------------------------------------------------
  # ☆ ウィンドウを閉じ、完全に閉じるまで待つ
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_close_and_wait close_and_wait
  def close_and_wait
    @child_message_window.values.each {|window| window.close if window.input_wait }
    a1_child_message_window_wm_close_and_wait
    @priority_order = []
  end
  #--------------------------------------------------------------------------
  # ☆ 全ウィンドウが完全に閉じているか判定
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_all_close? all_close?
  def all_close?
    return false unless a1_child_message_window_wm_all_close?
    @child_message_window.values.each {|window| return false unless window.close? if window.input_wait }
    return true
  end
  #--------------------------------------------------------------------------
  # ☆ 背景と位置の変更判定
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wm_settings_changed? settings_changed?
  def settings_changed?
    return false if $game_system.enable_child_msg
    a1_child_message_window_wm_settings_changed?
  end
  #--------------------------------------------------------------------------
  # ○ 吹き出しの初期化
  #--------------------------------------------------------------------------
  def init_popup_message
    @child_message_window.values.each {|window| window.dispose }
    @child_message_window = {}
  end
end
#==============================================================================
# ■ Window_ChildMessage
#==============================================================================
 
class Window_ChildMessage < Window_Message
  #--------------------------------------------------------------------------
  # ○ 定数
  #--------------------------------------------------------------------------
  CLOSE_COUNT      = A1_System::CnildMassageWindowConfig::DEFAULT_CLOSE_COUNT
  POS_UP           = 0
  POS_MIDDLE       = 1
  POS_DOWN         = 2
  POPUP_RECT       = { POS_UP     => [Rect.new( 0,  0, 32, 64), Rect.new( 0, 64, 32, 64)],
                       POS_MIDDLE => [Rect.new( 0,  0, 32, 64), Rect.new( 0, 64, 32, 64)],
                       POS_DOWN   => [Rect.new(32,  0, 32, 64), Rect.new(32, 64, 32, 64)],
                     }
  #--------------------------------------------------------------------------
  # ○ オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    @my_child_window = true
    @screen_width = Graphics.width
    super
    create_popup
  end
  #--------------------------------------------------------------------------
  # ○ 表示優先度の設定
  #--------------------------------------------------------------------------
  def priority=(value)
    self.z = 200 + value
    @popup_sprite.z = 200 + value
  end
  #--------------------------------------------------------------------------
  # ○ 吹き出しスプライトの作成
  #--------------------------------------------------------------------------
  def create_popup
    @popup_sprite = Sprite.new
    @popup_sprite.visible = false
    @popup_bitmap = Cache.system("Window_Popup")
    bitmap = Bitmap.new(32, 64)
    @popup_sprite.bitmap = bitmap
    @input_wait = true
  end
  #--------------------------------------------------------------------------
  # ○ 顔グラフィックの情報を設定
  #--------------------------------------------------------------------------
  def set_face_info(name, index)
    @face_name  = name
    @face_index = index
    @name_window_key = show_name(@face_name, @face_index) if $imported["A1_Name_Window"]
  end
  #--------------------------------------------------------------------------
  # ○ リンクするイベントの取得
  #--------------------------------------------------------------------------
  def link_event
    @event
  end
  #--------------------------------------------------------------------------
  # ○ リンクするイベントの設定
  #--------------------------------------------------------------------------
  def link_event=(event)
    @event = event
  end
  #--------------------------------------------------------------------------
  # ○ 表示位置の設定
  #--------------------------------------------------------------------------
  def position=(pos)
    @position = pos
    @position = 0 if @position == 1
    set_popup_bitmap(0)
  end
  #--------------------------------------------------------------------------
  # ○ 背景の設定
  #--------------------------------------------------------------------------
  def background=(type)
    @background = type
    self.opacity = @background == 0 ? 255 : 0
    setup_back_ground if @background == 1
    @back_sprite.visible = false if @back_sprite && @background != 1
  end
  #--------------------------------------------------------------------------
  # ○ 背景のセットアップ
  #--------------------------------------------------------------------------
  def setup_back_ground
    @back_bitmap.dispose if @back_bitmap
    create_back_bitmap_ex
    @back_sprite = Sprite.new unless @back_sprite
    setup_back_sprite
  end
  #--------------------------------------------------------------------------
  # ○ 背景のビットマップ作成
  #--------------------------------------------------------------------------
  def create_back_bitmap_ex
    @back_bitmap = Bitmap.new(width, height)
    rect1 = Rect.new(0, 0, width, 12)
    rect2 = Rect.new(0, 12, width, height - 24)
    rect3 = Rect.new(0, height - 12, width, 12)
    @back_bitmap.gradient_fill_rect(rect1, back_color2, back_color1, true)
    @back_bitmap.fill_rect(rect2, back_color1)
    @back_bitmap.gradient_fill_rect(rect3, back_color1, back_color2, true)
  end
  #--------------------------------------------------------------------------
  # ○ 背景のスプライトの作成
  #--------------------------------------------------------------------------
  def setup_back_sprite
    @back_sprite.bitmap = @back_bitmap
    @back_sprite.z = z - 1
    @back_sprite.visible = false
  end
  #--------------------------------------------------------------------------
  # ○ 背景ビットマップの解放
  #--------------------------------------------------------------------------
  def dispose_back_bitmap
    super if @back_bitmap
  end
  #--------------------------------------------------------------------------
  # ○ 背景スプライトの解放
  #--------------------------------------------------------------------------
  def dispose_back_sprite
    super if @back_sprite
  end
  #--------------------------------------------------------------------------
  # ○ 背景スプライトの更新
  #--------------------------------------------------------------------------
  def update_back_sprite
    return unless @back_sprite && @background == 1
    @back_sprite.x = self.x
    @back_sprite.y = self.y
    @back_sprite.visible = true
    @back_sprite.opacity = openness
    @back_sprite.update
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウ背景の更新
  #--------------------------------------------------------------------------
  def update_background
    self.opacity = @background == 0 ? 255 : 0
  end
  #--------------------------------------------------------------------------
  # ○ フレーム更新
  #--------------------------------------------------------------------------
  def update
    return unless @event
    update_pos
    super
    update_close_count
    update_background
  end
  #--------------------------------------------------------------------------
  # ○ クローズカウントの更新
  #--------------------------------------------------------------------------
  def update_close_count
    return unless @close_count
    return if @close_count < 0
    @close_count -= 1
    auto_close if @close_count == 0
  end
  #--------------------------------------------------------------------------
  # ○ ポップアップスプライト位置の設定
  #--------------------------------------------------------------------------
  def set_popup_pos
    @popup_sprite.x = @event.screen_x
    @popup_sprite.y = self.y + popup_pos_y
    @popup_sprite.visible = open? && @background == 0
  end
  #--------------------------------------------------------------------------
  # ○ ポップアップビットマップの設定
  #--------------------------------------------------------------------------
  def set_popup_bitmap(kind)
    @popup_sprite.bitmap.clear
    @popup_sprite.bitmap.blt(0, 0, @popup_bitmap, POPUP_RECT[@position][kind])
  end
  #--------------------------------------------------------------------------
  # ○ ポップアップ種別の設定
  #--------------------------------------------------------------------------
  def popup_kind=(kind)
    set_popup_bitmap(1)
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウ位置の更新
  #--------------------------------------------------------------------------
  def update_pos
    self.x = @event.screen_x + @pos_x
    self.y = @event.screen_y + pos_y
    set_popup_pos
    set_name_window_pos if $imported["A1_Name_Window"]
  end
  #--------------------------------------------------------------------------
  # ○ ネームウィンドウの位置設定
  #--------------------------------------------------------------------------
  def set_name_window_pos
    return unless @name_windows[@name_window_key]
    @name_windows[@name_window_key].x = self.x + 24
    @name_windows[@name_window_key].y = name_window_y
    @name_windows[@name_window_key].z = self.z
    @name_windows[@name_window_key].set_name_sprite_pos
  end
  #--------------------------------------------------------------------------
  # ○ ネームウィンドウのy座標設定
  #--------------------------------------------------------------------------
  def name_window_y
    return self.y + self.height - 12 if @position == 2
    self.y - 16
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウx座標の取得
  #--------------------------------------------------------------------------
  def set_pos_x
    base = @event.screen_x - 64
    return @pos_x = (@screen_width - self.width) - (base + 64) if base + self.width > @screen_width
    @pos_x = -64
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウy座標の取得
  #--------------------------------------------------------------------------
  def pos_y
    return -116 if @position == 0
    return  16 if @position == 2
  end
  #--------------------------------------------------------------------------
  # ○ ポップアップy座標の取得
  #--------------------------------------------------------------------------
  def popup_pos_y
    return self.height - 32 if @position == 0
    return -32 if @position == 2
  end
  #--------------------------------------------------------------------------
  # ○ 自動で閉じる
  #--------------------------------------------------------------------------
  def auto_close
    close
    @close_count = nil
  end
  #--------------------------------------------------------------------------
  # ○ 解放
  #--------------------------------------------------------------------------
  def dispose
    @popup_sprite.bitmap.dispose
    @popup_sprite.dispose
    super
  end
  #--------------------------------------------------------------------------
  # ○ 制御文字の事前変換
  #--------------------------------------------------------------------------
  def convert_escape_characters(text)
    text
  end
  #--------------------------------------------------------------------------
  # ○ 背景ビットマップの作成
  #--------------------------------------------------------------------------
  def create_back_bitmap
  end
  #--------------------------------------------------------------------------
  # ○ 背景スプライトの作成
  #--------------------------------------------------------------------------
  def create_back_sprite
  end
  #--------------------------------------------------------------------------
  # ○ 全ウィンドウの作成
  #--------------------------------------------------------------------------
  def create_all_windows
  end
  #--------------------------------------------------------------------------
  # ○ 全ウィンドウの解放
  #--------------------------------------------------------------------------
  def dispose_all_windows
  end
  #--------------------------------------------------------------------------
  # ○ 全ウィンドウの更新
  #--------------------------------------------------------------------------
  def update_all_windows
  end
  #--------------------------------------------------------------------------
  # ○ 全ウィンドウが完全に閉じているか判定
  #--------------------------------------------------------------------------
  def all_close?
    close?
  end
  #--------------------------------------------------------------------------
  # ○ ファイバーの更新
  #--------------------------------------------------------------------------
  def update_fiber
  end
  #--------------------------------------------------------------------------
  # ○ 入力処理
  #--------------------------------------------------------------------------
  def process_input
    input_pause unless @pause_skip
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
    return self.width unless self.disposed?
    Graphics.width
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウ高さの取得
  #--------------------------------------------------------------------------
  def window_height
    fitting_height(visible_line_number)
  end
  #--------------------------------------------------------------------------
  # ○ 表示行数の取得
  #--------------------------------------------------------------------------
  def visible_line_number
    return 2
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウ幅の設定
  #--------------------------------------------------------------------------
  def set_width(width)
    self.width         = width
  end
  #--------------------------------------------------------------------------
  # ○ テキストの設定
  #--------------------------------------------------------------------------
  def text=(text)
    @text = text
  end
  #--------------------------------------------------------------------------
  # ○ 全テキストの処理
  #--------------------------------------------------------------------------
  def process_all_text
    @input_wait = $game_temp.input_wait
    $game_temp.input_wait = true
    set_pos_x
    super
    @init_close_count = CLOSE_COUNT unless @init_close_count
    input_pause
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウを開き、完全に開くまで待つ
  #--------------------------------------------------------------------------
  def open_and_wait
    open
    Fiber.yield until open? if @input_wait
  end
  #--------------------------------------------------------------------------
  # ○ 入力待ち取得
  #--------------------------------------------------------------------------
  def input_wait
    @input_wait
  end
  #--------------------------------------------------------------------------
  # ○ 入力待ち取得
  #--------------------------------------------------------------------------
  def input_wait
    @input_wait
  end
  #--------------------------------------------------------------------------
  # ○ 入力待ち処理
  #--------------------------------------------------------------------------
  def input_pause
    reset_close_count
    super if @input_wait
    @input_wait = true if @parallel_release
    @parallel_release = false
    start_close_count
  end
  #--------------------------------------------------------------------------
  # ○ クローズカウントの開始
  #--------------------------------------------------------------------------
  def start_close_count
    @close_count = @init_close_count
    @init_close_count = nil
  end
  #--------------------------------------------------------------------------
  # ○ クローズカウントの設定
  #--------------------------------------------------------------------------
  def close_count=(count)
    @init_close_count = count
  end
  #--------------------------------------------------------------------------
  # ○ クローズカウントのリセット
  #--------------------------------------------------------------------------
  def reset_close_count
    @close_count      = nil
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウを閉じる
  #--------------------------------------------------------------------------
  def close
    reset_close_count
    super
  end
  #--------------------------------------------------------------------------
  # ○ 改行位置の取得
  #--------------------------------------------------------------------------
  def new_line_x
    $game_message.face_name.empty? ? 0 : 56
  end
  #--------------------------------------------------------------------------
  # ○ 制御文字の処理
  #     code : 制御文字の本体部分（「\C[1]」なら「C」）
  #     text : 描画処理中の文字列バッファ（必要なら破壊的に変更）
  #     pos  : 描画位置 {:x, :y, :new_x, :height}
  #--------------------------------------------------------------------------
  def process_escape_character(code, text, pos)
    case code.upcase
    when 'PR'
      @parallel_release = true
    else
      super
    end
  end
  #--------------------------------------------------------------------------
  # ○ ネームウィンドウの表示
  #--------------------------------------------------------------------------
  def show_name_window(face_name, face_index, x, size = 96)
    super
    set_name_window_pos
  end
end
#==============================================================================
# ■ Window_Base
#------------------------------------------------------------------------------
# 　ゲーム中の全てのウィンドウのスーパークラスです。
#==============================================================================
 
class Window_Base < Window
  #--------------------------------------------------------------------------
  # ☆ 顔グラフィックの描画
  #     enabled : 有効フラグ。false のとき半透明で描画
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wb_draw_face draw_face
  def draw_face(face_name, face_index, x, y, size = 96)
    return draw_face_half(face_name, face_index, x, y, size) if @my_child_window
    a1_child_message_window_wb_draw_face(face_name, face_index, x, y, size)
  end
  #--------------------------------------------------------------------------
  # ○ 顔グラフィックの描画（ハーフサイズ）
  #     enabled : 有効フラグ。false のとき半透明で描画
  #--------------------------------------------------------------------------
  def draw_face_half(face_name, face_index, x, y, enabled = true)
    draw_half_face(face_name, face_index, x, y, enabled) unless face_name.empty?
    show_name_window(face_name, face_index, x, 48) if $imported["A1_Name_Window"]
  end
  #--------------------------------------------------------------------------
  # ○ 顔グラフィックの描画（ハーフサイズ）
  #--------------------------------------------------------------------------
  def draw_half_face(face_name, face_index, x, y, enabled)
    bitmap = Cache.half_face(face_name)
    rect = Rect.new(face_index % 4 * 48, face_index / 4 * 48, 48, 48)
    contents.blt(x, y, bitmap, rect, enabled ? 255 : translucent_alpha)
  end
  #--------------------------------------------------------------------------
  # ☆ 制御文字の事前変換
  #    実際の描画を始める前に、原則として文字列に変わるものだけを置き換える。
  #    文字「\」はエスケープ文字（\e）に変換。
  #--------------------------------------------------------------------------
  alias a1_child_message_window_wb_convert_escape_characters convert_escape_characters
  def convert_escape_characters(text)
    result = a1_child_message_window_wb_convert_escape_characters(text)
    result.gsub!(/\eCC\[(\d+)\]/i)          { set_close_count($1.to_i) }
    result.gsub!(/\eKP/i)                   { set_popup_kind }
    result
  end
end
#==============================================================================
# ■ Game_Message
#------------------------------------------------------------------------------
# 　文章や選択肢などを表示するメッセージウィンドウの状態を扱うクラスです。この
# クラスのインスタンスは $game_message で参照されます。
#==============================================================================
 
class Game_Message
  #--------------------------------------------------------------------------
  # ○ 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :close_message
  #--------------------------------------------------------------------------
  # ☆ オブジェクト初期化
  #--------------------------------------------------------------------------
  alias a1_child_message_window_gm_initialize initialize
  def initialize
    a1_child_message_window_gm_initialize
    @input_wait    = true
    @close_message = nil
  end
  #--------------------------------------------------------------------------
  # ○ 表示するテキストの設定
  #--------------------------------------------------------------------------
  def texts=(text)
    @texts = text
  end
end
#==============================================================================
# ■ Game_Temp
#------------------------------------------------------------------------------
# 　セーブデータに含まれない、一時的なデータを扱うクラスです。このクラスのイン
# スタンスは $game_temp で参照されます。
#==============================================================================
 
class Game_Temp
  #--------------------------------------------------------------------------
  # ○ 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :input_wait
  attr_accessor :event_popup_id
  #--------------------------------------------------------------------------
  # ☆ オブジェクト初期化
  #--------------------------------------------------------------------------
  alias a1_child_message_gt_initialize initialize
  def initialize
    a1_child_message_gt_initialize
    @input_wait     = true
    @event_popup_id = nil
  end
end
#==============================================================================
# ■ Game_System
#------------------------------------------------------------------------------
# 　システム周りのデータを扱うクラスです。セーブやメニューの禁止状態などを保存
# します。このクラスのインスタンスは $game_system で参照されます。
#==============================================================================
 
class Game_System
  #--------------------------------------------------------------------------
  # ○ 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :enable_child_msg
  #--------------------------------------------------------------------------
  # ☆ オブジェクト初期化
  #--------------------------------------------------------------------------
  alias a1_child_message_gs_initialize initialize
  def initialize
    a1_child_message_gs_initialize
    @enable_child_msg = A1_System::CnildMassageWindowConfig::DEFAULT_ENABLE_POPUP
  end
end
#==============================================================================
# ■ A1_System::CommonModule
#==============================================================================
 
class A1_System::CommonModule
  #--------------------------------------------------------------------------
  # ☆ 注釈コマンド定義
  #--------------------------------------------------------------------------
  alias a1_child_message_define_command define_command
  def define_command
    a1_child_message_define_command
    @cmd_108["並列吹き出し"]     = :sub_message
    @cmd_108["吹き出しクローズ"] = :close_popup
    @cmd_108["吹き出し使用"]     = :use_popup_message
    @cmd_108["イベント吹き出し"] = :event_popup_message
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
 
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ○ 並列吹き出し
  #--------------------------------------------------------------------------
  def sub_message(params)
    $game_temp.input_wait = false
  end
  #--------------------------------------------------------------------------
  # ○ 吹き出しクローズ
  #--------------------------------------------------------------------------
  def close_popup(params)
    return close_popup_id(params[0]) if params[0].is_a?(Array)
    $game_message.close_message = params[0]
  end
  #--------------------------------------------------------------------------
  # ○ 吹き出しクローズ(ID)
  #--------------------------------------------------------------------------
  def close_popup_id(params)
    $game_message.close_message = "event_id_key_#{params[1].to_i}" if params[0] == "イベント"
  end
  #--------------------------------------------------------------------------
  # ○ 吹き出し使用
  #--------------------------------------------------------------------------
  def use_popup_message(params)
    $game_system.enable_child_msg = params[0] == "on" ? true : false
  end
  #--------------------------------------------------------------------------
  # ○ イベント吹き出し
  #--------------------------------------------------------------------------
  def event_popup_message(params)
    $game_temp.event_popup_id = params[0].to_i
  end
end
#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
# 　マップ画面の処理を行うクラスです。
#==============================================================================
 
class Scene_Map < Scene_Base
  #--------------------------------------------------------------------------
  # ☆ 場所移動の処理
  #--------------------------------------------------------------------------
  alias a1_child_message_sm_perform_transfer perform_transfer
  def perform_transfer
    prev_map = $game_map.map_id
    a1_child_message_sm_perform_transfer
    @message_window.init_popup_message if prev_map != $game_map.map_id
  end
end
#==============================================================================
# ■ ネームウィンドウインポート時処理
#==============================================================================
if $imported["A1_Name_Window"]
#==============================================================================
# ■ Window_FaceName
#==============================================================================
 
class Window_FaceName < Window_Base
  #--------------------------------------------------------------------------
  # ○ ネームスプライトの位置設定
  #--------------------------------------------------------------------------
  def set_name_sprite_pos
    @name_sprite.x = self.x + self.width / 2
    @name_sprite.y = self.y + self.height / 2
  end
end;end
end

#===========================================================================


# ◆ A1 Scripts ◆


#    吹き出しメッセージ（RGSS3）


#


# バージョン   ： 1.00 (2012/01/12)


# 作者         ： A1


# URL　　　　　： [url=http://a1tktk.web.fc2.com/]http://a1tktk.web.fc2.com/[/url]


#---------------------------------------------------------------------------


# 機能：


# ・吹き出しメッセージを表示します


#---------------------------------------------------------------------------


# 更新履歴　　 ：2012/01/12 Ver1.00 リリース


#---------------------------------------------------------------------------


# 設置場所      


#    A1共通スクリプト以下


#    (ネームウィンドウ以下)


#


# 必要スクリプト


#    A1共通スクリプトVer4.00以上


#


# 必要ファイル


#    Window_Popup.png  ※ Graphics/System にインポート


#---------------------------------------------------------------------------


# 使い方


#   ■ 設定項目 に設定


#


#   イベントコマンド「注釈」に記述


#


#     並列吹き出し


#


#       指定後1回のの文章を並列吹き出しとして表示します


#       並列吹き出しは、吹き出し表示中でもプレイヤーの移動や


#       イベントコマンドの実行・続行が可能です


#


#       また、他の吹き出しと同時に閉じることがなくなります


#


#     イベント吹き出し event_id


#


#       イベントを直接指定して吹き出しを表示します


#


#     吹き出しクローズ key


#


#       指定した吹き出しを閉じます


#       設定項目で設定した [歩行グラフィック名]_[歩行グラフィックIndex] を


#       key に指定します


#


#       例：吹き出しクローズ Actor4_0


#


#     吹き出しクローズ [イベント,event_id]


#


#       イベント吹き出しで表示した吹き出しを閉じます


#


#       例：吹き出しクローズ [イベント,5]


#


#           ※先に「イベント吹き出し」でevent_id 5 のイベントに


#             吹き出しを表示させているものとします


#


#     吹き出し使用 on|off


#


#       吹き出しの使用を切り替えます


#       on で吹き出し使用、off で吹き出し使用しなくなります


#


#


#   メッセージウィンドウコマンド


#


#     \CC[count] ：クローズカウントを設定します(フレーム数)


#                  設定項目のデフォルト値より優先されます


#


#     \KP        ：吹き出しのヒレが「考え中」になります


#


#     \PR        ：並列吹き出し状態として表示した吹き出しの


#                  並列吹き出し状態をメッセージ終了後に解除します


#


#                  解除された場合、他の吹き出しと同時に閉じるようになります


#==============================================================================


$imported ||= {}


$imported["A1_PopupMassage"] = true


if $imported["A1_Common_Script"]


old_common_script("吹き出しメッセージ", "4.00") if common_version < 4.00


#==============================================================================


# ■ 設定項目


#==============================================================================


module A1_System::CnildMassageWindowConfig


  #--------------------------------------------------------------------------


  # 顔グラフィックと歩行グラフィックの対応


  #


  #  "[顔グラフィック名]_[Index]" => "[歩行グラフィック名]_[Index]" ※Index毎に設定


  #  "[顔グラフィック名]"         => "[歩行グラフィック名]_[Index]" ※該当顔グラフィック全てに適用


  #


  #  歩行グラフィックは配列で複数指定することが可能です


  #--------------------------------------------------------------------------


  LINK_FACE       = {


   # 顔グラフィック => 歩行グラフィック


    "Actor4_0"      => "Actor4_0",


    "Actor4_4"      => "Actor4_4",


    "Actor4_5"      => "Actor4_5",


  }


  #--------------------------------------------------------------------------


  # 文字入力待ちでないウィンドウが閉じるまでの時間(フレーム)のデフォルト値


  #   -1 にすると手動で閉じるかイベント終了まで閉じません


  #   -1 にすると「並列吹き出し」にしたウィンドウは手動で閉じるまでずっと閉じません


  #--------------------------------------------------------------------------


  DEFAULT_CLOSE_COUNT = -1


  #--------------------------------------------------------------------------


  # 吹き出しメッセージ使用のデフォルト値


  #--------------------------------------------------------------------------


  DEFAULT_ENABLE_POPUP = true


end


#==============================================================================


# ■ Cache


#------------------------------------------------------------------------------


# 　各種グラフィックを読み込み、Bitmap オブジェクトを作成、保持するモジュール


# です。読み込みの高速化とメモリ節約のため、作成した Bitmap オブジェクトを内部


# のハッシュに保存し、同じビットマップが再度要求されたときに既存のオブジェクト


# を返すようになっています。


#==============================================================================


 


module Cache


  #--------------------------------------------------------------------------


  # ○ 顔グラフィックの取得


  #--------------------------------------------------------------------------


  def self.half_face(filename)


    load_file_name = "Graphics/Faces/#{filename}"


    key            = "#{load_file_name}_halfface"


    load_resize_bitmap(load_file_name, key, [-0.5, -0.5])


  end


end


#==============================================================================


# ■ Window_Message


#------------------------------------------------------------------------------


# 　文章表示に使うメッセージウィンドウです。


#==============================================================================


 


class Window_Message < Window_Base


  #--------------------------------------------------------------------------


  # ○ 定数


  #--------------------------------------------------------------------------


  LINK_FACE = A1_System::CnildMassageWindowConfig::LINK_FACE


  #--------------------------------------------------------------------------


  # ○ 子メッセージウィンドウのキーを取得


  #--------------------------------------------------------------------------


  def child_key


    return event_id_key if $game_temp.event_popup_id


    key = LINK_FACE["#{$game_message.face_name}_#{$game_message.face_index}"]


    key = LINK_FACE["#{$game_message.face_name}"] unless key


    return key


  end


  #--------------------------------------------------------------------------


  # ○ イベントIDからキーを設定


  #--------------------------------------------------------------------------


  def event_id_key


    key = "event_id_key_#{$game_temp.event_popup_id}"


    $game_temp.event_popup_id = nil


    return key


  end


  #--------------------------------------------------------------------------


  # ☆ 全ウィンドウの作成


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_create_all_windows create_all_windows


  def create_all_windows


    a1_child_message_window_wm_create_all_windows


    @child_message_window = {}


  end


  #--------------------------------------------------------------------------


  # ☆ 全ウィンドウの解放


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_dispose_all_windows dispose_all_windows


  def dispose_all_windows


    a1_child_message_window_wm_dispose_all_windows


    @child_message_window.values.each {|window| window.dispose }


  end


  #--------------------------------------------------------------------------


  # ☆ 全ウィンドウの更新


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_update_all_windows update_all_windows


  def update_all_windows


    a1_child_message_window_wm_update_all_windows


    @child_message_window.values.each {|window| window.update }


    close_window = $game_message.close_message


    @child_message_window[close_window].close if close_window && @child_message_window[close_window]


    $game_message.close_message = nil


  end


  #--------------------------------------------------------------------------


  # ☆ 全テキストの処理


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_process_all_text process_all_text


  def process_all_text


    @use_child = false


    return a1_child_message_window_wm_process_all_text unless need_setup?


    @child_key = child_key


    return if setup_child_message if @child_key && !@child_key.empty?


    a1_child_message_window_wm_process_all_text


  end


  #--------------------------------------------------------------------------


  # ○ 子メッセージウィンドウのセットアップが必要？


  #--------------------------------------------------------------------------


  def need_setup?


    return false if $game_party.in_battle 


    return false if @my_child_window


    return $game_system.enable_child_msg


  end


  #--------------------------------------------------------------------------


  # ○ 子メッセージウィンドウのセットアップ


  #--------------------------------------------------------------------------


  def setup_child_message


    @child_message_window[@child_key] ||= create_child_message


    return false unless @child_message_window[@child_key].link_event


    close


    process_child_message_window(@child_message_window[@child_key])


    return true


  end


  #--------------------------------------------------------------------------


  # ○ 子メッセージウィンドウの作成


  #--------------------------------------------------------------------------


  def create_child_message


    window = Window_ChildMessage.new


    return set_link_event_id(window, $1.to_i) if @child_key =~ /event_id_key_(\d+)/


    return window if link_player(window)


    $game_map.events.values.each {|event| break if link_event(event, window) }


    return window


  end


  #--------------------------------------------------------------------------


  # ○ リンクするプレイヤーの取得


  #--------------------------------------------------------------------------


  def link_player(window)


    return true if link_event($game_player, window)


    $game_player.followers.each {|follower| return true if link_event(follower, window) }


    return false


  end


  #--------------------------------------------------------------------------


  # ○ リンクするイベントの取得


  #--------------------------------------------------------------------------


  def link_event(event, window)


    return false unless search_link_event(event.character_name, event.character_index)


    set_link_event(window, event)


    return true


  end


  #--------------------------------------------------------------------------


  # ○ リンクするイベントの検索


  #--------------------------------------------------------------------------


  def search_link_event(name, index)


    return "#{name}_#{index}" == @child_key unless @child_key.is_a?(Array)


    @child_key.each {|key| return true if "#{name}_#{index}" == key }


    return false


  end


  #--------------------------------------------------------------------------


  # ○ リンクするイベントの設定(ID)


  #--------------------------------------------------------------------------


  def set_link_event_id(window, event_id)


    window.link_event = $game_map.events[event_id]


    return window


  end


  #--------------------------------------------------------------------------


  # ○ リンクするイベントの設定


  #--------------------------------------------------------------------------


  def set_link_event(window, event)


    window.link_event = event


  end


  #--------------------------------------------------------------------------


  # ○ 子メッセージウィンドウの処理


  #--------------------------------------------------------------------------


  def process_child_message_window(window)


    @child_window = window


    window.position     = $game_message.position


    text                = convert_escape_characters($game_message.all_text)


    text_width          = $a1_common.text_width(window.contents.font, text)


    $game_message.texts = text.split("\n")


    window.set_face_info($game_message.face_name, $game_message.face_index)


    window.set_width(window.new_line_x + text_width + standard_padding * 2)


    window.background   = $game_message.background


    window.create_contents


    setup_priority(window)


    window.process_all_text


    @use_child = true


  end


  #--------------------------------------------------------------------------


  # ○ 子メッセージウィンドウの表示優先度の設定


  #--------------------------------------------------------------------------


  def setup_priority(now_window)


    @priority_order ||= []


    @priority_order.delete(@child_key)


    @priority_order.insert(0, @child_key)


    @priority_order.each_with_index {|key, i | @child_message_window[key].priority = @priority_order.size - i }


  end


  #--------------------------------------------------------------------------


  # ○ クローズカウントのセット


  #--------------------------------------------------------------------------


  def set_close_count(value)


    @child_window.close_count = value


    return ""


  end


  #--------------------------------------------------------------------------


  # ○ ポップアップ種別のセット


  #--------------------------------------------------------------------------


  def set_popup_kind


    @child_window.popup_kind = 1


    return ""


  end


  #--------------------------------------------------------------------------


  # ☆ 入力待ち処理


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_input_pause input_pause


  def input_pause


    return if @use_child


    a1_child_message_window_wm_input_pause


  end


  #--------------------------------------------------------------------------


  # ☆ ウィンドウを閉じ、完全に閉じるまで待つ


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_close_and_wait close_and_wait


  def close_and_wait


    @child_message_window.values.each {|window| window.close if window.input_wait }


    a1_child_message_window_wm_close_and_wait


    @priority_order = []


  end


  #--------------------------------------------------------------------------


  # ☆ 全ウィンドウが完全に閉じているか判定


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_all_close? all_close?


  def all_close?


    return false unless a1_child_message_window_wm_all_close?


    @child_message_window.values.each {|window| return false unless window.close? if window.input_wait }


    return true


  end


  #--------------------------------------------------------------------------


  # ☆ 背景と位置の変更判定


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wm_settings_changed? settings_changed?


  def settings_changed?


    return false if $game_system.enable_child_msg


    a1_child_message_window_wm_settings_changed?


  end


  #--------------------------------------------------------------------------


  # ○ 吹き出しの初期化


  #--------------------------------------------------------------------------


  def init_popup_message


    @child_message_window.values.each {|window| window.dispose }


    @child_message_window = {}


  end


end


#==============================================================================


# ■ Window_ChildMessage


#==============================================================================


 


class Window_ChildMessage < Window_Message


  #--------------------------------------------------------------------------


  # ○ 定数


  #--------------------------------------------------------------------------


  CLOSE_COUNT      = A1_System::CnildMassageWindowConfig::DEFAULT_CLOSE_COUNT


  POS_UP           = 0


  POS_MIDDLE       = 1


  POS_DOWN         = 2


  POPUP_RECT       = { POS_UP     => [Rect.new( 0,  0, 32, 64), Rect.new( 0, 64, 32, 64)],


                       POS_MIDDLE => [Rect.new( 0,  0, 32, 64), Rect.new( 0, 64, 32, 64)],


                       POS_DOWN   => [Rect.new(32,  0, 32, 64), Rect.new(32, 64, 32, 64)],


                     }


  #--------------------------------------------------------------------------


  # ○ オブジェクト初期化


  #--------------------------------------------------------------------------


  def initialize


    @my_child_window = true


    @screen_width = Graphics.width


    super


    create_popup


  end


  #--------------------------------------------------------------------------


  # ○ 表示優先度の設定


  #--------------------------------------------------------------------------


  def priority=(value)


    self.z = 200 + value


    @popup_sprite.z = 200 + value


  end


  #--------------------------------------------------------------------------


  # ○ 吹き出しスプライトの作成


  #--------------------------------------------------------------------------


  def create_popup


    @popup_sprite = Sprite.new


    @popup_sprite.visible = false


    @popup_bitmap = Cache.system("Window_Popup")


    bitmap = Bitmap.new(32, 64)


    @popup_sprite.bitmap = bitmap


    @input_wait = true


  end


  #--------------------------------------------------------------------------


  # ○ 顔グラフィックの情報を設定


  #--------------------------------------------------------------------------


  def set_face_info(name, index)


    @face_name  = name


    @face_index = index


    @name_window_key = show_name(@face_name, @face_index) if $imported["A1_Name_Window"]


  end


  #--------------------------------------------------------------------------


  # ○ リンクするイベントの取得


  #--------------------------------------------------------------------------


  def link_event


    @event


  end


  #--------------------------------------------------------------------------


  # ○ リンクするイベントの設定


  #--------------------------------------------------------------------------


  def link_event=(event)


    @event = event


  end


  #--------------------------------------------------------------------------


  # ○ 表示位置の設定


  #--------------------------------------------------------------------------


  def position=(pos)


    @position = pos


    @position = 0 if @position == 1


    set_popup_bitmap(0)


  end


  #--------------------------------------------------------------------------


  # ○ 背景の設定


  #--------------------------------------------------------------------------


  def background=(type)


    @background = type


    self.opacity = @background == 0 ? 255 : 0


    setup_back_ground if @background == 1


    @back_sprite.visible = false if @back_sprite && @background != 1


  end


  #--------------------------------------------------------------------------


  # ○ 背景のセットアップ


  #--------------------------------------------------------------------------


  def setup_back_ground


    @back_bitmap.dispose if @back_bitmap


    create_back_bitmap_ex


    @back_sprite = Sprite.new unless @back_sprite


    setup_back_sprite


  end


  #--------------------------------------------------------------------------


  # ○ 背景のビットマップ作成


  #--------------------------------------------------------------------------


  def create_back_bitmap_ex


    @back_bitmap = Bitmap.new(width, height)


    rect1 = Rect.new(0, 0, width, 12)


    rect2 = Rect.new(0, 12, width, height - 24)


    rect3 = Rect.new(0, height - 12, width, 12)


    @back_bitmap.gradient_fill_rect(rect1, back_color2, back_color1, true)


    @back_bitmap.fill_rect(rect2, back_color1)


    @back_bitmap.gradient_fill_rect(rect3, back_color1, back_color2, true)


  end


  #--------------------------------------------------------------------------


  # ○ 背景のスプライトの作成


  #--------------------------------------------------------------------------


  def setup_back_sprite


    @back_sprite.bitmap = @back_bitmap


    @back_sprite.z = z - 1


    @back_sprite.visible = false


  end


  #--------------------------------------------------------------------------


  # ○ 背景ビットマップの解放


  #--------------------------------------------------------------------------


  def dispose_back_bitmap


    super if @back_bitmap


  end


  #--------------------------------------------------------------------------


  # ○ 背景スプライトの解放


  #--------------------------------------------------------------------------


  def dispose_back_sprite


    super if @back_sprite


  end


  #--------------------------------------------------------------------------


  # ○ 背景スプライトの更新


  #--------------------------------------------------------------------------


  def update_back_sprite


    return unless @back_sprite && @background == 1


    @back_sprite.x = self.x


    @back_sprite.y = self.y


    @back_sprite.visible = true


    @back_sprite.opacity = openness


    @back_sprite.update


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウ背景の更新


  #--------------------------------------------------------------------------


  def update_background


    self.opacity = @background == 0 ? 255 : 0


  end


  #--------------------------------------------------------------------------


  # ○ フレーム更新


  #--------------------------------------------------------------------------


  def update


    return unless @event


    update_pos


    super


    update_close_count


    update_background


  end


  #--------------------------------------------------------------------------


  # ○ クローズカウントの更新


  #--------------------------------------------------------------------------


  def update_close_count


    return unless @close_count


    return if @close_count < 0


    @close_count -= 1


    auto_close if @close_count == 0


  end


  #--------------------------------------------------------------------------


  # ○ ポップアップスプライト位置の設定


  #--------------------------------------------------------------------------


  def set_popup_pos


    @popup_sprite.x = @event.screen_x


    @popup_sprite.y = self.y + popup_pos_y


    @popup_sprite.visible = open? && @background == 0


  end


  #--------------------------------------------------------------------------


  # ○ ポップアップビットマップの設定


  #--------------------------------------------------------------------------


  def set_popup_bitmap(kind)


    @popup_sprite.bitmap.clear


    @popup_sprite.bitmap.blt(0, 0, @popup_bitmap, POPUP_RECT[@position][kind])


  end


  #--------------------------------------------------------------------------


  # ○ ポップアップ種別の設定


  #--------------------------------------------------------------------------


  def popup_kind=(kind)


    set_popup_bitmap(1)


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウ位置の更新


  #--------------------------------------------------------------------------


  def update_pos


    self.x = @event.screen_x + @pos_x


    self.y = @event.screen_y + pos_y


    set_popup_pos


    set_name_window_pos if $imported["A1_Name_Window"]


  end


  #--------------------------------------------------------------------------


  # ○ ネームウィンドウの位置設定


  #--------------------------------------------------------------------------


  def set_name_window_pos


    return unless @name_windows[@name_window_key]


    @name_windows[@name_window_key].x = self.x + 24


    @name_windows[@name_window_key].y = name_window_y


    @name_windows[@name_window_key].z = self.z


    @name_windows[@name_window_key].set_name_sprite_pos


  end


  #--------------------------------------------------------------------------


  # ○ ネームウィンドウのy座標設定


  #--------------------------------------------------------------------------


  def name_window_y


    return self.y + self.height - 12 if @position == 2


    self.y - 16


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウx座標の取得


  #--------------------------------------------------------------------------


  def set_pos_x


    base = @event.screen_x - 64


    return @pos_x = (@screen_width - self.width) - (base + 64) if base + self.width > @screen_width


    @pos_x = -64


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウy座標の取得


  #--------------------------------------------------------------------------


  def pos_y


    return -116 if @position == 0


    return  16 if @position == 2


  end


  #--------------------------------------------------------------------------


  # ○ ポップアップy座標の取得


  #--------------------------------------------------------------------------


  def popup_pos_y


    return self.height - 32 if @position == 0


    return -32 if @position == 2


  end


  #--------------------------------------------------------------------------


  # ○ 自動で閉じる


  #--------------------------------------------------------------------------


  def auto_close


    close


    @close_count = nil


  end


  #--------------------------------------------------------------------------


  # ○ 解放


  #--------------------------------------------------------------------------


  def dispose


    @popup_sprite.bitmap.dispose


    @popup_sprite.dispose


    super


  end


  #--------------------------------------------------------------------------


  # ○ 制御文字の事前変換


  #--------------------------------------------------------------------------


  def convert_escape_characters(text)


    text


  end


  #--------------------------------------------------------------------------


  # ○ 背景ビットマップの作成


  #--------------------------------------------------------------------------


  def create_back_bitmap


  end


  #--------------------------------------------------------------------------


  # ○ 背景スプライトの作成


  #--------------------------------------------------------------------------


  def create_back_sprite


  end


  #--------------------------------------------------------------------------


  # ○ 全ウィンドウの作成


  #--------------------------------------------------------------------------


  def create_all_windows


  end


  #--------------------------------------------------------------------------


  # ○ 全ウィンドウの解放


  #--------------------------------------------------------------------------


  def dispose_all_windows


  end


  #--------------------------------------------------------------------------


  # ○ 全ウィンドウの更新


  #--------------------------------------------------------------------------


  def update_all_windows


  end


  #--------------------------------------------------------------------------


  # ○ 全ウィンドウが完全に閉じているか判定


  #--------------------------------------------------------------------------


  def all_close?


    close?


  end


  #--------------------------------------------------------------------------


  # ○ ファイバーの更新


  #--------------------------------------------------------------------------


  def update_fiber


  end


  #--------------------------------------------------------------------------


  # ○ 入力処理


  #--------------------------------------------------------------------------


  def process_input


    input_pause unless @pause_skip


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウ幅の取得


  #--------------------------------------------------------------------------


  def window_width


    return self.width unless self.disposed?


    Graphics.width


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウ高さの取得


  #--------------------------------------------------------------------------


  def window_height


    fitting_height(visible_line_number)


  end


  #--------------------------------------------------------------------------


  # ○ 表示行数の取得


  #--------------------------------------------------------------------------


  def visible_line_number


    return 2


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウ幅の設定


  #--------------------------------------------------------------------------


  def set_width(width)


    self.width         = width


  end


  #--------------------------------------------------------------------------


  # ○ テキストの設定


  #--------------------------------------------------------------------------


  def text=(text)


    @text = text


  end


  #--------------------------------------------------------------------------


  # ○ 全テキストの処理


  #--------------------------------------------------------------------------


  def process_all_text


    @input_wait = $game_temp.input_wait


    $game_temp.input_wait = true


    set_pos_x


    super


    @init_close_count = CLOSE_COUNT unless @init_close_count


    input_pause


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウを開き、完全に開くまで待つ


  #--------------------------------------------------------------------------


  def open_and_wait


    open


    Fiber.yield until open? if @input_wait


  end


  #--------------------------------------------------------------------------


  # ○ 入力待ち取得


  #--------------------------------------------------------------------------


  def input_wait


    @input_wait


  end


  #--------------------------------------------------------------------------


  # ○ 入力待ち取得


  #--------------------------------------------------------------------------


  def input_wait


    @input_wait


  end


  #--------------------------------------------------------------------------


  # ○ 入力待ち処理


  #--------------------------------------------------------------------------


  def input_pause


    reset_close_count


    super if @input_wait


    @input_wait = true if @parallel_release


    @parallel_release = false


    start_close_count


  end


  #--------------------------------------------------------------------------


  # ○ クローズカウントの開始


  #--------------------------------------------------------------------------


  def start_close_count


    @close_count = @init_close_count


    @init_close_count = nil


  end


  #--------------------------------------------------------------------------


  # ○ クローズカウントの設定


  #--------------------------------------------------------------------------


  def close_count=(count)


    @init_close_count = count


  end


  #--------------------------------------------------------------------------


  # ○ クローズカウントのリセット


  #--------------------------------------------------------------------------


  def reset_close_count


    @close_count      = nil


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウを閉じる


  #--------------------------------------------------------------------------


  def close


    reset_close_count


    super


  end


  #--------------------------------------------------------------------------


  # ○ 改行位置の取得


  #--------------------------------------------------------------------------


  def new_line_x


    $game_message.face_name.empty? ? 0 : 56


  end


  #--------------------------------------------------------------------------


  # ○ 制御文字の処理


  #     code : 制御文字の本体部分（「\C[1]」なら「C」）


  #     text : 描画処理中の文字列バッファ（必要なら破壊的に変更）


  #     pos  : 描画位置 {:x, :y, :new_x, :height}


  #--------------------------------------------------------------------------


  def process_escape_character(code, text, pos)


    case code.upcase


    when 'PR'


      @parallel_release = true


    else


      super


    end


  end


  #--------------------------------------------------------------------------


  # ○ ネームウィンドウの表示


  #--------------------------------------------------------------------------


  def show_name_window(face_name, face_index, x, size = 96)


    super


    set_name_window_pos


  end


end


#==============================================================================


# ■ Window_Base


#------------------------------------------------------------------------------


# 　ゲーム中の全てのウィンドウのスーパークラスです。


#==============================================================================


 


class Window_Base < Window


  #--------------------------------------------------------------------------


  # ☆ 顔グラフィックの描画


  #     enabled : 有効フラグ。false のとき半透明で描画


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wb_draw_face draw_face


  def draw_face(face_name, face_index, x, y, size = 96)


    return draw_face_half(face_name, face_index, x, y, size) if @my_child_window


    a1_child_message_window_wb_draw_face(face_name, face_index, x, y, size)


  end


  #--------------------------------------------------------------------------


  # ○ 顔グラフィックの描画（ハーフサイズ）


  #     enabled : 有効フラグ。false のとき半透明で描画


  #--------------------------------------------------------------------------


  def draw_face_half(face_name, face_index, x, y, enabled = true)


    draw_half_face(face_name, face_index, x, y, enabled) unless face_name.empty?


    show_name_window(face_name, face_index, x, 48) if $imported["A1_Name_Window"]


  end


  #--------------------------------------------------------------------------


  # ○ 顔グラフィックの描画（ハーフサイズ）


  #--------------------------------------------------------------------------


  def draw_half_face(face_name, face_index, x, y, enabled)


    bitmap = Cache.half_face(face_name)


    rect = Rect.new(face_index % 4 * 48, face_index / 4 * 48, 48, 48)


    contents.blt(x, y, bitmap, rect, enabled ? 255 : translucent_alpha)


  end


  #--------------------------------------------------------------------------


  # ☆ 制御文字の事前変換


  #    実際の描画を始める前に、原則として文字列に変わるものだけを置き換える。


  #    文字「\」はエスケープ文字（\e）に変換。


  #--------------------------------------------------------------------------


  alias a1_child_message_window_wb_convert_escape_characters convert_escape_characters


  def convert_escape_characters(text)


    result = a1_child_message_window_wb_convert_escape_characters(text)


    result.gsub!(/\eCC\[(\d+)\]/i)          { set_close_count($1.to_i) }


    result.gsub!(/\eKP/i)                   { set_popup_kind }


    result


  end


end


#==============================================================================


# ■ Game_Message


#------------------------------------------------------------------------------


# 　文章や選択肢などを表示するメッセージウィンドウの状態を扱うクラスです。この


# クラスのインスタンスは $game_message で参照されます。


#==============================================================================


 


class Game_Message


  #--------------------------------------------------------------------------


  # ○ 公開インスタンス変数


  #--------------------------------------------------------------------------


  attr_accessor :close_message


  #--------------------------------------------------------------------------


  # ☆ オブジェクト初期化


  #--------------------------------------------------------------------------


  alias a1_child_message_window_gm_initialize initialize


  def initialize


    a1_child_message_window_gm_initialize


    @input_wait    = true


    @close_message = nil


  end


  #--------------------------------------------------------------------------


  # ○ 表示するテキストの設定


  #--------------------------------------------------------------------------


  def texts=(text)


    @texts = text


  end


end


#==============================================================================


# ■ Game_Temp


#------------------------------------------------------------------------------


# 　セーブデータに含まれない、一時的なデータを扱うクラスです。このクラスのイン


# スタンスは $game_temp で参照されます。


#==============================================================================


 


class Game_Temp


  #--------------------------------------------------------------------------


  # ○ 公開インスタンス変数


  #--------------------------------------------------------------------------


  attr_accessor :input_wait


  attr_accessor :event_popup_id


  #--------------------------------------------------------------------------


  # ☆ オブジェクト初期化


  #--------------------------------------------------------------------------


  alias a1_child_message_gt_initialize initialize


  def initialize


    a1_child_message_gt_initialize


    @input_wait     = true


    @event_popup_id = nil


  end


end


#==============================================================================


# ■ Game_System


#------------------------------------------------------------------------------


# 　システム周りのデータを扱うクラスです。セーブやメニューの禁止状態などを保存


# します。このクラスのインスタンスは $game_system で参照されます。


#==============================================================================


 


class Game_System


  #--------------------------------------------------------------------------


  # ○ 公開インスタンス変数


  #--------------------------------------------------------------------------


  attr_accessor :enable_child_msg


  #--------------------------------------------------------------------------


  # ☆ オブジェクト初期化


  #--------------------------------------------------------------------------


  alias a1_child_message_gs_initialize initialize


  def initialize


    a1_child_message_gs_initialize


    @enable_child_msg = A1_System::CnildMassageWindowConfig::DEFAULT_ENABLE_POPUP


  end


end


#==============================================================================


# ■ A1_System::CommonModule


#==============================================================================


 


class A1_System::CommonModule


  #--------------------------------------------------------------------------


  # ☆ 注釈コマンド定義


  #--------------------------------------------------------------------------


  alias a1_child_message_define_command define_command


  def define_command


    a1_child_message_define_command


    @cmd_108["並列吹き出し"]     = :sub_message


    @cmd_108["吹き出しクローズ"] = :close_popup


    @cmd_108["吹き出し使用"]     = :use_popup_message


    @cmd_108["イベント吹き出し"] = :event_popup_message


  end


end


#==============================================================================


# ■ Game_Interpreter


#------------------------------------------------------------------------------


# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、


# Game_Troop クラス、Game_Event クラスの内部で使用されます。


#==============================================================================


 


class Game_Interpreter


  #--------------------------------------------------------------------------


  # ○ 並列吹き出し


  #--------------------------------------------------------------------------


  def sub_message(params)


    $game_temp.input_wait = false


  end


  #--------------------------------------------------------------------------


  # ○ 吹き出しクローズ


  #--------------------------------------------------------------------------


  def close_popup(params)


    return close_popup_id(params[0]) if params[0].is_a?(Array)


    $game_message.close_message = params[0]


  end


  #--------------------------------------------------------------------------


  # ○ 吹き出しクローズ(ID)


  #--------------------------------------------------------------------------


  def close_popup_id(params)


    $game_message.close_message = "event_id_key_#{params[1].to_i}" if params[0] == "イベント"


  end


  #--------------------------------------------------------------------------


  # ○ 吹き出し使用


  #--------------------------------------------------------------------------


  def use_popup_message(params)


    $game_system.enable_child_msg = params[0] == "on" ? true : false


  end


  #--------------------------------------------------------------------------


  # ○ イベント吹き出し


  #--------------------------------------------------------------------------


  def event_popup_message(params)


    $game_temp.event_popup_id = params[0].to_i


  end


end


#==============================================================================


# ■ Scene_Map


#------------------------------------------------------------------------------


# 　マップ画面の処理を行うクラスです。


#==============================================================================


 


class Scene_Map < Scene_Base


  #--------------------------------------------------------------------------


  # ☆ 場所移動の処理


  #--------------------------------------------------------------------------


  alias a1_child_message_sm_perform_transfer perform_transfer


  def perform_transfer


    prev_map = $game_map.map_id


    a1_child_message_sm_perform_transfer


    @message_window.init_popup_message if prev_map != $game_map.map_id


  end


end


#==============================================================================


# ■ ネームウィンドウインポート時処理


#==============================================================================


if $imported["A1_Name_Window"]


#==============================================================================


# ■ Window_FaceName


#==============================================================================


 


class Window_FaceName < Window_Base


  #--------------------------------------------------------------------------


  # ○ ネームスプライトの位置設定


  #--------------------------------------------------------------------------


  def set_name_sprite_pos


    @name_sprite.x = self.x + self.width / 2


    @name_sprite.y = self.y + self.height / 2


  end


end;end


end

# ===========================================================================
# ◆ A1 Scripts ◆
#    A1共通処理（RGSS2/RGSS3共用）
#
# バージョン   ： 4.50 (2012/01/26)
# 作者         ： A1
# URL　　　　　： [url]http://a1tktk.web.fc2.com/[/url]
# ---------------------------------------------------------------------------
# 更新履歴　　 ：2011/11/11 Ver1.00 新規作成
# 　　　　　　 ：2011/12/22 Ver2.00 RGSS3用と同様の処理に変更
# 　　　　　　 ：2011/12/30 Ver2.10 RGSS3用メソッドを追加
# 　　　　　　 ：2011/12/30 Ver3.00 RGSS3用共通処理と統合
# 　　　　　　 ：2011/12/31 Ver3.10 マップチップサーチの仕様を変更
# 　　　　　　 ：2011/12/31 Ver3.10 拡張通行判定を追加
# 　　　　　　 ：2012/01/01 Ver3.11 クラス名の取得処理を追加
#              ：2012/01/02 Ver3.20 配列を考慮したsplit処理を追加
#              ：2012/01/02 Ver3.20 配列の全ての要素を整数にする処理を追加
#              ：2012/01/02 Ver3.30 注釈の処理の仕様を変更
#              ：2012/01/02 Ver3.40 「前のイベントコマンドの取得」を追加
#              ：2012/01/03 Ver3.50 「フレーム更新」を追加
#              ：2012/01/04 Ver3.60 「指定のウィンドウが開いている間ウェイト」追加
#              ：2012/01/04 Ver3.70 RGSS2用処理見直し
#              ：2012/01/05 Ver3.80 注釈文字列にエスケープコマンド対応
#              ：2012/01/05 Ver3.80 多次元配列を考慮したsplit処理を追加
#              ：2012/01/05 Ver3.80 注釈にスクリプト処理機能を追加
#              ：2012/01/10 Ver3.90 文字縁取り描画を追加
#              ：2012/01/11 Ver4.00 テキストビットマップのキャッシュを追加
#              ：2012/01/13 Ver4.01 「タイルセットの変更」ができなくなる不具合を修正
#              ：2012/01/14 Ver4.10 split処理を強化
#              ：2012/01/14 Ver4.20 空白を含む注釈コマンドに対応
#              ：2012/01/14 Ver4.21 split処理の不具合を修正
#              ：2012/01/21 Ver4.30 メモの内容を取得する関数を追加
#              ：2012/01/24 Ver4.40 メモの内容を取得する関数を追加
#              ：2012/01/24 Ver4.50 メモの内容を取得する関数を追加
# ---------------------------------------------------------------------------
# 設置場所      
#　　なるべく上の方
#
# 必要スクリプト
#    なし
#==============================================================================
$imported = {} if $imported == nil
$imported["A1_Common_Script"] = 4.50
#==============================================================================
# ■ Kernel
#==============================================================================
module Kernel
  #--------------------------------------------------------------------------
  # ○ RGSSのバージョン取得
  #--------------------------------------------------------------------------
  def rgss_version
    return 3 if defined? Graphics.play_movie
    return 2 if defined? Graphics.resize_screen
    return 1
  end
  #--------------------------------------------------------------------------
  # ○ コモンスクリプトのバージョン取得
  #--------------------------------------------------------------------------
  def common_version
    $imported["A1_Common_Script"]
  end
  #--------------------------------------------------------------------------
  # ○ コモンスクリプトのバージョンが古い
  #--------------------------------------------------------------------------
  def old_common_script(script_name, version)
    msgbox("#{script_name}にはA1共通スクリプトVer#{version}以上が必要です")
  end
end
#==============================================================================
# ■ A1_System
#==============================================================================
module A1_System
end
#==============================================================================
# ■ A1_System::CommonModule
#==============================================================================
 
class A1_System::CommonModule
  #--------------------------------------------------------------------------
  # ○ 定数
  #--------------------------------------------------------------------------
  TWOBYTE_LIST = {
                  "　" => " ",
                  "＝" => "=",
                  "：" => ":"
                  }
  #--------------------------------------------------------------------------
  # ○ オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    define_command
  end
  #--------------------------------------------------------------------------
  # ○ 変換対象の全角文字を半角に置換
  #--------------------------------------------------------------------------
  def replace_twobyte(str)
    for key in TWOBYTE_LIST.keys
      str.gsub!(key) {TWOBYTE_LIST[key]}
    end
    return str
  end
  #--------------------------------------------------------------------------
  # ○ マイナスが含まれている文字列を数値にする
  #--------------------------------------------------------------------------
  def minus_to_i(s)
    if s[0,0] == "-"
      s.gsub!("-","")
      return s.to_i * -1
    else
      return s.to_i
    end
  end
  #--------------------------------------------------------------------------
  # ○ ミリ秒単位の現在時間
  #--------------------------------------------------------------------------
  def now_usec
    now = Time.now
    hour = now.hour * 60 * 60
    min  = now.min * 60
    sec  = now.sec
    msec = (now.usec / 1000.0).round 
    return (hour + min + sec) * 1000 + msec
  end
  #--------------------------------------------------------------------------
  # ○ イベントリストの作成
  #--------------------------------------------------------------------------
  def create_event_list(code, indent, parameters)
    list = RPG::EventCommand.new
    list.code       = code
    list.indent     = indent
    list.parameters = parameters
    return list
  end
  #--------------------------------------------------------------------------
  # ○ メソッド呼び出し
  #--------------------------------------------------------------------------
  def send_method(method_name)
    return send(method_name) if respond_to?(method_name)
  end
  #--------------------------------------------------------------------------
  # ○ オブジェクトの型を判断してStringならエンコード
  #--------------------------------------------------------------------------
  def encoding_string(obj)
    obj.force_encoding("UTF-8") if obj.is_a?(String)
    return obj
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容から必要な情報を取得
  #--------------------------------------------------------------------------
  def note_data(note, key)
    result = []
    note.each_line {|line|
      next unless line =~ /<#{key}[ ]?(.*)>/
      return true if $1.empty?
      data = $a1_common.replace_twobyte($1).split(" ")
      for st in data
        result.push(st)
      end
    }
    return false if result.empty?
    return result
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容からハッシュを作成
  #--------------------------------------------------------------------------
  def note_data_hash(note, key, data_default = nil, default = {}, ret = {})
    list = note_data_split(note, key)
    return default if list.empty?
    list.each {|data| ret[data[0]] = data[1] ? data[1] : data_default }
    return ret
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容からカンマ区切りの多元配列を取得
  #--------------------------------------------------------------------------
  def note_data_split(note, key, default = [], ret = [])
    data = note_data(note, key)
    return default unless data.is_a?(Array)
    data.each {|str| ret.push(convert_integer_from_array(split_array(str)))}
    return ret
  end
  #--------------------------------------------------------------------------
  # ○ 配列の内容から数値があれば変換
  #--------------------------------------------------------------------------
  def convert_integer_from_array(data, ret = [])
    data.each {|str| ret.push(convert_integer(str))}
    return ret
  end
  #--------------------------------------------------------------------------
  # ○ 数値があれば変換
  #--------------------------------------------------------------------------
  def convert_integer(str)
    return $1.to_i if str =~ /(^[-]?[0-9]+$)/ 
    str.is_a?(Array) ? convert_integer_from_array(str) : str
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容から単項目の数値を取得
  #--------------------------------------------------------------------------
  def note_data_one_value(note, key, default)
    data = note_data(note, key)
    return data[0].to_i if data.is_a?(Array)
    return default
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容から単項目を取得
  #--------------------------------------------------------------------------
  def note_data_one(note, key, default)
    data = note_data(note, key)
    return data[0] if data.is_a?(Array)
    return default
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容からカンマ区切りの文字列を取得
  #--------------------------------------------------------------------------
  def note_data_array_str(note, key, default)
    data = note_data(note, key)
    return data[0].split(",") if data.is_a?(Array)
    return default
  end
  #--------------------------------------------------------------------------
  # ○ メモの内容からカンマ区切りの数値を取得
  #--------------------------------------------------------------------------
  def note_data_array_value(note, key, default)
    data = note_data(note, key)
    return default unless data.is_a?(Array)
    return convert_integer_from_array(split_array(data[0]))
  end
  #--------------------------------------------------------------------------
  # ○ カンマ区切りの文字列メモを変換
  #--------------------------------------------------------------------------
  def note_data_array(note, key, type, default = nil, through = true)
    ret = []
    default.each {|dat| ret.push(dat)} if default != nil
 
    data = note_data(note, key)
    return ret unless data.is_a?(Array)
 
    data = data[0].split(",")
    for d in data
      next if ret.include?(d) if through
      ret.push(d.to_i) if type.is_a?(Integer)
      ret.push(d)      if type.is_a?(String)
    end
    return ret
  end
  #--------------------------------------------------------------------------
  # ○ ディレクトリの作成
  #--------------------------------------------------------------------------
  def make_directory(dir_name)
    Dir::mkdir(dir_name) unless FileTest.exist?(dir_name)
  end
  #--------------------------------------------------------------------------
  # ○ コマンドリスト
  #--------------------------------------------------------------------------
  def make_command(command, src = "", dect = "")
    src.gsub!("/","\\")
    dect.gsub!("/","\\")
    cmd = "#{command} \"#{src}\" \"#{dect}\""
    return cmd
  end
  #--------------------------------------------------------------------------
  # ○ 素材の拡張子を取得
  #--------------------------------------------------------------------------
  def material_ext(directory, file, direct = false)
    exts = []
    exts = [".png",".bmp",".jpg"]               if directory =~ /(.*)Graphics\/(.*)/
    exts = [".mid",".ogg",".wav",".mp3",".wma"] if directory =~ /(.*)Audio(.*)/
 
    find_file = sprintf("%s%s", directory, file) unless direct
    find_file = file if direct
 
    for ext in exts
      return ext if File.exist?(sprintf("%s%s", find_file, ext))
    end
    return nil
  end
  #--------------------------------------------------------------------------
  # ○ 素材が存在するかチェック
  #--------------------------------------------------------------------------
  def material_exist?(directory, file, direct = false)
    return false if material_ext(directory, file, direct) == nil
    return true
  end
  #--------------------------------------------------------------------------
  # ○ ファイルコピー
  #--------------------------------------------------------------------------
  def copy_file(src, dest)
    srcFile = File.open( src, "rb" )
    dstFile = File.open( dest, "wb" )
    dstFile.write( srcFile.read )
    srcFile.close
    dstFile.close
  end
  #--------------------------------------------------------------------------
  # ○ ファイルの存在を確認してファイルコピー
  #--------------------------------------------------------------------------
  def material_copy(src, dest, directory)
    ext = material_ext(directory, src, true)
    copy_file( src + ext, dest + ext ) if ext != nil
  end
  #--------------------------------------------------------------------------
  # ○ 配列からAudioを作成
  #--------------------------------------------------------------------------
  def set_audio(sound, kind)
    case kind
    when "BGM"; audio = RPG::BGM.new
    when "BGS"; audio = RPG::BGS.new
    when "ME";  audio = RPG::ME.new
    when "SE";  audio = RPG::SE.new
    end
    audio.name   = sound[0]
    audio.volume = sound[1]
    audio.pitch  = sound[2]
    return audio
  end
  #--------------------------------------------------------------------------
  # ○ 既に準拠識別子を持っているかチェック
  #--------------------------------------------------------------------------
  def chk_rtp(file_name, default)
    return "" if file_name =~ /^VX_.*/
    return "" if file_name =~ /^XP_.*/
    return "" if file_name =~ /^2000_.*/
    return "" if file_name =~ /^2003_.*/
    return default
  end
  #--------------------------------------------------------------------------
  # ○ 先頭の $ を切り出す
  #--------------------------------------------------------------------------
  def one_character(file_name)
    return file_name unless file_name[0] == "$"
    tmp = file_name.clone
    tmp[0] = ""
    return tmp
  end
  #--------------------------------------------------------------------------
  # ○ 配列を入れ替える
  #--------------------------------------------------------------------------
  def change_array(array, index1, index2)
    tmp = array[index1]
    array[index1] = array[index2]
    array[index2] = tmp
    return array
  end
  #--------------------------------------------------------------------------
  # ○ 移動ルートの作成
  #--------------------------------------------------------------------------
  def create_move_route(repeat, skippable, wait, list)
    move_route = RPG::MoveRoute.new
    move_route.repeat    = repeat
    move_route.skippable = skippable
    move_route.wait      = wait
    move_route.list      = list
    return move_route
  end
  #--------------------------------------------------------------------------
  # ○ 移動ルートコマンドの作成
  #--------------------------------------------------------------------------
  def create_move_command(code, parameters)
    list = RPG::MoveCommand.new
    list.code       = code
    list.parameters = parameters
    return list
  end
  #--------------------------------------------------------------------------
  # ○ インタプリタ起動用リストの作成
  #--------------------------------------------------------------------------
  def create_list(code, indent, parameters)
    list            = RPG::EventCommand.new
    list.code       = code
    list.indent     = indent
    list.parameters = parameters
    return list
  end
  #--------------------------------------------------------------------------
  # ○ クラス名の取得
  #--------------------------------------------------------------------------
  def class_name(class_instance)
    return class_instance.to_s.split(":")[0].gsub("#<","")
  end
  #--------------------------------------------------------------------------
  # ○ 配列を考慮したsplit
  #--------------------------------------------------------------------------
  def split_array(str)
    str = convert_escape_characters(str)
 
    ret       = []
    tmp_array = str.split(",")
 
    return strip_array_str(tmp_array) unless str.include?("[")
    tmp_str   = ""
    tmp_array.each {|s|
      if char_in_str(s, "[", "]") && tmp_str.empty?
        ret.push(s) unless s =~ /^\[/
        ret.push([s[1...s.size-1]]) if s =~ /^\[/
      else
        tmp_str = "#{tmp_str}#{s},"
        if char_in_str(tmp_str, "[", "]")
          unless tmp_str =~ /^\[/
            ret.push(tmp_str[0...tmp_str.size-1])
            tmp_str = ""
          else
            tmp_str = tmp_str[1...tmp_str.size-2]
            tmp_str = split_array(tmp_str) if tmp_str.include?("[")
            tmp_str = tmp_str.split(",") if tmp_str.include?(",")
            ret.push(tmp_str)   if tmp_str.is_a?(Array)
            ret.push([tmp_str]) if !tmp_str.is_a?(Array)
            tmp_str = ""
          end
        end
      end
    }
    return strip_array_str(ret)
  end
  #--------------------------------------------------------------------------
  # ○ 配列の中の文字列の先頭と末尾の空白を除去
  #--------------------------------------------------------------------------
  def strip_array_str(array, ret = [])
    array.each {|str| ret.push(strip_array_str(str)) if str.is_a?(Array); next if str.is_a?(Array); ret.push(str.strip) }
    return ret
  end
  #--------------------------------------------------------------------------
  # ○ 文字列の中に文字が何文字含まれているか調べて同数ならtrueを返す
  #--------------------------------------------------------------------------
  def char_in_str(str, c1, c2)
    num1 = 0
    num2 = 0
    (0...str.size).each {|i| num1 += 1 if str[i] == c1; num2 += 1 if str[i] == c2 }
    return num1 == num2
  end
  #--------------------------------------------------------------------------
  # ○ 制御文字の変換
  #--------------------------------------------------------------------------
  def convert_escape_characters(text)
    result = text.to_s.clone
    result.gsub!(/\\/)                           { "\e" }
    result.gsub!(/\e\e/)                         { "\\" }
    result.gsub!(/\eV\[(\d+)\]/i)                { $game_variables[$1.to_i] }
    result.gsub!(/\eV\[(\d+)\]/i)                { $game_variables[$1.to_i] }
    result.gsub!(/\eN\[(\d+)\]/i)                { actor_name($1.to_i) }
    result.gsub!(/\eP\[(\d+)\]/i)                { party_member_name($1.to_i) }
    result.gsub!(/\eG/i)                         { Vocab::currency_unit }
    loop { result = result.sub(/<s>(.+?)<\/s>/i) { eval($1) }; break unless $1 }
    result
  end
  #--------------------------------------------------------------------------
  # ○ アクター n 番の名前を取得
  #--------------------------------------------------------------------------
  def actor_name(n)
    actor = n >= 1 ? $game_actors[n] : nil
    actor ? actor.name : ""
  end
  #--------------------------------------------------------------------------
  # ○ パーティメンバー n 番の名前を取得
  #--------------------------------------------------------------------------
  def party_member_name(n)
    actor = n >= 1 ? $game_party.members[n - 1] : nil
    actor ? actor.name : ""
  end
  #--------------------------------------------------------------------------
  # ○ 配列を全て整数にする
  #--------------------------------------------------------------------------
  def params_to_i(params)
    ret = []
    params.each {|param| ret.push(param.to_i)}
    return ret
  end
  #--------------------------------------------------------------------------
  # ○ 注釈コマンド定義
  #--------------------------------------------------------------------------
  def define_command
    @cmd_108 = {}
  end
  #--------------------------------------------------------------------------
  # ○ 注釈コマンド定義取得
  #--------------------------------------------------------------------------
  def cmd_108
    @cmd_108
  end
  #--------------------------------------------------------------------------
  # ○ フレーム更新
  #--------------------------------------------------------------------------
  def update
  end
  #--------------------------------------------------------------------------
  # ○ 文字の幅と高さを取得
  #--------------------------------------------------------------------------
  def text_size(font, size, text)
    bitmap = Cache.system("")
    bitmap.font.name = font
    bitmap.font.size = size
    tw = bitmap.text_size(text).width
    th = bitmap.text_size(text).height
    bitmap.dispose
    return [tw, th]
  end
  #--------------------------------------------------------------------------
  # ○ 文字の幅を取得
  #--------------------------------------------------------------------------
  def text_width(font, text)
    texts = text.split("\n")
    @max_width = 0
    texts.each {|text|
      width = text_size(font.name, font.size, text)[0]
      @max_width = @max_width < width ? width : @max_width
    }
    return @max_width
  end
end
#==============================================================================
# ◆ RGSS3用処理
#==============================================================================
if rgss_version == 3
#==============================================================================
# ■ RPG::Tileset
#==============================================================================
 
class RPG::Tileset
  #--------------------------------------------------------------------------
  # ○ 拡張通行判定
  #--------------------------------------------------------------------------
  def ex_flags
    @ex_flags ||= Table.new(8192)
    return @ex_flags
  end
  #--------------------------------------------------------------------------
  # ○ 拡張通行判定初期化
  #--------------------------------------------------------------------------
  def init_ex_flags
    @ex_flags = Table.new(8192)
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
 
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ☆ オブジェクト初期化
  #     depth : ネストの深さ
  #--------------------------------------------------------------------------
  alias a1_common_gi_rgss3_initialize initialize
  def initialize(depth = 0, sub_interpreter = false)
    @sub_interpreter = sub_interpreter
    a1_common_gi_rgss3_initialize(depth)
  end
  #--------------------------------------------------------------------------
  # ☆ メッセージ表示がビジー状態の間ウェイト
  #--------------------------------------------------------------------------
  alias a1_common_gi_wait_for_message wait_for_message
  def wait_for_message
    return if @sub_interpreter
    a1_common_gi_wait_for_message
  end
end
#==============================================================================
# ■ Window_Message
#------------------------------------------------------------------------------
# 　文章表示に使うメッセージウィンドウです。
#==============================================================================
 
class Window_Message < Window_Base
  #--------------------------------------------------------------------------
  # ☆ 通常文字の処理
  #--------------------------------------------------------------------------
  alias a1_common_wm_process_normal_character process_normal_character
  def process_normal_character(c, pos)
    wait_for_one_character_before
    a1_common_wm_process_normal_character(c, pos)
  end
  #--------------------------------------------------------------------------
  # ○ 一文字出力前のウェイト
  #--------------------------------------------------------------------------
  def wait_for_one_character_before
  end
end
#==============================================================================
# ■ RPG::Map
#==============================================================================
 
class RPG::Map
  #--------------------------------------------------------------------------
  # ○ マップチップを調べるか判定する
  #--------------------------------------------------------------------------
  def search_map_chip?
    return true if $a1_common.note_data(self.note, "マップチップサーチ")
    return false
  end
end
#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。
# このクラスのインスタンスは $game_map で参照されます。
#==============================================================================
 
class Game_Map
  #--------------------------------------------------------------------------
  # ☆ セットアップ
  #--------------------------------------------------------------------------
  alias a1_common_gm_setup setup
  def setup(map_id)
    a1_common_gm_setup(map_id)
    setup_tileset
    map_chip_search if search_map_chip?
  end
  #--------------------------------------------------------------------------
  # ★ タイルセットの取得
  #--------------------------------------------------------------------------
  def tileset
    setup_tileset unless @tileset && @now_tileset_id == @tileset_id
    return @tileset
  end
  #--------------------------------------------------------------------------
  # ○ タイルセットのセットアップ
  #--------------------------------------------------------------------------
  def setup_tileset
    @tileset        = $data_tilesets[@tileset_id].clone
    @tileset.flags  = $data_tilesets[@tileset_id].flags.clone
    @now_tileset_id = @tileset_id
  end
  #--------------------------------------------------------------------------
  # ○ マップチップを調べるか判定する
  #--------------------------------------------------------------------------
  def search_map_chip?
    return @map.search_map_chip?
  end
  #--------------------------------------------------------------------------
  # ○ 指定座標の全レイヤーのフラグ判定（イベント含む）
  #--------------------------------------------------------------------------
  def all_tiles_flag?(x, y, bit)
    all_tiles(x, y).any? {|tile_id| tileset.flags[tile_id] & bit != 0 }
  end
  #--------------------------------------------------------------------------
  # ○ 指定座標の全レイヤーの拡張フラグ判定（イベント含む）
  #--------------------------------------------------------------------------
  def all_tiles_flag_ex?(x, y, bit)
    all_tiles(x, y).any? {|tile_id| tileset.ex_flags[tile_id] & bit != 0 }
  end
  #--------------------------------------------------------------------------
  # ○ 指定座標の全レイヤーの拡張フラグ判定
  #--------------------------------------------------------------------------
  def layered_tiles_flag_ex?(x, y, bit)
    layered_tiles(x, y).any? {|tile_id| tileset.ex_flags[tile_id] & bit != 0 }
  end
  #--------------------------------------------------------------------------
  # ○ 地形タグの取得（イベント含む）
  #--------------------------------------------------------------------------
  def terrain_tag_all_tailes(x, y)
    return 0 unless valid?(x, y)
    all_tiles(x, y).each do |tile_id|
      tag = tileset.flags[tile_id] >> 12
      return tag if tag > 0
    end
    return 0
  end
end
#==============================================================================
# ■ DataManager
#------------------------------------------------------------------------------
# 　データベースとゲームオブジェクトを管理するモジュールです。ゲームで使用する
# ほぼ全てのグローバル変数はこのモジュールで初期化されます。
#==============================================================================
 
module DataManager
  #--------------------------------------------------------------------------
  # ○ エイリアス用特異メソッド
  #--------------------------------------------------------------------------
  class << self
    alias :a1_common_create_game_objects :create_game_objects
  end
  #--------------------------------------------------------------------------
  # ☆ 各種ゲームオブジェクトの作成
  #--------------------------------------------------------------------------
  def self.create_game_objects
    $a1_common ||= A1_System::CommonModule.new
    a1_common_create_game_objects
  end
end
#==============================================================================
# ■ Scene_Base
#------------------------------------------------------------------------------
# 　ゲーム中の全てのシーンのスーパークラスです。
#==============================================================================
 
class Scene_Base
  #--------------------------------------------------------------------------
  # ☆ フレーム更新（基本）
  #--------------------------------------------------------------------------
  alias a1_common_sb_update_basic update_basic
  def update_basic
    a1_common_sb_update_basic
    $a1_common.update
  end
  #--------------------------------------------------------------------------
  # ○ 指定のウィンドウが開いている間ウェイト
  #--------------------------------------------------------------------------
  def wait_for_window_open(window)
    update_basic until window.openness == 0
  end
end
#==============================================================================
# ■ Window_Base
#------------------------------------------------------------------------------
# 　ゲーム中の全てのウィンドウのスーパークラスです。
#==============================================================================
 
class Window_Base < Window
  #--------------------------------------------------------------------------
  # ★ 制御文字の事前変換
  #    実際の描画を始める前に、原則として文字列に変わるものだけを置き換える。
  #    文字「\」はエスケープ文字（\e）に変換。
  #--------------------------------------------------------------------------
  def convert_escape_characters(text)
    return $a1_common.convert_escape_characters(text)
  end
end
#==============================================================================
# ◆ RGSS2用処理
#==============================================================================
elsif rgss_version == 2
#==============================================================================
# ■ Window
#==============================================================================
 
class Window
  #--------------------------------------------------------------------------
  # ○ ウィンドウが開いている？
  #--------------------------------------------------------------------------
  def open?
    return self.openness == 255
  end
  #--------------------------------------------------------------------------
  # ○ ウィンドウが閉じている？
  #--------------------------------------------------------------------------
  def close?
    return self.openness == 0
  end
end
#==============================================================================
# ■ Cache
#------------------------------------------------------------------------------
# 　各種グラフィックを読み込み、Bitmap オブジェクトを作成、保持するモジュール
# です。読み込みの高速化とメモリ節約のため、作成した Bitmap オブジェクトを内部
# のハッシュに保存し、同じビットマップが再度要求されたときに既存のオブジェクト
# を返すようになっています。
#==============================================================================
 
module Cache
  #--------------------------------------------------------------------------
  # ○ キャッシュ存在チェック
  #--------------------------------------------------------------------------
  def self.include?(key)
    @cache[key] && !@cache[key].disposed?
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
 
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ○ 注釈
  #--------------------------------------------------------------------------
  def command_108
    @comments = [@params[0]]
    while next_event_code == 408
      @index += 1
      @comments.push(@list[@index].parameters[0])
    end
  end
  #--------------------------------------------------------------------------
  # ★ イベントコマンドの実行
  #--------------------------------------------------------------------------
  def execute_command
    return rgss3_execute_command unless @index >= @list.size-1
    command_end
    return true
  end
  #--------------------------------------------------------------------------
  # ○ RGSS3風「イベントコマンドの実行」
  #--------------------------------------------------------------------------
  def rgss3_execute_command
    command = @list[@index]
    @params = command.parameters
    @indent = command.indent
    method_name = "command_#{command.code}"
    send(method_name) if respond_to?(method_name)
  end
  #--------------------------------------------------------------------------
  # ○ 次のイベントコマンドのコードを取得
  #--------------------------------------------------------------------------
  def next_event_code
    @list[@index + 1].code
  end
end
#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。
# このクラスのインスタンスは $game_map で参照されます。
#==============================================================================
 
class Game_Map
  #--------------------------------------------------------------------------
  # ○ マップチップを調べるか判定する
  #--------------------------------------------------------------------------
  def search_map_chip?
    return $data_map_infos[@map_id].name =~ /\[サーチ\]/
  end
  #--------------------------------------------------------------------------
  # ○ 指定座標に存在するタイル扱いイベント（すり抜け以外）の配列取得
  #--------------------------------------------------------------------------
  def tile_events_xy(x, y)
    @tile_events.select {|event| event.pos_nt?(x, y) }
  end
  #--------------------------------------------------------------------------
  # ○ タイル扱いイベントの配列をリフレッシュ
  #--------------------------------------------------------------------------
  def refresh_tile_events
    @tile_events = @events.values.select {|event| event.tile? }
  end
end
#==============================================================================
# ■ Game_Character
#------------------------------------------------------------------------------
# 　キャラクターを扱うクラスです。このクラスは Game_Player クラスと Game_Event
# クラスのスーパークラスとして使用されます。
#==============================================================================
 
class Game_Character
  #--------------------------------------------------------------------------
  # ○ タイル判定
  #--------------------------------------------------------------------------
  def tile?
    @tile_id > 0 && @priority_type == 0
  end
end
#==============================================================================
# ■ Scene_Title
#------------------------------------------------------------------------------
# 　タイトル画面の処理を行うクラスです。
#==============================================================================
 
class Scene_Title < Scene_Base
  #--------------------------------------------------------------------------
  # ☆ データベースのロード
  #--------------------------------------------------------------------------
  alias a1_common_st_load_database load_database
  def load_database
    a1_common_st_load_database
    $data_map_infos = load_data("Data/MapInfos.rvdata")
  end
  #--------------------------------------------------------------------------
  # ☆ 各種ゲームオブジェクトの作成
  #--------------------------------------------------------------------------
  alias a1_common_st_create_game_objects create_game_objects
  def create_game_objects
    $a1_common ||= A1_System::CommonModule.new
    a1_common_st_create_game_objects
  end
end
#==============================================================================
# ◆ RGSS用処理
#==============================================================================
elsif rgss_version == 1
end
#==============================================================================
# ■ Cache
#------------------------------------------------------------------------------
# 　各種グラフィックを読み込み、Bitmap オブジェクトを作成、保持するモジュール
# です。読み込みの高速化とメモリ節約のため、作成した Bitmap オブジェクトを内部
# のハッシュに保存し、同じビットマップが再度要求されたときに既存のオブジェクト
# を返すようになっています。
#==============================================================================
 
module Cache
  #--------------------------------------------------------------------------
  # ○ 拡大縮小したビットマップのロード
  #--------------------------------------------------------------------------
  def self.load_resize_bitmap(load_path, key, resize = nil)
    @cache ||= {}
    key = load_path if key == nil
    return @cache[key] if include?(key)
 
    @cache[key] = Bitmap.new(load_path)
    return @cache[key] if resize == nil
    return @cache[key] if @cache[key].width == resize[0] and @cache[key].height == resize[1]
 
    info = calc_size(resize, key)
    return resize_bitmap(@cache[key], info[0], info[1], key)
  end
  #--------------------------------------------------------------------------
  # ○ 拡大縮小した色相変化済みビットマップを作成／取得
  #--------------------------------------------------------------------------
  def self.load_resize_hue_changed_bitmap(load_path, path, hue, resize)
    key = [path, hue]
    return @cache[key] if include?(key)
 
    @cache[key] = load_resize_bitmap(load_path, path, resize).clone
    @cache[key].hue_change(hue)
    return @cache[key]
  end
  #--------------------------------------------------------------------------
  # ○ リサイズするサイズを取得
  #--------------------------------------------------------------------------
  def self.calc_size(resize, key)
    width  = resize[0]
    width  = @cache[key].width * width.abs if width < 0
    height = resize[1]
    height = @cache[key].height * height.abs if height < 0
    height = Integer(@cache[key].height * (width.to_f / @cache[key].width.to_f)) if height == 0
    return [width, height]
  end
  #--------------------------------------------------------------------------
  # ○ ビットマップの拡大縮小
  #--------------------------------------------------------------------------
  def self.resize_bitmap(bitmap, width, height, key)
    resize = Bitmap.new(width, height)
    resize.stretch_blt(resize.rect, bitmap, bitmap.rect)
    @cache[key] = resize
    return resize
  end
  #--------------------------------------------------------------------------
  # ○ テキストビットマップの取得
  #--------------------------------------------------------------------------
  def self.text_picture(text, font)
    load_text_bitmap(text, font)
  end
  #--------------------------------------------------------------------------
  # ○ フォントのキーを作成
  #--------------------------------------------------------------------------
  def self.make_font_key(text, font)
    [text, font.name, font.size, font.bold, font.italic, font.outline, font.shadow, font.color.to_s, font.out_color.to_s]
  end
  #--------------------------------------------------------------------------
  # ○ テキストビットマップの作成
  #--------------------------------------------------------------------------
  def self.load_text_bitmap(text, font)
    @cache ||= {}
    key = make_font_key(text, font)
    return @cache[key] if include?(key)
 
    # 計算用ダミービットマップ
    bitmap = Cache.system("")
    bitmap.font = font
    tw = bitmap.text_size(text).width + 8
 
    # ビットマップ作成
    bitmap = Bitmap.new(tw, bitmap.font.size + 4)
    bitmap.font = font
    bitmap.draw_text(0, 0, bitmap.width, bitmap.height, text, 1)
 
    @cache[key] = bitmap
    return @cache[key]
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
 
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ○ 注釈
  #--------------------------------------------------------------------------
  alias a1_common_command_108 command_108
  def command_108
    a1_common_command_108
    proc_comment(@comments)
  end
  #--------------------------------------------------------------------------
  # ○ 注釈の処理
  #--------------------------------------------------------------------------
  def proc_comment(comments)
    param = ""
    comments.each {|comment| param += comment }
    params = param.sub(/^(\S+)/, "")
    command = $1
    comment_parameters = $a1_common.split_array(params) if params
    proc_comment_command(command, comment_parameters)
  end
  #--------------------------------------------------------------------------
  # ○ 注釈の実行
  #--------------------------------------------------------------------------
  def proc_comment_command(command, params)
    cmd_108 = $a1_common.cmd_108[command]
    method(cmd_108).call(params) if cmd_108 != nil
  end
  #--------------------------------------------------------------------------
  # ○ 前のイベントコマンドを取得
  #--------------------------------------------------------------------------
  def prev_event
    @list[@index - 1]
  end
end
#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。
# このクラスのインスタンスは $game_map で参照されます。
#==============================================================================
 
class Game_Map
  #--------------------------------------------------------------------------
  # ○ 全マップチップを調べる
  #--------------------------------------------------------------------------
  def map_chip_search
    tileset.init_ex_flags
    ([email]0...@map.data.xsize[/email]).each {|x| map_chip_search_y(x) }
  end
  #--------------------------------------------------------------------------
  # ○ x座標にあるy座標のマップチップを調べる
  #--------------------------------------------------------------------------
  def map_chip_search_y(x)
    ([email]0...@map.data.ysize[/email]).each {|y| map_pos_proc(x, y); map_chip_search_z(x, y) }
  end
  #--------------------------------------------------------------------------
  # ○ x,y座標にあるz座標のマップチップを調べる
  #--------------------------------------------------------------------------
  def map_chip_search_z(x, y)
    ([email]0...@map.data.zsize[/email]).each {|z| map_chip_proc(x, y, z) }
    tile_events_xy(x, y).collect {|ev| tile_event_proc(ev.tile_id) }
  end
  #--------------------------------------------------------------------------
  # ○ 座標に対して処理を行う
  #--------------------------------------------------------------------------
  def map_pos_proc(x, y)
  end
  #--------------------------------------------------------------------------
  # ○ マップチップに対して処理を行う
  #--------------------------------------------------------------------------
  def map_chip_proc(x, y, z)
  end
  #--------------------------------------------------------------------------
  # ○ タイルのイベントに対して処理を行う
  #--------------------------------------------------------------------------
  def tile_event_proc(tile_id)
  end
end
#==============================================================================
# ■ Window_Base
#------------------------------------------------------------------------------
# 　ゲーム中の全てのウィンドウのスーパークラスです。
#==============================================================================
 
class Window_Base < Window
  #--------------------------------------------------------------------------
  # ○ 入力を受け付けるか？
  #--------------------------------------------------------------------------
  def can_input?
    @can_input
  end
  #--------------------------------------------------------------------------
  # ○ 入力受け付け設定
  #--------------------------------------------------------------------------
  def can_input=(flag)
    @can_input = flag
  end
end
#==============================================================================
# ■ Bitmap
#==============================================================================
 
class Bitmap
  #--------------------------------------------------------------------------
  # ○ 文字縁取り描画
  #--------------------------------------------------------------------------
  def draw_text_f(x, y, width, height, str, align = 0, color = Color.new(64,32,128))
    shadow = self.font.shadow
    b_color = self.font.color.dup
    font.shadow = false
    font.color = color
    draw_text(x + 1, y, width, height, str, align) 
    draw_text(x - 1, y, width, height, str, align) 
    draw_text(x, y + 1, width, height, str, align) 
    draw_text(x, y - 1, width, height, str, align) 
    font.color = b_color
    draw_text(x, y, width, height, str, align)
    font.shadow = shadow
  end
  #--------------------------------------------------------------------------
  # ○ 文字縁取り描画の矩形を取得
  #--------------------------------------------------------------------------
  def draw_text_f_rect(r, str, align = 0, color = Color.new(64,32,128)) 
    draw_text_f(r.x, r.y, r.width, r.height, str, align = 0, color) 
  end
end

# ===========================================================================


# ◆ A1 Scripts ◆


#    A1共通処理（RGSS2/RGSS3共用）


#


# バージョン   ： 4.50 (2012/01/26)


# 作者         ： A1


# URL　　　　　： [url]http://a1tktk.web.fc2.com/[/url]


# ---------------------------------------------------------------------------


# 更新履歴　　 ：2011/11/11 Ver1.00 新規作成


# 　　　　　　 ：2011/12/22 Ver2.00 RGSS3用と同様の処理に変更


# 　　　　　　 ：2011/12/30 Ver2.10 RGSS3用メソッドを追加


# 　　　　　　 ：2011/12/30 Ver3.00 RGSS3用共通処理と統合


# 　　　　　　 ：2011/12/31 Ver3.10 マップチップサーチの仕様を変更


# 　　　　　　 ：2011/12/31 Ver3.10 拡張通行判定を追加


# 　　　　　　 ：2012/01/01 Ver3.11 クラス名の取得処理を追加


#              ：2012/01/02 Ver3.20 配列を考慮したsplit処理を追加


#              ：2012/01/02 Ver3.20 配列の全ての要素を整数にする処理を追加


#              ：2012/01/02 Ver3.30 注釈の処理の仕様を変更


#              ：2012/01/02 Ver3.40 「前のイベントコマンドの取得」を追加


#              ：2012/01/03 Ver3.50 「フレーム更新」を追加


#              ：2012/01/04 Ver3.60 「指定のウィンドウが開いている間ウェイト」追加


#              ：2012/01/04 Ver3.70 RGSS2用処理見直し


#              ：2012/01/05 Ver3.80 注釈文字列にエスケープコマンド対応


#              ：2012/01/05 Ver3.80 多次元配列を考慮したsplit処理を追加


#              ：2012/01/05 Ver3.80 注釈にスクリプト処理機能を追加


#              ：2012/01/10 Ver3.90 文字縁取り描画を追加


#              ：2012/01/11 Ver4.00 テキストビットマップのキャッシュを追加


#              ：2012/01/13 Ver4.01 「タイルセットの変更」ができなくなる不具合を修正


#              ：2012/01/14 Ver4.10 split処理を強化


#              ：2012/01/14 Ver4.20 空白を含む注釈コマンドに対応


#              ：2012/01/14 Ver4.21 split処理の不具合を修正


#              ：2012/01/21 Ver4.30 メモの内容を取得する関数を追加


#              ：2012/01/24 Ver4.40 メモの内容を取得する関数を追加


#              ：2012/01/24 Ver4.50 メモの内容を取得する関数を追加


# ---------------------------------------------------------------------------


# 設置場所      


#　　なるべく上の方


#


# 必要スクリプト


#    なし


#==============================================================================


$imported = {} if $imported == nil


$imported["A1_Common_Script"] = 4.50


#==============================================================================


# ■ Kernel


#==============================================================================


module Kernel


  #--------------------------------------------------------------------------


  # ○ RGSSのバージョン取得


  #--------------------------------------------------------------------------


  def rgss_version


    return 3 if defined? Graphics.play_movie


    return 2 if defined? Graphics.resize_screen


    return 1


  end


  #--------------------------------------------------------------------------


  # ○ コモンスクリプトのバージョン取得


  #--------------------------------------------------------------------------


  def common_version


    $imported["A1_Common_Script"]


  end


  #--------------------------------------------------------------------------


  # ○ コモンスクリプトのバージョンが古い


  #--------------------------------------------------------------------------


  def old_common_script(script_name, version)


    msgbox("#{script_name}にはA1共通スクリプトVer#{version}以上が必要です")


  end


end


#==============================================================================


# ■ A1_System


#==============================================================================


module A1_System


end


#==============================================================================


# ■ A1_System::CommonModule


#==============================================================================


 


class A1_System::CommonModule


  #--------------------------------------------------------------------------


  # ○ 定数


  #--------------------------------------------------------------------------


  TWOBYTE_LIST = {


                  "　" => " ",


                  "＝" => "=",


                  "：" => ":"


                  }


  #--------------------------------------------------------------------------


  # ○ オブジェクト初期化


  #--------------------------------------------------------------------------


  def initialize


    define_command


  end


  #--------------------------------------------------------------------------


  # ○ 変換対象の全角文字を半角に置換


  #--------------------------------------------------------------------------


  def replace_twobyte(str)


    for key in TWOBYTE_LIST.keys


      str.gsub!(key) {TWOBYTE_LIST[key]}


    end


    return str


  end


  #--------------------------------------------------------------------------


  # ○ マイナスが含まれている文字列を数値にする


  #--------------------------------------------------------------------------


  def minus_to_i(s)


    if s[0,0] == "-"


      s.gsub!("-","")


      return s.to_i * -1


    else


      return s.to_i


    end


  end


  #--------------------------------------------------------------------------


  # ○ ミリ秒単位の現在時間


  #--------------------------------------------------------------------------


  def now_usec


    now = Time.now


    hour = now.hour * 60 * 60


    min  = now.min * 60


    sec  = now.sec


    msec = (now.usec / 1000.0).round 


    return (hour + min + sec) * 1000 + msec


  end


  #--------------------------------------------------------------------------


  # ○ イベントリストの作成


  #--------------------------------------------------------------------------


  def create_event_list(code, indent, parameters)


    list = RPG::EventCommand.new


    list.code       = code


    list.indent     = indent


    list.parameters = parameters


    return list


  end


  #--------------------------------------------------------------------------


  # ○ メソッド呼び出し


  #--------------------------------------------------------------------------


  def send_method(method_name)


    return send(method_name) if respond_to?(method_name)


  end


  #--------------------------------------------------------------------------


  # ○ オブジェクトの型を判断してStringならエンコード


  #--------------------------------------------------------------------------


  def encoding_string(obj)


    obj.force_encoding("UTF-8") if obj.is_a?(String)


    return obj


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容から必要な情報を取得


  #--------------------------------------------------------------------------


  def note_data(note, key)


    result = []


    note.each_line {|line|


      next unless line =~ /<#{key}[ ]?(.*)>/


      return true if $1.empty?


      data = $a1_common.replace_twobyte($1).split(" ")


      for st in data


        result.push(st)


      end


    }


    return false if result.empty?


    return result


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容からハッシュを作成


  #--------------------------------------------------------------------------


  def note_data_hash(note, key, data_default = nil, default = {}, ret = {})


    list = note_data_split(note, key)


    return default if list.empty?


    list.each {|data| ret[data[0]] = data[1] ? data[1] : data_default }


    return ret


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容からカンマ区切りの多元配列を取得


  #--------------------------------------------------------------------------


  def note_data_split(note, key, default = [], ret = [])


    data = note_data(note, key)


    return default unless data.is_a?(Array)


    data.each {|str| ret.push(convert_integer_from_array(split_array(str)))}


    return ret


  end


  #--------------------------------------------------------------------------


  # ○ 配列の内容から数値があれば変換


  #--------------------------------------------------------------------------


  def convert_integer_from_array(data, ret = [])


    data.each {|str| ret.push(convert_integer(str))}


    return ret


  end


  #--------------------------------------------------------------------------


  # ○ 数値があれば変換


  #--------------------------------------------------------------------------


  def convert_integer(str)


    return $1.to_i if str =~ /(^[-]?[0-9]+$)/ 


    str.is_a?(Array) ? convert_integer_from_array(str) : str


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容から単項目の数値を取得


  #--------------------------------------------------------------------------


  def note_data_one_value(note, key, default)


    data = note_data(note, key)


    return data[0].to_i if data.is_a?(Array)


    return default


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容から単項目を取得


  #--------------------------------------------------------------------------


  def note_data_one(note, key, default)


    data = note_data(note, key)


    return data[0] if data.is_a?(Array)


    return default


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容からカンマ区切りの文字列を取得


  #--------------------------------------------------------------------------


  def note_data_array_str(note, key, default)


    data = note_data(note, key)


    return data[0].split(",") if data.is_a?(Array)


    return default


  end


  #--------------------------------------------------------------------------


  # ○ メモの内容からカンマ区切りの数値を取得


  #--------------------------------------------------------------------------


  def note_data_array_value(note, key, default)


    data = note_data(note, key)


    return default unless data.is_a?(Array)


    return convert_integer_from_array(split_array(data[0]))


  end


  #--------------------------------------------------------------------------


  # ○ カンマ区切りの文字列メモを変換


  #--------------------------------------------------------------------------


  def note_data_array(note, key, type, default = nil, through = true)


    ret = []


    default.each {|dat| ret.push(dat)} if default != nil


 


    data = note_data(note, key)


    return ret unless data.is_a?(Array)


 


    data = data[0].split(",")


    for d in data


      next if ret.include?(d) if through


      ret.push(d.to_i) if type.is_a?(Integer)


      ret.push(d)      if type.is_a?(String)


    end


    return ret


  end


  #--------------------------------------------------------------------------


  # ○ ディレクトリの作成


  #--------------------------------------------------------------------------


  def make_directory(dir_name)


    Dir::mkdir(dir_name) unless FileTest.exist?(dir_name)


  end


  #--------------------------------------------------------------------------


  # ○ コマンドリスト


  #--------------------------------------------------------------------------


  def make_command(command, src = "", dect = "")


    src.gsub!("/","\\")


    dect.gsub!("/","\\")


    cmd = "#{command} \"#{src}\" \"#{dect}\""


    return cmd


  end


  #--------------------------------------------------------------------------


  # ○ 素材の拡張子を取得


  #--------------------------------------------------------------------------


  def material_ext(directory, file, direct = false)


    exts = []


    exts = [".png",".bmp",".jpg"]               if directory =~ /(.*)Graphics\/(.*)/


    exts = [".mid",".ogg",".wav",".mp3",".wma"] if directory =~ /(.*)Audio(.*)/


 


    find_file = sprintf("%s%s", directory, file) unless direct


    find_file = file if direct


 


    for ext in exts


      return ext if File.exist?(sprintf("%s%s", find_file, ext))


    end


    return nil


  end


  #--------------------------------------------------------------------------


  # ○ 素材が存在するかチェック


  #--------------------------------------------------------------------------


  def material_exist?(directory, file, direct = false)


    return false if material_ext(directory, file, direct) == nil


    return true


  end


  #--------------------------------------------------------------------------


  # ○ ファイルコピー


  #--------------------------------------------------------------------------


  def copy_file(src, dest)


    srcFile = File.open( src, "rb" )


    dstFile = File.open( dest, "wb" )


    dstFile.write( srcFile.read )


    srcFile.close


    dstFile.close


  end


  #--------------------------------------------------------------------------


  # ○ ファイルの存在を確認してファイルコピー


  #--------------------------------------------------------------------------


  def material_copy(src, dest, directory)


    ext = material_ext(directory, src, true)


    copy_file( src + ext, dest + ext ) if ext != nil


  end


  #--------------------------------------------------------------------------


  # ○ 配列からAudioを作成


  #--------------------------------------------------------------------------


  def set_audio(sound, kind)


    case kind


    when "BGM"; audio = RPG::BGM.new


    when "BGS"; audio = RPG::BGS.new


    when "ME";  audio = RPG::ME.new


    when "SE";  audio = RPG::SE.new


    end


    audio.name   = sound[0]


    audio.volume = sound[1]


    audio.pitch  = sound[2]


    return audio


  end


  #--------------------------------------------------------------------------


  # ○ 既に準拠識別子を持っているかチェック


  #--------------------------------------------------------------------------


  def chk_rtp(file_name, default)


    return "" if file_name =~ /^VX_.*/


    return "" if file_name =~ /^XP_.*/


    return "" if file_name =~ /^2000_.*/


    return "" if file_name =~ /^2003_.*/


    return default


  end


  #--------------------------------------------------------------------------


  # ○ 先頭の $ を切り出す


  #--------------------------------------------------------------------------


  def one_character(file_name)


    return file_name unless file_name[0] == "$"


    tmp = file_name.clone


    tmp[0] = ""


    return tmp


  end


  #--------------------------------------------------------------------------


  # ○ 配列を入れ替える


  #--------------------------------------------------------------------------


  def change_array(array, index1, index2)


    tmp = array[index1]


    array[index1] = array[index2]


    array[index2] = tmp


    return array


  end


  #--------------------------------------------------------------------------


  # ○ 移動ルートの作成


  #--------------------------------------------------------------------------


  def create_move_route(repeat, skippable, wait, list)


    move_route = RPG::MoveRoute.new


    move_route.repeat    = repeat


    move_route.skippable = skippable


    move_route.wait      = wait


    move_route.list      = list


    return move_route


  end


  #--------------------------------------------------------------------------


  # ○ 移動ルートコマンドの作成


  #--------------------------------------------------------------------------


  def create_move_command(code, parameters)


    list = RPG::MoveCommand.new


    list.code       = code


    list.parameters = parameters


    return list


  end


  #--------------------------------------------------------------------------


  # ○ インタプリタ起動用リストの作成


  #--------------------------------------------------------------------------


  def create_list(code, indent, parameters)


    list            = RPG::EventCommand.new


    list.code       = code


    list.indent     = indent


    list.parameters = parameters


    return list


  end


  #--------------------------------------------------------------------------


  # ○ クラス名の取得


  #--------------------------------------------------------------------------


  def class_name(class_instance)


    return class_instance.to_s.split(":")[0].gsub("#<","")


  end


  #--------------------------------------------------------------------------


  # ○ 配列を考慮したsplit


  #--------------------------------------------------------------------------


  def split_array(str)


    str = convert_escape_characters(str)


 


    ret       = []


    tmp_array = str.split(",")


 


    return strip_array_str(tmp_array) unless str.include?("[")


    tmp_str   = ""


    tmp_array.each {|s|


      if char_in_str(s, "[", "]") && tmp_str.empty?


        ret.push(s) unless s =~ /^\[/


        ret.push([s[1...s.size-1]]) if s =~ /^\[/


      else


        tmp_str = "#{tmp_str}#{s},"


        if char_in_str(tmp_str, "[", "]")


          unless tmp_str =~ /^\[/


            ret.push(tmp_str[0...tmp_str.size-1])


            tmp_str = ""


          else


            tmp_str = tmp_str[1...tmp_str.size-2]


            tmp_str = split_array(tmp_str) if tmp_str.include?("[")


            tmp_str = tmp_str.split(",") if tmp_str.include?(",")


            ret.push(tmp_str)   if tmp_str.is_a?(Array)


            ret.push([tmp_str]) if !tmp_str.is_a?(Array)


            tmp_str = ""


          end


        end


      end


    }


    return strip_array_str(ret)


  end


  #--------------------------------------------------------------------------


  # ○ 配列の中の文字列の先頭と末尾の空白を除去


  #--------------------------------------------------------------------------


  def strip_array_str(array, ret = [])


    array.each {|str| ret.push(strip_array_str(str)) if str.is_a?(Array); next if str.is_a?(Array); ret.push(str.strip) }


    return ret


  end


  #--------------------------------------------------------------------------


  # ○ 文字列の中に文字が何文字含まれているか調べて同数ならtrueを返す


  #--------------------------------------------------------------------------


  def char_in_str(str, c1, c2)


    num1 = 0


    num2 = 0


    (0...str.size).each {|i| num1 += 1 if str[i] == c1; num2 += 1 if str[i] == c2 }


    return num1 == num2


  end


  #--------------------------------------------------------------------------


  # ○ 制御文字の変換


  #--------------------------------------------------------------------------


  def convert_escape_characters(text)


    result = text.to_s.clone


    result.gsub!(/\\/)                           { "\e" }


    result.gsub!(/\e\e/)                         { "\\" }


    result.gsub!(/\eV\[(\d+)\]/i)                { $game_variables[$1.to_i] }


    result.gsub!(/\eV\[(\d+)\]/i)                { $game_variables[$1.to_i] }


    result.gsub!(/\eN\[(\d+)\]/i)                { actor_name($1.to_i) }


    result.gsub!(/\eP\[(\d+)\]/i)                { party_member_name($1.to_i) }


    result.gsub!(/\eG/i)                         { Vocab::currency_unit }


    loop { result = result.sub(/<s>(.+?)<\/s>/i) { eval($1) }; break unless $1 }


    result


  end


  #--------------------------------------------------------------------------


  # ○ アクター n 番の名前を取得


  #--------------------------------------------------------------------------


  def actor_name(n)


    actor = n >= 1 ? $game_actors[n] : nil


    actor ? actor.name : ""


  end


  #--------------------------------------------------------------------------


  # ○ パーティメンバー n 番の名前を取得


  #--------------------------------------------------------------------------


  def party_member_name(n)


    actor = n >= 1 ? $game_party.members[n - 1] : nil


    actor ? actor.name : ""


  end


  #--------------------------------------------------------------------------


  # ○ 配列を全て整数にする


  #--------------------------------------------------------------------------


  def params_to_i(params)


    ret = []


    params.each {|param| ret.push(param.to_i)}


    return ret


  end


  #--------------------------------------------------------------------------


  # ○ 注釈コマンド定義


  #--------------------------------------------------------------------------


  def define_command


    @cmd_108 = {}


  end


  #--------------------------------------------------------------------------


  # ○ 注釈コマンド定義取得


  #--------------------------------------------------------------------------


  def cmd_108


    @cmd_108


  end


  #--------------------------------------------------------------------------


  # ○ フレーム更新


  #--------------------------------------------------------------------------


  def update


  end


  #--------------------------------------------------------------------------


  # ○ 文字の幅と高さを取得


  #--------------------------------------------------------------------------


  def text_size(font, size, text)


    bitmap = Cache.system("")


    bitmap.font.name = font


    bitmap.font.size = size


    tw = bitmap.text_size(text).width


    th = bitmap.text_size(text).height


    bitmap.dispose


    return [tw, th]


  end


  #--------------------------------------------------------------------------


  # ○ 文字の幅を取得


  #--------------------------------------------------------------------------


  def text_width(font, text)


    texts = text.split("\n")


    @max_width = 0


    texts.each {|text|


      width = text_size(font.name, font.size, text)[0]


      @max_width = @max_width < width ? width : @max_width


    }


    return @max_width


  end


end


#==============================================================================


# ◆ RGSS3用処理


#==============================================================================


if rgss_version == 3


#==============================================================================


# ■ RPG::Tileset


#==============================================================================


 


class RPG::Tileset


  #--------------------------------------------------------------------------


  # ○ 拡張通行判定


  #--------------------------------------------------------------------------


  def ex_flags


    @ex_flags ||= Table.new(8192)


    return @ex_flags


  end


  #--------------------------------------------------------------------------


  # ○ 拡張通行判定初期化


  #--------------------------------------------------------------------------


  def init_ex_flags


    @ex_flags = Table.new(8192)


  end


end


#==============================================================================


# ■ Game_Interpreter


#------------------------------------------------------------------------------


# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、


# Game_Troop クラス、Game_Event クラスの内部で使用されます。


#==============================================================================


 


class Game_Interpreter


  #--------------------------------------------------------------------------


  # ☆ オブジェクト初期化


  #     depth : ネストの深さ


  #--------------------------------------------------------------------------


  alias a1_common_gi_rgss3_initialize initialize


  def initialize(depth = 0, sub_interpreter = false)


    @sub_interpreter = sub_interpreter


    a1_common_gi_rgss3_initialize(depth)


  end


  #--------------------------------------------------------------------------


  # ☆ メッセージ表示がビジー状態の間ウェイト


  #--------------------------------------------------------------------------


  alias a1_common_gi_wait_for_message wait_for_message


  def wait_for_message


    return if @sub_interpreter


    a1_common_gi_wait_for_message


  end


end


#==============================================================================


# ■ Window_Message


#------------------------------------------------------------------------------


# 　文章表示に使うメッセージウィンドウです。


#==============================================================================


 


class Window_Message < Window_Base


  #--------------------------------------------------------------------------


  # ☆ 通常文字の処理


  #--------------------------------------------------------------------------


  alias a1_common_wm_process_normal_character process_normal_character


  def process_normal_character(c, pos)


    wait_for_one_character_before


    a1_common_wm_process_normal_character(c, pos)


  end


  #--------------------------------------------------------------------------


  # ○ 一文字出力前のウェイト


  #--------------------------------------------------------------------------


  def wait_for_one_character_before


  end


end


#==============================================================================


# ■ RPG::Map


#==============================================================================


 


class RPG::Map


  #--------------------------------------------------------------------------


  # ○ マップチップを調べるか判定する


  #--------------------------------------------------------------------------


  def search_map_chip?


    return true if $a1_common.note_data(self.note, "マップチップサーチ")


    return false


  end


end


#==============================================================================


# ■ Game_Map


#------------------------------------------------------------------------------


# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。


# このクラスのインスタンスは $game_map で参照されます。


#==============================================================================


 


class Game_Map


  #--------------------------------------------------------------------------


  # ☆ セットアップ


  #--------------------------------------------------------------------------


  alias a1_common_gm_setup setup


  def setup(map_id)


    a1_common_gm_setup(map_id)


    setup_tileset


    map_chip_search if search_map_chip?


  end


  #--------------------------------------------------------------------------


  # ★ タイルセットの取得


  #--------------------------------------------------------------------------


  def tileset


    setup_tileset unless @tileset && @now_tileset_id == @tileset_id


    return @tileset


  end


  #--------------------------------------------------------------------------


  # ○ タイルセットのセットアップ


  #--------------------------------------------------------------------------


  def setup_tileset


    @tileset        = $data_tilesets[@tileset_id].clone


    @tileset.flags  = $data_tilesets[@tileset_id].flags.clone


    @now_tileset_id = @tileset_id


  end


  #--------------------------------------------------------------------------


  # ○ マップチップを調べるか判定する


  #--------------------------------------------------------------------------


  def search_map_chip?


    return @map.search_map_chip?


  end


  #--------------------------------------------------------------------------


  # ○ 指定座標の全レイヤーのフラグ判定（イベント含む）


  #--------------------------------------------------------------------------


  def all_tiles_flag?(x, y, bit)


    all_tiles(x, y).any? {|tile_id| tileset.flags[tile_id] & bit != 0 }


  end


  #--------------------------------------------------------------------------


  # ○ 指定座標の全レイヤーの拡張フラグ判定（イベント含む）


  #--------------------------------------------------------------------------


  def all_tiles_flag_ex?(x, y, bit)


    all_tiles(x, y).any? {|tile_id| tileset.ex_flags[tile_id] & bit != 0 }


  end


  #--------------------------------------------------------------------------


  # ○ 指定座標の全レイヤーの拡張フラグ判定


  #--------------------------------------------------------------------------


  def layered_tiles_flag_ex?(x, y, bit)


    layered_tiles(x, y).any? {|tile_id| tileset.ex_flags[tile_id] & bit != 0 }


  end


  #--------------------------------------------------------------------------


  # ○ 地形タグの取得（イベント含む）


  #--------------------------------------------------------------------------


  def terrain_tag_all_tailes(x, y)


    return 0 unless valid?(x, y)


    all_tiles(x, y).each do |tile_id|


      tag = tileset.flags[tile_id] >> 12


      return tag if tag > 0


    end


    return 0


  end


end


#==============================================================================


# ■ DataManager


#------------------------------------------------------------------------------


# 　データベースとゲームオブジェクトを管理するモジュールです。ゲームで使用する


# ほぼ全てのグローバル変数はこのモジュールで初期化されます。


#==============================================================================


 


module DataManager


  #--------------------------------------------------------------------------


  # ○ エイリアス用特異メソッド


  #--------------------------------------------------------------------------


  class << self


    alias :a1_common_create_game_objects :create_game_objects


  end


  #--------------------------------------------------------------------------


  # ☆ 各種ゲームオブジェクトの作成


  #--------------------------------------------------------------------------


  def self.create_game_objects


    $a1_common ||= A1_System::CommonModule.new


    a1_common_create_game_objects


  end


end


#==============================================================================


# ■ Scene_Base


#------------------------------------------------------------------------------


# 　ゲーム中の全てのシーンのスーパークラスです。


#==============================================================================


 


class Scene_Base


  #--------------------------------------------------------------------------


  # ☆ フレーム更新（基本）


  #--------------------------------------------------------------------------


  alias a1_common_sb_update_basic update_basic


  def update_basic


    a1_common_sb_update_basic


    $a1_common.update


  end


  #--------------------------------------------------------------------------


  # ○ 指定のウィンドウが開いている間ウェイト


  #--------------------------------------------------------------------------


  def wait_for_window_open(window)


    update_basic until window.openness == 0


  end


end


#==============================================================================


# ■ Window_Base


#------------------------------------------------------------------------------


# 　ゲーム中の全てのウィンドウのスーパークラスです。


#==============================================================================


 


class Window_Base < Window


  #--------------------------------------------------------------------------


  # ★ 制御文字の事前変換


  #    実際の描画を始める前に、原則として文字列に変わるものだけを置き換える。


  #    文字「\」はエスケープ文字（\e）に変換。


  #--------------------------------------------------------------------------


  def convert_escape_characters(text)


    return $a1_common.convert_escape_characters(text)


  end


end


#==============================================================================


# ◆ RGSS2用処理


#==============================================================================


elsif rgss_version == 2


#==============================================================================


# ■ Window


#==============================================================================


 


class Window


  #--------------------------------------------------------------------------


  # ○ ウィンドウが開いている？


  #--------------------------------------------------------------------------


  def open?


    return self.openness == 255


  end


  #--------------------------------------------------------------------------


  # ○ ウィンドウが閉じている？


  #--------------------------------------------------------------------------


  def close?


    return self.openness == 0


  end


end


#==============================================================================


# ■ Cache


#------------------------------------------------------------------------------


# 　各種グラフィックを読み込み、Bitmap オブジェクトを作成、保持するモジュール


# です。読み込みの高速化とメモリ節約のため、作成した Bitmap オブジェクトを内部


# のハッシュに保存し、同じビットマップが再度要求されたときに既存のオブジェクト


# を返すようになっています。


#==============================================================================


 


module Cache


  #--------------------------------------------------------------------------


  # ○ キャッシュ存在チェック


  #--------------------------------------------------------------------------


  def self.include?(key)


    @cache[key] && !@cache[key].disposed?


  end


end


#==============================================================================


# ■ Game_Interpreter


#------------------------------------------------------------------------------


# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、


# Game_Troop クラス、Game_Event クラスの内部で使用されます。


#==============================================================================


 


class Game_Interpreter


  #--------------------------------------------------------------------------


  # ○ 注釈


  #--------------------------------------------------------------------------


  def command_108


    @comments = [@params[0]]


    while next_event_code == 408


      @index += 1


      @comments.push(@list[@index].parameters[0])


    end


  end


  #--------------------------------------------------------------------------


  # ★ イベントコマンドの実行


  #--------------------------------------------------------------------------


  def execute_command


    return rgss3_execute_command unless @index >= @list.size-1


    command_end


    return true


  end


  #--------------------------------------------------------------------------


  # ○ RGSS3風「イベントコマンドの実行」


  #--------------------------------------------------------------------------


  def rgss3_execute_command


    command = @list[@index]


    @params = command.parameters


    @indent = command.indent


    method_name = "command_#{command.code}"


    send(method_name) if respond_to?(method_name)


  end


  #--------------------------------------------------------------------------


  # ○ 次のイベントコマンドのコードを取得


  #--------------------------------------------------------------------------


  def next_event_code


    @list[@index + 1].code


  end


end


#==============================================================================


# ■ Game_Map


#------------------------------------------------------------------------------


# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。


# このクラスのインスタンスは $game_map で参照されます。


#==============================================================================


 


class Game_Map


  #--------------------------------------------------------------------------


  # ○ マップチップを調べるか判定する


  #--------------------------------------------------------------------------


  def search_map_chip?


    return $data_map_infos[@map_id].name =~ /\[サーチ\]/


  end


  #--------------------------------------------------------------------------


  # ○ 指定座標に存在するタイル扱いイベント（すり抜け以外）の配列取得


  #--------------------------------------------------------------------------


  def tile_events_xy(x, y)


    @tile_events.select {|event| event.pos_nt?(x, y) }


  end


  #--------------------------------------------------------------------------


  # ○ タイル扱いイベントの配列をリフレッシュ


  #--------------------------------------------------------------------------


  def refresh_tile_events


    @tile_events = @events.values.select {|event| event.tile? }


  end


end


#==============================================================================


# ■ Game_Character


#------------------------------------------------------------------------------


# 　キャラクターを扱うクラスです。このクラスは Game_Player クラスと Game_Event


# クラスのスーパークラスとして使用されます。


#==============================================================================


 


class Game_Character


  #--------------------------------------------------------------------------


  # ○ タイル判定


  #--------------------------------------------------------------------------


  def tile?


    @tile_id > 0 && @priority_type == 0


  end


end


#==============================================================================


# ■ Scene_Title


#------------------------------------------------------------------------------


# 　タイトル画面の処理を行うクラスです。


#==============================================================================


 


class Scene_Title < Scene_Base


  #--------------------------------------------------------------------------


  # ☆ データベースのロード


  #--------------------------------------------------------------------------


  alias a1_common_st_load_database load_database


  def load_database


    a1_common_st_load_database


    $data_map_infos = load_data("Data/MapInfos.rvdata")


  end


  #--------------------------------------------------------------------------


  # ☆ 各種ゲームオブジェクトの作成


  #--------------------------------------------------------------------------


  alias a1_common_st_create_game_objects create_game_objects


  def create_game_objects


    $a1_common ||= A1_System::CommonModule.new


    a1_common_st_create_game_objects


  end


end


#==============================================================================


# ◆ RGSS用処理


#==============================================================================


elsif rgss_version == 1


end


#==============================================================================


# ■ Cache


#------------------------------------------------------------------------------


# 　各種グラフィックを読み込み、Bitmap オブジェクトを作成、保持するモジュール


# です。読み込みの高速化とメモリ節約のため、作成した Bitmap オブジェクトを内部


# のハッシュに保存し、同じビットマップが再度要求されたときに既存のオブジェクト


# を返すようになっています。


#==============================================================================


 


module Cache


  #--------------------------------------------------------------------------


  # ○ 拡大縮小したビットマップのロード


  #--------------------------------------------------------------------------


  def self.load_resize_bitmap(load_path, key, resize = nil)


    @cache ||= {}


    key = load_path if key == nil


    return @cache[key] if include?(key)


 


    @cache[key] = Bitmap.new(load_path)


    return @cache[key] if resize == nil


    return @cache[key] if @cache[key].width == resize[0] and @cache[key].height == resize[1]


 


    info = calc_size(resize, key)


    return resize_bitmap(@cache[key], info[0], info[1], key)


  end


  #--------------------------------------------------------------------------


  # ○ 拡大縮小した色相変化済みビットマップを作成／取得


  #--------------------------------------------------------------------------


  def self.load_resize_hue_changed_bitmap(load_path, path, hue, resize)


    key = [path, hue]


    return @cache[key] if include?(key)


 


    @cache[key] = load_resize_bitmap(load_path, path, resize).clone


    @cache[key].hue_change(hue)


    return @cache[key]


  end


  #--------------------------------------------------------------------------


  # ○ リサイズするサイズを取得


  #--------------------------------------------------------------------------


  def self.calc_size(resize, key)


    width  = resize[0]


    width  = @cache[key].width * width.abs if width < 0


    height = resize[1]


    height = @cache[key].height * height.abs if height < 0


    height = Integer(@cache[key].height * (width.to_f / @cache[key].width.to_f)) if height == 0


    return [width, height]


  end


  #--------------------------------------------------------------------------


  # ○ ビットマップの拡大縮小


  #--------------------------------------------------------------------------


  def self.resize_bitmap(bitmap, width, height, key)


    resize = Bitmap.new(width, height)


    resize.stretch_blt(resize.rect, bitmap, bitmap.rect)


    @cache[key] = resize


    return resize


  end


  #--------------------------------------------------------------------------


  # ○ テキストビットマップの取得


  #--------------------------------------------------------------------------


  def self.text_picture(text, font)


    load_text_bitmap(text, font)


  end


  #--------------------------------------------------------------------------


  # ○ フォントのキーを作成


  #--------------------------------------------------------------------------


  def self.make_font_key(text, font)


    [text, font.name, font.size, font.bold, font.italic, font.outline, font.shadow, font.color.to_s, font.out_color.to_s]


  end


  #--------------------------------------------------------------------------


  # ○ テキストビットマップの作成


  #--------------------------------------------------------------------------


  def self.load_text_bitmap(text, font)


    @cache ||= {}


    key = make_font_key(text, font)


    return @cache[key] if include?(key)


 


    # 計算用ダミービットマップ


    bitmap = Cache.system("")


    bitmap.font = font


    tw = bitmap.text_size(text).width + 8


 


    # ビットマップ作成


    bitmap = Bitmap.new(tw, bitmap.font.size + 4)


    bitmap.font = font


    bitmap.draw_text(0, 0, bitmap.width, bitmap.height, text, 1)


 


    @cache[key] = bitmap


    return @cache[key]


  end


end


#==============================================================================


# ■ Game_Interpreter


#------------------------------------------------------------------------------


# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、


# Game_Troop クラス、Game_Event クラスの内部で使用されます。


#==============================================================================


 


class Game_Interpreter


  #--------------------------------------------------------------------------


  # ○ 注釈


  #--------------------------------------------------------------------------


  alias a1_common_command_108 command_108


  def command_108


    a1_common_command_108


    proc_comment(@comments)


  end


  #--------------------------------------------------------------------------


  # ○ 注釈の処理


  #--------------------------------------------------------------------------


  def proc_comment(comments)


    param = ""


    comments.each {|comment| param += comment }


    params = param.sub(/^(\S+)/, "")


    command = $1


    comment_parameters = $a1_common.split_array(params) if params


    proc_comment_command(command, comment_parameters)


  end


  #--------------------------------------------------------------------------


  # ○ 注釈の実行


  #--------------------------------------------------------------------------


  def proc_comment_command(command, params)


    cmd_108 = $a1_common.cmd_108[command]


    method(cmd_108).call(params) if cmd_108 != nil


  end


  #--------------------------------------------------------------------------


  # ○ 前のイベントコマンドを取得


  #--------------------------------------------------------------------------


  def prev_event


    @list[@index - 1]


  end


end


#==============================================================================


# ■ Game_Map


#------------------------------------------------------------------------------


# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。


# このクラスのインスタンスは $game_map で参照されます。


#==============================================================================


 


class Game_Map


  #--------------------------------------------------------------------------


  # ○ 全マップチップを調べる


  #--------------------------------------------------------------------------


  def map_chip_search


    tileset.init_ex_flags


    ([email]0...@map.data.xsize[/email]).each {|x| map_chip_search_y(x) }


  end


  #--------------------------------------------------------------------------


  # ○ x座標にあるy座標のマップチップを調べる


  #--------------------------------------------------------------------------


  def map_chip_search_y(x)


    ([email]0...@map.data.ysize[/email]).each {|y| map_pos_proc(x, y); map_chip_search_z(x, y) }


  end


  #--------------------------------------------------------------------------


  # ○ x,y座標にあるz座標のマップチップを調べる


  #--------------------------------------------------------------------------


  def map_chip_search_z(x, y)


    ([email]0...@map.data.zsize[/email]).each {|z| map_chip_proc(x, y, z) }


    tile_events_xy(x, y).collect {|ev| tile_event_proc(ev.tile_id) }


  end


  #--------------------------------------------------------------------------


  # ○ 座標に対して処理を行う


  #--------------------------------------------------------------------------


  def map_pos_proc(x, y)


  end


  #--------------------------------------------------------------------------


  # ○ マップチップに対して処理を行う


  #--------------------------------------------------------------------------


  def map_chip_proc(x, y, z)


  end


  #--------------------------------------------------------------------------


  # ○ タイルのイベントに対して処理を行う


  #--------------------------------------------------------------------------


  def tile_event_proc(tile_id)


  end


end


#==============================================================================


# ■ Window_Base


#------------------------------------------------------------------------------


# 　ゲーム中の全てのウィンドウのスーパークラスです。


#==============================================================================


 


class Window_Base < Window


  #--------------------------------------------------------------------------


  # ○ 入力を受け付けるか？


  #--------------------------------------------------------------------------


  def can_input?


    @can_input


  end


  #--------------------------------------------------------------------------


  # ○ 入力受け付け設定


  #--------------------------------------------------------------------------


  def can_input=(flag)


    @can_input = flag


  end


end


#==============================================================================


# ■ Bitmap


#==============================================================================


 


class Bitmap


  #--------------------------------------------------------------------------


  # ○ 文字縁取り描画


  #--------------------------------------------------------------------------


  def draw_text_f(x, y, width, height, str, align = 0, color = Color.new(64,32,128))


    shadow = self.font.shadow


    b_color = self.font.color.dup


    font.shadow = false


    font.color = color


    draw_text(x + 1, y, width, height, str, align) 


    draw_text(x - 1, y, width, height, str, align) 


    draw_text(x, y + 1, width, height, str, align) 


    draw_text(x, y - 1, width, height, str, align) 


    font.color = b_color


    draw_text(x, y, width, height, str, align)


    font.shadow = shadow


  end


  #--------------------------------------------------------------------------


  # ○ 文字縁取り描画の矩形を取得


  #--------------------------------------------------------------------------


  def draw_text_f_rect(r, str, align = 0, color = Color.new(64,32,128)) 


    draw_text_f(r.x, r.y, r.width, r.height, str, align = 0, color) 


  end


end