查看: 3216|回复: 1

覆盖存档提示

67 主题	2 听众	2064 积分

仗剑行侠

会员等级: 5

TA的每日心情

	无聊 2013-8-16 09:01

签到天数: 161 天

[LV.7]常住仙友III

精华: 0
积分: 2064
历练: 0
声望: 43
人气: 3

单身中……
帮我摆脱单身吧

电梯直达

1楼

发表于 2010-11-7 20:33:15 |只看该作者 |倒序浏览

本帖最后由御剑奇侠于 2010-11-9 19:34 编辑

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
#在覆盖存档的时候弹出对话框提示
class Scene_Save < Scene_File
# -----------------------------
def initialize
super("储存到哪一个进度")
@confirm_window = Window_Base.new(120, 188, 400, 64)
@confirm_window.contents = Bitmap.new(368, 32)
string = "确定要覆盖这个进度吗？"
@confirm_window.contents.font.name = "黑体"
@confirm_window.contents.font.size = 24
@confirm_window.contents.draw_text(4, 0, 368, 32, string)
@yes_no_window = Window_Command.new(100, ["覆盖", "取消"])
@confirm_window.visible = false
@confirm_window.z = 1500
@yes_no_window.visible = false
@yes_no_window.active = false
@yes_no_window.index = 1
@yes_no_window.x = 270
@yes_no_window.y = 252
@yes_no_window.z = 1500
@mode = 0
end
# -----------------------------
def on_decision(filename)
if FileTest.exist?(filename)
@confirm_window.visible = true
@yes_no_window.visible = true
@yes_no_window.active = true
@mode = 1
else
$game_system.se_play($data_system.save_se)
file = File.open(filename, "wb")
write_save_data(file)
file.close
if $game_temp.save_calling
$game_temp.save_calling = false
$scene = Scene_Map.new
return
end
$scene = Scene_Menu.new(4)
end
end
# -----------------------------
def update
if @mode == 0
super
else
@help_window.update
@yes_no_window.update
if Input.trigger?(Input::C)
$game_system.se_play($data_system.decision_se)
if @yes_no_window.index == 0
@yes_no_window.visible = false
@yes_no_window.active = false
@confirm_window.visible = false
filename = make_filename(@file_index)
$game_system.se_play($data_system.save_se)
file = File.open(filename, "wb")
write_save_data(file)
file.close
if $game_temp.save_calling
$game_temp.save_calling = false
$scene = Scene_Map.new
else
$scene = Scene_Menu.new(4)
end
else
@confirm_window.visible = false
@yes_no_window.visible = false
@yes_no_window.active = false
@yes_no_window.index = 1
@mode = 0
end
end
if Input.trigger?(Input::B)
@confirm_window.visible = false
@yes_no_window.visible = false
@yes_no_window.active = false
@yes_no_window.index = 1
@mode = 0
return
end
end
end
# -----------------------------
def on_cancel
$game_system.se_play($data_system.cancel_se)
if $game_temp.save_calling
$game_temp.save_calling = false
$scene = Scene_Map.new
return
end
$scene = Scene_Menu.new(4)
end
# -----------------------------
def write_save_data(file)
characters = []
for i in 0...$game_party.actors.size
actor = $game_party.actors
characters.push([actor.character_name, actor.character_hue])
end
Marshal.dump(characters, file)
Marshal.dump(Graphics.frame_count, file)
$game_system.save_count += 1
$game_system.magic_number = $data_system.magic_number
Marshal.dump($game_system, file)
Marshal.dump($game_switches, file)
Marshal.dump($game_variables, file)
Marshal.dump($game_self_switches, file)
Marshal.dump($game_screen, file)
Marshal.dump($game_actors, file)
Marshal.dump($game_party, file)
Marshal.dump($game_troop, file)
Marshal.dump($game_map, file)
Marshal.dump($game_player, file)
end
end
class Scene_File
alias carol3_main main
def main
carol3_main
if self.is_a?(Scene_Save)
@confirm_window.dispose
@yes_no_window.dispose
end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码

复制全部脚本内容，在Main脚本之前按insert，插入此脚本全部内容。功能：覆盖存档的时候弹出提示“是否覆盖”

1 查看全部评分

文无缺

分享到: QQ空间 腾讯微博 腾讯朋友

转播0 淘帖0 分享0 收藏0

蜉蝣之羽，衣裳楚楚。心之忧矣，於我归处？
蜉蝣之翼，采采衣服。心之忧矣，於我归息？
蜉蝣掘阅，麻衣如雪。心之忧矣，於我归说？

使用道具举报

文无缺

107 主题	6 听众	4719 积分

版主

[- 血夜系列作者 -]

TA的每日心情

	无聊 2015-7-18 22:25

签到天数: 123 天

[LV.7]常住仙友III

精华: 1
积分: 4719
历练: 3
声望: 20
人气: 548

吳述兒
幸福:72℃

2楼

发表于 2010-11-8 04:56:58 |只看该作者

这次有用代码插入...很好很有爱...
这脚本比较常有，不错...支持~

使用道具举报

返回列表

		自动登录	找回密码
密码			加入我们

覆盖存档提示

黑色羽翼

神仙眷侣

出神入化

妙笔生花

灵动清风

匠心独运

鬼斧神工