等级排行系统

79904396 · 发表于 2011-3-8 13:44:30

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

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

x

简单的说就是在“新游戏存档退出”的开始界面增加一个“排行榜”选项点击后可以显示所有存档中的主角等级并且进行排行：第一名第二名第三名……（如果设置存档的时候可以输入名称然后排名的时候也显示就再好不过了……）貌似也需要一个可以增加存档数量的脚本……- -||| 希望高手们帮忙一下……伸手党是无力的- -||| PS：咱还用了图片标题菜单的脚本……能否提供避免冲突办法谢谢了- -|||

魔修 · 发表于 2011-3-8 15:43:52

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
# --------------------------------------------------------------------
# 本脚本来自www.66rpg.com，转载自www.phylomortis.com，转载请保留此信息
# --------------------------------------------------------------------
class Scene_File
#——最大存档数量，一般我认为最多50足够了，20比较合适
SAVEFILE_MAX = 20
# -------------------
def initialize(help_text)
@help_text = help_text
end
# -------------------
def main
@help_window = Window_Help.new
@help_window.set_text(@help_text)
@savefile_windows = []
@cursor_displace = 0
for i in 0..3
@savefile_windows.push(Window_SaveFile.new(i, make_filename(i), i))
end
@file_index = 0
@savefile_windows[@file_index].selected = true
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@help_window.dispose
for i in @savefile_windows
i.dispose
end
end
# -------------------
def update
@help_window.update
for i in @savefile_windows
i.update
end
if Input.trigger?(Input::C)
on_decision(make_filename(@file_index))
$game_temp.last_file_index = @file_index
return
end
if Input.trigger?(Input::B)
on_cancel
return
end
if Input.repeat?(Input::DOWN)
if Input.trigger?(Input::DOWN) or @file_index < SAVEFILE_MAX - 1
if @file_index == SAVEFILE_MAX - 1
$game_system.se_play($data_system.buzzer_se)
return
end
@cursor_displace += 1
if @cursor_displace == 4
@cursor_displace = 3
for i in @savefile_windows
i.dispose
end
@savefile_windows = []
for i in 0..3
f = i - 2 + @file_index
name = make_filename(f)
@savefile_windows.push(Window_SaveFile.new(f, name, i))
@savefile_windows[i].selected = false
end
end
$game_system.se_play($data_system.cursor_se)
@file_index = (@file_index + 1)
if @file_index == SAVEFILE_MAX
@file_index = SAVEFILE_MAX - 1
end
for i in 0..3
@savefile_windows[i].selected = false
end
@savefile_windows[@cursor_displace].selected = true
return
end
end
if Input.repeat?(Input::UP)
if Input.trigger?(Input::UP) or @file_index > 0
if @file_index == 0
$game_system.se_play($data_system.buzzer_se)
return
end
@cursor_displace -= 1
if @cursor_displace == -1
@cursor_displace = 0
for i in @savefile_windows
i.dispose
end
@savefile_windows = []
for i in 0..3
f = i - 1 + @file_index
name = make_filename(f)
@savefile_windows.push(Window_SaveFile.new(f, name, i))
@savefile_windows[i].selected = false
end
end
$game_system.se_play($data_system.cursor_se)
@file_index = (@file_index - 1)
if @file_index == -1
@file_index = 0
end
for i in 0..3
@savefile_windows[i].selected = false
end
@savefile_windows[@cursor_displace].selected = true
return
end
end
end
# -------------------
def make_filename(file_index)
return "Save#{file_index + 1}.rxdata"
end
# -------------------
end
class Window_SaveFile < Window_Base
# -------------------
def initialize(file_index, filename, position)
y = 64 + position * 104
super(0, y, 640, 104)
self.contents = Bitmap.new(width - 32, height - 32)
@file_index = file_index
@filename = "Save#{@file_index + 1}.rxdata"
@time_stamp = Time.at(0)
@file_exist = FileTest.exist?(@filename)
if @file_exist
file = File.open(@filename, "r")
@time_stamp = file.mtime
@characters = Marshal.load(file)
@frame_count = Marshal.load(file)
@game_system = Marshal.load(file)
@game_switches = Marshal.load(file)
@game_variables = Marshal.load(file)
@total_sec = @frame_count / Graphics.frame_rate
file.close
end
refresh
@selected = false
end
end

