游戏中删除存档_v1.1

一箭烂YiJL · 发表于 2011-3-27 20:10:27

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

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

x

本帖最后由一箭烂YiJL 于 2011-4-1 18:00 编辑

0.前言
不知道前人是否有做过类似这样的东西呢?
但是不可不承认的是这是一件很渣的东西，
嗯~由于是一时的无聊想法，所以它用了很短的时间制造，同时也很废。

1.版本功能说明
1.0                      : 按下delete按钮，就会删除存挡，如无存档，则发出错误一声。
1.1                      : 按下delete就会弹出选择窗, 然后选择删除。
1.1(载图存档版)    : 跟1.1功能一样，只是专用于载图存档。
1.1(新式菜单版)    : 跟1.1功能一样，只是专用于新式菜单。
1.1的载图存档版和新式菜单版没有范例，只在5.脚本里提供。

2. 1.1版效果载图

正常：

载图存档版：

新式菜单版：

3.范例
最简洁的：

删除存档_v1.0.zip (282.52 KB, 下载次数: 1908)
有窗口选择的：

删除存档_v1.1.zip (283.19 KB, 下载次数: 4243)

4.版本讯息
- *1.1.0* (2011-04-01) By 一箭烂(YiJL)
*会弹出选择窗选择是否删除

- *1.0.0* (2011-04-27) By 一箭烂(YiJL)
*初版

5.脚本
1.1载图存档版：

#==============================================================================
# ■ 删除存档v1.1(载图存档版) by 一箭烂
#------------------------------------------------------------------------------
# 按下delete就会弹出选择窗, 然后选择删除。
#
# - *1.1.0* (2011-04-01) By 一箭烂(YiJL)
# *会弹出选择窗选择是否删除
#
# - *1.0.0* (2011-04-27) By 一箭烂(YiJL)
# *初版
#==============================================================================
class Scene_File
Key = Win32API.new("user32","GetAsyncKeyState","i","i")
#--------------------------------------------------------------------------
# ● 开始
#--------------------------------------------------------------------------
alias del_start start
def start
del_start
@del_window = Window_DelFile.new
@del_window.z = 500
end
#--------------------------------------------------------------------------
# ● 更新幀
#--------------------------------------------------------------------------
alias del_update update
def update
del_update
@del_window.update
end
#--------------------------------------------------------------------------
# ● 更新选择
#--------------------------------------------------------------------------
def update_savefile_selection
if Input.trigger?(Input::C)
if @del_window.visible
case @del_window.index
when 0
do_delete
@del_window.visible = false
when 1
@del_window.visible = false
end
else
determine_savefile
end
elsif Input.trigger?(Input::B)
if @del_window.visible
@del_window.visible = false
else
Sound.play_cancel
return_scene
end
elsif Key.call(0x2E) & 1 != 0
@del_window.visible = true
end
if @refresh_index != @command_window.index and @del_window.visible == false
@refresh_index = @command_window.index
@savefile_window.dispose
create_savefile_window
end
@command_window.active = !@del_window.visible
end
#--------------------------------------------------------------------------
# ● 删除存档
#--------------------------------------------------------------------------
def do_delete
if FileTest.exist?(SAVE_DIR + make_filename(@command_window.index))
File.delete(SAVE_DIR + make_filename(@command_window.index))
@refresh_index = @command_window.index
@savefile_window.dispose
create_savefile_window
else
Sound.play_buzzer
end
end
#--------------------------------------------------------------------------
# ● 退出场景
#--------------------------------------------------------------------------
alias del_terminate terminate
def terminate
del_terminate
@del_window.dispose
end
end
#==============================================================================
# ■ Window_DelFile
#==============================================================================
class Window_DelFile < Window_Selectable
#--------------------------------------------------------------------------
# ● 对象初始化
#--------------------------------------------------------------------------
def initialize
super((544-250)/2, (416-100)/2, 250, 90)
self.contents.draw_text(0, 0, 250-32, 24, "是否删除存档?", 1)
self.contents.draw_text(0, 32, 93, 24, "是", 1)
self.contents.draw_text(125, 32, 93, 24, "否", 1)
@item_max = 2
@column_max = 2
@index = 1
self.visible = false
end
#--------------------------------------------------------------------------
# ● 帧更新
#--------------------------------------------------------------------------
def update
super
if self.visible
if cursor_movable?
last_index = @index
if Input.repeat?(Input::DOWN)
cursor_down(Input.trigger?(Input::DOWN))
end
if Input.repeat?(Input::UP)
cursor_up(Input.trigger?(Input::UP))
end
if @index != last_index
Sound.play_cursor
end
end
update_cursor
call_update_help
end
end
#--------------------------------------------------------------------------
# ● 选择矩形
#--------------------------------------------------------------------------
def item_rect(index)
rect = Rect.new(0, 0, 0, 0)
rect.width = (contents.width + @spacing) / @column_max - @spacing
rect.height = WLH
rect.x = index % @column_max * (rect.width + @spacing)
rect.y = index / @column_max * WLH + 32
return rect
end
end

复制代码

1.1新式菜单版：

