.版本 2 .支持库 e2ee .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 DESede_CryptoJS, 文本型 .参数 data, 文本型 .参数 key, 文本型 .参数 iv, 文本型, 可空 .参数 mode, 整数型, 可空 .参数 padding, 整数型, 可空 .参数 enc, 逻辑型, , 真：加密 .参数 hexkey, 逻辑型, 可空 .参数 hexiv, 逻辑型, 可空 .参数 hextext, 逻辑型, 可空 .参数 hexresult, 逻辑型, 可空 .如果真 (mode ＜ 0 或 mode ＞ 5) mode ＝ #Mode_CBC .如果真结束 .如果真 (padding ＜ 0 或 padding ＞ 5) padding ＝ #Pkcs7Padding .如果真结束 .如果 (enc) 返回 (功能_JS (#DESede, “encrypt_3DES('” ＋ data ＋ “','” ＋ key ＋ “','” ＋ iv ＋ “','” ＋ 到文本 (mode) ＋ “','” ＋ 到文本 (padding) ＋ “','” ＋ 到文本 (到整数 (hexkey)) ＋ “','” ＋ 到文本 (到整数 (hexiv)) ＋ “','” ＋ 到文本 (到整数 (hextext)) ＋ “','” ＋ 到文本 (到整数 (hexresult)) ＋ “')”)) .否则 返回 (功能_JS (#DESede, “decrypt_3DES('” ＋ data ＋ “','” ＋ key ＋ “','” ＋ iv ＋ “','” ＋ 到文本 (mode) ＋ “','” ＋ 到文本 (padding) ＋ “','” ＋ 到文本 (到整数 (hexkey)) ＋ “','” ＋ 到文本 (到整数 (hexiv)) ＋ “','” ＋ 到文本 (到整数 (hextext)) ＋ “','” ＋ 到文本 (到整数 (hexresult)) ＋ “')”)) .如果结束 .子程序 功能_JS, 文本型 .参数 参_JS代码, 文本型 .参数 表达式, 文本型 .局部变量 对象, 对象 .局部变量 result, 文本型 对象.创建 (“scriptcontrol”, ) 对象.写属性 (“Language”, “javascript”) 对象.数值方法 (“AddCode”, 参_JS代码) result ＝ 对象.文本方法 (“Eval”, 表达式) 对象.清除 () 返回 (result) .子程序 login .参数 user, 文本型, 可空 .参数 pass, 文本型, 可空 .局部变量 data, 文本型 .局部变量 re, 文本型 user ＝ 编码_URL编码 (user, 真, 真) pass ＝ DESede_CryptoJS (pass, “tianyaiphone and android”, , 1, 6, 真, , , , ) pass ＝ HEX编码 (编码_BASE64解码 (pass, ), 真) 调试输出 (pass) ' 友情提示，单一设备登录次数过多会导致封号，uuid 和headCstr是对应的 data ＝ “userName=” ＋ user ＋ “&dPassword=” ＋ pass re ＝ 编码_Utf8到Ansi (网页_访问_对象 (“https://passport.tianya.cn/ssl/login.do”, 1, data, , , #常量1, , , , , , , , , , , , , )) 调试输出 (re) .子程序 _按钮2_被单击 login (编辑框1.内容, 编辑框2.内容)