用户组 
易积分1272
热心0
好评0
|
30易积分
事件 标签1.获得焦点()
标签1.背景颜色=白色
标签1.字体颜色=黑色
结束 事件
事件 标签1.失去焦点()
标签1.背景颜色=无色
标签1.字体颜色=白色
结束 事件
事件 图片框1.获得焦点()
图片框1.背景颜色=白色
结束 事件
事件 图片框1.失去焦点()
图片框1.背景颜色=无色
结束 事件
事件 标签1.被单击()
如果 读取窗口("窗口_首页")=空 则
保存窗口("窗口_首页",创建 窗口_首页)
结束 如果
切换窗口(读取窗口("窗口_首页"))
结束 事件
事件 图片框1.被单击()
如果 读取窗口("会员")=空 则
保存窗口("会员",创建 会员)
结束 如果
切换窗口(读取窗口("会员"))
结束 事件
事件 窗口列表.创建完毕()
结束 事件
变量 记录分类 为 文本型
变量 是否清空 为 逻辑型
变量 网页 为 文本型
事件 窗口列表.切换完毕()
列表框1.获取焦点()
图片列表框1.获取焦点()
图片列表框1.初始化下载引擎(R.aa0,R.aa0,R.aa0,20,假)
图片列表框1.图片宽度=100'取绝对像素(100)
图片列表框1.图片高度=120'取绝对像素(100*1.2)
图片列表框1.隐藏副标题()
图片列表框1.缩略显示内容(真)
图片列表框1.置图片显示方式(3)
如果 记录分类<>公用模块.窗口分类 则
图片列表框1.清空项目()
列表框1.清空项目()
列表框2.清空项目()
列表框3.清空项目()
是否清空=真
记录分类=公用模块.窗口分类
标签1.标题="< "&公用模块.窗口分类&" "
页数=1
判断 公用模块.窗口分类
分支 "电视剧"
网页="https://www.360kan.com/dianshi/list.php?"
多线程1.开始取网页源码2(网页,"UTF-8")
分支 "电影"
网页="https://www.360kan.com/dianying/list.php?"
多线程2.开始取网页源码2(网页,"UTF-8")
分支 "综艺"
网页="https://www.360kan.com/zongyi/list.php?"
多线程3.开始取网页源码2(网页,"UTF-8")
分支 "动漫"
网页="https://www.360kan.com/dongman/list.php?"
多线程4.开始取网页源码2(网页,"UTF-8")
分支 "儿童"
网页="https://www.360kan.com/dianying/list.php?year=all&area=all&act=all&cat=107"
多线程6.开始取网页源码2(网页,"UTF-8")
结束 判断
结束 如果
结束 事件
事件 多线程1.取网页源码2完毕(源码 为 文本型)
如果 是否清空=真 则
变量 类型 为 文本型
变量 年代 为 文本型
变量 地区 为 文本型
变量 类型名称数组 为 文本型()
变量 类型代码数组 为 文本型()
变量 年代名称数组 为 文本型()
变量 年代代码数组 为 文本型()
变量 地区名称数组 为 文本型()
变量 地区代码数组 为 文本型()
变量 计数 为 整数型
类型=子文本替换(取指定文本2(源码,"类型:</dt>","tab_类型:_更多"),"<i class=\"s-hot-icon\"></i>","")
类型名称数组=取指定文本(类型,":_","\">")
类型代码数组=取指定文本(类型,"cat=","\" target=")
计数=0
列表框1.清空项目()
列表框1.添加项目("全部")
列表框1.置项目标记(列表框1.取项目数()-1,"&cat=all")
列表框1代码="&cat=all"
列表框1.置现行选中项(0)
判断循环首 计数< 取数组成员数(类型名称数组)
列表框1.添加项目(删首尾空(类型名称数组(计数)))
列表框1.置项目标记(列表框1.取项目数()-1,"&cat="&类型代码数组(计数))
计数=计数+1
判断循环尾
年代=子文本替换(取指定文本2(源码,"年代:</dt>","tab_年代:_更多"),"<i class=\"s-hot-icon\"></i>","")
年代名称数组=取指定文本(年代,":_","\">")
年代代码数组=取指定文本(年代,"year=","\" target=")
计数=0
列表框2.清空项目()
列表框2.添加项目("全部")
列表框2.置项目标记(列表框2.取项目数()-1,"&year=all")
列表框2代码="&year=all"
列表框2.置现行选中项(0)
判断循环首 计数< 取数组成员数(年代名称数组)
列表框2.添加项目(删首尾空(年代名称数组(计数)))
列表框2.置项目标记(列表框2.取项目数()-1,"&year="&年代代码数组(计数))
计数=计数+1
判断循环尾
地区=子文本替换(取指定文本2(源码,"地区:</dt>","tab_地区:_更多"),"<i class=\"s-hot-icon\"></i>","")
地区名称数组=取指定文本(地区,":_","\">")
地区代码数组=取指定文本(地区,"area=","\" target=")
计数=0
列表框3.清空项目()
列表框3.添加项目("全部")
列表框3.置项目标记(列表框3.取项目数()-1,"&area=all")
列表框3代码="&area=all"
列表框3.置现行选中项(0)
判断循环首 计数< 取数组成员数(地区名称数组)
列表框3.添加项目(删首尾空(地区名称数组(计数)))
列表框3.置项目标记(列表框3.取项目数()-1,"&area="&地区代码数组(计数))
计数=计数+1
判断循环尾
是否清空=假
列表框1.置现行选中项(0)
列表框1.获取焦点()
结束 如果
变量 数据数组 为 文本型()
变量 图片 为 文本型
变量 标题 为 文本型
变量 地址 为 文本型
变量 循环变量 为 整数型
数据数组 = 取指定文本(取指定文本2(源码,"安装360影视大全APP，免费观看","加载更多"),"<li class=\"item\">","</li>")
变量循环首 循环变量=0 至 取数组成员数(数据数组)-1
图片=取指定文本2(数据数组(循环变量),"<img src=\"","\">")
标题=取指定文本2(数据数组(循环变量),"<span class=\"s1\">","</span>")
地址=取指定文本2(数据数组(循环变量),"<a class=\"js-tongjic\" href=\"","\"")
图片列表框1.添加项目(图片,标题)
图片列表框1.置项目副标题(图片列表框1.取项目数()-1,地址)
变量循环尾
图片列表框1.获取焦点()
结束 事件
事件 多线程2.取网页源码2完毕(源码 为 文本型)
如果 是否清空=真 则
变量 类型 为 文本型
变量 年代 为 文本型
变量 地区 为 文本型
变量 类型名称数组 为 文本型()
变量 类型代码数组 为 文本型()
变量 年代名称数组 为 文本型()
变量 年代代码数组 为 文本型()
变量 地区名称数组 为 文本型()
变量 地区代码数组 为 文本型()
变量 计数 为 整数型
类型=子文本替换(取指定文本2(源码,"类型:</dt>","tab_类型:_更多"),"<i class=\"s-hot-icon\"></i>","")
类型名称数组=取指定文本(类型,":_","\">")
类型代码数组=取指定文本(类型,"cat=","\" target=")
计数=0
列表框1.清空项目()
列表框1.添加项目("全部")
列表框1.置项目标记(列表框1.取项目数()-1,"&cat=all")
列表框1代码="&cat=all"
列表框1.置现行选中项(0)
判断循环首 计数< 取数组成员数(类型名称数组)
列表框1.添加项目(删首尾空(类型名称数组(计数)))
列表框1.置项目标记(列表框1.取项目数()-1,"&cat="&类型代码数组(计数))
计数=计数+1
判断循环尾
年代=子文本替换(取指定文本2(源码,"年代:</dt>","tab_年代:_更多"),"<i class=\"s-hot-icon\"></i>","")
年代名称数组=取指定文本(年代,":_","\">")
年代代码数组=取指定文本(年代,"year=","\" target=")
计数=0
列表框2.清空项目()
列表框2.添加项目("全部")
列表框2.置项目标记(列表框2.取项目数()-1,"&year=all")
列表框2代码="&year=all"
列表框2.置现行选中项(0)
判断循环首 计数< 取数组成员数(年代名称数组)
列表框2.添加项目(删首尾空(年代名称数组(计数)))
列表框2.置项目标记(列表框2.取项目数()-1,"&year="&年代代码数组(计数))
计数=计数+1
判断循环尾
地区=子文本替换(取指定文本2(源码,"地区:</dt>","tab_地区:_更多"),"<i class=\"s-hot-icon\"></i>","")
地区名称数组=取指定文本(地区,":_","\">")
地区代码数组=取指定文本(地区,"area=","\" target=")
计数=0
列表框3.清空项目()
列表框3.添加项目("全部")
列表框3.置项目标记(列表框3.取项目数()-1,"&area=all")
列表框3代码="&area=all"
列表框3.置现行选中项(0)
判断循环首 计数< 取数组成员数(地区名称数组)
列表框3.添加项目(删首尾空(地区名称数组(计数)))
列表框3.置项目标记(列表框3.取项目数()-1,"&area="&地区代码数组(计数))
计数=计数+1
判断循环尾
是否清空=假
列表框1.置现行选中项(0)
列表框1.获取焦点()
结束 如果
变量 数据数组 为 文本型()
变量 图片 为 文本型
变量 标题 为 文本型
变量 地址 为 文本型
变量 循环变量 为 整数型
数据数组 = 取指定文本(取指定文本2(源码,"安装360影视大全APP，免费观看","加载更多"),"<li class=\"item\">","</li>")
变量循环首 循环变量=0 至 取数组成员数(数据数组)-1
图片=取指定文本2(数据数组(循环变量),"<img src=\"","\">")
标题=取指定文本2(数据数组(循环变量),"<span class=\"s1\">","</span>")
地址=取指定文本2(数据数组(循环变量),"<a class=\"js-tongjic\" href=\"","\"")
图片列表框1.添加项目(图片,标题)
图片列表框1.置项目副标题(图片列表框1.取项目数()-1,地址)
变量循环尾
图片列表框1.获取焦点()
结束 事件
事件 多线程3.取网页源码2完毕(源码 为 文本型)
如果 是否清空=真 则
变量 类型 为 文本型
变量 年代 为 文本型
变量 地区 为 文本型
变量 类型名称数组 为 文本型()
变量 类型代码数组 为 文本型()
变量 年代名称数组 为 文本型()
变量 年代代码数组 为 文本型()
变量 地区名称数组 为 文本型()
变量 地区代码数组 为 文本型()
变量 计数 为 整数型
类型=子文本替换(取指定文本2(源码,"类型:</dt>","tab_类型:_更多"),"<i class=\"s-hot-icon\"></i>","")
类型名称数组=取指定文本(类型,":_","\">")
类型代码数组=取指定文本(类型,"cat=","\" target=")
计数=0
列表框1.清空项目()
列表框1.添加项目("全部")
列表框1.置项目标记(列表框1.取项目数()-1,"&cat=all")
列表框1代码="&cat=all"
列表框1.置现行选中项(0)
判断循环首 计数< 取数组成员数(类型名称数组)
列表框1.添加项目(删首尾空(类型名称数组(计数)))
列表框1.置项目标记(列表框1.取项目数()-1,"&cat="&类型代码数组(计数))
计数=计数+1
判断循环尾
年代=子文本替换(取指定文本2(源码,"明星:</dt>","tab_明星:_更多"),"<i class=\"s-hot-icon\"></i>","")
年代名称数组=取指定文本(年代,":_","\">")
年代代码数组=取指定文本(年代,"act=","\" target=")
计数=0
列表框2.清空项目()
列表框2.添加项目("全部")
列表框2.置项目标记(列表框2.取项目数()-1,"&act=all")
列表框2代码="&act=all"
列表框2.置现行选中项(0)
判断循环首 计数< 取数组成员数(年代名称数组)
列表框2.添加项目(删首尾空(年代名称数组(计数)))
列表框2.置项目标记(列表框2.取项目数()-1,"&act="&年代代码数组(计数))
计数=计数+1
判断循环尾
地区=子文本替换(取指定文本2(源码,"地区:</dt>","tab_地区:_更多"),"<i class=\"s-hot-icon\"></i>","")
地区名称数组=取指定文本(地区,":_","\">")
地区代码数组=取指定文本(地区,"area=","\" target=")
计数=0
列表框3.清空项目()
列表框3.添加项目("全部")
列表框3.置项目标记(列表框3.取项目数()-1,"&area=all")
列表框3代码="&area=all"
列表框3.置现行选中项(0)
判断循环首 计数< 取数组成员数(地区名称数组)
列表框3.添加项目(删首尾空(地区名称数组(计数)))
列表框3.置项目标记(列表框3.取项目数()-1,"&area="&地区代码数组(计数))
计数=计数+1
判断循环尾
是否清空=假
列表框1.置现行选中项(0)
列表框1.获取焦点()
结束 如果
变量 数据数组 为 文本型()
变量 图片 为 文本型
变量 标题 为 文本型
变量 地址 为 文本型
变量 循环变量 为 整数型
数据数组 = 取指定文本(取指定文本2(源码,"安装360影视大全APP，免费观看","加载更多"),"<li class=\"item\">","</li>")
变量循环首 循环变量=0 至 取数组成员数(数据数组)-1
图片=取指定文本2(数据数组(循环变量),"<img src=\"","\">")
标题=取指定文本2(数据数组(循环变量),"<span class=\"s1\">","</span>")
地址=取指定文本2(数据数组(循环变量),"<a class=\"js-tongjic\" href=\"","\"")
图片列表框1.添加项目(图片,标题)
图片列表框1.置项目副标题(图片列表框1.取项目数()-1,地址)
变量循环尾
图片列表框1.获取焦点()
结束 事件
事件 多线程4.取网页源码2完毕(源码 为 文本型)
如果 是否清空=真 则
变量 类型 为 文本型
变量 年代 为 文本型
变量 地区 为 文本型
变量 类型名称数组 为 文本型()
变量 类型代码数组 为 文本型()
变量 年代名称数组 为 文本型()
变量 年代代码数组 为 文本型()
变量 地区名称数组 为 文本型()
变量 地区代码数组 为 文本型()
变量 计数 为 整数型
类型=子文本替换(取指定文本2(源码,"类型:</dt>","tab_类型:_更多"),"<i class=\"s-hot-icon\"></i>","")
类型名称数组=取指定文本(类型,":_","\">")
类型代码数组=取指定文本(类型,"cat=","\" target=")
计数=0
列表框1.清空项目()
列表框1.添加项目("全部")
列表框1.置项目标记(列表框1.取项目数()-1,"&cat=all")
列表框1代码="&cat=all"
列表框1.置现行选中项(0)
判断循环首 计数< 取数组成员数(类型名称数组)
列表框1.添加项目(删首尾空(类型名称数组(计数)))
列表框1.置项目标记(列表框1.取项目数()-1,"&cat="&类型代码数组(计数))
计数=计数+1
判断循环尾
年代=子文本替换(取指定文本2(源码,"年代:</dt>","tab_年代:_更多"),"<i class=\"s-hot-icon\"></i>","")
年代名称数组=取指定文本(年代,":_","\">")
年代代码数组=取指定文本(年代,"year=","\" target=")
计数=0
列表框2.清空项目()
列表框2.添加项目("全部")
列表框2.置项目标记(列表框2.取项目数()-1,"&year=all")
列表框2代码="&year=all"
列表框2.置现行选中项(0)
判断循环首 计数< 取数组成员数(年代名称数组)
列表框2.添加项目(删首尾空(年代名称数组(计数)))
列表框2.置项目标记(列表框2.取项目数()-1,"&year="&年代代码数组(计数))
计数=计数+1
判断循环尾
地区=子文本替换(取指定文本2(源码,"地区:</dt>","tab_地区:_更多"),"<i class=\"s-hot-icon\"></i>","")
地区名称数组=取指定文本(地区,":_","\">")
地区代码数组=取指定文本(地区,"area=","\" target=")
计数=0
列表框3.清空项目()
列表框3.添加项目("全部")
列表框3.置项目标记(列表框3.取项目数()-1,"&area=all")
列表框3代码="&area=all"
列表框3.置现行选中项(0)
判断循环首 计数< 取数组成员数(地区名称数组)
列表框3.添加项目(删首尾空(地区名称数组(计数)))
列表框3.置项目标记(列表框3.取项目数()-1,"&area="&地区代码数组(计数))
计数=计数+1
判断循环尾
是否清空=假
列表框1.置现行选中项(0)
列表框1.获取焦点()
结束 如果
变量 数据数组 为 文本型()
变量 图片 为 文本型
变量 标题 为 文本型
变量 地址 为 文本型
变量 循环变量 为 整数型
数据数组 = 取指定文本(取指定文本2(源码,"安装360影视大全APP，免费观看","加载更多"),"<li class=\"item\">","</li>")
变量循环首 循环变量=0 至 取数组成员数(数据数组)-1
图片=取指定文本2(数据数组(循环变量),"<img src=\"","\">")
标题=取指定文本2(数据数组(循环变量),"<span class=\"s1\">","</span>")
地址=取指定文本2(数据数组(循环变量),"<a class=\"js-tongjic\" href=\"","\"")
图片列表框1.添加项目(图片,标题)
图片列表框1.置项目副标题(图片列表框1.取项目数()-1,地址)
变量循环尾
图片列表框1.获取焦点()
结束 事件
事件 多线程6.取网页源码2完毕(源码 为 文本型)
如果 是否清空=真 则
变量 类型 为 文本型
变量 年代 为 文本型
变量 地区 为 文本型
变量 类型名称数组 为 文本型()
变量 类型代码数组 为 文本型()
变量 年代名称数组 为 文本型()
变量 年代代码数组 为 文本型()
变量 地区名称数组 为 文本型()
变量 地区代码数组 为 文本型()
变量 计数 为 整数型
类型=子文本替换(取指定文本2(源码,"类型:</dt>","tab_类型:_更多"),"<i class=\"s-hot-icon\"></i>","")
类型名称数组=取指定文本(类型,":_","\">")
类型代码数组=取指定文本(类型,"cat=","\" target=")
计数=0
列表框1.清空项目()
列表框1.添加项目("全部")
列表框1.置项目标记(列表框1.取项目数()-1,"&cat=all")
列表框1代码="&cat=all"
列表框1.置现行选中项(0)
判断循环首 计数< 取数组成员数(类型名称数组)
列表框1.添加项目(删首尾空(类型名称数组(计数)))
列表框1.置项目标记(列表框1.取项目数()-1,"&cat="&类型代码数组(计数))
计数=计数+1
判断循环尾
年代=子文本替换(取指定文本2(源码,"年代:</dt>","tab_年代:_更多"),"<i class=\"s-hot-icon\"></i>","")
年代名称数组=取指定文本(年代,":_","\">")
年代代码数组=取指定文本(年代,"year=","\" target=")
计数=0
列表框2.清空项目()
列表框2.添加项目("全部")
列表框2.置项目标记(列表框2.取项目数()-1,"&year=all")
列表框2代码="&year=all"
列表框2.置现行选中项(0)
判断循环首 计数< 取数组成员数(年代名称数组)
列表框2.添加项目(删首尾空(年代名称数组(计数)))
列表框2.置项目标记(列表框2.取项目数()-1,"&year="&年代代码数组(计数))
计数=计数+1
判断循环尾
地区=子文本替换(取指定文本2(源码,"地区:</dt>","tab_地区:_更多"),"<i class=\"s-hot-icon\"></i>","")
地区名称数组=取指定文本(地区,":_","\">")
地区代码数组=取指定文本(地区,"area=","\" target=")
计数=0
列表框3.清空项目()
列表框3.添加项目("全部")
列表框3.置项目标记(列表框3.取项目数()-1,"&area=all")
列表框3代码="&area=all"
列表框3.置现行选中项(0)
判断循环首 计数< 取数组成员数(地区名称数组)
列表框3.添加项目(删首尾空(地区名称数组(计数)))
列表框3.置项目标记(列表框3.取项目数()-1,"&area="&地区代码数组(计数))
计数=计数+1
判断循环尾
是否清空=假
列表框1.置现行选中项(0)
列表框1.获取焦点()
结束 如果
变量 数据数组 为 文本型()
变量 图片 为 文本型
变量 标题 为 文本型
变量 地址 为 文本型
变量 循环变量 为 整数型
数据数组 = 取指定文本(取指定文本2(源码,"安装360影视大全APP，免费观看","加载更多"),"<li class=\"item\">","</li>")
变量循环首 循环变量=0 至 取数组成员数(数据数组)-1
图片=取指定文本2(数据数组(循环变量),"<img src=\"","\">")
标题=取指定文本2(数据数组(循环变量),"<span class=\"s1\">","</span>")
地址=取指定文本2(数据数组(循环变量),"<a class=\"js-tongjic\" href=\"","\"")
图片列表框1.添加项目(图片,标题)
图片列表框1.置项目副标题(图片列表框1.取项目数()-1,地址)
变量循环尾
图片列表框1.获取焦点()
结束 事件
事件 窗口列表.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
判断 键代码
分支 返回键
如果 读取窗口("窗口_首页")=空 则
保存窗口("窗口_首页",创建 窗口_首页)
结束 如果
切换窗口(读取窗口("窗口_首页"))
结束 判断
结束 事件
变量 页数 为 整数型
事件 图片列表框1.表项被滚动(首个可见项目索引 为 整数型,可见项目总数 为 整数型,所有项目总数 为 整数型)
如果 首个可见项目索引 = 所有项目总数 - 可见项目总数 则
页数=页数+1
判断 公用模块.窗口分类
分支 "电视剧"
网页="https://www.360kan.com/dianshi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程1.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "电影"
网页="https://www.360kan.com/dianying/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程2.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "综艺"
网页="https://www.360kan.com/zongyi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程3.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "动漫"
网页="https://www.360kan.com/dongman/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程4.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "儿童"
网页="https://www.360kan.com/dianying/list.php?year=all&area=all&act=all&cat=107"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程6.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
结束 判断
结束 如果
结束 事件
变量 列表框1代码 为 文本型
变量 列表框2代码 为 文本型
变量 列表框3代码 为 文本型
事件 列表框1.表项被单击(项目索引 为 整数型)
列表框1代码=列表框1.取项目标记(项目索引)
图片列表框1.清空项目()
页数=1
判断 公用模块.窗口分类
分支 "电视剧"
网页="https://www.360kan.com/dianshi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程1.开始取网页源码2(网页,"UTF-8")
分支 "电影"
网页="https://www.360kan.com/dianying/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程2.开始取网页源码2(网页,"UTF-8")
分支 "综艺"
网页="https://www.360kan.com/zongyi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程3.开始取网页源码2(网页,"UTF-8")
分支 "动漫"
网页="https://www.360kan.com/dongman/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程4.开始取网页源码2(网页,"UTF-8")
结束 判断
结束 事件
事件 列表框2.表项被单击(项目索引 为 整数型)
列表框2代码=列表框2.取项目标记(项目索引)
图片列表框1.清空项目()
页数=1
判断 公用模块.窗口分类
分支 "电视剧"
网页="https://www.360kan.com/dianshi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程1.开始取网页源码2(网页,"UTF-8")
分支 "电影"
网页="https://www.360kan.com/dianying/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程2.开始取网页源码2(网页,"UTF-8")
分支 "综艺"
网页="https://www.360kan.com/zongyi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程3.开始取网页源码2(网页,"UTF-8")
分支 "动漫"
网页="https://www.360kan.com/dongman/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程4.开始取网页源码2(网页,"UTF-8")
结束 判断
结束 事件
事件 列表框3.表项被单击(项目索引 为 整数型)
列表框3代码=列表框3.取项目标记(项目索引)
图片列表框1.清空项目()
页数=1
判断 公用模块.窗口分类
分支 "电视剧"
网页="https://www.360kan.com/dianshi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程1.开始取网页源码2(网页,"UTF-8")
分支 "电影"
网页="https://www.360kan.com/dianying/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程2.开始取网页源码2(网页,"UTF-8")
分支 "综艺"
网页="https://www.360kan.com/zongyi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程3.开始取网页源码2(网页,"UTF-8")
分支 "动漫"
网页="https://www.360kan.com/dongman/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程4.开始取网页源码2(网页,"UTF-8")
结束 判断
结束 事件
事件 图片列表框1.表项被单击(项目索引 为 整数型)
公用模块.播放标题 = 图片列表框1.取项目标题(项目索引)
公用模块.播放链接 = 图片列表框1.取项目副标题(项目索引)
如果 读取窗口("窗口播放")=空 则
保存窗口("窗口播放",创建 窗口播放)
结束 如果
切换窗口(读取窗口("窗口播放"))
结束 事件
事件 标签2.获得焦点()
页数=页数+1
判断 公用模块.窗口分类
分支 "电视剧"
网页="https://www.360kan.com/dianshi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程1.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "电影"
网页="https://www.360kan.com/dianying/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程2.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "综艺"
网页="https://www.360kan.com/zongyi/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程3.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
分支 "动漫"
网页="https://www.360kan.com/dongman/list.php?"&列表框1代码 & 列表框2代码 & 列表框3代码
多线程4.开始取网页源码2(网页 & "&pageno=" & 页数,"UTF-8")
结束 判断
结束 事件
|
|
默认
Lavender
Sky
Flowers
Wizard
Snow
Beige
California
City
Dragon
Black
London
Sunset glow
Pink
Cloud
快捷导航
提升卡
变色卡
