游戏事件播放开场动画再到标题界面

Mohan · 发表于 2007-7-8 20:59:55

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

是这样的，我想游戏一开始先到一个地图界面，再采用事件的方式来做开场动画。完了再用一个脚本，切换到正常的标题界面。这个是我目前所能达到的最高水平。
以下为正文：

先把Scene_Title的内容改成以下部分：

#==============================================================================

# ■ Scene_Title

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

# 　处理标题画面的类。

#==============================================================================

class Scene_Title

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

  # ● 住处理

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

  def main

# 战斗测试的情况下

if $BTEST

   battle_test

   return

end

# 载入数据库

$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)

# 生成命令窗口

s1 = "0"

# 生成命令窗口

@command_window = Window_Command.new(40, [s1])

@command_window.back_opacity = 30

@command_window.x = -88 - @command_window.width / 2

@command_window.y = -888

# 停止演奏 ME、BGS、BGM

Audio.bgm_stop

Audio.me_stop

Audio.bgs_stop

# 执行过渡

Graphics.transition

# 装备过渡

Graphics.freeze

# 释放标题图形

@sprite.bitmap.dispose

@sprite.dispose

# 重置测量游戏时间用的画面计数器

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(001)

# 主角向初期位置移动

$game_player.moveto(0,0)

# 刷新主角

$game_player.refresh

# 执行地图设置的 BGM 与 BGS 的自动切换

$game_map.autoplay

# 刷新地图 (执行并行事件)

$game_map.update

# 切换地图画面

$scene = Scene_Map.new

  end

def battle_test

# 载入数据库 (战斗测试用)

$data_actors       = load_data("Data/BT_Actors.rxdata")

$data_classes    = load_data("Data/BT_Classes.rxdata")

$data_skills       = load_data("Data/BT_Skills.rxdata")

$data_items       = load_data("Data/BT_Items.rxdata")

$data_weapons    = load_data("Data/BT_Weapons.rxdata")

$data_armors       = load_data("Data/BT_Armors.rxdata")

$data_enemies    = load_data("Data/BT_Enemies.rxdata")

$data_troops       = load_data("Data/BT_Troops.rxdata")

$data_states       = load_data("Data/BT_States.rxdata")

$data_animations = load_data("Data/BT_Animations.rxdata")

$data_tilesets    = load_data("Data/BT_Tilesets.rxdata")

$data_common_events = load_data("Data/BT_CommonEvents.rxdata")

$data_system       = load_data("Data/BT_System.rxdata")

# 重置测量游戏时间用的画面计数器

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_battle_test_members

# 设置队伍 ID、可以逃走标志、战斗背景

$game_temp.battle_troop_id = $data_system.test_troop_id

$game_temp.battle_can_escape = true

$game_map.battleback_name = $data_system.battleback_name

# 演奏战斗开始 BGM

$game_system.se_play($data_system.battle_start_se)

# 演奏战斗 BGM

$game_system.bgm_play($game_system.battle_bgm)

# 切换到战斗画面

$scene = Scene_Battle.new

  end

end

复制代码

再新建一个地图，ID应该是002
在Scene_Title下插入一个脚本：
名字为Scene_Title2
内容：
#==============================================================================

# ■ Scene_Title

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

# 　处理标题画面的类。

#==============================================================================

class Scene_Title2

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

  # ● 住处理

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

  def main

# 战斗测试的情况下

if $BTEST

   battle_test

   return

end

# 载入数据库

$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)

# 生成命令窗口

s1 = "New Game"

s2 = "Load"

s3 = "Maker"

s4 = "Exit"

@command_window = Window_Command.new(192, [s1, s2, s3,s4])

@command_window.back_opacity = 160

@command_window.x = 320 - @command_window.width / 2

@command_window.y = 288

# 判定继续的有效性

# 存档文件一个也不存在的时候也调查

# 有効为 @continue_enabled 为 true、無効为 false

@continue_enabled = false

for i in 0..4

   if FileTest.exist?("Save{i+1}.rxdata")

      @continue_enabled = true

   end

end

# 继续为有效的情况下、光标停止在继续上

# 无效的情况下、继续的文字显示为灰色

if @continue_enabled = true

   @command_window.index = 1

end

# 演奏标题 BGM

$game_system.bgm_play($data_system.title_bgm)

# 停止演奏 ME、BGS

Audio.me_stop

Audio.bgs_stop

# 执行过渡

Graphics.transition

# 主循环

loop do

   # 刷新游戏画面

   Graphics.update

   # 刷新输入信息

   Input.update

   # 刷新画面

   update

   # 如果画面被切换就中断循环

   if $scene != self

      break

   end

