Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Batch plotting multiple views

1 view
Skip to first unread message

Jeremy Lipke

unread,
Nov 23, 1999, 3:00:00 AM11/23/99
to
Does anybody know of a routine to batch plot multiple views in paper space?
I have a 19 mile road job with 67 plan & profile title blocks in paper
space. I would like to be able to batch plot the views to a laser printer. I
have looked at BATCHPLT it works great for multiple .DWG's, not multiple
views in a .DWG Thanks for the great support! Jeremy

Darko Bogdan

unread,
Nov 25, 1999, 3:00:00 AM11/25/99
to
Hello Jeremy.

Once (upon the time) I had a drawing with ~100 titleblocks in one drawing, and I
made a routine that plotted that dwg through a night. I made a block called
a3plot (because they were all A3 papers) that had two points in lower left and
upper right corner of plotting area (this points should be at places you pick to
get border of paper plotted on your printer - 25, 5, 5, 5mm) and inserted that
block on every view I wanted to plot. Then I called plot command, did the
settings (scale factor, pen assignments, rotation angle, printer etc) and (with
window option) selected first view. After finnishing firs plot (and assuring
everything is OK) I started command plotviews (lisp below) and went to bed...

If you need further explanation, drop me a note. a3plot dwg is on
customer.files, "a3plot" subject. Points in that dwg are on Defpoints layer
(they do not plot), and are made for Epson Stylus photo EX printer (they
probably would not be OK for your printer...).

Hope this helps...

Darko Bogdan

(defun c:plotview ()
(setq osmode (getvar "osmode"))
(setvar "osmode" 0)
(princ "\nSelect viewports to plot: ")
(setq views (sstol (ssget '((2 . "a3plot")))))
(if views
(progn
(foreach view views
(command "explode" view)
(setq points (sstol (ssget "p")))
(command "plot" "w" (cdr (assoc 10 (entget (car points))))
(cdr (assoc 10 (entget (cadr points))))
""
)
(command "undo" 2)
)
(princ (strcat "\n" (itoa (length views)) " drawings plotted."))
)
(princ "\nNo views to plot.")
)
(setvar "osmode" osmode)
(princ)
)

Keith Biggs

unread,
Nov 25, 1999, 3:00:00 AM11/25/99
to
You should be able to use the BATCHPLT routine to plot multiple views from
one drawing. Add your drawing to the batch list and select the view you wish
to plot, select the PC2 file and plot scale. Do this for every view in the
drawing. This means that you will have to add the drawing to the batch list
67 times. It will take you some time to set it up, but once it is done,
plotting will be a breeze.

BTW, if you need to plot more than one set, append you batch list with the
same list as many times as you want copies.

HTH
Keith

0 new messages