.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.子程序 论坛_用户注册, 逻辑型
.参数 邮箱, 文本型
.参数 用户名, 文本型
.参数 密码, 文本型
.局部变量 返回, 文本型
返回 = 到文本 (网页_访问 (“https://bbs.gupiaozhifu.com/?user-create.htm”, 1, “email=” + 编码_URL编码 (邮箱, 真, 真) + “&username=” + 编码_URL编码 (用户名, 真, 真) + “&password=” + 校验_取md5 (到字节集 (密码))))
返回 = 编码_URL解码 (返回, 真)
.如果 (寻找文本 (返回, “用户注册成功”, , 假) ≠ -1)
返回 (真)
.否则
返回 (假)
.如果结束
.子程序 论坛_用户登录, 文本型, , 成功返回登陆后的cookies,失败返回空白
.参数 邮箱, 文本型
.参数 密码, 文本型
.局部变量 返回, 文本型
.局部变量 cookies, 文本型
返回 = 到文本 (网页_访问 (“https://bbs.gupiaozhifu.com/?user-login.htm”, 1, “email=” + 编码_URL编码 (邮箱, 真, 真) + “&password=” + 校验_取md5 (到字节集 (密码)), , cookies))
返回 = 编码_URL解码 (返回, 真)
.如果 (寻找文本 (返回, “登录成功”, , 假) ≠ -1)
返回 (cookies)
.否则
返回 (“”)
.如果结束
.子程序 论坛_发帖, 逻辑型
.参数 登录cookies, 文本型
.参数 标题, 文本型
.参数 内容, 文本型, , 支持html代码
.参数 分类, 整数型, , 1.活动线报 2.精品软件 3.游戏专区 4.开源交流 5.资源杂烩 9.互动讨论 10.冷知识 11.美图美文
.局部变量 返回, 文本型
返回 = 到文本 (网页_访问 (“https://bbs.gupiaozhifu.com/?thread-create.htm”, 1, “doctype=0"epid=0&fid=” + 到文本 (分类) + “&subject=” + 编码_URL编码 (标题, 真, 真) + “&message=” + 编码_URL编码 (内容, 真, 真), 登录cookies))
返回 = 编码_URL解码 (返回, 真)
.如果 (寻找文本 (返回, “发帖成功”, , 假) ≠ -1)
返回 (真)
.否则
返回 (假)
.如果结束
.子程序 __启动窗口_创建完毕