.版本 2 .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 信息框 (秒到时间 (65535), 0, , ) .子程序 秒到时间, 文本型 .参数 秒数, 整数型 .局部变量 日, 文本型 .局部变量 时, 文本型 .局部变量 分, 文本型 .局部变量 秒, 文本型 .局部变量 天, 文本型 秒 ＝ 到文本 (秒数 ％ 60) 分 ＝ 到文本 (秒数 ＼ 60 ％ 60) 时 ＝ 到文本 (秒数 ＼ 3600 ％ 24) 天 ＝ 到文本 (秒数 ＼ 3600 × 24) 天 ＝ 选择 (取文本长度 (天) ＝ 1, “0” ＋ 天, 天) 时 ＝ 选择 (取文本长度 (时) ＝ 1, “0” ＋ 时, 时) 分 ＝ 选择 (取文本长度 (分) ＝ 1, “0” ＋ 分, 分) 秒 ＝ 选择 (取文本长度 (秒) ＝ 1, “0” ＋ 秒, 秒) 返回 (天 ＋ “天” ＋ 时 ＋ “小时” ＋ 分 ＋ “分钟” ＋ 秒 ＋ “秒”)