Beep!!!
16-Jan-92 01:14:50
Sb: #28767-Beep!!!
Fm: Tony Tanzillo [LISP TM] 71241,2067
To: ALBERT M THALHEIM 72441,2005
Al – Try this:
(defun beep ( / f)
(princ "\007" (setq f (open "CON" "w")))
(setq f (close f))
)
-TonyT.