end

# 装备过渡

Graphics.freeze

# 释放命令窗口

@command_window.dispose

# 释放标题图形

@sprite.bitmap.dispose

@sprite.dispose

  end

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

  # ● 刷新画面

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

  def update

# 刷新命令窗口

@command_window.update

# 按下 C 键的情况下

if Input.trigger?(Input::C)

   # 命令窗口的光标位置的分支

   case @command_window.index

   when 0  # 新游戏

      command_new_game

   when 1  # 继续

      command_continue

   when 2  # 制作人员

      command_goto_maker_map

   when 3  # 退出

      command_shutdown

   end

end

  end

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

  # ● 命令 : 新游戏

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

  def command_new_game

# 演奏确定 SE

$game_system.se_play($data_system.decision_se)

# 停止 BGM

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

# 执行地图设置的 BGM 与 BGS 的自动切换

$game_map.autoplay

# 刷新地图 (执行并行事件)

$game_map.update

# 切换地图画面

$scene = Scene_Map.new

  end

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

  # ● 命令 : 继续

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

  def command_continue

# 继续无效的情况下

unless @continue_enabled

   # 演奏无效 SE

   $game_system.se_play($data_system.buzzer_se)

   return

end

# 演奏确定 SE

$game_system.se_play($data_system.decision_se)

# 切换到读档画面

$scene = Scene_Load.new

  end

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

  # ● 命令 : 退出

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

  def command_shutdown

# 演奏确定 SE

$game_system.se_play($data_system.decision_se)

# BGM、BGS、ME 的淡入淡出

Audio.bgm_fade(800)

Audio.bgs_fade(800)

Audio.me_fade(800)

# 退出

$scene = nil

  end

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

  # ★ 命令 :制作人员

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

  def command_goto_maker_map

$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(002)

$game_player.moveto(0,0)

$game_player.refresh

$game_map.autoplay

$game_map.update

$scene = Scene_Map.new

  end

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

  # ● 战斗测试

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

  def battle_test

# 载入数据库 (战斗测试用)

$data_actors       = load_data("Data/BT_Actors.rxdata")

$data_classes    = load_data("Data/BT_Classes.rxdata")

$data_skills       = load_data("Data/BT_Skills.rxdata")

$data_items       = load_data("Data/BT_Items.rxdata")

$data_weapons    = load_data("Data/BT_Weapons.rxdata")

$data_armors       = load_data("Data/BT_Armors.rxdata")

$data_enemies    = load_data("Data/BT_Enemies.rxdata")

$data_troops       = load_data("Data/BT_Troops.rxdata")

$data_states       = load_data("Data/BT_States.rxdata")

$data_animations = load_data("Data/BT_Animations.rxdata")

$data_tilesets    = load_data("Data/BT_Tilesets.rxdata")

$data_common_events = load_data("Data/BT_CommonEvents.rxdata")

$data_system       = load_data("Data/BT_System.rxdata")

# 重置测量游戏时间用的画面计数器

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_battle_test_members

# 设置队伍 ID、可以逃走标志、战斗背景

$game_temp.battle_troop_id = $data_system.test_troop_id

$game_temp.battle_can_escape = true

$game_map.battleback_name = $data_system.battleback_name

# 演奏战斗开始 BGM

$game_system.se_play($data_system.battle_start_se)

# 演奏战斗 BGM

$game_system.bgm_play($game_system.battle_bgm)

# 切换到战斗画面

$scene = Scene_Battle.new

  end

end

复制代码

之后在地图1，也就是播放开场动画的地图中播放开场动画的那个事件末尾写入脚本：

$scene = Scene_Title2.new
复制代码

大致就是这样子，因为自己才刚刚学脚本，所以不太好用的，希望大家支持。

　　　　　　　　　　　　　　[本贴由御灵于 2008-1-24 23:25:11 进行了编辑]

Mohan · 发表于 2007-7-8 20:59:55

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

是这样的，我想游戏一开始先到一个地图界面，再采用事件的方式来做开场动画。完了再用一个脚本，切换到正常的标题界面。这个是我目前所能达到的最高水平。
以下为正文：

先把Scene_Title的内容改成以下部分：

#==============================================================================

# ■ Scene_Title

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

# 　处理标题画面的类。

#==============================================================================

class Scene_Title

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

  # ● 住处理

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

  def main

# 战斗测试的情况下

if $BTEST

   battle_test

   return

end

# 载入数据库

$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)

# 生成命令窗口

s1 = "0"

# 生成命令窗口

@command_window = Window_Command.new(40, [s1])

@command_window.back_opacity = 30

@command_window.x = -88 - @command_window.width / 2

