.版本 2

.局部变量 str, 文本型

.局部变量 a_str, 文本型, , "0"

.局部变量 i, 整数型

延时 ()

i ＝ 1

.判断循环首 (i ＝ 1)

    str ＝ FindStrFastE (612, 19, 801, 193, “寻”, “002222-000000”, 1, 数组序号)

    a_str ＝ 分割文本 (str, “|”, )

    .如果 (到整数 (a_str [1] ＜ 0))

        延时 (300)

        KeyPress (9, 数组序号)

        延时 (300)

        i ＝ 1

    .否则

        i ＝ 0

    .如果结束

.判断循环尾 ()

MoveTo (a_str [2], a_str [3], 数组序号)

延时 (300)

LeftClick (数组序号)

延时 (300)

' 移开鼠标

MoveTo (a_str [2], a_str [3] ＋ 23, 数组序号)

延时 (300)