#==============================================================================
# ミニゲーム用共通処理モジュール By 貪藻矢射妥←
#------------------------------------------------------------------------------
#
# ミニゲームなどで使用する共通処理関数をモジュール化したもの。
# これで、スクリプトの行数削減ができるんるん♪
#
# ※・・・ちなみに、これだけ導入しても意味がないので気をつけてください。
#
#==============================================================================
# 変更履歴
#
# 2008:11:16
# ・ちょろっと修正
#
# 2008:11:23
# ・clear関数の高さを絶対値から相対値へ変更
#
# 2012:01:21
# ・共通メッセージをこちらで設定
#
# 2012:03:03
# ・一部の共通モジュールのクラス化
#
# 2013:06:01
# ・一部の共通モジュールのクラス化 part2
# ・SE/MEの設定をファイル名のみからRPG::AudioFile.newに変更
module MINI_GAME
# 入力金額最高桁数
MAX_DIG = 7
# 所持金
HAVE_GOLD = "所持金"
# 賭け金
BET_GOLD = "賭け金"
# 獲得時の文章
GET_GOLD = "Get Gold!! "
# 消失時の文章
LOST_GOLD = "Lost Gold! "
# 警告時のSE
ERROR_SE = RPG::AudioFile.new("WWL 警告３", 90, 100)
# ファンファーレ1
JACK_POT_ME1 = RPG::AudioFile.new("002-Victory02", 100, 100)
# ファンファーレ2
JACK_POT_ME2 = RPG::AudioFile.new("009-Fanfare03", 100, 100)
# ファンファーレ3
JACK_POT_ME3 = RPG::AudioFile.new("008-Fanfare02", 100, 100)
# ファンファーレ4
JACK_POT_ME4 = RPG::AudioFile.new("007-Fanfare01", 100, 100)
# ファンファーレ5
JACK_POT_ME5 = RPG::AudioFile.new("011-Item02", 100, 100)
# ファンファーレ6
JACK_POT_ME6 = RPG::AudioFile.new("010-Item01", 100, 100)
# ハズレのME
LOOSE_ME = RPG::AudioFile.new("WWL あかん！", 90, 100)
RECT_MINI = [4, 0, 160 + 10 - 32 - 8, 32]
# 賭け金が所持金を上回る場合のエラーメッセージ
MG_ERR_BET_UPPER = "賭け金が所持金を上回ってます！！"
# 賭け金未設定のエラーメッセージ
MG_ERR_BET_ZERO = "賭け金を設定してください！！"
end
module TITLE_BM
include BM
DRAW_COLOR = Color.new(200, 200, 220, MAX8BIT)
#--------------------------------------------------------------------------
# ● クリアー
#--------------------------------------------------------------------------
def clear
if self.contents != nil
self.contents.dispose
self.contents = nil
end
self.contents = Bitmap.new(width - 32, height - 32)
end
end
class Window_Info_Gold < Window_Base
include RUBY_SYS
include MINI_GAME
include TITLE_BM
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(480 - 10, 64, 160 + 10, 64)
refresh
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh
clear
draw_shadow_text(RECT_MINI, HAVE_GOLD, system_color, 1)
end
end
class Window_Info_Bet < Window_Base
include RUBY_SYS
include MINI_GAME
include TITLE_BM
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(480 - 10, 192, 160 + 10, 64)
refresh
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh
clear
draw_shadow_text(RECT_MINI, BET_GOLD, system_color, 1)
end
end
class Window_Bet_Gold < Window_Base
include RUBY_SYS
include MINI_GAME
include TITLE_BM
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(480 - 10, 256, 160 + 10, 64)
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh(bet)
clear
draw_shadow_text(RECT_MINI, bet.to_s)
end
end
class Window_Info_Space < Window_Base
include RUBY_SYS
include TITLE_BM
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(0, 380, 480 - 10, 64)
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh(text)
clear
draw_shadow_text([4, 0, 430, 32], text)
end
end
class Window_Info_Space2 < Window_Base
include RUBY_SYS
include TITLE_BM
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(0, 380 - 64, 480 - 10, 64)
refresh(@cnt, @max)
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh(cnt, max)
clear
if max != nil
curr = max.to_i - cnt.to_i
if curr != 0
text = "あと " + curr.to_s + " 枚交換可能です。"
else
text = " "
end
else
text = cnt
end
rectr = [4, 0, 300, 32]
draw_shadow_text(rectr, text)
end
end
class Window_Title_Root < Window_Base
include RUBY_SYS
include BM
include TITLE_BM
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(0, 0, 640, 64)
end
#--------------------------------------------------------------------------
# ● リフレッシュ1
#--------------------------------------------------------------------------
def refresh(text)
clear
draw_shadow_text([4, 0, 640 - 32 - 10, 32], text, DRAW_COLOR)
end
#--------------------------------------------------------------------------
# ● リフレッシュ2
#--------------------------------------------------------------------------
def refresh_ex(text)
clear
draw_shadow_text([4, 0], transfer(text), DRAW_COLOR)
end
end
|