#Beep!!!
4 messages in this thread
Hello, ALL. Following Dave Byrnes' suggestion. I'm looking for a TIP that
makes AutoCAD BEEP. Thanks. Albert
Well, NOW we're getting somewhere <grin>. How's about this one, from Lib 2
"AutoLISP/ADS":
[72040,467]
BEEP.LSP 02-Mar-91 2348 60
Title : BEEP; Sounds two short beeps
Keywords: BEEP BGASOFT LARGE FILE REMINDER
BEEP does just that; it sounds two short beeps any time it is executed.
This comes in handy if you work on large files or any time you execute a
command which takes a while.
Uploaded by ASP Member
Robert Gurrieri
BGASoft
(Approximate download time at 2400 baud using CIS B+ is 0:11)
(Sysop Note: This file is in ASCII format, and can be read online, captured
to a file or downloaded with a protocol.)
Happy beeping!
Dave
Albert:
Here's one from TonyT:
(defun beep ( / f)
(princ (chr 7) (setq f (open "CON" "w")))
(close f)
)
– Mark M.
Al – Try this:
(defun beep ( / f)
(princ "\007" (setq f (open "CON" "w")))
(setq f (close f))
)
-TonyT.