OX論壇
Would you like to react to this message? Create an account in a few clicks or log in to continue.

不想浪費玩家時間嗎? 超快進遊戲的RGSS

2 posters

向下

不想浪費玩家時間嗎? 超快進遊戲的RGSS Empty 不想浪費玩家時間嗎? 超快進遊戲的RGSS

發表  盼月 周一 8月 25, 2008 10:15 pm

玩家時間就是金?
請貼於Main上方即可~

接到的畫面就看您的創意嚕..^^

代碼:
class Scene_Title
  def main
    $data_actors        = load_data("Data/Actors.rxdata")
    $data_classes      = load_data("Data/Classes.rxdata")
    $data_skills        = load_data("Data/Skills.rxdata")
    $data_items        = load_data("Data/Items.rxdata")
    $data_weapons      = load_data("Data/Weapons.rxdata")
    $data_armors        = load_data("Data/Armors.rxdata")
    $data_enemies      = load_data("Data/Enemies.rxdata")
    $data_troops        = load_data("Data/Troops.rxdata")
    $data_states        = load_data("Data/States.rxdata")
    $data_animations    = load_data("Data/Animations.rxdata")
    $data_tilesets      = load_data("Data/Tilesets.rxdata")
    $data_common_events = load_data("Data/CommonEvents.rxdata")
    $data_system        = load_data("Data/System.rxdata")
    $game_system = Game_System.new
    @sprite = Sprite.new
    @sprite.bitmap = RPG::Cache.title($data_system.title_name)
    Audio.bgm_stop
    Graphics.frame_count = 0
    $game_temp          = Game_Temp.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables    = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_screen        = Game_Screen.new
    $game_actors        = Game_Actors.new
    $game_party        = Game_Party.new
    $game_troop        = Game_Troop.new
    $game_map          = Game_Map.new
    $game_player        = Game_Player.new
    $game_party.setup_starting_members
    $game_map.setup($data_system.start_map_id)
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    $game_player.refresh
    $game_map.autoplay
    $game_map.update
    $scene = Scene_Map.new
  end
end
盼月
盼月
拿著衝鋒槍瘋狂掃射的瘋子
拿著衝鋒槍瘋狂掃射的瘋子

文章數 : 130
注冊日期 : 2008-08-10
年齡 : 37
來自 : 葡萄糖

http://www.wretch.cc/mypage/seexlive

回頂端 向下

不想浪費玩家時間嗎? 超快進遊戲的RGSS Empty 回復: 不想浪費玩家時間嗎? 超快進遊戲的RGSS

發表  雲的彼方 周二 8月 26, 2008 2:41 am

盼月 寫到:玩家時間就是金?
請貼於Main上方即可~

接到的畫面就看您的創意嚕..^^

代碼:
class Scene_Title
  def main
    $data_actors        = load_data("Data/Actors.rxdata")
    $data_classes      = load_data("Data/Classes.rxdata")
    $data_skills        = load_data("Data/Skills.rxdata")
    $data_items        = load_data("Data/Items.rxdata")
    $data_weapons      = load_data("Data/Weapons.rxdata")
    $data_armors        = load_data("Data/Armors.rxdata")
    $data_enemies      = load_data("Data/Enemies.rxdata")
    $data_troops        = load_data("Data/Troops.rxdata")
    $data_states        = load_data("Data/States.rxdata")
    $data_animations    = load_data("Data/Animations.rxdata")
    $data_tilesets      = load_data("Data/Tilesets.rxdata")
    $data_common_events = load_data("Data/CommonEvents.rxdata")
    $data_system        = load_data("Data/System.rxdata")
    $game_system = Game_System.new
    @sprite = Sprite.new
    @sprite.bitmap = RPG::Cache.title($data_system.title_name)
    Audio.bgm_stop
    Graphics.frame_count = 0
    $game_temp          = Game_Temp.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables    = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_screen        = Game_Screen.new
    $game_actors        = Game_Actors.new
    $game_party        = Game_Party.new
    $game_troop        = Game_Troop.new
    $game_map          = Game_Map.new
    $game_player        = Game_Player.new
    $game_party.setup_starting_members
    $game_map.setup($data_system.start_map_id)
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    $game_player.refresh
    $game_map.autoplay
    $game_map.update
    $scene = Scene_Map.new
  end
