@Anonymous wrote:
When I type everything in the command line, it works all the way up to the "savename" variable I created. Currently, when the LISP finishes running, it gives me a prompt for the file name and I thought the "savename" variable I created would automatically create this name. Anybody have any ideas as to how to fix this?
Are you sure "it works" when typed at the command line?
Your savename variable does indeed contain the filename to be created (but not totally acurate)
But it still prompt for it, because its failing before it gets there.
As "C" is NOT a valid option for the PDF export, its rejected and the next response is evaluated, which again is NOT a correct response for (Display,Extents,Window), then it evaluates your filename as a third "attempt" which of course is still not correct. (but it might continue after, as D,E & W are more likely to be part of it). Only then does the function continue to the next question, but you are out of responses ...
@Satish_Rajdev already pointed out the flaws, but for some reference, here's part of what i use for creating PDF's, which has a little extra. My DWG's are either a single drawing drawn in modelspace, or a set of drawings drawn in paperspace.
This routine checks which is active & plots either the single modelspace or all layouts.
I changed the export path to reflect yours. For modelspace it uses the "Extents" option. (Best choice in most cases). Saved as a separate file (like exportpdf.lsp) it can be used with a batch process to create PDF's for a whole bunch of DWG's.
(setq pdffile
(strcat
(vl-string-subst "\\PDF\\" "\\CAD\\" (getvar "dwgprefix"))
"\\"
(vl-filename-base (getvar "dwgname"))
".pdf"
)
)
(if (= (getvar "TILEMODE") 0)
(progn
; plot paperspace (multiple sheets)
(princ "\nPlot all layouts")
(command "-export" "p" "a" pdffile)
)
(progn
; Plot modelspace (1 sheet)
(princ "\nPlot model")
(command "-export" "p" "e" "n" pdffile)
)
)
