.版本 2
.程序集 窗口程序集1
.程序集变量 runpathset, 文本型
.程序集变量 runexepath, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 命令行为, 文本型, , "0"
runpathset ＝ 取运行目录 ()
.如果真 (取文本右边 (runpathset, 1) ≠ “\”)
runpathset ＝ runpathset ＋ “\”
.如果真结束
runexepath ＝ runpathset ＋ 取执行文件名 ()
runpathset ＝ runpathset ＋ “tgjjset.ini”
取命令行 (命令行为)
.如果真 (取数组成员数 (命令行为) ≠ 0)
_启动窗口.可视 ＝ 假
' 信息框 (“命令行”, 0, )
' 结束 ()
.如果真结束
.变量循环首 (0, 23, 1, i)
组合框1.加入项目 (到文本 (i), )
.变量循环尾 ()
.变量循环首 (0, 59, 1, j)
组合框2.加入项目 (到文本 (j), )
.变量循环尾 ()

.版本 2
.子程序 _按钮2_被单击
.局部变量 时间为, 文本型
.局部变量 时间提醒, 文本型
.如果真 (组合框1.现行选中项 ＝ -1 或 组合框2.现行选中项 ＝ -1 或 编辑框1.内容 ＝ “”)
信息框 (“请完整输出内容！”, 0, )
返回 ()
.如果真结束
时间为 ＝ 组合框1.取项目文本 (组合框1.现行选中项) ＋ “：” ＋ 组合框2.取项目文本 (组合框2.现行选中项)
时间提醒 ＝ 读配置项 (runpathset, “时间”, 时间为, )
.如果 (时间提醒 ＝ “”)
写配置项 (runpathset, “时间”, 时间为, 编辑框1.内容 ＋ “|”)
.否则
写配置项 (runpathset, “时间”, 时间为, 编辑框1.内容 ＋ “|” ＋ 时间提醒 ＋ “|”)
.如果结束
信息框 (“好，我记住这个时间啦！”, 0, )
组合框1.现行选中项 ＝ -1
组合框2.现行选中项 ＝ -1
编辑框1.内容 ＝ “”

用判断这条命令啊