#==============================================================================
# ■ 删除存档v1.1(新式菜单版) by 一箭烂
#------------------------------------------------------------------------------
# 按下delete就会弹出选择窗, 然后选择删除。
#
# - *1.1.0* (2011-04-01) By 一箭烂(YiJL)
# *会弹出选择窗选择是否删除
#
# - *1.0.0* (2011-04-27) By 一箭烂(YiJL)
# *初版
#==============================================================================
class Scene_File < Scene_Menu_Base
Key = Win32API.new("user32","GetAsyncKeyState","i","i")
#--------------------------------------------------------------------------
# ● 开始
#--------------------------------------------------------------------------
alias del_start start
def start
del_start
@del_window = Window_DelFile.new
@del_window.z = 500
end
#--------------------------------------------------------------------------
# ● 更新幀
#--------------------------------------------------------------------------
alias del_update update
def update
del_update
@del_window.update
end
#--------------------------------------------------------------------------
# ● 更新选择
#--------------------------------------------------------------------------
def update_savefile_selection
if Input.trigger?(Input::C)
if @del_window.visible
case @del_window.index
when 0
do_delete
@del_window.visible = false
when 1
@del_window.visible = false
end
else
determine_savefile
end
elsif Input.trigger?(Input::B)
if @del_window.visible
@del_window.visible = false
else
Sound.play_cancel
return_scene
end
elsif Key.call(0x2E) & 1 != 0
@del_window.visible = true
end
if @refresh_index != @file_command_window.index and @del_window.visible == false
@refresh_index = @file_command_window.index
@savefile_window.dispose
create_savefile_window
end
@file_command_window.active = !@del_window.visible
end
#--------------------------------------------------------------------------
# ● 删除存档
#--------------------------------------------------------------------------
def do_delete
if FileTest.exist?(SAVE_DIR + make_filename(@file_command_window.index))
File.delete(SAVE_DIR + make_filename(@file_command_window.index))
@refresh_index = @file_command_window.index
@savefile_window.dispose
create_savefile_window
else
Sound.play_buzzer
end
end
#--------------------------------------------------------------------------
# ● 退出场景
#--------------------------------------------------------------------------
alias del_terminate terminate
def terminate
del_terminate
@del_window.dispose
end
end
#==============================================================================
# ■ Window_DelFile
#==============================================================================
class Window_DelFile < Window_Selectable
#--------------------------------------------------------------------------
# ● 对象初始化
#--------------------------------------------------------------------------
def initialize
super((544-250)/2, (416-100)/2, 250, 90)
self.contents.draw_text(0, 0, 250-32, 24, "是否删除存档?", 1)
self.contents.draw_text(0, 32, 93, 24, "是", 1)
self.contents.draw_text(125, 32, 93, 24, "否", 1)
@item_max = 2
@column_max = 2
@index = 1
self.visible = false
end
#--------------------------------------------------------------------------
# ● 帧更新
#--------------------------------------------------------------------------
def update
super
if self.visible
if cursor_movable?
last_index = @index
if Input.repeat?(Input::DOWN)
cursor_down(Input.trigger?(Input::DOWN))
end
if Input.repeat?(Input::UP)
cursor_up(Input.trigger?(Input::UP))
end
if @index != last_index
Sound.play_cursor
end
end
update_cursor
call_update_help
end
end
#--------------------------------------------------------------------------
# ● 选择矩形
#--------------------------------------------------------------------------
def item_rect(index)
rect = Rect.new(0, 0, 0, 0)
rect.width = (contents.width + @spacing) / @column_max - @spacing
rect.height = WLH
rect.x = index % @column_max * (rect.width + @spacing)
rect.y = index / @column_max * WLH + 32
return rect
end
end

复制代码

张咚咚 · 发表于 2013-7-28 13:50:09

好复杂...
↓直接删除Save文件夹下的指定存档↓

$i = 存档ID

for i in 1..4
File.delete("Save/Save#{$i}.rvdata") if
FileTest.exist?("Save/Save#{$i}.rvdata")
end

wen · 发表于 2013-3-3 16:07:17

话说新式菜单不是存档很多吗？用这个好像没啥用。
（除非游戏太庞大，剧情太多，太难）

2825136 · 发表于 2011-5-24 21:19:29

太美妙了～我傻傻的在测试游戏中将游戏存档了！幸亏我找到了这个～

仲秋启明 · 发表于 2011-4-3 12:40:12

不错嘛，谢谢剑兰

冰舞蝶恋 · 发表于 2011-4-1 19:06:30

呼呼，还好地板还在~~剑兰前辈我爱你！~~~~

一箭烂YiJL · 发表于 2011-4-1 18:01:04

更新了，顺便顶一下。这是版本跟新讯息：
- *1.1.0* (2011-04-01) By 一箭烂(YiJL)
*会弹出选择窗选择是否删除

- *1.0.0* (2011-04-27) By 一箭烂(YiJL)
*初版

san9 · 发表于 2011-3-28 15:35:37

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

54酱 · 发表于 2011-3-27 20:15:46

貌似以前也有过一只这样的东西.......

忘了在哪里见过了...

脚本好像有100多行...

可能是XP的...

年纪大了...

脑子坏了...

什么都记不住了...

于是...

下载尝鲜...

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

[RMVX发布] 游戏中删除存档_v1.1

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

评分

点评

贵宾