怎么在易语言通过调用接口实现一个机器人聊天功能

这篇文章将为大家详细讲解有关怎么在易语言通过调用接口实现一个机器人聊天功能,文章内容质量较高,因此小编分享给大家做个参考,希望大家阅读完这篇文章后对相关知识有一定的了解。

我们提供的服务有:网站制作、成都网站设计、微信公众号开发、网站优化、网站认证、科尔沁ssl等。为1000多家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的科尔沁网站制作公司

常量数据表

.版本 2
.常量 常量1, "<文本长度: 41>", , AI [现行时间]: Hi俺寂寞空虚冷 陪陪俺吧
.常量 常量2, "<文本长度: 25>", ,  我 [现行时间]:  [内容]
.常量 常量3, "<文本长度: 24>", , AI [现行时间]:  [内容]
.常量 常量4, "<文本长度: 8>", , "text":"

聊天机器人源码

此功能需要加载精易模块

.版本 2
.支持库 EThread
.程序集 窗口程序集_启动窗口
.程序集变量 发送, 文本型
.子程序 _发送按钮_被单击
.局部变量 修改, 文本型
修改 = 子文本替换 (#常量2, “[现行时间]”, 到文本 (取现行时间 ()), , , 真)
对话编辑框.加入文本 (#换行符 + 子文本替换 (修改, “[内容]”, 内容编辑框.内容, , , 真))
发送 = 内容编辑框.内容
发送 = 编码_URL编码 (发送, , 真)
内容编辑框.内容 = “”
启动线程 (&对话, , )
.子程序 __启动窗口_创建完毕
对话编辑框.加入文本 (子文本替换 (#常量1, “[现行时间]”, 到文本 (取现行时间 ()), , , 真))
.子程序 对话
.局部变量 fh, 文本型
fh = 到文本 (网页_访问 (“http://www.tuling123.com/openapi/api?key=a32a544d1cfd3cc1f964f3de6caca9f0&info=” + 发送))
fh = 编码_URL解码 (fh, 真)
加入机器人 (文本_取出中间文本 (fh, #常量4, #引号 + “}”))
.子程序 加入机器人
.参数 内容, 文本型
.局部变量 修改, 文本型
修改 = 子文本替换 (#常量3, “[现行时间]”, 到文本 (取现行时间 ()), , , 真)
对话编辑框.加入文本 (#换行符 + #换行符 + 子文本替换 (修改, “[内容]”, 内容, , , 真))
.子程序 _内容编辑框_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果 (键代码 = #回车键)
  _发送按钮_被单击 ()
.否则
.如果结束

关于怎么在易语言通过调用接口实现一个机器人聊天功能就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。


网站标题:怎么在易语言通过调用接口实现一个机器人聊天功能
URL地址:http://scyanting.com/article/pogpij.html