;
;
;	Author:
;		Henry C. Francis
;		425 N. Ashe Street
;		Southern Pines, NC 28387
;
;	http://www.pinehurst.net/~pfrancis
;	e-mail hfrancis@pinehurst.net
;	All rights reserved.
;
(defun c:eject ()
  (setq ejfil (open "lpt1" "w"))
  (write-line " " ejfil)
  (close ejfil)
)