.版本 2 .程序集 窗口程序集_启动窗口 .子程序 _按钮1_被单击 .局部变量 局_返回cookies, 文本型 .局部变量 局_返回, 文本型 .局部变量 局_key, 文本型 .局部变量 局_地址, 文本型 .局部变量 局_文本, 文本型 .如果真 (编辑框_文本.内容 ＝ “”) 信息框 (“本宝宝不高兴了”, 0, “提示”, ) 返回 () .如果真结束 局_文本 ＝ 编码_URL编码 (编辑框_文本.内容, 真, 真) 网页_访问S (“http://cli.im/text”, , , , 局_返回cookies, , , , , , , , , , , , ) 局_返回 ＝ 网页_访问S (“http://cli.im/Apis/QrCode/saveStatic”, 1, “info=” ＋ 局_文本 ＋ “&content=” ＋ 局_文本 ＋ “&level=H&size=280&fgcolor=%23000000&bggcolor=%23ffffff&transparent=false&icon=&type=text”, 局_返回cookies, , , , , , , , , , , , , ) 局_key ＝ 文本_取出中间文本 (局_返回, #前, #后, , ) 局_返回 ＝ 网页_访问S (“http://cli.im/text?” ＋ 局_key, , , , , , , , , , , , , , , , ) 局_地址 ＝ 文本_取出中间文本 (局_返回, #前2, #后2, , ) 图片框1.图片 ＝ HTTP读文件 (“http://” ＋ 局_地址)