阿里竞价软件

.版本 2
.支持库 spec

.程序集 程序集1

.子程序 正则_匹配取竞价记录, 文本型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量，失败返回0。
.参数 源文本, 文本型, , 欲被匹配的文本
.局部变量 局_正则, 正则表达式类, , , 此类为精易模块里面的正则类，精易模块下载地址：http://ec.125.la/
.局部变量 局_匹配数, 整数型
.局部变量 局_计次, 整数型
.局部变量 局_子匹配数, 整数型

.如果真 (局_正则.创建 (“<em>(\d+)[ ]?</em>”, 源文本, 假, 假, 真, 真) ＝ 假)
    返回 (“”)
.如果真结束
局_匹配数 ＝ 局_正则.取匹配数量 ()
.如果真 (局_匹配数 ＞ 0)
    返回 (局_正则.取子匹配文本 (1, 1, ))
.如果真结束
返回 (“”)

.子程序 正则_匹配出价人, 文本型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量，失败返回0。
.参数 源文本, 文本型, , 欲被匹配的文本
.局部变量 局_正则, 正则表达式类, , , 此类为精易模块里面的正则类，精易模块下载地址：http://ec.125.la/
.局部变量 局_匹配数, 整数型
.局部变量 局_计次, 整数型
.局部变量 局_子匹配数, 整数型

.如果真 (局_正则.创建 (“current-bid-no#引号>([\w]{5,6}|[\u4e00-\u9fa5]{1,3})</em>”, 源文本, 假, 假, 真, 真) ＝ 假)
    返回 (“”)
.如果真结束
局_匹配数 ＝ 局_正则.取匹配数量 ()
.如果真 (局_匹配数 ＞ 0)
    调试输出 (“正则_匹配出价人”, 局_正则.取子匹配文本 (1, 1, ))
    返回 (局_正则.取子匹配文本 (1, 1, ))
.如果真结束
返回 (“”)

.子程序 重复自动竞价
.参数 局_chrome, 队长填表类, 数组
.参数 bqid, 文本型, 数组
.参数 框架数组, 队长_网页框架, 数组
.参数 商品ID数组, 文本型, 数组
.参数 当前帐号, 整数型
.局部变量 ii, 整数型
.局部变量 iii, 整数型
.局部变量 编辑框_用户名1, 编辑框

.计次循环首 (取数组成员数 (商品ID数组), ii)
    局_chrome [1 ＋ 当前帐号].页面_激活 (bqid [ii])
    局_chrome [1 ＋ 当前帐号].页面_跳转 (bqid [ii], “https://zc-item.taobao.com/auction.htm?&id=” ＋ 商品ID数组 [ii], )
    延时 (1000 ÷ 取数组成员数 (商品ID数组))
.计次循环尾 ()
延时 (1000)

.计次循环首 (取数组成员数 (商品ID数组), ii)
    局_chrome [1 ＋ 当前帐号].页面_激活 (bqid [ii])
    .计次循环首 (10, )
        .如果真 (局_chrome [1 ＋ 当前帐号].元素_是否存在 (bqid [ii], “#J_GivePrice”, , ) ＝ 真)
            跳出循环 ()
        .如果真结束
        延时 (200)
    .计次循环尾 ()
    局_chrome [1 ＋ 当前帐号].鼠标_移动 (bqid [ii], 0, 0, , )
    延时 (20)
    局_chrome [1 ＋ 当前帐号].元素_点击_CDP (bqid [ii], “#J_GivePrice”, 0, , )  ' 点击出价 ，已经测试没问题
    延时 (1000 ÷ 取数组成员数 (商品ID数组))
.计次循环尾 ()
延时 (1500)

.计次循环首 (取数组成员数 (商品ID数组), ii)
    局_chrome [1 ＋ 当前帐号].页面_激活 (bqid [ii])

    .计次循环首 (10, )
        局_chrome [1 ＋ 当前帐号].页面_枚举框架 (bqid [ii], 框架数组)
        .如果真 (取数组成员数 (框架数组) ＝ 2)
            跳出循环 ()
        .如果真结束
        延时 (50)
    .计次循环尾 ()

    .计次循环首 (取数组成员数 (框架数组), iii)
        .如果真 (局_chrome [1 ＋ 当前帐号].元素_是否存在 (bqid [ii], “#J_ConfirmBtn”, , 框架数组 [iii].脚本环境id) ＝ 真)
            局_chrom
        .如果真结束

    .计次循环尾 ()

源码