有音频的lisp

todouble22 · 发表于 2022-7-6 11:58:15

不久前，我在这里看到一个lisp，它运行并用计算机生成的声音生成响应。。也许是李？我试着找它，但我再也找不到了？有没有人记得这一点，也许会发送链接？

TimSpangler · 发表于 2022-7-6 12:02:49

尝试>此处>

todouble22 · 发表于 2022-7-6 12:10:47

我只是得到一张空白页？

StevJ · 发表于 2022-7-6 12:11:13

也许这就是你想要的：

copy

 
(setq sapi (vlax-create-object "Sapi.SpVoice"))(vlax-invoke sapi "Speak" "Do you want autocad to speak ?" 0)(vlax-release-object sapi)

史蒂夫

TimSpangler · 发表于 2022-7-6 12:17:26

>在这里

todouble22 · 发表于 2022-7-6 12:21:28

这就是我要找的。。谢谢你们！

todouble22 · 发表于 2022-7-6 12:27:12

非常感谢

Lee Mac · 发表于 2022-7-6 12:29:09

我做了一些。。。

http://www.cadtutor.net/forum/showpost.php?p=236548&postcount=32

BlackAlnet · 发表于 2022-7-6 12:36:43

非常感谢你的帖子！！
因为它，我明天会过得很开心！！
我在想cad可以对我的工作朋友说的很多事情。。。。比如“新年快乐”或者“你用这个命令想做什么？”或“停止一直按Esc！”
那一定很有趣！
哈哈哈！

fixo · 发表于 2022-7-6 12:37:28

你也可以放音乐

copy

;;;by VVA
;;;play file
(setq sapi (vlax-create-object "Sapi.SpVoice" ))
(Setq objFile (vlax-create-object "SAPI.SpFileStream.1"))
(vlax-invoke objFile "open" "c:\\WINDOWS\\Media\\tada.wav")
(vlax-invoke sapi "Speakstream" objFile)
(vlax-release-object sapi )
(vlax-release-object objFile )

~'J'~

[编程交流] 有音频的lisp

发表回复

精选推荐