.循环判断首 ()
循环变量B = 循环变量B + 1
.计次循环首 (取数组成员数 (记录文本A), 循环变量A)
临时文本 = 取文本左边 (记录文本A [循环变量A], 1)
临时数值 = 到整数 (临时文本)
.如果真 (临时文本 = “0” 且 循环变量B = 1)
加入成员 (数值数组, 0)
到循环尾 ()
.如果真结束
.如果真 (临时数值 = 0 且 循环变量B = 1)
加入成员 (记录文本B, 记录文本A [循环变量A])
.如果真结束
.如果真 (临时数值 = 0 且 临时文本 ≠ “0”)
到循环尾 ()
.如果真结束
.如果 (循环变量B = 1)
加入成员 (数值数组, 临时数值)
.否则
.如果真 (数组成员数 - 循环变量D ≠ 0)
.如果真 (临时文本 = 到文本 (数值数组 [数组成员数 - 循环变量D]))
删除成员 (数值数组, 数组成员数 - 循环变量D, )
循环变量D = 循环变量D + 1
插入位置 = 超级列表框1.插入表项 (, , , , , )
分割的文本D = 分割文本 (记录文本A [循环变量A], “-*/.”, 2)
.计次循环首 (2, 循环变量C)
超级列表框1.置标题 (插入位置, 循环变量C - 1, 分割的文本D [循环变量C])
.计次循环尾 ()
.如果真结束