| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集1 |
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_创建完毕 | |||||
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_将被销毁 | 关闭结束 | ||||
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| ip_取本机wai网IP | 文本型 | 获取wai网IP子程序 | |||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 耗时 | 整数型 | ||||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| ip地址 | 文本型 | |||||
ip地址 ＝ 到文本 (HTTP读文件 (“http://2019.ip138.com/ic.asp”)) ' 获取IP地址网址
ip地址 ＝ 删全部空 (取文本中间 (ip地址, 寻找文本 (ip地址, “您的IP是：”, , 假) ＋ 10, 寻找文本 (ip地址, “ 来自”, , 假) － 寻找文本 (ip地址, “您的IP是：”, , 假) － 10)) ' 取出IP地址中间值
耗时 ＝ 取启动时间 () － 耗时
返回 (ip地址)
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮_开始1_被单击 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 返回数据 | 文本型 | |||||
| token | 文本型 | |||||
如果真 (寻找文本 (返回数据, “密码错误”, , 假) ≠ -1) ' 下列三行判断路由器账号密码
信息框 (“密码错误 或 用户名错误，请重新检查~”, 0, , )返回 ()token ＝ 文本_取出中间文本 (返回数据, “token: '”, “'”) ' 获取token值，重启时会用到
编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) ＋ “:您的光猫 ” ＋ “登录成功” ＋ #换行符 ) ' 追加运行记录登录成功
如果真 (token ＝ “”) ' 下列三行判断token是否获取到信息框 (“请登录，在重启~”, 0, , )返回 ()返回数据 ＝ 到文本 (网页_访问 (“http://” ＋ 编辑框3.内容 ＋ “/cgi-bin/luci/admin/reboot”, 1, “token=” ＋ token ＋ “&_=0.6963554233128502”, , , )) ' 向路由器发送ip地址+token重启命令
如果真 (返回数据 ＝ “”) ' 判断返回值是否为空编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) ＋ “:命令发送完毕，正在重启..... ” ＋ #换行符 ) ' 如果返回值为空则加入运行记录命令延时 (10000) ' 等待10秒钟
循环判断首 () ' 10秒钟后循环判断是否联网成功延迟 (700)
循环判断尾 (通信测试 (“www.baidu.com”, 300) ＜ 1) ' 此处如果不通则会一直循环编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) ＋ “:重启成功 ” ＋ #换行符 ) ' 此处如果联网成功，下列到返回出加入到运行记录编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) ＋ “:您的新IP地址 ” ＋ ip_取本机wai网IP () ＋ #换行符 )编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) ＋ “:重启完毕，已经可以上网了..... ” ＋ #换行符 )返回 () ' 此处联网成功结束编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) ＋ “:重启失败啦 ” ＋ #换行符 ) ' 如果联网不成则此行加入运行记录
| i支持库列表 | 支持库注释 |
| internet | 互联网支持库 |
| spec | 特殊功能支持库 |
