.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 问题, 文本型, , "3"
.程序集变量 答案, 文本型, , "3"
.程序集变量 计次, 整数型
.子程序 __启动窗口_创建完毕
编辑框1.是否允许多行 = 真
编辑框1.边框 = 5
编辑框1.禁止 = 真
问题 [1] = “这么简单的问题,居然回答不出来。还说自己不傻。我从新问你吧!” + #换行符 + “那个被称之为金色闪光的四代火影,名字叫什么啊?”
问题 [2] = “在《火影忍者》里谁的体内封印了九尾,从小被大家嘲笑为吊车尾,长大之后成为了7代火影。他的名字叫什么啊?”
问题 [3] = “听说七代火影和四代火影的关系很不一般,请问七代火影称呼四代火影什么啊?”
答案 = { “波风水门”, “漩涡鸣人”, “爸爸 ” }
编辑框1.内容 = “在《火影忍者》里被称为 金色闪光 的人物,他的名字叫什么?”
计次 = 1
.子程序 _按钮1_被单击
.判断开始 (计次 = 1)
.如果 (编辑框2.内容 = 答案 [1])
编辑框1.内容 = 问题 [2]
计次 = 2
.否则
计次 = 1
.如果结束
.判断 (计次 = 2)
.如果 (编辑框2.内容 = 答案 [2])
编辑框1.内容 = 问题 [3]
计次 = 3
.否则
计次 = 1
.如果结束
.判断 (计次 = 3)
.如果 (编辑框2.内容 = 答案 [3])
编辑框1.内容 = “儿子乖!爸爸爱你”
计次 = 4
.否则
计次 = 1
.如果结束
.默认
.判断结束
.如果真 (计次 = 1)
编辑框1.内容 = 问题 [1]
.如果真结束
.版本 2
.子程序 _按钮1_被单击
运行 (“notepad.exe”, 假, )
.子程序 _按钮2_被单击
写到文件 (取运行目录 () + “\1.txt”, 到字节集 (编辑框1.内容))
你看情况给分吧.