Message 1 of 4
Paper size detect and plot
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hello all!
I don't get much time with lisps so I need some help. I have created PDF lisps for different paper sizes but would like to create a lisp that automatically detects a the plot size and creates a PDF accordingly. I found a command that detects the paper size, but I would like to incorporate it into my routine. here is what I have so far, but I don't know how to combine the 2.
Thanks!
;detects paper size
(defun c:plsize() (vla-get-canonicalmedianame (vla-item (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object))) (getvar 'ctab)) ) )
;create pdf (DEFUN C:LPDF () (COND (("ANSI_full_bleed_A_(8.50_x_11.00_Inches)")( (C:APPDF) )) (("ANSI_full_bleed_A_(11.00_x_8.50_Inches)")( (C:LAPDF) )) (("ANSI_full_bleed_C_(22.00_x_17.00_Inches)")( (C:CPDF) )) (("ANSI_full_bleed_D_(34.00_x_22.00_Inches)")( (C:LPDF) )) (t((ALERT "NO LAYOUTS DETECTED"))) ) )