请大佬帮忙看看这个代码应该怎么修改！

lnrlnr

大佬们，我写了一个播放器软件，打开播放器自动播放git上的视频地址。代码如下：
本人想实现，git地址1获取的视频播放结束后，软件自动刷新加载一下，然后获取git地址2的视频地址，请问代码应该如何优化呀？

1. 变量 频道 为 文本型
   
2. 变量 地址 为 文本型
   
3. 变量 临时数据 为 文本型()
   
4. 变量 计数 为 整数型
   
5. 变量 频道名 为 文本型
   
6. 
   
7. 
   
8. 事件 主窗口.创建完毕()
   
9.         系统设置1.保持屏幕常亮()
   
10.         如意可视播放器1.初始化("www.eruyi.cn")
    
11.         如意可视播放器1.宽度=取屏幕宽度()
    
12.         如意可视播放器1.高度=取屏幕高度()
    
13.         如意可视播放器1.顶边=0
    
14.         如意可视播放器1.左边=0
    
15.         如意可视播放器1.设置视频比例(4)
    
16.         面板1.到顶层()
    
17.         面板1.可视=假
    
18.         标签1.到顶层()
    
19.         多线程1.开始取网页源码2("https://gitee.com/recalling_network/xxxxxxxxxxxxxxxxxx/zyzb","GBK")
    
20. 结束 事件
    
21. 
    
22. 事件 多线程1.取网页源码2完毕(源码 为 文本型)
    
23. 
    
24.         如意可视播放器1.开始播放("xxxxxx",源码)
    
25. 结束 事件
    
26. 
    
27. 
    
28. 事件 标签1.被单击()
    
29.         如果 面板1.可视=假 则
    
30.                 面板1.可视=真
    
31.             面板1.到顶层()
    
32.         否则       
    
33.                 标签1.到顶层()
    
34.             面板1.可视=假
    
35.         结束 如果
    
36. 结束 事件

复制代码

yanxueao

事件 如意可视播放器1.播放完毕(是否出错 为 逻辑型)
        如果 公用模块.滚动=oktv选集列表框1.取项目数()-1 则
                弹出提示("已无下集请返回！")
                否则
                弹出提示("别走开、马上播放下一集！")
                公用模块.滚动=公用模块.滚动+1

或者多线程1.开始取网页源码2

yaojing215

学习一下

乐乐看看

111111111111111111111

lisheng

我也来学习一下