.版本 2
.支持库 EThread
.程序集 窗口程序集_窗口1
.程序集变量 code_true, 逻辑型
.程序集变量 Baidu, BaiDu
.子程序 _按钮1_被单击
启动线程 (&Login, , )
.子程序 Login
.局部变量 sta, 整数型
.局部变量 user, 文本型
.局部变量 pass, 文本型
sta = Baidu.Login (编辑框1.内容, 编辑框2.内容)
.判断循环首 (sta = 3)
图片框1.图片 = Baidu.GetImg ()
.判断循环首 (取文本长度 (编辑框3.内容) ≠ 4)
处理事件 ()
.判断循环尾 ()
sta = Baidu.Login (编辑框1.内容, 编辑框2.内容, 编辑框3.内容)
图片框1.图片 = { }
编辑框3.内容 = “”
.判断循环尾 ()
.判断开始 (sta = 1)
信息框 (“登录成功,Cookie:” + Baidu.GetCookie (), 64, “登录:”, )
.判断 (sta = 2)
信息框 (“登录失败,密码错误!”, 64, “登录:”, )
.默认
信息框 (“登录失败,未知错误!”, 64, “登录:”, )
.判断结束
.子程序 _窗口1_创建完毕