请教关于脚本读取文本里的数据

上贺茂润 · 发表于 2013-5-28 10:47:09

铃仙·优昙华院·因幡发表于 2013-5-28 00:26
这个脚本只是演示, 不能当做正式的脚本来使用, 很多细节咱都没有处理好, 这里只能说抱歉.

这个错误的原 ...

传递了一个空的数值？为什么会发生这种情况呢？按脚本的顺序来说读取data数组里的数据都是有具体数值的，不应该会出现空的才对呀……如果是这样的话应该如何避免呢？

上贺茂润 · 发表于 2013-5-28 11:41:06

八云紫发表于 2013-5-26 16:38
已修复. 范例也微微的改进了那么一点点点带你.....

范例更新在楼上的楼上 ...

class Scene_Subject < Scene_Base
def initialize(subject_index)
@subject = [];
@index_subject = 0;
File.open("Subject#{subject_index}.txt","r") do |fp|
@subject = fp.readlines;
end
@subject.each_index do |index|
@subject[index].chomp!
@subject[index] = @subject[index].split("||");
end
@max_index = @subject.size; # 题目最大数量
@type = 0; # 抽题类型
@answer = []; # 答题卡
@title_index = []; # 剩下的题目序号
for i in 0..@max_index
@title_index << i;
end
@subject_subindex = rand( @subject.size); # 题号
end

复制代码

我在您的原有的脚本基础上添加了随机选题的功能，但是发现运行混乱，题目对错乱分：
最后那个题号的部分是产生随机数，请问是不是要在另一个地方也设置这个@subject.size，现在的情况是对错混乱。

铃仙·优昙华院·因幡 · 发表于 2013-5-28 13:54:34

上贺茂润发表于 2013-5-28 11:41
我在您的原有的脚本基础上添加了随机选题的功能，但是发现运行混乱，题目对错乱分：
最后那个题号的部分 ...

其实随机就好的办法是这样的:

# 类似题库的作用
@subjects = [];
# 初始化题库
for i in [email protected]
@subjects << i;
end
# 题库里随机一个题目出来
index = rand(@subjects.size);
# 为了防止重复取一道题, 所以把取得的题目从题库里删掉
@subjects.delete_at(index);

复制代码

这样就很好的可以复制重复选择, 还有胡乱选择了.

上贺茂润 · 发表于 2013-5-28 21:49:55

铃仙·优昙华院·因幡发表于 2013-5-28 13:54
其实随机就好的办法是这样的:这样就很好的可以复制重复选择, 还有胡乱选择了. ...

如果按这样运行的话原来的脚本应该修改哪些？

润的脚本转型能力太弱……

#==============================================================================
# ■ Scene_Subject
#------------------------------------------------------------------------------
# 　考试类。
#==============================================================================
class Scene_Subject < Scene_Base
def initialize(subject_index)
@subject = [];
@index_subject = 0;
File.open("Subject#{subject_index}.txt","r") do |fp|
@subject = fp.readlines;
end
@subject.each_index do |index|
@subject[index].chomp!
@subject[index] = @subject[index].split("||");
end
@max_index = @subject.size; # 题目最大数量
@type = 0; # 抽题类型
@answer = []; # 答题卡
@title_index = []; # 剩下的题目序号
for i in 0..@max_index
@title_index << i;
end
@subject_subindex = -1; # 题号
end
#--------------------------------------------------------------------------
# ● 开始处理
# Subject_index : 考题库
# type : 抽题类型, 0 按顺序, 1 随机
#--------------------------------------------------------------------------
def start
create_menu_background
next_subject
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
super
update_menu_background
update_subject_window
end
#--------------------------------------------------------------------------
# ● 更新考卷
#--------------------------------------------------------------------------
def update_subject_window
@subject_window.update
if Input.trigger?(Input::C)
@answer.pushAnswer(@subject_subindex, @subject_window.index); # 填写答题卡, [题目序号, 答案]
next_subject; # 下一题
end
end
#--------------------------------------------------------------------------
# ● 计算得分
#--------------------------------------------------------------------------
def hand_paper
code = 0; # 分数
@answer.each do |answers|
right_answer = @subject[answers[0]][1];
code += 1 if right_answer.to_i == answers[1] + 1;
end
$game_player.result = code == @answer.size ? 100.0 : code.to_f / @answer.size * 100
$scene = Scene_Map.new
end
#--------------------------------------------------------------------------
# ● 结束处理
#--------------------------------------------------------------------------
def terminate
super
dispose_menu_background
@subject_window.dispose;
end
#--------------------------------------------------------------------------
# ● 下一题
#--------------------------------------------------------------------------
def next_subject
@index_subject += 1;
if @index_subject < 2
case @type
when 0
@subject_subindex += 1;
end
@subject_window.dispose if @subject_window;
@subject_window = Window_Subject.new(@subject[@subject_subindex]);
else
hand_paper
end
end
end

复制代码

铃仙·优昙华院·因幡 · 发表于 2013-5-28 22:28:36

本帖最后由铃仙·优昙华院·因幡于 2013-5-28 22:52 编辑

case @type
when 0
@subject_subindex += 1;
end

复制代码

这里添加 when 1 什么的随机取得 @subject_subindex 的值就好

其实一开始写这个脚本的时候有添加过随机选题, 不过由于很懒, 外加某播放器的问题就坑掉了. >_<

上贺茂润 · 发表于 2013-5-29 11:54:30

本帖最后由上贺茂润于 2013-5-29 11:56 编辑

铃仙·优昙华院·因幡发表于 2013-5-28 22:28
这里添加 when 1 什么的随机取得 @subject_subindex 的值就好

发生了返回空值错误

我对这个问答系统真的是……无力了……我还是尝试别看看……

铃仙·优昙华院·因幡 · 发表于 2013-5-29 12:00:43

上贺茂润发表于 2013-5-29 11:54
发生了返回空值错误我对这个问答系统真的是……无力了……我还是尝试别看看…… ...

其实咱的脚本只是一个不完全的例子, 提供一个思路罢了.

如果真的要写一个完整的话, 可以参考咱的写法, 自己重新写一遍.

574656549 · 发表于 2017-12-6 14:01:08

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

2256538860 · 发表于 2018-2-16 12:29:31

活抓大神萌新时期帖子一只~

xieritian · 发表于 2018-4-10 16:43:22

学习学习

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

[已经解决] 请教关于脚本读取文本里的数据

评分

贵宾