调用API实现免费的GPT3.5问答

陽陽陽

好几不见，甚是想念

zzzyf

#在这里        感谢分享，很给力！~快速回复#

123456ppt

支持支持

航母上看风景

感谢大佬
感谢大佬
感谢大佬

两度

0000000000000000000000000000000

两度

0000000000000000000000000000000

小白弟弟

感谢各位热心易友给的方法，建议！所以根据之前的不足，我再次优化了一下，日期5.25
文件下载： GPT3.5提问.e (951.18 KB, 下载次数: 19)

2023-5-25 19:54 上传

点击文件名下载附件
下载积分: 精币 -2 枚

复制源码：

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

调试输出 (GPT提问 (“你是谁？”, ))
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
获取对话ID	整数型		获取连续对话的id，失败返回-1

变量名	类 型	静态	数组	备 注
data	文本型
json	类_json
id	文本型
msg	文本型

data ＝ 编码_Utf8到Ansi (网页_访问 (“https://api.pearktrue.cn/api/gpt/continuous.php?type=get”, , , , , , , , , , , , ))
json.解析 (data, , )
msg ＝ json.取通用属性 (“msg”, )
id ＝ json.取通用属性 (“id”, )
如果真 (msg ≠ “获取ID成功” 且 id ＝ “”)
返回 (-1)

返回 (到整数 (id))

子程序名	返回值类型	公开	备 注
GPT提问	文本型		调用API实现 API网址:https://api.pearktrue.cn/  也是无意见发现的
参数名	类 型	参考	可空	数组	备 注
问题	文本型
ID是否随机	逻辑型				为空则假  真，随机回答一个答案(可能会获取失败)  假，不会报错“未使用type参数获取对话ID”的原因

变量名	类 型	静态	数组	备 注
id	整数型
data	文本型
json	类_json
code	文本型
取回code	文本型
msg	文本型
total_money	文本型			没有什么用
message	文本型			没有什么用
answer	文本型

置随机数种子 ()
如果真 (是否为空 (ID是否随机) ＝ 真)
ID是否随机 ＝ 假

如果 (ID是否随机 ＝ 假)
id ＝ 获取对话ID ()
如果真 (id ＝ -1)
返回 (“id获取失败”)

id ＝ 取随机数 (1, 100)  ' 没测试范围，可以自行测试

data ＝ 编码_Utf8到Ansi (网页_访问 (“https://api.pearktrue.cn/api/gpt/continuous.php?id=” ＋ 到文本 (id) ＋ “&message=” ＋ 编码_URL编码 (问题, 真, 真), , , , , , , , , , , , , ))
json.解析 (data, , )
msg ＝ json.取通用属性 (“msg”, )
如果真 (msg ≠ “获取成功”)
code ＝ json.取通用属性 (“code”, )
取回code ＝ 取回状态码 (code)
如果真 (取回code ≠ “未知”)
返回 (“获取失败 原因:” ＋ 取回code)

total_money ＝ json.取通用属性 (“total_money”, )
message ＝ json.取通用属性 (“message”, )
answer ＝ json.取通用属性 (“answer”, )
answer ＝ 子文本替换 (answer, “\n”, #换行符, , , 真)
如果真 (answer ＝ “”)
返回 (“获取失败 未知原因 建议多试几遍  MSG:” ＋ msg ＋ “  CODE:” ＋ code)
返回 (answer)

子程序名	返回值类型	公开	备 注
取回状态码	文本型
参数名	类 型	参考	可空	数组	备 注
状态码	文本型

如果真 (状态码 ＝ “400”)
返回 (“请求错误”)
如果真 (状态码 ＝ “403”)
返回 (“请求被服务器拒绝”)
如果真 (状态码 ＝ “404”)
返回 (“请求服务器失败”)
如果真 (状态码 ＝ “500”)
返回 (“服务器错误 或 禁止访问(访问频繁)”)
如果真 (状态码 ＝ “403”)
返回 (“服务器维护”)
如果真 (状态码 ＝ “201”)
返回 (“未使用type参数获取对话ID”)
如果真 (状态码 ＝ “203”)
返回 (“未输入待回答问题与对话ID”)
返回 (“未知”)  ' 可能是正常获取

i支持库列表	支持库注释
spec	特殊功能支持库
yihui	(未知支持库)

.版本 2<br /> .支持库 spec<br /> .支持库 yihui<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 调试输出 (GPT提问 (“你是谁？”, ))<br /> <br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> <br /> .子程序 获取对话ID, 整数型, , 获取连续对话的id，失败返回-1<br /> .局部变量 data, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 id, 文本型<br /> .局部变量 msg, 文本型<br /> <br /> data ＝ 编码_Utf8到Ansi (网页_访问 (“<a href="https://api.pearktrue.cn/api/gpt/continuous.php?type=get" rel="nofollow" rel="nofollow" target="_blank">https://api.pearktrue.cn/api/gpt/continuous.php?type=get</a>”, , , , , , , , , , , , ))<br /> json.解析 (data, , )<br /> msg ＝ json.取通用属性 (“msg”, )<br /> id ＝ json.取通用属性 (“id”, )<br /> .如果真 (msg ≠ “获取ID成功” 且 id ＝ “”)<br />     返回 (-1)<br /> .如果真结束<br /> <br /> <br /> 返回 (到整数 (id))<br /> <br /> .子程序 GPT提问, 文本型, , 调用API实现 API网址:<a href="https://api.pearktrue.cn/" rel="nofollow" rel="nofollow" target="_blank">https://api.pearktrue.cn/</a>  也是无意见发现的<br /> .参数 问题, 文本型<br /> .参数 ID是否随机, 逻辑型, 可空, 为空则假  真，随机回答一个答案(可能会获取失败)  假，不会报错“未使用type参数获取对话ID”的原因<br /> .局部变量 id, 整数型<br /> .局部变量 data, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 code, 文本型<br /> .局部变量 取回code, 文本型<br /> .局部变量 msg, 文本型<br /> .局部变量 total_money, 文本型, , , 没有什么用<br /> .局部变量 message, 文本型, , , 没有什么用<br /> .局部变量 answer, 文本型<br /> <br /> 置随机数种子 ()<br /> .如果真 (是否为空 (ID是否随机) ＝ 真)<br />     ID是否随机 ＝ 假<br /> .如果真结束<br /> <br /> .如果 (ID是否随机 ＝ 假)<br />     id ＝ 获取对话ID ()<br />     .如果真 (id ＝ -1)<br />         返回 (“id获取失败”)<br />     .如果真结束<br /> <br /> .否则<br />     id ＝ 取随机数 (1, 100)  ' 没测试范围，可以自行测试<br /> .如果结束<br /> <br /> data ＝ 编码_Utf8到Ansi (网页_访问 (“<a href="https://api.pearktrue.cn/api/gpt/continuous.php?id=" rel="nofollow" rel="nofollow" target="_blank">https://api.pearktrue.cn/api/gpt/continuous.php?id=</a>” ＋ 到文本 (id) ＋ “&message=” ＋ 编码_URL编码 (问题, 真, 真), , , , , , , , , , , , , ))<br /> <br /> json.解析 (data, , )<br /> msg ＝ json.取通用属性 (“msg”, )<br /> .如果真 (msg ≠ “获取成功”)<br />     code ＝ json.取通用属性 (“code”, )<br />     取回code ＝ 取回状态码 (code)<br />     .如果真 (取回code ≠ “未知”)<br />         返回 (“获取失败 原因:” ＋ 取回code)<br />     .如果真结束<br /> <br /> .如果真结束<br /> total_money ＝ json.取通用属性 (“total_money”, )<br /> message ＝ json.取通用属性 (“message”, )<br /> answer ＝ json.取通用属性 (“answer”, )<br /> answer ＝ 子文本替换 (answer, “\n”, #换行符, , , 真)<br /> <br /> .如果真 (answer ＝ “”)<br />     返回 (“获取失败 未知原因 建议多试几遍  MSG:” ＋ msg ＋ “  CODE:” ＋ code)<br /> .如果真结束<br /> 返回 (answer)<br /> <br /> .子程序 取回状态码, 文本型<br /> .参数 状态码, 文本型<br /> <br /> .如果真 (状态码 ＝ “400”)<br />     返回 (“请求错误”)<br /> .如果真结束<br /> .如果真 (状态码 ＝ “403”)<br />     返回 (“请求被服务器拒绝”)<br /> .如果真结束<br /> .如果真 (状态码 ＝ “404”)<br />     返回 (“请求服务器失败”)<br /> .如果真结束<br /> .如果真 (状态码 ＝ “500”)<br />     返回 (“服务器错误 或 禁止访问(访问频繁)”)<br /> .如果真结束<br /> .如果真 (状态码 ＝ “403”)<br />     返回 (“服务器维护”)<br /> .如果真结束<br /> .如果真 (状态码 ＝ “201”)<br />     返回 (“未使用type参数获取对话ID”)<br /> .如果真结束<br /> .如果真 (状态码 ＝ “203”)<br />     返回 (“未输入待回答问题与对话ID”)<br /> .如果真结束<br /> 返回 (“未知”)  ' 可能是正常获取

uulive

        开源精神必须支持~

uulive

        开源精神必须支持~

cd451

感谢大佬