end

你忘了這個
代碼:
#$game_system.load_disabled = true  #可以讀檔
#$game_system.load_disabled = false  #禁止讀檔
class Window_PlayTime < Window_Base
  def initialize
    super(0, 0, 160, 96) ; self.contents = Bitmap.new(width - 32, height - 32) ; refresh
  end
  def refresh ; self.contents.clear ; self.contents.font.color = system_color
    self.contents.draw_text(4, 0, 120, 32, "遊戲時間")
    @total_sec = Graphics.frame_count / Graphics.frame_rate
    hour = @total_sec / 60 / 60 ; min = @total_sec / 60 % 60 ; sec = @total_sec % 60
    text = sprintf("%02d:%02d:%02d", hour, min, sec)
    self.contents.font.color = normal_color ; self.contents.draw_text(4, 32, 120, 32, text, 2)
  end
end
class Window_Steps < Window_Base
  def initialize ; super(0, 0, 160, 64)
    self.contents = Bitmap.new(width - 32, height - 32) ; refresh
  end
  def refresh ; self.contents.clear ; self.contents.font.color = system_color
    self.contents.draw_text(4, 0, 120, 32, "步數") ; self.contents.font.color = normal_color
    self.contents.draw_text(4, 0, 120, 32, $game_party.steps.to_s, 2)
  end
end
class Game_System ; attr :load_disabled end ; class Scene_Menu
  def main
    @sa = [$data_system.words.item, $data_system.words.skill, $data_system.words.equip,
    "狀態", "存檔", "讀檔", "結束"]
    @command_window = Window_Command.new(160, @sa)
    @command_window.index = @menu_index
    if $game_party.actors.size == 0
      @command_window.disable_item(0) ; @command_window.disable_item(1)
      @command_window.disable_item(2) ; @command_window.disable_item(3)
    end ; @command_window.disable_item(4) if $game_system.save_disabled
    @playtime_window = Window_PlayTime.new
    @playtime_window.x, @playtime_window.y = 0, 224+32
    @steps_window, @steps_window.x, @steps_window.y = Window_Steps.new, 0, 320+32
    @gold_window, @gold_window.x, @gold_window.y = Window_Gold.new, 0, 416
    @status_window, @status_window.x, @status_window.y = Window_MenuStatus.new, 160, 0
    Graphics.transition ; loop{Graphics.update ; Input.update ; update ; break if $scene != self}
    Graphics.freeze ; @command_window.dispose ; @playtime_window.dispose
    @steps_window.dispose ; @gold_window.dispose ; @status_window.dispose
  end
  def update_command
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se) ; $scene = Scene_Map.new ; return
    end
    if Input.trigger?(Input::C)
      if $game_party.actors.size == 0 and @command_window.index < 4
        $game_system.se_play($data_system.buzzer_se) ; return
      end
      $game_system.se_play($data_system.decision_se) unless @command_window.index == 4
      $game_system.se_play($data_system.decision_se) unless @command_window.index == 5
      case @command_window.index
      when 0 ; $scene = Scene_Item.new
      when 1  # 技能
        @command_window.active, @status_window.active, @status_window.index = false, true, 0
      when 2  # 裝備
        @command_window.active, @status_window.active, @status_window.index = false, true, 0
      when 3  # 狀態
        @command_window.active, @status_window.active, @status_window.index = false, true, 0
      when 4  # 存檔
        $game_system.se_play($data_system.buzzer_se) if $game_system.save_disabled
        return if $game_system.save_disabled
        $game_system.se_play($data_system.decision_se) ; $scene = Scene_Save.new
      when 5  # 讀檔
        # 禁止讀檔的情況下
        if $game_system.load_disabled
          # 演奏凍結 SE
          $game_system.se_play($data_system.buzzer_se)
          return
        end
        # 演奏確定 SE
        $game_system.se_play($data_system.decision_se)
        # 切換到讀檔畫面
        $scene = Scene_Load.new
      when 6 ; $scene = Scene_End.new
      end
    end
  end
end

雲的彼方
拿著木劍的戰士
拿著木劍的戰士

文章數 : 48
注冊日期 : 2008-08-09

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章