.版本 2
.子程序 取现行文件名, 文本型, , 小烦出品，必属精品
.局部变量 符号表, 文本型
.局部变量 时间, 日期时间型
.局部变量 返回名称, 文本型
.局部变量 计数, 整数型, 静态
符号表 ＝ “ABCDEFGHIJKLMNOPQRSTUVWXYZ”
时间 ＝ 取现行时间 ()
返回名称 ＝ 取文本中间 (符号表, 取年份 (时间) ％ 20 ＋ 1, 1) ＋ 取文本中间 (符号表, 取月份 (时间), 1) ＋ 取文本中间 (符号表, 取日 (时间), 1) ＋ 取文本中间 (符号表, 取小时 (时间), 1)
返回名称 ＝ 返回名称 ＋ 取文本中间 (符号表, 取分钟 (时间) ＼ 10 ＋ 1, 1) ＋ 取文本中间 (符号表, 取分钟 (时间) ％ 10 ＋ 1, 1)
返回名称 ＝ 返回名称 ＋ 取文本中间 (符号表, 取秒 (时间) ＼ 10 ＋ 1, 1) ＋ 取文本中间 (符号表, 取秒 (时间) ％ 10 ＋ 1, 1)
返回名称 ＝ 返回名称 ＋ 取十六进制文本 (计数)
计数 ＝ 计数 ＋ 1
返回 (返回名称 ＋ “.TMP”)