.版本 2 .程序集 JY .程序集变量 cookies, 文本型 .程序集变量 formhash, 文本型 .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用 .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用 .子程序 login, 整数型, 公开, 成功返回1,失败返回0 .参数 username, 文本型 .参数 password, 文本型 .局部变量 formhash, 文本型 .局部变量 局_提交数据, 文本型 .局部变量 局_提交网址, 文本型 .局部变量 局_返回数据, 文本型 .局部变量 loginhash, 文本型 formhash ＝ formhash () loginhash ＝ loginhash () 局_提交网址 ＝ “//bbs.125.la/member.php?mod=logging&action=login&loginsubmit=yes&loginhash=” ＋ loginhash ＋ “&inajax=1” 局_提交数据 ＝ “formhash=” ＋ formhash ＋ “&referer=http%3A%2F%2Fbbs.125.la%2F.%2F&username=” ＋ username ＋ “&password=” ＋ 校验_取md5 (到字节集 (password)) ＋ “&questionid=0&answer=” 局_返回数据 ＝ 网页_访问S (局_提交网址, 1, 局_提交数据, cookies, cookies, ) ' 调试输出 (局_返回数据) .如果真 (寻找文本 (局_返回数据, “欢迎您回来”, , 假) ≠ -1) 返回 (1) .如果真结束 返回 (0) .子程序 loginhash, 文本型 .局部变量 loginhash, 文本型 loginhash ＝ 网页_访问S (“//bbs.125.la/member.php?mod=logging&action=login”) loginhash ＝ 文本_取出中间文本 (loginhash, “loginhash=”, #loginhash_right) 返回 (loginhash) .子程序 formhash, 文本型 .局部变量 formhash, 文本型 formhash ＝ 网页_访问S (“//bbs.125.la/member.php?mod=logging&action=login”, , , , cookies, ) formhash ＝ 文本_取出中间文本 (formhash, #常量1, #常量2) 返回 (formhash)