文件名称:在线电视台
文件大小:19KB
文件格式:RAR
更新时间:2018-03-19 03:18:46
在线电视台
.版本 2 .支持库 wmp9 .支持库 eAPI .程序集 窗口程序集1 .子程序 __启动窗口3_创建完毕 .局部变量 文本, 文本型 .局部变量 文件号, 整数型 列表框2.清空 () 列表框1.清空 () 文件号 = 打开文件 (取运行目录 () + “\system.ini”, , ) 移到文件首 (文件号) .判断循环首 (取反 (是否在文件尾 (文件号, ))) 文本 = 读入一行 (文件号) .如果真 (删全部空 (文本) ≠ “”) 列表框1.加入项目 (取文本左边 (文本, 寻找文本 (文本, “=”, , 假) - 1), ) 列表框2.加入项目 (取文本右边 (文本, 取文本长度 (文本) - 寻找文本 (文本, “=”, , 假)), ) .如果真结束 .判断循环尾 () 关闭文件 (文件号) .子程序 _列表框1_被双击, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 .如果 (到小写 (取文本右边 (列表框2.取项目文本 (列表框1.现行选中项), 2)) = “rm” 或 到小写 (取文本右边 (列表框2.取项目文本 (列表框1.现行选中项), 4)) = “rmvb”) 播放器1.关闭 () 标题 = “网络电视修改版 正在播放:” + 列表框1.取项目文本 (列表框1.现行选中项) 总在最前 = 假 位置 = 2 自定义执行 (列表框2.取项目文本 (列表框1.现行选中项), 真, ) 总在最前 = 真 位置 = 0 标题 = “网络电视修改版” .否则 标题 = “网络电视修改版 正在播放:” + 列表框1.取项目文本 (列表框1.现行选中项) 播放器1.关闭 () 播放器1.地址 = 列表框2.取项目文本 (列表框1.现行选中项) .如果结束 .子程序 _图片框1_鼠标左键被按下, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 播放器1.全屏模式 = 真 .子程序 __启动窗口3_尺寸被改变 .判断开始 (宽度 < 500) 宽度 = 500 .判断 (高度 < 300) 高度 = 300 .默认 .判断结束 列表框1.左边 = 宽度 - 列表框1.宽度 - 10 播放器1.宽度 = 宽度 - 列表框1.宽度 - 10 播放器1.高度 = 高度 - 40 列表框1.高度 = 高度 - 40 图片框1.左边 = 播放器1.宽度 - 50 图片框1.顶边 = 播放器1.高度 - 18 .子程序 _透明标签1_鼠标左键被按下, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 载入 (_启动窗口, , 假) 销毁 () .子程序 _按钮1_被单击 打开指定网址 (“888888888”)
【文件预览】:
源码使用说明.txt
在线电视台
----在线电视台.e(28KB)
----system.ini(5KB)
----_仿真shell库.ec(27KB)