|
楼主 |
发表于 2018-9-15 01:03:04
|
显示全部楼层
上海市上海市
- .版本 2
- .支持库 EThread
- .程序集 窗口程序集_窗口1
- .子程序 _窗口1_创建完毕
- .局部变量 局_L2句柄数组, 整数型, , "32"
- .局部变量 n, 整数型
- 窗口_置透明颜色 (窗口1.取窗口句柄 (), #黑色)
- 窗口1.移动 (取屏幕宽度 () - 窗口1.宽度 - 5, 0, , )
- 许可证 = 创建进入许可证 ()
- 启动线程 (&L2提示窗_周期事件, , )
- .子程序 L2提示窗_周期事件
- .局部变量 ping, 整数型
- .局部变量 局_句柄, 整数型
- .局部变量 链接成功, 逻辑型
- .局部变量 发送成功, 逻辑型
- .局部变量 窗口们, 整数型, , "64"
- .局部变量 n, 整数型
- .局部变量 可见窗口, 整数型
- 进入许可区 (许可证)
- 可见窗口 = 0
- 窗口_模糊遍历窗口 (, “TaoQiL2Tool”, , 窗口们)
- .计次循环首 (取数组成员数 (窗口们), n)
- .如果真 (窗口_是否可见 (窗口们 [n]))
- 可见窗口 = 可见窗口 + 1
- .如果真结束
- .计次循环尾 ()
- 信息框 (“黑喂狗”, 0, , )
- ' 局_句柄 = 窗口_取句柄 (, , “TaoQiL2Tool”, 字符 (0))
- .如果真 (可见窗口 = 0)
- 窗口1.可视 = 真
- .如果真结束
- 信息框 (“我来了”, 0, , )
复制代码 |
|