复制代码

好吧这是脚本

标题选项：
Scene_Title里
找到这里
# 生成命令窗口
s1 = "新游戏"
s2 = "继续"
s3 = "退出"
@command_window = Window_Command.new(192, [s1, s2, s3])

改成
# 生成命令窗口
s1 = "新游戏"
s2 = "继续"
s3="排行榜"
s4 = "退出"
@command_window = Window_Command.new(192, [s1, s2, s3,s4])

然后在后面的这里
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
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_shutdown
   end
end
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_（要一样的-v-）
   when 3 # 退出
  command_shutdown
   end
end
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_自己改-v-
------------内容-------------
end
就可以了

79904396 · 发表于 2011-3-9 13:21:04

#--------------------------------------------------------------------------
# ● 命令 : 排行榜
#--------------------------------------------------------------------------
def command_自己改-v-
------------内容-------------
end

非常感谢LS……但是……
（巨汗……）内容…………………………………………有无范本……………………
要怎样写T—T

沙漠点灰 · 发表于 2011-3-9 18:20:04

回复 79904396 的帖子

终于改好了，花了半节英语课来想....
最后发现没有 $game_actors 不是完全的Array，又只有改

# 全存档等级排行 —— by 沙漠.灰
# 本来想用冒泡法排的，发现Array有sort!方法,直接用了
# 默认是根目录下所有的*.rxdata文件
# 要改的话107行 ("./") 为根目录
# 比如("./Save/") 为根目录下Save文件夹(前提要有,不然...嘿嘿)
# 增加Array方法
class Array
# 返回单元所在位子
def return_num(num)
for i in 0...self.size
return i if self[i] == num
end
return -1
end
end
#==============================================================================
# ■ Window_Lv
#------------------------------------------------------------------------------
# 　显示金钱的窗口。
#==============================================================================
class Window_Lv < Window_Base
#--------------------------------------------------------------------------
# ● 初始化窗口
#--------------------------------------------------------------------------
def initialize(data)
@data = data
super(0, 0, 640, 480)
@size = comput
self.contents = Bitmap.new(width - 32, @size * 32)
refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
self.contents.draw_text(4, 0, 580, 32, "等级风云榜",1)
y = 32
for lv in @new_actor
for actor in lv
if actor[0].name != ""
self.contents.draw_text(4, y, 200, 32, "名称:#{actor[0].name}")
self.contents.draw_text(204, y, 200, 32, "等级:#{actor[0].level}")
self.contents.draw_text(354, y, 250, 32, "所在存档:#{actor[1]}")
y += 32
end
end
end
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def update
if Input.press?(Input::UP)
self.oy -= 2 if self.oy > 0
end
if Input.press?(Input::DOWN)
self.oy += 2 if self.oy < @size * 32 - self.height
end
end
#--------------------------------------------------------------------------
# ● 再计算数据
#--------------------------------------------------------------------------
def comput
actor_num = 0
# 计算等级，按高矮排序
lv_array = []
for data in @data
for i in 1..999
actor = data[0][i]
break if actor == nil
lv_array.push(actor.level) if !lv_array.include?(actor.level)
end
end
lv_array.sort!
lv_array.reverse!
@new_actor = []
lv_array.size.times {@new_actor.push([])}
for data in @data
for i in 1..999
actor = data[0][i]
break if actor == nil
if actor.name != ""
actor_num += 1
num = lv_array.return_num(actor.level)
@new_actor[num].push([actor,data[1]])
end
end
end
actor_num
end
end
#==============================================================================
# ■ Scene_Lv
#------------------------------------------------------------------------------
# 　处理标题画面的类。
#==============================================================================
class Scene_Lv
#--------------------------------------------------------------------------
# ● 住处理
#--------------------------------------------------------------------------
def main
# 读取存档
old_dir = Dir.pwd
Dir.chdir("./")
@save_data = Dir["*.rxdata"]
Dir.chdir(old_dir)
if @save_data == []
$scene = Scene_Title.new
return
end
# 生成临时数据保存数据
@save_actors = []
# 正式读取
read_data
# 生成窗口
@windows7好贵 = Window_Lv.new(@save_actors)
# 生成系统对像
$game_system = Game_System.new
# 生成标题图形
@sprite = Sprite.new
@sprite.bitmap = RPG::Cache.title($data_system.title_name)
# 演奏标题 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
# 释放命令窗口
# 释放标题图形
@sprite.bitmap.dispose
@sprite.dispose
@windows7好贵.dispose
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
# 按下 C 键的情况下
@windows7好贵.update
if Input.trigger?(Input::B)
$scene = Scene_Title.new
end
end
#--------------------------------------------------------------------------
# ● 读取数据
#--------------------------------------------------------------------------
def read_data
for file in @save_data
read_save_data(file)
@save_actors.push([$game_actors,file])
end
end
#--------------------------------------------------------------------------
# ● 读取存档数据
# file : 读取用文件对像 (已经打开)
#--------------------------------------------------------------------------
def read_save_data(file)
file = File.open(file, "rb")
# 读取描绘存档文件用的角色数据
characters = Marshal.load(file)
# 读取测量游戏时间用画面计数
Graphics.frame_count = Marshal.load(file)
# 读取各种游戏对像
$game_system = Marshal.load(file)
$game_switches = Marshal.load(file)
$game_variables = Marshal.load(file)
$game_self_switches = Marshal.load(file)
$game_screen = Marshal.load(file)
$game_actors = Marshal.load(file)
$game_party = Marshal.load(file)
$game_troop = Marshal.load(file)
$game_map = Marshal.load(file)
$game_player = Marshal.load(file)
file.close
end
end

