CloudNew QQ机器人开发模版初版例子

云新获取应用信息后，如果接受该应用，将会调用这个子程序并传递AuthCode。
' AuthRet ＝ CN.其他_置AuthCode (AuthCode)
.' 如果真 (AuthRet ≠ 0)
' 返回 (AuthRet)
.如果真结束
CN.日志_调试 (“调试”, 取程序名称 (1))
' 置错误提示管理 (&CN_错误提示管理) ' 将易语言的错误转向云新，便于定位错误应用
' 请勿修改本子程序，【不要】在本子程序处理其他任何代码，以免产生异常情况

.子程序 上传图片, 文本型, 公开, 上传图片（通过读入字节集方式），可使用网页链接或本地读入，成功返回该图片GUID，失败返回空
.参数 响应QQ, 文本型, , 机器人QQ
.参数 上传类型, 整数型, , 1好友2群 Ps：好友临时会话用类型 1，群讨论组用类型 2；当填写错误时，图片GUID发送不会成功
.参数 Uin, 长整数型, , 上传该图片所属的群号或QQ
.参数 图片数据, 字节集, , 图片字节集数据
.局部变量 addr, 整数型
.局部变量 Lenght, 整数型

Lenght ＝ 取字节集长度 (图片数据)
addr ＝ 申请内存 (Lenght ＋ 4, 真)
写到内存 (Lenght, addr, 4)
写到内存 (图片数据, addr ＋ 4, Lenght)
返回 (Api_UpLoadPic (响应QQ, 上传类型, Uin, addr))

当应用被启用后，将收到此事件。
' 如果云新载入时应用已被启用，则在_eventStartup(Type=1001,云新启动)被调用后，本函数也将被调用一次。
' 如非必要，不建议在这里加载窗口。（可以添加菜单，让用户手动打开窗口）
' 应用目录 ＝ CN.取应用目录 () ' 获取应用数据目录(无需储存数据时，请将此行注释)