自己做的采集系统!

wm123450405

自己的采集系统
在Main  插入此脚本!
在事件里输入脚本
$scene = Scene_Collection
接有采集画面了
哈哈   

######################################################################
class Window_Collection < Window_Selectable
  def initialize
    super(240, 200, 120, 80)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.back_opacity = 160
    refresh
  end
  def refresh
    self.contents.clear
    #self.contents.draw_text(4, 20, 40, 32, "采集……", 2)
  end
  def update(t)
    @t = t
    for i in 0..@t
      self.contents.font.color = Color.new(32, 255, 32, 160)
      self.contents.draw_text(4, 0, 80, 32, "采集中……", 0)
      self.contents.font.color = Color.new(200, 200, 200, 160)
      self.contents.draw_text(4 + i * 4, 32, 4 ,20, "█", 0)
    end
  end  
end

class Window_Collection_End < Window_Selectable
  def initialize
    super(240, 200, 120, 80)
    self.contents = Bitmap.new(width - 32, height - 32)
    refresh
    update
  end
  def refresh
    self.contents.clear
  end
  def update
    self.contents.draw_text(4, 10, 80, 32, "得到 花 1 个")
  end
end

class Scene_Collection
  def main
    @spriteset = Spriteset_Map.new
    @message_window = Window_Message.new
    @i = 1   
    @collection_window = Window_Collection.new
    @wait_count = 20
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        return
      end
    end
    Graphics.freeze   
  end
  def update
    if @wait_count != 0
      @wait_count -= 1
      return
    elsif @i <= 20
      @collection_window.update(@i)
      @i += 1
      @wait_count = 20
      return
    else
      @collection_window.dispose
      update_collection_window
      @wait_count = 20
      return
    end        
  end
  def update_collection_window
    @collection_end_window = Window_Collection_End.new
    @wait_count = 160
    @collection_end_window.dispose
    $scene = Scene_Map.new   
  end
end
###################################################################

越前リョーマ

MS用事件做也可以……|||

系统好像太过简单了……（脚本只不过是增加了一个过渡画面……|||）
不过有时也会有用，
收下了！{/wx}

千年狐狸精

那朵花不是默认素材吧

TERENCE

MS不错!
先收下再说。

沉默的米饭团

非常好!

ONEWateR

不错！

死圣

鼓励