-1

这是我在记事本中当前(工作)聊天机器人代码的一部分,因此您可以了解我是如何编码的:

dim n, q

n=inputbox("Hello, I'm a chatbot. What is your name?")
q=inputbox(""& n &" is a great name! Thank you for activating me, "& n &"! How are you?")

我希望能够制作“if and else”部分(例如,如果在被问到“你感觉如何”之后输入“happy”,它应该说“great”,如果你输入任何其他内容,它会说不同的东西.) 如何在记事本中执行此操作?

另外,我如何让它循环并根据记事本中的关键字(例如聊天机器人 Eliza 将如何通过循环并引用一组关键字和响应来无限地交谈)来循环并说出一些东西?

我知道这些都是非常基本的问题,但我已经多次在网上搜索过;所有搜索都空手而归。

4

1 回答 1

1

不幸的是,你问了一个非常不具体的问题,很难回答。这就是为什么您的帖子收到反对票和关闭请求的原因。但是,您似乎很热情,我只能鼓励这一点。

首先,VBScript 不是一个很好的语言。哦,是的,它看起来很简单,它与一些标准的 Windows 组件很好地集成在一起,您可以开箱即用地运行它。但它是古老的,并且在某些方面与更常见的语言不同。如果您想更快地完成更复杂的事情,最终您会切换到另一种(脚本)语言。

使用 VBScript 不能(很容易)将记事本用作输入/输出设备。对于您的设置,我更喜欢命令行(按您的 Windows 键并输入 CMD+enter,就是这样)。您可以使用以下命令将输出写入命令行

WScript.StdOut.Write "What is your name?"

您可以从命令行检索输出

wscript.stdin.read(0)
name = wscript.stdIn.readline()

并使您的聊天机器人完整:

WScript.StdOut.Write "Hello " & name

现在你想做一些条件分支。好吧,我并不是说W3Schools是一个很好的资源,但现在它已经足够了。看看他们的if ... then ... else 页面(<-可点击的链接)。如果你使用的是 IE,你甚至可以自己尝试一些东西。

最后,您可以使用Do While ... Loop使代码重复。

像 Eliza 这样的聊天机器人是一个有声望的项目。如果您只能构建一个非常简单的版本,请不要灰心。蛋糕在于编码,而不是结果。

于 2014-01-16T07:53:07.500 回答