.版本 2 .支持库 shell .支持库 spec .子程序 __启动窗口_创建完毕 .局部变量 a1, 文本型 .局部变量 a2, 文本型 .局部变量 a3, 文本型 .局部变量 a4, 类_json .局部变量 a5, 文本型 a1 ＝ 取特定目录 (3) ' 路径 a2 ＝ “1.png” ' 文件名 a3 ＝ 到文本 (网页_访问_对象 (“https://upload.api.cli.im/upload.php?kid=cliim”, 1, , , , “Origin: https://cli.im” ＋ #换行符 ＋ “Content-Type: multipart/form-data; boundary=----WebKitFormBoundaryDKB5z4Bt3OiNAdXd”, , , , 到字节集 (子文本替换 (#常量1, “1.png”, a2, , , 真)) ＋ 读入文件 (a1 ＋ a2) ＋ 到字节集 (#常量2), )) 调试输出 (a3) a4.解析 (a3) a3 ＝ 编码_URL编码 (子文本替换 (a4.取通用属性 (“data.path”), “http:”, , , , 真), 真, 真) a4.清除 () 调试输出 (a3) a5 ＝ 编码_URL编码 (“https://bbs.125.la/thread-14177882-1-1.html”, 真, 真) a3 ＝ 到文本 (网页_访问_对象 (“https://cli.im/Apis/QrCode/saveStatic”, 1, “info=” ＋ a5 ＋ “&url=” ＋ a5 ＋ “&level=H&size=280&fgcolor=%23000000&bggcolor=%23ffffff&transparent=false&icon=” ＋ a3 ＋ “&type=url&codetype=”)) a4.解析 (a3) a3 ＝ a4.取通用属性 (“info”) a4.清除 () 调试输出 (a3) a3 ＝ 到文本 (网页_访问_对象 (“https://cli.im/url?” ＋ a3)) a3 ＝ “http:” ＋ 文本_取出中间文本 (a3, #常量3, #引号) 调试输出 (a3) 图片框1.图片 ＝ 网页_访问_对象 (a3)