Simple CMS

#=============================================================================
# Simple CMS by IBegU v1.1
# tgl pembuatan : 23 november 2009
#=============================================================================
#
# Bosan pake windowskin pas buka menu ? nah gw bikin simple cms dimana loe
# design gambar loe sendiri ^^. Disni gw pasang beberapa animasi.
#
#-----------------------------------------------------------------------------
# Update v1.1 :
#
# - Battle windowskin jadi image file
# - Windowskin Message jadi image file
#
#-----------------------------------------------------------------------------
#
#=============================================================================
# Cara Pemakaian : Taro di semua script ini diatas main, kalau mau pindahin
# script ini ke game kamu jgn lupa copy folder "Menu" di demo
# ini ke folder "Graphics" loe.
#=============================================================================
module Cache
def self.menu(filename)
load_bitmap("Graphics/Menu/", filename)
end
end
#-----------------------------------------------------------------------------
# COSTUMIZE
#-----------------------------------------------------------------------------
# semua kata didalam tanda "" adalah nama file gambar yang ada di folder Menu.
# Loe bisa pake gambar lo sendiri tapi jgn lupa samain dengan nama file gambar
# loe dengan yang ada didalam tanda "". Selamat Mencoba
#-----------------------------------------------------------------------------

module CMS
MENU_WINDOW_FILE = "Menu_Command"
STATUS_BACK_FILE = "Status_Back"
STATUS_BACK_L_FILE = "Status_Back_L"
ITEM_BACK_FILE = "Item_Back"
ITEM_LOGO_FILE = "Item_Logo"
SKILL_BACK_FILE = "Skill_Back"
SKILL_LOGO_FILE = "Skill_Logo"
EQUIP_BACK_FILE = "Equip_Back"
EQUIP_LOGO_FILE = "Equip_Logo"
PROFILE_BACK_FILE = "Profile_Back"
PROFILE_LOGO_FILE = "Profile_Logo"
SAVE_BACK_FILE = "Save_Back"
END_BACK_FILE = "End_Back"
MESSAGE_BACK_FILE = "Message_Back"
#-----------------------------------------------------------------------------
# BATTLE WINDOW
#-----------------------------------------------------------------------------
PARTY_BACK_FILE = "Party_back"
BATTLE_STATUS_FILE = "Battlestatus_back"
ACTOR_BACK_FILE = "Actor_back"
SKILL_BATTLE_BACK_FILE = "Skill_battle_back"
ENEMY_TARGET_BACK_FILE = "Enemy_target_back"
ITEM_SELECT_BACK_FILE = "Skill_battle_back"
#-----------------------------------------------------------------------------
# POSITION
#-----------------------------------------------------------------------------
PARTY_BACK_X = 0
PARTY_BACK_Y = 255
BATTLE_STATUS_BACK_X = 128
BATTLE_STATUS_BACK_Y = 255
ACTOR_COMMAND_BACK_X = 544
ACTOR_COMMAND_BACK_Y = 255
end

#-----------------------------------------------------------------------------
# End of File
#-----------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_Menu
#==============================================================================
class Scene_Menu < Scene_Base

alias cms_ibegu_start start
def start
cms_ibegu_start
@status_back = Plane.new
@status_back.bitmap = Cache.menu(CMS::STATUS_BACK_FILE)
@menu_window = Plane.new
@menu_window.bitmap = Cache.menu(CMS::MENU_WINDOW_FILE)
@gold_window.opacity = 0
@status_window.opacity = 0
@status_window.x = 320
end

alias cms_ibegu_update update
def update
cms_ibegu_update
move
end

alias cms_ibegu_terminate terminate
def terminate
cms_ibegu_terminate
@status_back.dispose
@menu_window.dispose
end

alias cms_ibegu_create_command_window create_command_window
def create_command_window
cms_ibegu_create_command_window
@command_window.opacity = 0
@command_window.y = 60
@command_window.x = -160
end

