微影视播放器源码分享附API接口模块

提交地址 ＝ CKplayer_域名 ＋ “/query.php?type=” ＋ 影视分类 ＋ “&title=” ＋ 影视名称 ＋ “&page=” ＋ 到文本 (当前页数) ＋ “&num=” ＋ 到文本 (每页数量)
返回文本 ＝ 网页_访问S (提交地址)
返回文本 ＝ 编码_usc2到ansi (返回文本)
总页数 ＝ 到整数 (文本_取出中间文本 (返回文本, “pages” ＋ #引号 ＋ “:”, “,”))
正则代码.创建 (#CKplayer_搜索正则, 返回文本)
.如果真 (正则代码.取匹配数量 () ＝ 0)
信息框 (“抱歉,没有任何数据！”, 0, , )
返回 ()
.如果真结束
.计次循环首 (正则代码.取匹配数量 (), i)
表项 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项, 0, 到文本 (i)) ' 影视分类
超级列表框1.置标题 (表项, 1, 正则代码.取子匹配文本 (i, 1)) ' 影视分类
超级列表框1.置标题 (表项, 2, 正则代码.取子匹配文本 (i, 2)) ' 影视名称
资源文本 ＝ 分割文本 (正则代码.取子匹配文本 (i, 3), “丨”, )
.判断开始 (取数组成员数 (资源文本) ＝ 0 或 取数组成员数 (资源文本) ＝ 1)
超级列表框1.置标题 (表项, 3, “1”) ' 资源数量
.默认
超级列表框1.置标题 (表项, 3, 到文本 (取数组成员数 (资源文本))) ' 资源数量
.判断结束
超级列表框1.置标题 (表项, 4, 正则代码.取子匹配文本 (i, 3)) ' 资源文本
处理事件 ()
.计次循环尾 ()
调试输出 (“资源总页数: ” ＋ 到文本 (总页数) ＋ “　每页显示数量:” ＋ 到文本 (每页数量))