数码易经

不要用小众语言（Erlang、Scala等）。

尽可能的代码自说明，除非复杂逻辑，否则不要添加太多琐碎的注释。

尽量少用语言的高级特性、新特性。

函数命名, 变量命名, 文件命名应具备描述性，这点尤其重要。

.版本 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]

.如果真结束