【伪·紫菜单】因为写得太挫所以发水区

kuerlulu

RUBY 代码复制

#encoding:utf-8
# 一个子窗口
#  其实功能好扩展我会乱说?
class Sub_Window < Window_Base
  #--------------------------------------------------------------------------
  # ● 初始化对象
  #--------------------------------------------------------------------------
  def initialize(x, y)
    super(x, y, window_width, fitting_height(visible_line_number))
    self.openness = 0
    activate
  end
  #--------------------------------------------------------------------------
  # ● 获取窗口的宽度
  #--------------------------------------------------------------------------
  def window_width
    return 128
  end
  #--------------------------------------------------------------------------
  # ● 获取显示行数
  #--------------------------------------------------------------------------
  def visible_line_number
    return 1
  end
  #--------------------------------------------------------------------------
  # ● 设置
  #--------------------------------------------------------------------------
  def setup(text, *mode)
    create_contents
    self.contents.draw_text(self.contents.rect, text)
    case mode
    when [:bar]
      @var = 0
      @vartemp = @var
      @bar = Sprite.new
      @bar.x,@bar.y,@bar.z,@bar.opacity = self.x+14,self.y+14,100,205
      @bar.bitmap = Bitmap.new(74, 20)
      @bar.bitmap.fill_rect(@bar.bitmap.rect, Color.new(255,255,255))
      self.contents.draw_text(self.contents.rect, @var, 2)
    end
    open
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def update
    super
    if @bar
      @var += 1 if Input.press?(:UP) && @var != 100
      @var -= 1 if Input.press?(:DOWN) && @var != 0
      if @var != @vartemp
        @vartemp = @var
        update_bar
      end
    end
  end
  def dispose
    (@bar.bitmap.dispose;@bar.dispose) if @bar
    super
  end
  def update_bar
    self.contents.clear
    self.contents.draw_text(self.contents.rect, @var, 2)
    @bar.bitmap.clear
    @bar.bitmap.fill_rect(@bar.bitmap.rect, Color.new(255,255,255))
    @bar.bitmap.fill_rect(0, 0, @bar.bitmap.width*@var/100, 20, Color.new(102,204,255))
  end
end
 
# 子菜单管理器
#  其实是场景我会瞎说?
class Window_WithSub
  attr_reader :x,:y       # 坐标
  attr_reader :index      # 当前光标位置
  attr_reader :windows    # 窗口数组
  attr_reader :value      # 传参借位
  attr_reader :methd      # 方法数组
  # hash 格式:
  #{ :command1 => method(:symbol1),
  #  :command2 => { :command21 => method(:symbol2) } }
  def initialize(x, y, hash, &block)
    @x,@y,@index = x,y,0
    @last = @index
    instance_eval(&block) if block_given?
    @windows,@methd = [],[]
    create_windows(hash)
    main
  end
  def main
    loop do
      Graphics.update
      Input.update
      break dispose if Input.trigger?(:LEFT)
      update
    end
  end
  def create_windows(hash)
    hash.each do |key, value|
      if (value.is_a? Method)||(value.is_a? Symbol)
        @windows.push(new_window(key, value))
      elsif value.is_a? Hash
        @value = value
        @windows.push(new_window(key, method(:new_sub)))
      end
    end
  end
  def new_sub
    Window_WithSub.new(self.x+60, self.y+40, @value)
  end
  def new_window(sym, obj)
    w = Sub_Window.new(self.x, self.y + 48 * @windows.size)
    if obj.is_a? Method
      w.setup(sym.to_s)
      @methd[@windows.size] = obj
    elsif obj.is_a? Symbol
      w.setup("" , obj)
      @methd[@windows.size] = ->{}
    end
    return w
  end
  def update
    if Input.trigger?(:UP)
      Sound.play_cursor
      @index == 0 ? @index = @windows.size-1 : @index -= 1
    elsif Input.trigger?(:DOWN)
      Sound.play_cursor
      @index == @windows.size-1 ? @index = 0 : @index += 1
    elsif Input.trigger?(:RIGHT)
      if @methd[@index].inspect == "#<Method: Game_Interpreter#m1>"
        Sound.play_buzzer
      else
        Sound.play_ok
        @methd[@index].call
      end
    elsif Input.trigger?(:LEFT)
      Sound.play_cancel
    end
    @windows.each { |w| w.update }
    activate(@windows[@index])
    if @last != @index
      @last = @index
    end
  end
  def dispose
    @windows.each { |w| w.dispose }
  end
  def activate(window)
    @windows.each_with_index do |w,i|
      w.cursor_rect.empty
      w.cursor_rect.set(Rect.new(0, 0, 104, 24)) if w == window
    end
  end
end
 
class Game_Interpreter
  def m1;end
  def callsubw
    subw = Window_WithSub.new(60, 60, {
      :物品 => method(:m1),
      :装备 => method(:m1),
      :技能 => method(:m1),
      :状态 => method(:m1),
      :笔记 => method(:m1),
      :系统 => { 
        :音乐 => { :var => :bar },
        :音效 => method(:m1),
        :读档 => method(:m1),
        :标题 => method(:m1)},
      :读档 => method(:m1),
})
  end
end

#encoding:utf-8


# 一个子窗口


#  其实功能好扩展我会乱说?


