Talking AutoCAD

Submitted by rkmcswain on Wed, 02/07/2007 - 20:41

The "AutoCADder" posted about a good tip regarding the use of Microsoft's speech engine in AutoCAD. I found a thread on the same idea over at the Swamp.  The code is fairly simple.

(setq sapi (vlax-create-object "Sapi.SpVoice"))
(vlax-invoke sapi "Speak" "This is talking AutoCAD" 0)
(vlax-release-object sapi)

Head over to this thread at the Swamp for some discussion and more ideas with code samples.

For you CAD managers, put this in your networked "acaddoc.lsp" and watch the phone start ringing at your desk.

(defun mySpeak (str)
  (setq sapi (vlax-create-object "Sapi.SpVoice"))
  (vlax-invoke sapi "Speak" str 0)
  (vlax-release-object sapi)
)
(mySpeak (strcat "Welcome " (getvar "loginname")))

 

All content is copyright © CAD PANACEA 2005-2011 unless otherwise noted.
All content of CAD PANACEA is solely my own personal thoughts and opinions and do not those of any other entity or person.
All comments posted to this blog are the sole responsibility of the person making the comment.

 

Google, as a third party vendor, uses cookies to serve ads on this site. Google's use of their cookies enables it to serve ads to users based on their visit to your sites and other sites on the Internet. You may opt out of the use of these cookies by visiting the Google ad and content network privacy policy.

free hit counters

Powered by Drupal, an open source content management system