@command_window.y = -888

# 停止演奏 ME、BGS、BGM

Audio.bgm_stop

Audio.me_stop

Audio.bgs_stop

# 执行过渡

Graphics.transition

# 装备过渡

Graphics.freeze

# 释放标题图形

@sprite.bitmap.dispose

@sprite.dispose

# 重置测量游戏时间用的画面计数器

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(001)

# 主角向初期位置移动

$game_player.moveto(0,0)

# 刷新主角

$game_player.refresh

# 执行地图设置的 BGM 与 BGS 的自动切换

$game_map.autoplay

# 刷新地图 (执行并行事件)

$game_map.update

# 切换地图画面

$scene = Scene_Map.new

  end

def battle_test

# 载入数据库 (战斗测试用)

$data_actors       = load_data("Data/BT_Actors.rxdata")

$data_classes    = load_data("Data/BT_Classes.rxdata")

$data_skills       = load_data("Data/BT_Skills.rxdata")

$data_items       = load_data("Data/BT_Items.rxdata")

$data_weapons    = load_data("Data/BT_Weapons.rxdata")

$data_armors       = load_data("Data/BT_Armors.rxdata")

$data_enemies    = load_data("Data/BT_Enemies.rxdata")

$data_troops       = load_data("Data/BT_Troops.rxdata")

$data_states       = load_data("Data/BT_States.rxdata")

$data_animations = load_data("Data/BT_Animations.rxdata")

$data_tilesets    = load_data("Data/BT_Tilesets.rxdata")

$data_common_events = load_data("Data/BT_CommonEvents.rxdata")

$data_system       = load_data("Data/BT_System.rxdata")

# 重置测量游戏时间用的画面计数器

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_battle_test_members

# 设置队伍 ID、可以逃走标志、战斗背景

$game_temp.battle_troop_id = $data_system.test_troop_id

$game_temp.battle_can_escape = true

$game_map.battleback_name = $data_system.battleback_name

# 演奏战斗开始 BGM

$game_system.se_play($data_system.battle_start_se)

# 演奏战斗 BGM

$game_system.bgm_play($game_system.battle_bgm)

# 切换到战斗画面

$scene = Scene_Battle.new

  end

end

复制代码

再新建一个地图，ID应该是002
在Scene_Title下插入一个脚本：
名字为Scene_Title2
内容：
#==============================================================================

# ■ Scene_Title

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

# 　处理标题画面的类。

#==============================================================================

class Scene_Title2

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

  # ● 住处理

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

  def main

# 战斗测试的情况下

if $BTEST

   battle_test

   return

end

# 载入数据库

$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)

# 生成命令窗口

s1 = "New Game"

s2 = "Load"

s3 = "Maker"

s4 = "Exit"

@command_window = Window_Command.new(192, [s1, s2, s3,s4])

@command_window.back_opacity = 160

@command_window.x = 320 - @command_window.width / 2

@command_window.y = 288

# 判定继续的有效性

# 存档文件一个也不存在的时候也调查

# 有効为 @continue_enabled 为 true、無効为 false

@continue_enabled = false

for i in 0..4

   if FileTest.exist?("Save{i+1}.rxdata")

      @continue_enabled = true

   end

end

# 继续为有效的情况下、光标停止在继续上

# 无效的情况下、继续的文字显示为灰色

if @continue_enabled = true

   @command_window.index = 1

end

# 演奏标题 BGM

$game_system.bgm_play($data_system.title_bgm)

# 停止演奏 ME、BGS

Audio.me_stop

Audio.bgs_stop

# 执行过渡

Graphics.transition

# 主循环

loop do

   # 刷新游戏画面

   Graphics.update

   # 刷新输入信息

   Input.update

   # 刷新画面

   update

   # 如果画面被切换就中断循环

   if $scene != self

      break

   end

end

# 装备过渡

Graphics.freeze

# 释放命令窗口

@command_window.dispose

# 释放标题图形

@sprite.bitmap.dispose

@sprite.dispose

  end

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

  # ● 刷新画面

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

  def update

# 刷新命令窗口

@command_window.update

# 按下 C 键的情况下

if Input.trigger?(Input::C)

   # 命令窗口的光标位置的分支

   case @command_window.index

   when 0  # 新游戏

      command_new_game

   when 1  # 继续

      command_continue

   when 2  # 制作人员

      command_goto_maker_map

   when 3  # 退出

      command_shutdown

   end

end

  end

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

  # ● 命令 : 新游戏

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

  def command_new_game

# 演奏确定 SE

$game_system.se_play($data_system.decision_se)

# 停止 BGM

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