def move
if @command_window.x < 0
@command_window.x += 10
end
if @status_window.x > 160
@status_window.x -= 10
end
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_Item
#==============================================================================
class Scene_Item < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@item_back = Plane.new
@item_back.bitmap = Cache.menu(CMS::ITEM_BACK_FILE)
@target_back = Plane.new
@target_back.bitmap = Cache.menu(CMS::STATUS_BACK_FILE)
@target_back.visible = false
@target_back1 = Plane.new
@target_back1.bitmap = Cache.menu(CMS::STATUS_BACK_L_FILE)
@target_back1.visible = false
@viewport = Viewport.new(0, 0, 544, 416)
@help_window = Window_Help.new
@help_window.viewport = @viewport
@item_window = Window_Item.new(0, 416, 544, 360)
@item_window.viewport = @viewport
@item_window.help_window = @help_window
@item_logo = Plane.new
@item_logo.bitmap = Cache.menu(CMS::ITEM_LOGO_FILE)
@item_window.opacity = 0
@help_window.opacity = 0
@target_window.opacity = 0
end

alias cms_ibegu_update update
def update
cms_ibegu_update
if @target_window.active
update_position
else
@target_back.visible = false
@target_back1.visible = false
end
move
end

alias cms_ibegu_terminate terminate
def terminate
cms_ibegu_terminate
@item_back.dispose
@target_back.dispose
@item_logo.dispose
end

def move
if @item_window.y > 56
@item_window.y -= 20
end
end

def update_position
if @item_window.index % 2 == 0
@target_back1.visible = false
@target_back.visible = true
else
@target_back1.visible = true
@target_back.visible = false
end
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_Skill
#==============================================================================
class Scene_Skill < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@skill_back = Plane.new
@skill_back.bitmap = Cache.menu(CMS::SKILL_BACK_FILE)
@target_back = Plane.new
@target_back.bitmap = Cache.menu(CMS::STATUS_BACK_FILE)
@target_back.visible = false
@target_back1 = Plane.new
@target_back1.bitmap = Cache.menu(CMS::STATUS_BACK_L_FILE)
@target_back1.visible = false
@viewport = Viewport.new(0, 0, 544, 416)
@help_window = Window_Help.new
@help_window.viewport = @viewport
@status_window = Window_SkillStatus.new(-544, 56, @actor)
@status_window.viewport = @viewport
@skill_window = Window_Skill.new(0, 416, 544, 304, @actor)
@skill_window.viewport = @viewport
@skill_window.help_window = @help_window
@skill_logo = Plane.new
@skill_logo.bitmap = Cache.menu(CMS::SKILL_LOGO_FILE)
@skill_window.opacity = 0
@status_window.opacity = 0
@help_window.opacity = 0
@target_window.opacity = 0
end

alias cms_ibegu_update update
def update
cms_ibegu_update
if @target_window.active
update_position
else
@target_back.visible = false
@target_back1.visible = false
end
move
end

alias cms_ibegu_terminate terminate
def terminate
cms_ibegu_terminate
@skill_back.dispose
@target_back.dispose
@target_back1.dispose
@skill_logo.dispose
end

def update_position
if @skill_window.index % 2 == 0
@target_back1.visible = false
@target_back.visible = true
else
@target_back1.visible = true
@target_back.visible = false
end
end

def move
if @skill_window.y > 112
@skill_window.y -= 16
end
if @status_window.x < 0
@status_window.x += 34
end
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_Equip
#==============================================================================
class Scene_Equip < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@equip_back = Plane.new
@equip_back.bitmap = Cache.menu(CMS::EQUIP_BACK_FILE)
@equip_logo = Plane.new
@equip_logo.bitmap = Cache.menu(CMS::EQUIP_LOGO_FILE)
@status_window.opacity = 0
@help_window.opacity = 0
@equip_window.opacity = 0
@status_window.x = -208
@equip_window.x = 416
end

alias cms_ibegu_update update
def update
cms_ibegu_update
move
end


alias cms_ibegu_terminate terminate
def terminate
cms_ibegu_terminate
@equip_back.dispose
@equip_logo.dispose
end
alias cms_ibegu_create_item_windows create_item_windows
def create_item_windows
cms_ibegu_create_item_windows
for i in 0...EQUIP_TYPE_MAX
@item_windows[i].opacity = 0
end
end

def move
if @status_window.x < 0
@status_window.x += 16
end
if @equip_window.x > 208
@equip_window.x -= 16
end
end
end

#==============================================================================
# Window_Equip
#==============================================================================
class Window_Equip < Window_Selectable

alias cms_ibegu_refresh refresh
def refresh
cms_ibegu_refresh
draw_item_name(@data[0], 100, WLH * 0)
draw_item_name(@data[1], 100, WLH * 1)
draw_item_name(@data[2], 100, WLH * 2)
draw_item_name(@data[3], 100, WLH * 3)
draw_item_name(@data[4], 100, WLH * 4)
end

