如何输出与读取TXT文件内的数据？ - Project1

整个教学我基本上就是解释一下范例教学游戏，请大家先下载范例《WORDS_PAZZLE》
文件结构：
除了正常的文件结构之外，建立了文件夹WORDS，里面存放了几本单词。可以自己换txt文档。
事件解释：
1、读取文件：脚本：
f = File.open("WORDS/CET4.txt")
#——打开CET4.txt的书
ls=f.readlines;$q=[];$a=[]
#——ls这个变量纪录cet4.txt里面的每一行信息，$q , $a 是两个数组，在这里初始化，用来记录问题和答案。
for i in 0...ls.size #——循环
if (ls[i].split(/\[/)[0] != nil) and (ls[i].split(/\[/)[1] != nil) #——如果ls当前行在"["这个符号左右都有文字的话
$q.push(ls[i].split(/\[/)[0]) #——把"["左边的东西记录到$q，也就是问题里面去
$a.push(ls[i+1]) #——把当前行下面一行的东西记录到$a，也就是答案里面去
end;end;
f.close
#——关闭文件
完成以上内容，$q，$a对应储存了cet4.txt所有的问题和答案。至此，所有核心已经全部完成，剩下的就是小技巧了。
2、选择书本章节
其实就是设置出题范围而已，比如$q的大小是2000题，循环1-1000和1001-2000就是两个章节了
3、设置选择项 + 判断选项是否正确
参考这个教学：shownews.asp?id=185，然后看看本游戏设置就明白了。
在设置选择项的时候，根据答案随便将1-3中某一个选项设置为正确答案，其他2个选项随便给出答案。正确选项记录在$right_answer里面，所以只要将3个选项全像游戏那样设置好条件分歧即可。
4、设置对话
Window_Message里面定义了\q[数字]和\a[数字]，对于学习IO的各位，修改对话框这个应该是很基本的东西了。功能就是self.contents.draw_text(x,32*y,1000,32,$q[数字])，self.contents.draw_text(x,32*y,1000,32,$a[数字])，仅此而已。
其他说明：
注意，请将txt文件存为UTF-8比较好。使用windows的记事本，另存为，可以选择编码方法。

复制代码