|
29精币
代码如上,当我调试的情况下,这个能正常返回数据,然后如果我是打包出来运行的时候就一直错误信息,不知道为什么。。
窗口程序集名 | 保 留 | 保 留 | 备 注 | 程序集1 | | | | 变量名 | 类 型 | 数组 | 备 注 | wsid标识 | 整数型 | | 调试输出 (到文本 (ws ) + “-连接成功”)ws_连接状态 [ws ] = 真 调试输出 (到文本 (ws ) + “-连接断开”)调试输出 (“评论话术是” + 评论话术 [ws ])ws_连接状态 [ws ] = 假 |
ws_收到消息 | 文本型 | | |
ws | 整数型 | | | | opcode | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 收到的文本 | 文本型 | | | json | 类_json | | | 如果真 (opcode = 1 )收到的文本 = 到文本 (WSS_取回数据_文本 (ws )) 调试输出 (收到的文本 )日志 (收到的文本 )json. 解析 (收到的文本, , ) 判断 (ws_连接状态 [ws ] = 真)如果 (json. 取通用属性 (“header.code”, ) ≠ “0”)评论话术 [ws ] = “错误-代码:” + json. 取通用属性 (“header.code”, ) + “-错误信息:” + json. 取通用属性 (“header.message”, )调试输出 (评论话术 [ws ])返回 (评论话术 [ws ])评论话术 [ws ] = 评论话术 [ws ] + json. 取通用属性 (“payload.choices.text[0].content”, )调试输出 (“最新的评论话术是” + 评论话术 [ws ])判断 (ws_连接状态 [ws ] = 假)调试输出 (“返回评论信息成功”)返回 (评论话术 [ws ])调试输出 (“暂未断开链接”)返回 (“”)变量名 | 类 型 | 静态 | 数组 | 备 注 | wss地址 | 文本型 | | | wsid | 整数型 | | | ws | | | | 进入许可区 (讯飞许可证 )调试输出 (“提交的问题是” + 提交问题 )判断 (w_链接状态 )WSS_连接_断开 (wsid )wss地址 = 讯飞_鉴权_取URL (“wss://spark-api.xf-yun.com/v3.1/chat”, ApiKey, SecretKey )调试输出 (wss地址 )wsid = WSS_连接_启动 (wss地址, , , , , , , &ws_连接成功, &ws_连接断开, &ws_收到消息, , , , , , , )ws = wsid 评论话术 [ws ] = “”如果真 (wsid = 0 )信息框 (“创建ws失败”, 0, , )返回 (0 )判断循环首 (WSS_连接_取状态 (wsid ) ≠ 2 )程序_延时 (100, )判断循环尾 () wsid标识 = 到整数 (文本_取随机数字 (8, )) WSS_附加数据_设置 (wsid, wsid标识 )_启动窗口.标签_问1wsid.标题 = 到文本 (wsid标识 )调试输出 (WSS_发送_文本 (wsid, 生成提交数据 (提交问题 )) )退出许可区 (讯飞许可证 )返回 (wsid )变量名 | 类 型 | 静态 | 数组 | 备 注 | Json | 类_json | | | 提交数据 | 文本型 | | | 调试输出 (“--------------------------本次的问题是” + 编辑框 )编辑框 = 文本_替换 (编辑框, , , , #换行符, “”, 字符 (10 ), “”, 字符 (13 ), “”, , , , )Json. 置属性 (“['header']”, “{}”, 真)Json. 置属性 (“['header']['app_id']”, appid, ) Json. 置属性 (“['parameter']”, “{}”, 真)Json. 置属性 (“['parameter']['chat']”, “{}”, 真)Json. 置属性 (“['parameter']['chat']['domain']”, “generalv3”, )Json. 置属性 (“['parameter']['chat']['temperature']”, “0.8”, 真)Json. 置属性 (“['parameter']['chat']['max_tokens']”, “8000”, 真)Json. 置属性 (“['payload']”, “{}”, 真)Json. 置属性 (“['payload']['message']”, “{}”, 真)Json. 置属性 (“['payload']['message']['text']”, “[]”, 真)Json. 置属性 (“['payload']['message']['text'][0]”, “{}”, 真)Json. 置属性 (“['payload']['message']['text']['0']['role']”, “user”, ) Json. 置属性 (“['payload']['message']['text']['0']['content']”, 编辑框, )提交数据 = Json. 取数据文本 ()调试输出 (提交数据 )返回 (提交数据 )|
讯飞_鉴权_取URL | 文本型 | | |
完整URL | 文本型 | | | | ApiKey | 文本型 | | | | SecretKey | 文本型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 时间_讯飞格式 | 文本型 | | | 路径 | 文本型 | | | 原始sign | 文本型 | | | 加密后sign | 文本型 | | | 域名 | 文本型 | | | 鉴权文本 | 文本型 | | | 临时文本 | 文本型 | | | HTTP格式URL | 文本型 | | | url | 文本型 | | |
时间_讯飞格式 = 时间_转为GMT格式3 (增减时间 (取现行时间 (), 6, 4 - 12 )) HTTP格式URL = 文本_替换 (完整URL, , , , “wss”, “http”, “ws”, “http”, , , , , , )域名 = 网页_取域名 (HTTP格式URL, , , )路径 = 网页_取页面地址 (HTTP格式URL )原始sign = “host: ” + 域名 + 字符 (10 ) + “date: ” + 时间_讯飞格式 + 字符 (10 ) + “GET ” + 路径 + “ HTTP/1.1”加密后sign = 芭田网络_base64_hmac_sha256 (SecretKey, 原始sign )鉴权文本 = 编码_BASE64编码 (到字节集 (“api_key=” + #引号 + ApiKey + #引号 + “, algorithm=” + #引号 + “hmac-sha256” + #引号 + “, headers=” + #引号 + “host date request-line” + #引号 + “, signature=” + #引号 + 加密后sign + #引号 )) 时间_讯飞格式 = 子文本替换 (编码_URL编码 (时间_讯飞格式, 真, 真), “%20”, “+”, , , 真)url = 完整URL + “?authorization=” + 鉴权文本 + “&date=” + 时间_讯飞格式 + “&host=” + 域名 返回 (url )
|
最佳答案
查看完整内容
调试输出 (WSS_发送_文本 (wsid, 生成提交数据 (提交问题))) 把这里的调试输出 删了
|