|
楼主 |
发表于 2020-2-8 06:27:26
|
显示全部楼层
河南省鹤壁市
- .版本 2
- .支持库 spec
- .支持库 wmp9
- .程序集 窗口程序集_启动窗口
- .程序集变量 n, 整数型
- .程序集变量 e, 整数型
- .程序集变量 播放状态, 整数型
- .子程序 _时钟1_周期事件
- .如果真 (播放状态 = 1)
- _按钮1_被单击 ()
- .如果真结束
- .子程序 _播放器1_播放状态被改变
- .参数 新的状态, 整数型
- 播放状态 = 新的状态
- .子程序 __启动窗口_创建完毕
- n = 6
- .子程序 _按钮1_被单击
- n = n + 1
- 编辑框5.加入文本 (“第” + 到文本 (n) + “章” + #换行符)
- 调试输出 (n)
- .如果真 (n = 10 且 编辑框2.内容 = “-19-00”)
- 编辑框2.内容 = “-19-01”
- n = 0
- .如果真结束
- .如果真 (n = 3 且 编辑框2.内容 = “-19-01”)
- 编辑框2.内容 = “-20-00”
- n = 0
- 延迟 (500)
- ' _按钮1_被单击 ()
- .如果真结束
- .如果真 (n = 4 且 编辑框2.内容 = “-20-00”)
- n = 6
- .如果真结束
- .如果真 (n = 10 且 编辑框2.内容 = “-20-00”)
- 编辑框2.内容 = “-20-01”
- n = 0
- .如果真结束
- .如果真 (n = 3 且 编辑框2.内容 = “-20-01”)
- 编辑框2.内容 = “-21-00”
- n = 0
- .如果真结束
- 播放器1.地址 = “http://vod.cntv.lxdns.com/flash/live_back/nettv_cctv8/cctv8-2020-” + 编辑框1.内容 + 编辑框2.内容 + 到文本 (n) + “.mp4?start=0”
- 延迟 (到整数 (编辑框4.内容 + “000”))
- 播放器1.全屏模式 = 真
- .子程序 _编辑框1_内容被改变
- n = 6
复制代码 |
|