請教選單邊框寬度的修改方法 - Project1

class Window_CommandMenu_Sai90306 < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #    width : 窗口的宽
  #    commands : 命令字符串序列
  #--------------------------------------------------------------------------
  def initialize(width, commands)
# 由命令的个数计算出窗口的高
super(0, 0, width, 64)
@item_max = commands.size
@commands = commands
@column_max = commands.size
self.contents = Bitmap.new(width - 32, 64- 32)
refresh
self.index = 0
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
self.contents.clear
for i in 0...@item_max
   draw_item(i, normal_color)
end
  end
  #--------------------------------------------------------------------------
  # ● 描绘项目
  #    index : 项目编号
  #    color : 文字色
  #--------------------------------------------------------------------------
  def draw_item(index, color)
self.contents.font.color = color
self.contents.font.size = 16#設定文字大小
self.contents.font.bold = true#設定文字粗體
# 计算光标的宽
cursor_width = width / @column_max - 32
# 计算光标坐标
x = index % @column_max * (cursor_width + 32)
#y = @index / @column_max * 32 - self.oy
rect = Rect.new(x, 0, cursor_width - 8, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
self.contents.draw_text(rect, @commands[index], 1)
  end
  #--------------------------------------------------------------------------
  # ● 项目无效化
  #    index : 项目编号
  #--------------------------------------------------------------------------
  def disable_item(index)
draw_item(index, disabled_color)
  end
end

class Scene_Menu_Sai90306
  #--------------------------------------------------------------------------
  # ● 初始化目標
  #    menu_index : 命令游標的初期位置
  #--------------------------------------------------------------------------
  def initialize(menu_index = 0)
@menu_index = menu_index
  end
  #--------------------------------------------------------------------------
  # ● 主處理
  #--------------------------------------------------------------------------
  def main
#設定背景圖片開始

@back_map = Spriteset_Map.new#設定背景透明
# 製作命令視窗
s1 = "選項"
s2 = "選項測試"
s3 = "選項測試測試"
s4 = "選項"
s5 = "選項"
s6 = "選項測試測試測試"
s7 = "返回"
主選項 = [s1,s2,s3,s4,s5,s6,s7]


@SLG_選單寬度 = 640#640為選單寬度,可調整
@command_window = Window_CommandMenu_Sai90306.new(@SLG_選單寬度, 主選項)#250為選單寬度,可調整
#@command_window = Window_Command_Sai.new(250, [s5, s6, s7, s8, s9])#250為選單寬度,可調整
#@command_window.height = 32+32*$sai_row#設定選單行數為$sai_row行
@command_window.height = 32+32
@command_window.x = 0#設定x座標
@command_window.y = 480-64#設定y座標
@command_window.index = @menu_index

# 執行過渡
Graphics.transition
# 主循環
loop do
   # 更新遊戲畫面
   Graphics.update
   # 更新輸入訊息
   Input.update
   # 更新畫面
   update
   # 如果切換畫面就中斷循環
   if $scene != self
      break
   end
end
# 準備過渡
Graphics.freeze
# 釋放視窗所佔的記憶體空間
@back_map.dispose#釋放背景
@command_window.dispose

  end
  #--------------------------------------------------------------------------
  # ● 更新畫面
  #--------------------------------------------------------------------------
  def update
# 更新視窗
@command_window.update

# 命令視窗被啟動的情況下: 取用 update_command
if @command_window.active
   update_command
   return
end
# 政務視窗被啟動的情況下: 取用 update_command1
if @command_window1.active
   update_command1
   return
end
# 軍事視窗被啟動的情況下: 取用 update_command2
if @command_window2.active
   update_command2
   return
end
# 人才視窗被啟動的情況下: 取用 update_command2
if @command_window3.active
   update_command3
   return
end

  end
  #--------------------------------------------------------------------------
  # ● 更新畫面 (命令視窗被啟動的情況下)
  #--------------------------------------------------------------------------
  def update_command
# 按下 B 鍵的情況下
if Input.trigger?(Input::B)
   # 演奏取消 SE
   $game_system.se_play($data_system.cancel_se)
   # 切換的地圖畫面
   $scene = Scene_Map.new
   return
end
# 按下 C 鍵的情況下
if Input.trigger?(Input::C)
   # 同伴人數為 0、存檔、遊戲結束以外的場合
   if $game_party.actors.size == 0 and @command_window.index < 4
      # 演奏凍結 SE
      $game_system.se_play($data_system.buzzer_se)
      return
   end
   # 命令視窗的游標位置分支
   case @command_window.index
   when 0  #政務
      @command_window.active = false

   when 1  #軍事
      @command_window.active = false

   when 2  #人才
      @command_window.active = false

   when 3

   when 4

   when 5

   end
   return
end
  end
end

#==============================================================================
# ■ Window_Selectable
#------------------------------------------------------------------------------
# 擁有游標移動以及捲動功能的視窗類別。
#要調整視窗顯示行數搜索 #調整視窗顯示行數
#==============================================================================
class Window_Selectable_Sai < Window_Base_Sai
#--------------------------------------------------------------------------
# ● 定義實例變量
#--------------------------------------------------------------------------
attr_reader :index # 游標位置
attr_reader :help_window # 提示視窗
#--------------------------------------------------------------------------
# ● 初始化對像
# x : 視窗的 X 座標
# y : 視窗的 Y 座標
# width : 視窗的寬度
# height : 視窗的高度
#--------------------------------------------------------------------------
def initialize(x, y, width, height)
super(x, y, width, height)
@item_max = 1
@column_max = 1
@index = -1
end
#--------------------------------------------------------------------------
# ● 設定游標的位置
# index : 新的游標位置
#--------------------------------------------------------------------------
def index=(index)
@index = index
# 更新提示內容 (由 update_help 定義了繼承目標)
if self.active and @help_window != nil
update_help
end
# 更新游標矩形
update_cursor_rect
end
#--------------------------------------------------------------------------
# ● 取得行數
#--------------------------------------------------------------------------
def row_max
# 由項目數和列數計算出行數
return (@item_max + @column_max - 1) / @column_max
end
#--------------------------------------------------------------------------
# ● 取得開頭行
#--------------------------------------------------------------------------
def top_row
# 將視窗內容的傳送源 Y 座標、1 行的高 32 等分
return self.oy / 32
end
#--------------------------------------------------------------------------
# ● 設定開頭行
# row : 顯示開頭的行
#--------------------------------------------------------------------------
def top_row=(row)
# row 未滿 0 的場合更正為 0
if row < 0
row = 0
end
# row 超過 row_max - 1 的情況下更正為 row_max - 1
if row > row_max - 1
row = row_max - 1
end
# row 1 行高的 32 倍、視窗內容的傳送源 Y 座標
self.oy = row * 32
end
#--------------------------------------------------------------------------
# ● 獲取 1 頁可以顯示的行數
#--------------------------------------------------------------------------
def page_row_max
# 視窗的高度，設定畫面的高度減去 32 ，除以 1 行的高度 32
if $sai_row == nil
return (self.height - 32) / 32#預設值
else
return $sai_row
end
end
#--------------------------------------------------------------------------
# ● 獲取 1 頁可以顯示的項目數
#--------------------------------------------------------------------------
def page_item_max
# 將行數 page_row_max 乘上列數 @column_max
return page_row_max * @column_max#預設值
end
#--------------------------------------------------------------------------
# ● 提示視窗的設定
# help_window : 新的提示視窗
#--------------------------------------------------------------------------
def help_window=(help_window)
@help_window = help_window
# 更新提示文字 (由 update_help 定義了繼承的目標)
if self.active and @help_window != nil
update_help
end
end
#--------------------------------------------------------------------------
# ● 更新游標矩形
#--------------------------------------------------------------------------
def update_cursor_rect
# 游標位置不滿 0 的情況下
if @index < 0
self.cursor_rect.empty
return
end
# 取得當前的行
row = @index / @column_max
# 當前行被顯示開頭行前面的情況下
if row < self.top_row
# 從當前行向開頭行捲動
self.top_row = row
end
# 當前行被顯示末尾行之後的情況下
if row > self.top_row + (self.page_row_max - 1)
# 從當前行向末尾捲動
self.top_row = row - (self.page_row_max - 1)
end
# 計算游標的寬度
cursor_width = self.width / @column_max - 32
# 計算游標座標
x = @index % @column_max * (cursor_width + 32)
y = @index / @column_max * 32 - self.oy
# 更新游標矩形
self.cursor_rect.set(x, y, cursor_width, 32)
end
#--------------------------------------------------------------------------
# ● 更新畫面
#--------------------------------------------------------------------------
def update
super
# 可以移動光標的情況下
if self.active and @item_max > 0 and @index >= 0
# 方向鍵下被按下的情況下
if Input.repeat?(Input::DOWN)
# 列數不是 1 並且方向鍵的下的按下狀態不是重複的情況、
# 或游標位置在(項目數-列數)之前的情況下
if (@column_max == 1 and Input.trigger?(Input::DOWN)) or
@index < @item_max - @column_max
# 游標向下移動
$game_system.se_play($data_system.cursor_se)
@index = (@index + @column_max) % @item_max
end
end
# 方向鍵上被按下的情況下
if Input.repeat?(Input::UP)
# 列數不是 1 並且方向鍵的下的按下狀態不是重複的情況、
# 或游標位置在列之後的情況下
if (@column_max == 1 and Input.trigger?(Input::UP)) or
@index >= @column_max
# 游標向上移動
$game_system.se_play($data_system.cursor_se)
@index = (@index - @column_max + @item_max) % @item_max
end
end
=begin
# 方向鍵右被按下的情況下
if Input.repeat?(Input::RIGHT)
# 列數為 2 以上並且、游標位置在(項目數 - 1)之前的情況下
if @column_max >= 2 and @index < @item_max - 1
# 游標向右移動
$game_system.se_play($data_system.cursor_se)
@index += 1
end
end
# 方向鍵左被按下的情況下
if Input.repeat?(Input::LEFT)
# 列數為 2 以上並且、游標位置在 0 之後的情況下
if @column_max >= 2 and @index > 0
# 游標向左移動
$game_system.se_play($data_system.cursor_se)
@index -= 1
end
end
=end
#纵向菜单循环
# 方向键右被按下的情况下
if Input.repeat?(Input::RIGHT)
if @column_max >= 2 and @index == @item_max - 1
$game_system.se_play($data_system.cursor_se)
@index = -1
end
# 列数为 2 以上并且、光标位置在(项目数 - 1)之前的情况下
if @column_max >= 2 and @index < @item_max - 1
# 光标向右移动
$game_system.se_play($data_system.cursor_se)
@index += 1
end
end
# 方向键左被按下的情况下
if Input.repeat?(Input::LEFT)
if @column_max >= 2 and @index == 0
$game_system.se_play($data_system.cursor_se)
@index = @item_max
end
# 列数为 2 以上并且、光标位置在 0 之后的情况下
if @column_max >= 2 and @index > 0
# 光标向左移动
$game_system.se_play($data_system.cursor_se)
@index -= 1
end
end
#纵向菜单循环
# R 鍵被按下的情況下
if Input.repeat?(Input::R)
# 顯示的最後行在資料中最後行上方的情況下
if self.top_row + (self.page_row_max - 1) < (self.row_max - 1)
# 游標向後移動一頁
$game_system.se_play($data_system.cursor_se)
@index = [@index + self.page_item_max, @item_max - 1].min
self.top_row += self.page_row_max
end
end
# L 鍵被按下的情況下
if Input.repeat?(Input::L)
# 顯示的開頭行在位置 0 之後的情況下
if self.top_row > 0
# 游標向前移動一頁
$game_system.se_play($data_system.cursor_se)
@index = [@index - self.page_item_max, 0].max
self.top_row -= self.page_row_max
end
end
end
# 更新提示文字 (由 update_help 定義了繼承的目標)
if self.active and @help_window != nil
update_help
end
# 更新游標矩形
update_cursor_rect
end
end

复制代码