复制代码

使用 :$scene = Scene_Lv.new
附：范例

79904396 · 发表于 2011-3-10 11:00:15

感谢付出T-T……但是范例…………？T-T？

79904396 · 发表于 2011-3-10 11:07:18

回复沙漠点灰的帖子

……啊……好高深- -|||
这些东西要放在哪………………是内容吗还是要在main前插入T-T……

沙漠点灰 · 发表于 2011-3-10 17:14:48

回复 79904396 的帖子

不好意思，上次没时间了，上次那个有个小BUG，DEBUG版:

# 全存档等级排行 —— by 沙漠.灰
# 本来想用冒泡法排的，发现Array有sort!方法,直接用了
Opacity = 180 # 窗口背景不透明度 255=>不透明 0=>透明
Path = "./" # 存档目录 "./"为根目录 "/Save/"就为根目录下的Save文件夹
Lv = 1 # 能排上等级榜的最低等级
# 增加Array方法
class Array
# 返回单元所在位子
def return_num(num)
for i in 0...self.size
return i if self[i] == num
end
return -1
end
end
#==============================================================================
# ■ Window_Lv
#------------------------------------------------------------------------------
# 　显示金钱的窗口。
#==============================================================================
class Window_Lv < Window_Base
#--------------------------------------------------------------------------
# ● 初始化窗口
#--------------------------------------------------------------------------
def initialize(data)
@data = data
super(0, 0, 640, 480)
@size = comput
self.contents = Bitmap.new(width - 32, @size * 32)
refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
self.contents.draw_text(4, 0, 580, 32, "等级风云榜",1)
y = 32
for lv in @new_actor
for actor in lv
if actor[0].name != ""
self.contents.draw_text(4, y, 200, 32, "名称:#{actor[0].name}")
self.contents.draw_text(204, y, 200, 32, "等级:#{actor[0].level}")
self.contents.draw_text(354, y, 250, 32, "所在存档:#{actor[1]}")
y += 32
end
end
end
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def update
if Input.press?(Input::UP)
self.oy -= 2 if self.oy > 0
end
if Input.press?(Input::DOWN)
self.oy += 2 if self.oy < @size * 32 - self.height
end
end
#--------------------------------------------------------------------------
# ● 再计算数据
#--------------------------------------------------------------------------
def comput
actor_num = 0
# 计算等级，按高矮排序
lv_array = []
for data in @data
for i in 1..999
actor = data[0][i]
break if actor == nil
lv_array.push(actor.level) if !lv_array.include?(actor.level)
end
end
lv_array.sort!
lv_array.reverse!
@new_actor = []
lv_array.size.times {@new_actor.push([])}
for data in @data
for i in 1..999
actor = data[0][i]
break if actor == nil
if actor.name != ""
next if actor.level < Lv
actor_num += 1
num = lv_array.return_num(actor.level)
@new_actor[num].push([actor,data[1]])
end
end
end
actor_num + 2
end
end
#==============================================================================
# ■ Scene_Lv
#------------------------------------------------------------------------------
# 　处理标题画面的类。
#==============================================================================
class Scene_Lv
#--------------------------------------------------------------------------
# ● 住处理
#--------------------------------------------------------------------------
def main
# 读取存档
old_dir = Dir.pwd
Dir.chdir(Path)
@save_data = Dir["*.rxdata"]
Dir.chdir(old_dir)
if @save_data == []
$scene = Scene_Title.new
return
end
# 生成临时数据保存数据
@save_actors = []
# 正式读取
read_data
# 生成窗口
@windows7好贵 = Window_Lv.new(@save_actors)
@windows7好贵.opacity = Opacity
# 生成系统对像
$game_system = Game_System.new
# 生成标题图形
@sprite = Sprite.new
@sprite.bitmap = RPG::Cache.title($data_system.title_name)
# 演奏标题 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
# 释放命令窗口
# 释放标题图形
@sprite.bitmap.dispose
@sprite.dispose
@windows7好贵.dispose
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
# 按下 C 键的情况下
@windows7好贵.update
if Input.trigger?(Input::B)
$scene = Scene_Title.new
end
end
#--------------------------------------------------------------------------
# ● 读取数据
#--------------------------------------------------------------------------
def read_data
for file in @save_data
read_save_data(file)
@save_actors.push([$game_actors,file])
end
end
#--------------------------------------------------------------------------
# ● 读取存档数据
# file : 读取用文件对像 (已经打开)
#--------------------------------------------------------------------------
def read_save_data(file)
file = File.open(file, "rb")
# 读取描绘存档文件用的角色数据
characters = Marshal.load(file)
# 读取测量游戏时间用画面计数
Graphics.frame_count = Marshal.load(file)
# 读取各种游戏对像
$game_system = Marshal.load(file)
$game_switches = Marshal.load(file)
$game_variables = Marshal.load(file)
$game_self_switches = Marshal.load(file)
$game_screen = Marshal.load(file)
$game_actors = Marshal.load(file)
$game_party = Marshal.load(file)
$game_troop = Marshal.load(file)
$game_map = Marshal.load(file)
$game_player = Marshal.load(file)
file.close
end
end

复制代码

使用方法：插在Main前，Window_Base之后，调用 $scene = Scene_Lv.new
参考把沙发的"----------------内容---------------------" 改为 $scene = Scene_Lv.new
附：范例

Project1.rar (204.97 KB, 下载次数: 63)

79904396 · 发表于 2011-3-20 13:56:02

好……好厉害……！！、
非常感谢啊……！！另外我不知道要怎样奖励- -|||（通知下……）
还有就是……20个存档里的等级要怎样才都可以显示……（我用了那两个脚本发现只有4个存档的等级……- -|||）

沙漠点灰 · 发表于 2011-3-20 16:07:33

回复 79904396 的帖子

默认是显示根目录下所有存档(所有*.rxdata文件，别存在/Data/下面)，第4行
Path = "./" # 存档目录 "./"为根目录 "/Save/"就为根目录下的Save文件夹
来修改存档目录....

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

[已经解决] 等级排行系统

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

点评

点评

点评

评分