# 执行地图设置的 BGM 与 BGS 的自动切换

$game_map.autoplay

# 刷新地图 (执行并行事件)

$game_map.update

# 切换地图画面

$scene = Scene_Map.new

  end

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

  # ● 命令 : 继续

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

  def command_continue

# 继续无效的情况下

unless @continue_enabled

   # 演奏无效 SE

   $game_system.se_play($data_system.buzzer_se)

   return

end

# 演奏确定 SE

$game_system.se_play($data_system.decision_se)

# 切换到读档画面

$scene = Scene_Load.new

  end

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

  # ● 命令 : 退出

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

  def command_shutdown

# 演奏确定 SE

$game_system.se_play($data_system.decision_se)

# BGM、BGS、ME 的淡入淡出

Audio.bgm_fade(800)

Audio.bgs_fade(800)

Audio.me_fade(800)

# 退出

$scene = nil

  end

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

  # ★ 命令 :制作人员

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

  def command_goto_maker_map

$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(002)

$game_player.moveto(0,0)

$game_player.refresh

$game_map.autoplay

$game_map.update

$scene = Scene_Map.new

  end

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

  # ● 战斗测试

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

  def battle_test

# 载入数据库 (战斗测试用)

$data_actors       = load_data("Data/BT_Actors.rxdata")

$data_classes    = load_data("Data/BT_Classes.rxdata")

$data_skills       = load_data("Data/BT_Skills.rxdata")

$data_items       = load_data("Data/BT_Items.rxdata")

$data_weapons    = load_data("Data/BT_Weapons.rxdata")

$data_armors       = load_data("Data/BT_Armors.rxdata")

$data_enemies    = load_data("Data/BT_Enemies.rxdata")

$data_troops       = load_data("Data/BT_Troops.rxdata")

$data_states       = load_data("Data/BT_States.rxdata")

$data_animations = load_data("Data/BT_Animations.rxdata")

$data_tilesets    = load_data("Data/BT_Tilesets.rxdata")

$data_common_events = load_data("Data/BT_CommonEvents.rxdata")

$data_system       = load_data("Data/BT_System.rxdata")

# 重置测量游戏时间用的画面计数器

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_battle_test_members

# 设置队伍 ID、可以逃走标志、战斗背景

$game_temp.battle_troop_id = $data_system.test_troop_id

$game_temp.battle_can_escape = true

$game_map.battleback_name = $data_system.battleback_name

# 演奏战斗开始 BGM

$game_system.se_play($data_system.battle_start_se)

# 演奏战斗 BGM

$game_system.bgm_play($game_system.battle_bgm)

# 切换到战斗画面

$scene = Scene_Battle.new

  end

end

复制代码

之后在地图1，也就是播放开场动画的地图中播放开场动画的那个事件末尾写入脚本：

$scene = Scene_Title2.new
复制代码

大致就是这样子，因为自己才刚刚学脚本，所以不太好用的，希望大家支持。

　　　　　　　　　　　　　　[本贴由御灵于 2008-1-24 23:25:11 进行了编辑]

暗之影 · 发表于 2007-7-9 01:10:44

提示: 作者被禁止或删除内容自动屏蔽

小真·爱舞 · 发表于 2007-7-9 01:27:34

和我那游戏里的logo画面同一方法。

红世之徒 · 发表于 2007-7-9 03:14:09

用处不小...做个Logo的问题算是解决了....
不过这种调用方式...确实麻烦了点哦^^
总而言之是个好东西,华丽的顶上去并收下了~~/-v-/

雪幻夜 · 发表于 2008-1-2 16:30:38

我弄了，但是最后怎么无限循环啊－－

kadxz2020 · 发表于 2008-1-4 04:50:40

提示: 作者被禁止或删除内容自动屏蔽

雪流星 · 发表于 2008-1-4 17:03:29

我想到一个方法，不知行不行

把这个插入Scene_Title下面，
并且重新命名为Scene_Title2

接着把main的第13行
  # 生成场景对像 (标题画面)
  $scene = Scene_Title.new
改成
  # 生成场景对像 (标题画面)
  $scene = Scene_Title2.new

然後在地图1播放完开场动画後写入脚本
  $scene = Scene_Title.new

如此就能无限循环了

御灵 · 发表于 2008-1-25 07:25:34

发布完毕。
http://rpg.blue/web/htm/news928.htm
vip+4

Mohan · 发表于 2008-2-1 23:14:45

不好意思,MS发布重了.
早先66发过的:
http://rpg.blue/web/htm/news857.htm
也许是上次数据丢失造成原帖没了.
请更正.

帐号		自动登录	找回密码
密码			注册会员