#==============================================================================
# ■ MPDTWF by Ferredingu (Partavis)
#==============================================================================
#==============================================================================
# ■ Window_Command
#------------------------------------------------------------------------------
# 　一般的なコマンド選択を行うウィンドウです。
#==============================================================================

class Window_Command2 < Window_Selectable
def initialize(width, commands)
super(240, 0, width, 64)
@item_max = commands.size
@commands = commands
self.contents = Bitmap.new(width - 32, @item_max * 32)
self.contents.font.name = $defaultfonttype
self.contents.font.size = $defaultfontsize
refresh
self.index = 0
end
def refresh
self.contents.clear
for i in 0...@item_max
draw_item(i, normal_color)
end
end
def draw_item(index, color)
self.contents.font.color = color
rect = Rect.new(4, 32 * index, self.contents.width - 8, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
self.contents.draw_text(rect, @commands[index])
end
def disable_item(index)
draw_item(index, disabled_color)
end
end


#=========================================================================
#=========================================================================
#=========================================================================
class Scene_Mpdtwf

def initialize(menu_index = 0)
@menu_index = menu_index
end

def main
@sprite = Sprite.new
s1 = "Samotna Góra"
s2 = "Elfi las"
s3 = "Wulkan"
s4 = "Dolina"
s5 = "Tajemna wyspa"
s6 = "Zielona wyspa"
@command_window = Window_Command2.new(160, [s1, s2, s3, s4, s5, s6])
@command_window.index = @menu_index
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@sprite.bitmap.dispose
@sprite.dispose
@command_window.dispose
end

def update
@command_window.update
if @command_window.active
update_command
return
end
end

def update_command

case @command_window.index
when 0 #Samotna góra
@sprite.bitmap = RPG::Cache.picture("gory")
when 1 # Elfi las
@sprite.bitmap = RPG::Cache.picture("las")
when 2 # Wulkan
@sprite.bitmap = RPG::Cache.picture("wulkan")
when 3 # Dolina
@sprite.bitmap = RPG::Cache.picture("dolina")
when 4 # Tajemna wyspa
@sprite.bitmap = RPG::Cache.picture("tajemnicza")
when 5 # Zielona wyspa
@sprite.bitmap = RPG::Cache.picture("zielona")
end

if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
$scene = Scene_Map.new
return
end
if Input.trigger?(Input::C)
case @command_window.index
when 0 #Samotna góra
$game_system.se_play($data_system.decision_se)
$scene = $game_map.setup(1)
$scene = $game_player.moveto(9, 7)
$scene = Scene_Map.new
when 1 # Elfi las
$game_system.se_play($data_system.decision_se)
$scene = $game_map.setup(2)
$scene = $game_player.moveto(9, 7)
$scene = Scene_Map.new
when 2 # Wulkan
$game_system.se_play($data_system.decision_se)
$scene = $game_map.setup(3)
$scene = $game_player.moveto(9, 7)
$scene = Scene_Map.new
when 3 # Dolina
$game_system.se_play($data_system.decision_se)
$scene = $game_map.setup(4)
$scene = $game_player.moveto(9, 7)
$scene = Scene_Map.new
when 4 # Tajemna wyspa
$game_system.se_play($data_system.decision_se)
$scene = $game_map.setup(5)
$scene = $game_player.moveto(9, 7)
$scene = Scene_Map.new
when 5 # Zielona wyspa
$game_system.se_play($data_system.decision_se)
$scene = $game_map.setup(6)
$scene = $game_player.moveto(9, 7)
$scene = Scene_Map.new
end
return
end
end
end