.版本 2
.子程序 取队长名字, 文本型, , 按队长标志864精确定位（不依赖槽位顺序）
.局部变量 队员对象, 整数型
.局部变量 队员位置, 整数型
.局部变量 队员名称, 文本型
.计次循环首 (8, 队员位置)
队员对象 ＝ 内存_读整数型 (全局_进程句柄, #队员基址 ＋ 4 × (队员位置 － 1))
.如果真 (队员对象 ≤ 0)
到循环尾 ()
.如果真结束
.如果真 (内存_读整数型 (全局_进程句柄, 队员对象 ＋ #队长标志值) ＝ 1)
队员名称 ＝ 编码_BIG5到简体 (内存_读文本型 (全局_进程句柄, 队员对象 ＋ #队员名称值))
返回 (队员名称)
.如果真结束
.计次循环尾 ()
返回 (“”)

.版本 2
.子程序 遍历队员, , , 加强版:按队长标志标注
.局部变量 队员对象, 整数型
.局部变量 队员序号, 整数型
.局部变量 队员名称, 文本型
.局部变量 队员位置, 整数型
.局部变量 成员数, 整数型
.计次循环首 (8, 队员位置)
队员对象 ＝ 内存_读整数型 (全局_进程句柄, #队员基址 ＋ 4 × (队员位置 － 1))
.如果真 (队员对象 ≤ 0)
到循环尾 ()
.如果真结束
队员名称 ＝ 编码_BIG5到简体 (内存_读文本型 (全局_进程句柄, 队员对象 ＋ #队员名称值))
.如果真 (队员名称 ≠ “”)
队员序号 ＝ 位与 (内存_读整数型 (全局_进程句柄, 队员对象 ＋ #队员序号值), 65535)
挂机信息.加入文本 (自定义时间 () ＋ “*****************” ＋ #换行符)
挂机信息.加入文本 (自定义时间 () ＋ “队员格号：” ＋ 到文本 (队员位置) ＋ 选择 (内存_读整数型 (全局_进程句柄, 队员对象 ＋ #队长标志值) ＝ 1, “（队长）”, “”) ＋ #换行符)
挂机信息.加入文本 (自定义时间 () ＋ “队员序号：” ＋ 到文本 (队员序号) ＋ #换行符)
挂机信息.加入文本 (自定义时间 () ＋ “队员名称：” ＋ 队员名称 ＋ #换行符)
成员数 ＝ 成员数 ＋ 1
.如果真结束
.计次循环尾 ()
挂机信息.加入文本 (自定义时间 () ＋ “遍历完成，共 ” ＋ 到文本 (成员数) ＋ “ 人” ＋ #换行符 ＋ #换行符)