宽带多线程拨号软件修改版

.子程序 _按钮_启动_被单击

子程序_保存配置 ()
.如果真 (编辑框_宽带帐号.内容 ＝ “” 或 编辑框_宽带密码.内容 ＝ “”)
日记.输出 (“请输入宽带帐号密码！”)
返回 ()
.如果真结束
自动拨号_置拨号配置 (编辑框_宽带帐号.内容, 编辑框_宽带密码.内容, 组合框_宽带配置.现行选中项, &子程序_拨号状态反馈, 10, 2, 真) ' 设置自动拨号
.如果真 (取反 (多线程.启动 (到数值 (编辑框_线程数.内容), 到数值 (编辑框_操作数量.内容), &子程序_工作线程, 全_线程id, 标签_多线程反馈, 到数值 (编辑框_操作次数换IP.内容))))
信息框 (“线程启动失败！”, #错误图标, “错误”, )
返回 ()
.如果真结束
标题 ＝ 标题 ＋ “　开始时间：” ＋ 到文本 (取现行时间 ())

.子程序 _标签_多线程反馈_反馈事件, 整数型, , 线程工作中会根据设置调用这里
.参数 参数一, 整数型, , 传递来的 线程状态
.参数 参数二, 整数型, , 传递来的 线程ID
.局部变量 局_返回, 文本型

.如果真 (参数一 ＝ #线程反馈_拨号)
.如果真 (多线程.取状态 (参数二) ＝ 2)
多线程.恢复 (参数二)
.如果真结束
日记.输出 (“进入拨号！”)
.如果真 (自动拨号 (参数二) ＝ 假)
日记.输出 (“拨号超时，请手动拨号，后点击恢复按钮”)
按钮_暂停.标题 ＝ “恢复”
.如果真结束
返回 ()
.如果真结束
.如果真 (参数一 ＝ #线程反馈_任务完成)
日记.输出 (“任务完成”)
标题 ＝ 标题 ＋ “　完成时间：” ＋ 到文本 (取现行时间 ())