thanks for the help
i have 1 more question.
im trying to make it where if the person hit the escape key, that is ends quietly however when the escape is pressed the command still runs what am i missing in my error trapping?
(defun *error* (msg)
(if (and msg (not (wcmatch (strcase msg) "*BREAK*,*CANCEL*,*QUIT*,*EXIT*,")))
(princ (strcat "\nError: " msg))
)
)
(defun printpdfsect (/ fileloc filename pointa pointb)
(setq fileloc (strcat (getvar "dwgprefix")
(vl-filename-base (getvar "dwgname"))
)
)
(setq pointa (getpoint "\n Select first point: "))
(setq pointb (getcorner pointa "\n Select second point: "))
(setq filename (dos_getfilenav "Select Files" fileloc "PDF" 1))
(command "-plot"
"y"
""
"DWG To PDF.pc3"
"ANSI expand A (8.50 x 11.00 Inches)"
"Inches"
"Landscape"
"NO"
"Window"
pointa
pointb
"Fit"
"Center"
"YES"
"nao.ctb"
"YES"
"As Displayed"
filename
"NO"
"YES")
)