Author Topic: Auto-Script  (Read 2753 times)

0 Members and 1 Guest are viewing this topic.

Andrea

  • Water Moccasin
  • Posts: 2372
Auto-Script
« on: November 29, 2004, 06:03:05 PM »
Re-re-Hi..

I'm trying to make a Auto-script running to
PRINT, and CLOSE

for each opened drawing.

any idea how ??
Keep smile...

rkmcswain

  • Swamp Rat
  • Posts: 978
Re: Auto-Script
« Reply #1 on: August 15, 2016, 03:47:11 PM »
You could use something like this in your AcadDoc.lsp file.

Code: [Select]
(defun-q mystartup ()
   (vl-cmdf "-layout" "set" "layout1")
   (vl-cmdf "-Plot" "_Y" "layout1" "DWG to PDF.pc3" "ANSI A (11.00 x 8.50 Inches)" "inches" "landscape" "_No" "Layout" "1:1" "0.00,0.00" "_Yes" "monochrome.ctb" "_Yes" "_No" "_No" "_No" "" "_Yes" "_Yes")
   (vl-cmdf "._close" "_No")
)
(setq s::startup (append s::startup mystartup))

Change the appropriate parts as needed.