Help adding plot transparency to auto plot LSP

Help adding plot transparency to auto plot LSP

jcr96
Contributor Contributor
1,275 Views
2 Replies
Message 1 of 3

Help adding plot transparency to auto plot LSP

jcr96
Contributor
Contributor

I am using this autoplot lsp it works fine puts PDFs into my desired folder but I can not figure out how to add the option to plot transparency to the routine. If anyone can help me add it to the routine id appreciate it very much. Below is the LSP I'm currently using.

 

 

(defun c:pdf (/ up_folder ; local function
file)

(defun up_folder (prefix / p)
(if (setq p (vl-string-search (strcase "\\cad\\") (strcase prefix)))
(substr prefix 1 p)
)
); up_folder

(setvar "cmdecho" 1)
(setq file (strcat (up_folder (getvar 'DWGPREFIX)) "\\pdf\\Preliminary Design\\" (substr (setq dwg (getvar 'DWGNAME)) 1 (- (strlen dwg) 4)) ".pdf"))

(COMMAND "-PLOT"
"Yes" ;Detailed plot configuration?
"" ;Get a layout name
"DWG To PDF.pc3" ;Enter an output device name
"ARCH D (24.00 x 36.00 INCHES)" ;Enter paper size
"inches" ;Enter paper units
"Landscape" ;Enter drawing orientation
"No" ;Plot upside down?
"window" ;Enter plot area
"0,0"
"36,24"
"1:1" ;Enter plot scale
"0,0" ;Enter plot offset (x,y)
"Yes" ;Plot with plot styles?
"SCD SHADER.stb" ;Enter plot style table name or
"yes" ;Plot with lineweights?
"No" ;Scale lineweights with plot scale?
"Yes" ;Plot paper space first?
"No" ;Hide paperspace objects?
(setq file (strcat (up_folder (getvar 'DWGPREFIX)) "\\pdf\\Preliminary Design\\" (getvar "CTAB") ".pdf")) ;Name of file
"No" ;Save changes to page setup
"yes" ;Proceed with plot
)
)

0 Likes
Accepted solutions (1)
1,276 Views
2 Replies
Replies (2)
Message 2 of 3

Sea-Haven
Mentor
Mentor
Accepted solution

There is (setvar "PLOTTRANSPARENCYOVERRIDE" 2) will have to check again what 2 is, done before PLOT command.

Message 3 of 3

jcr96
Contributor
Contributor

Works perfectly thank you so very much

 

0 Likes