def update_cursor
if @index < 0
self.cursor_rect.empty
elsif @index < @item_max
self.cursor_rect.set(100, @index * 24 , 206, 24)
elsif @index >= 100
self.cursor_rect.set(100, @index * 24 , 206, 24)
else
self.cursor_rect.set(100, 0, 170, @item_max * 24)
end
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_Status
#==============================================================================
class Scene_Status < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@status_back = Plane.new
@status_back.bitmap = Cache.menu(CMS::PROFILE_BACK_FILE)
@status_window.opacity = 0
@status_logo = Plane.new
@status_logo.bitmap = Cache.menu(CMS::PROFILE_LOGO_FILE)
end
end
#==============================================================================
# Window_Status
#==============================================================================
class Window_Status < Window_Base
def draw_equipments(x, y)
self.contents.font.color = system_color
self.contents.draw_text(x, y, 120, WLH, Vocab::equip)
for i in 0..4
draw_item_name(@actor.equips[i], x + 16, y + WLH * (i + 1) + 5)
end
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_File
#==============================================================================
class Scene_File < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@save_back = Plane.new
@save_back.bitmap = Cache.menu(CMS::SAVE_BACK_FILE)
@help_window.opacity = 0
end
end
#==============================================================================
# Window_SaveFile
#==============================================================================
class Window_SaveFile < Window_Base
alias cms_ibegu_initialize initialize
def initialize(file_index, filename)
cms_ibegu_initialize(file_index, filename)
self.opacity = 0
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Scene_End
#==============================================================================
class Scene_End < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@end_back = Plane.new
@end_back.bitmap = Cache.menu(CMS::END_BACK_FILE)
end
alias cms_ibegu_create_command_window create_command_window
def create_command_window
cms_ibegu_create_command_window
@command_window.opacity = 0
end
end

#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Window_Message
#==============================================================================
class Window_Message < Window_Selectable

alias cms_ibegu_create_back_sprite create_back_sprite
def create_back_sprite
cms_ibegu_create_back_sprite
@back_window = Sprite.new
@back_window.bitmap = Cache.menu(CMS::MESSAGE_BACK_FILE)
@back_window.visible = (@background == 0)
if self.openness > 0
@back_window.opacity = 255
else
@back_window.opacity = 0
end
@back_window.z = 190
end

alias cms_ibegu_dispose_back_sprite dispose_back_sprite
def dispose_back_sprite
cms_ibegu_dispose_back_sprite
@back_window.dispose
end

alias cms_ibegu_update_back_sprite update_back_sprite
def update_back_sprite
cms_ibegu_update_back_sprite
@back_window.visible = (@background == 0)
@back_window.y = y - 50
@back_window.opacity = openness
@back_window.update
end

alias cms_ibegu_reset_window reset_window
def reset_window
cms_ibegu_reset_window
self.opacity =0
end
end
#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
# Ngerubah script bibawah ini bisa menyebabkan game tidak berjalan atau eror
# jadi hati - hati atau ngga loe bisa tanya gw kalo mau ngerubah sesuai
# apa yang lo pengen.
#------------------------------------------------------------------------------
#==============================================================================
# Window_BattleMessage
#==============================================================================
class Window_BattleMessage < Window_Message
alias cms_ibegu_initialize initialize
def initialize
cms_ibegu_initialize
self.opacity = 0
end
end

#==============================================================================
# Window_BattleStatus
#==============================================================================
class Window_BattleStatus < Window_Selectable
def update_cursor
if @index < 0
self.cursor_rect.empty
else
self.cursor_rect.set(0, @index * 24, 75, 24)
end
end
end

#==============================================================================
# Scene_Battle
#==============================================================================
class Scene_Battle < Scene_Base
alias cms_ibegu_start start
def start
cms_ibegu_start
@message_window.opacity = 0
end

alias cms_ibegu_update update
def update
cms_ibegu_update
if $game_message.visible
@message_window.openness = 255
end
end


