Chatgpt易语言版本

直接上代码 主要核心代码如下

.版本 2

.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成，请配合精易模块使用。
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 局_提交数据, 文本型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型

 https://api.openai.com/v1/completions
局_网址 ＝ “https://api.openai.com/v1/completions”
局_方式 ＝ 1
 {"prompt":"YOU:我爱你
","max_tokens":2048,"model":"text-davinci-003"}
局_提交数据 ＝ “{” ＋ #引号 ＋ “prompt” ＋ #引号 ＋ “:” ＋ #引号 ＋ “YOU:” ＋ 编辑框1.内容 ＋ “
” ＋ #引号 ＋ “,” ＋ #引号 ＋ “max_tokens” ＋ #引号 ＋ “:2048,” ＋ #引号 ＋ “model” ＋ #引号 ＋ “:” ＋ #引号 ＋ “text-davinci-003” ＋ #引号 ＋ “}”
ADD_协议头.添加 (“accept”, “application/json, text/plain, */*”, )
ADD_协议头.添加 (“accept-language”, “zh-CN,zh;q=0.9”, )
 这里sk-xxxxx  这个是每个账户唯一的，自己搞一个就行了  我出售账户 六快一个 q q 872672419

ADD_协议头.添加 (“authorization”, “Bearer sk-这里替换成你自己的sk" )
ADD_协议头.添加 (“cache-control”, “no-cache”, )
ADD_协议头.添加 (“content-length”, “73”, )
ADD_协议头.添加 (“content-type”, “application/json”, )
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64; rv:46.0) Gecko/20100101 Firefox/46.0”, )

局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()

局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, 局_提交数据, , , 局_提交协议头, , , , , , 30, , , , , , , )

局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))
解答问题 (局_返回)
返回 (局_返回)