class Sub_Window < Window_Base


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


  # ● 初始化对象


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


  def initialize(x, y)


    super(x, y, window_width, fitting_height(visible_line_number))


    self.openness = 0


    activate


  end


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


  # ● 获取窗口的宽度


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


  def window_width


    return 128


  end


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


  # ● 获取显示行数


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


  def visible_line_number


    return 1


  end


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


  # ● 设置


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


  def setup(text, *mode)


    create_contents


    self.contents.draw_text(self.contents.rect, text)


    case mode


    when [:bar]


      @var = 0


      @vartemp = @var


      @bar = Sprite.new


      @bar.x,@bar.y,@bar.z,@bar.opacity = self.x+14,self.y+14,100,205


      @bar.bitmap = Bitmap.new(74, 20)


      @bar.bitmap.fill_rect(@bar.bitmap.rect, Color.new(255,255,255))


      self.contents.draw_text(self.contents.rect, @var, 2)


    end


    open


  end


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


  # ● 刷新


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


  def update


    super


    if @bar


      @var += 1 if Input.press?(:UP) && @var != 100


      @var -= 1 if Input.press?(:DOWN) && @var != 0


      if @var != @vartemp


        @vartemp = @var


        update_bar


      end


    end


  end


  def dispose


    (@bar.bitmap.dispose;@bar.dispose) if @bar


    super


  end


  def update_bar


    self.contents.clear


    self.contents.draw_text(self.contents.rect, @var, 2)


    @bar.bitmap.clear


    @bar.bitmap.fill_rect(@bar.bitmap.rect, Color.new(255,255,255))


    @bar.bitmap.fill_rect(0, 0, @bar.bitmap.width*@var/100, 20, Color.new(102,204,255))


  end


end


 


# 子菜单管理器


#  其实是场景我会瞎说?


class Window_WithSub


  attr_reader :x,:y       # 坐标


  attr_reader :index      # 当前光标位置


  attr_reader :windows    # 窗口数组


  attr_reader :value      # 传参借位


  attr_reader :methd      # 方法数组


  # hash 格式:


  #{ :command1 => method(:symbol1),


  #  :command2 => { :command21 => method(:symbol2) } }


  def initialize(x, y, hash, &block)


    @x,@y,@index = x,y,0


    @last = @index


    instance_eval(&block) if block_given?


    @windows,@methd = [],[]


    create_windows(hash)


    main


  end


  def main


    loop do


      Graphics.update


      Input.update


      break dispose if Input.trigger?(:LEFT)


      update


    end


  end


  def create_windows(hash)


    hash.each do |key, value|


      if (value.is_a? Method)||(value.is_a? Symbol)


        @windows.push(new_window(key, value))


      elsif value.is_a? Hash


        @value = value


        @windows.push(new_window(key, method(:new_sub)))


      end


    end


  end


  def new_sub


    Window_WithSub.new(self.x+60, self.y+40, @value)


  end


  def new_window(sym, obj)


    w = Sub_Window.new(self.x, self.y + 48 * @windows.size)


    if obj.is_a? Method


      w.setup(sym.to_s)


      @methd[@windows.size] = obj


    elsif obj.is_a? Symbol


      w.setup("" , obj)


      @methd[@windows.size] = ->{}


    end


    return w


  end


  def update


    if Input.trigger?(:UP)


      Sound.play_cursor


      @index == 0 ? @index = @windows.size-1 : @index -= 1


    elsif Input.trigger?(:DOWN)


      Sound.play_cursor


      @index == @windows.size-1 ? @index = 0 : @index += 1


    elsif Input.trigger?(:RIGHT)


      if @methd[@index].inspect == "#<Method: Game_Interpreter#m1>"


        Sound.play_buzzer


      else


        Sound.play_ok


        @methd[@index].call


      end


    elsif Input.trigger?(:LEFT)


      Sound.play_cancel


    end


    @windows.each { |w| w.update }


    activate(@windows[@index])


    if @last != @index


      @last = @index


    end


  end


  def dispose


    @windows.each { |w| w.dispose }


  end


  def activate(window)


    @windows.each_with_index do |w,i|


      w.cursor_rect.empty


      w.cursor_rect.set(Rect.new(0, 0, 104, 24)) if w == window


    end


  end


end


 


class Game_Interpreter


  def m1;end


  def callsubw


    subw = Window_WithSub.new(60, 60, {


      :物品 => method(:m1),


      :装备 => method(:m1),


      :技能 => method(:m1),


      :状态 => method(:m1),


      :笔记 => method(:m1),


      :系统 => { 


        :音乐 => { :var => :bar },


        :音效 => method(:m1),


        :读档 => method(:m1),


        :标题 => method(:m1)},


      :读档 => method(:m1),


})


  end


end

我还是太年轻了
以及颜文字功能好像有bug的说搞基编辑模式下按颜文字会清空已编辑的内容

taroxd

大触收下我的膝盖

克莉丝

大触收下我的膝盖

来水区都是大触

柳泖

大触收下我的膝盖

小路比仔

嘛……我连看都看不懂脚本内容啦~大大请不要妄自菲薄哦

月华风

大触请收下我的膝盖

鑫晴

大触收下我的膝盖

恐惧剑刃

用图片做底效果不差
这么快都有人收藏了！！！我的帖子就没见有人收藏过(￣︿￣)

satgo1546

难道这个帖子就是你写的（？

你最珍贵

这就是昨晚触手们研究的结果吗