alias cms_ibegu_create_info_viewport create_info_viewport
def create_info_viewport
cms_ibegu_create_info_viewport
@party_back = Sprite.new
@party_back.bitmap = Cache.menu(CMS::PARTY_BACK_FILE)
@party_back.x = CMS::PARTY_BACK_X
@party_back.y = CMS::PARTY_BACK_Y
@party_command_window.opacity = 0
@party_back.visible = false
@battlestatus_back = Sprite.new
@battlestatus_back.bitmap = Cache.menu(CMS::BATTLE_STATUS_FILE)
@battlestatus_back.y = CMS::BATTLE_STATUS_BACK_Y
@battlestatus_back.x = CMS::BATTLE_STATUS_BACK_X
@status_window.opacity = 0
@battlestatus_back.visible = false
@actor_back = Sprite.new
@actor_back.bitmap = Cache.menu(CMS::ACTOR_BACK_FILE )
@actor_back.y = CMS::ACTOR_COMMAND_BACK_Y
@actor_back.x = CMS::ACTOR_COMMAND_BACK_X
@actor_command_window.opacity = 0
@actor_back.visible = false
end

alias cms_ibegu_dispose_info_viewport dispose_info_viewport
def dispose_info_viewport
cms_ibegu_dispose_info_viewport
@party_back.dispose
@battlestatus_back.dispose
@actor_back.dispose
end

alias cms_ibegu_update_info_viewport update_info_viewport
def update_info_viewport
cms_ibegu_update_info_viewport
@party_back.update
if @party_command_window.active and @party_back.x < 0
@party_back.x += 16
@battlestatus_back.x += 16
@actor_back.x += 16
elsif @actor_command_window.active and @party_back.x > -128
@party_back.x -= 16
@battlestatus_back.x -= 16
@actor_back.x -= 16
end
end

alias cms_ibegu_start_party_command_selection start_party_command_selection
def start_party_command_selection
cms_ibegu_start_party_command_selection
if $game_temp.in_battle
@message_window.openness = 0
@party_back.visible = true
@battlestatus_back.visible = true
@actor_back.visible = true
end
end



alias cms_ibegu_process_escape process_escape
def process_escape
cms_ibegu_process_escape
@message_window.openness = 255
@party_back.visible = false
@battlestatus_back.visible = false
@actor_back.visible = false
end

alias cms_ibegu_process_victory process_victory
def process_victory
cms_ibegu_process_victory
@message_window.openness = 255
@party_back.visible = false
@battlestatus_back.visible = false
@actor_back.visible = false
end

alias cms_ibegu_process_defeat process_defeat
def process_defeat
cms_ibegu_process_defeat
@message_window.openness = 255
@party_back.visible = false
@battlestatus_back.visible = false
@actor_back.visible = false
end

alias cms_ibegu_start_main start_main
def start_main
cms_ibegu_start_main
@message_window.openness = 255
@party_back.visible = false
@battlestatus_back.visible = false
@actor_back.visible = false
end

alias cms_ibegu_start_target_enemy_selection start_target_enemy_selection
def start_target_enemy_selection
cms_ibegu_start_target_enemy_selection
@target_enemy_back = Sprite.new
@target_enemy_back.bitmap = Cache.menu(CMS::ENEMY_TARGET_BACK_FILE)
@target_enemy_back.y = 285
@target_enemy_window.opacity = 0
end

alias cms_ibegu_end_target_enemy_selection end_target_enemy_selection
def end_target_enemy_selection
cms_ibegu_end_target_enemy_selection
if @target_enemy_back != nil
@target_enemy_back.dispose
end
end

alias cms_ibegu_start_target_actor_selection start_target_actor_selection
def start_target_actor_selection
cms_ibegu_start_target_actor_selection
@target_actor_window.opacity = 0
end

alias cms_ibegu_start_skill_selection start_skill_selection
def start_skill_selection
cms_ibegu_start_skill_selection
@skill_battle_back = Plane.new
@skill_battle_back.bitmap = Cache.menu(CMS::SKILL_BATTLE_BACK_FILE)
@help_window.opacity = 0
@skill_window.opacity = 0
end

alias cms_ibegu_end_skill_selection end_skill_selection
def end_skill_selection
cms_ibegu_end_skill_selection
if @skill_battle_back != nil
@skill_battle_back.dispose
end
end

alias cms_ibegu_start_item_selection start_item_selection
def start_item_selection
cms_ibegu_start_item_selection
@item_select_back = Plane.new
@item_select_back.bitmap = Cache.menu(CMS::ITEM_SELECT_BACK_FILE)
@help_window.opacity = 0
@item_window.opacity = 0
end

alias cms_ibegu_end_item_selection end_item_selection
def end_item_selection
cms_ibegu_end_item_selection
if @item_select_back != nil
@item_select_back.dispose
end
end

end
#------------------------------------------------------------------------------
# End Of File
#------------------------------------------------------------------------------