.版本 2
.支持库 iext
 
.子程序 取最深子项目索引, 整数型
.参数 树形框对象, 树型框
.参数 起始索引, 整数型
.局部变量 i, 整数型
.局部变量 初始层次, 整数型
 
初始层次 ＝ 树形框对象.取缩进层次 (起始索引)
.如果真 (树形框对象.是否有子项目 (起始索引) ＝ 假)
    返回 (起始索引)
.如果真结束
.计次循环首 (树形框对象.取项目数 () － 起始索引, i)
    .如果真 (树形框对象.取缩进层次 (起始索引 ＋ i) ≤ 初始层次)
        返回 (起始索引 ＋ i － 1)
    .如果真结束
 
.计次循环尾 ()
返回 (起始索引)