Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

(Command "IncludePlotStamp" "0") not working in lisp routine

Cannot seem to get the (Command "IncludePlotStamp" "0") to work in this lisp routine.
The PDF is created, but w/ a PlotStamp.
When invoking (Command "IncludePlotStamp" "0") prior to the lisp routine to return a PDF w/out the PlotStamp.
Why isn’t the (Command "IncludePlotStamp" "0") functioning prior to the plot command?
Thanks, Mike

;DWG to PDF BricsCAD 10:18 AM 6/11/2019
;Saves to C:\Users\mdunn\Documents (not sure how to change this)
;B Size, PS, Extents, Color, PDF, NO STAMP
(Command "IncludePlotStamp" "0") ;Plot Stamp Off
(defun c:PDF-NoStamp-Brics () ;starts lisp routine
(Command "-Plot" ;Command Line Plot Command
"YES" ;Detailed plot configuration?
"" ;Enter a layout name, Keeps ext'g name (Layout1)
"Brics PDF 8-23-2018.pc3" ;Enter an output device name
"Ledger" ;Enter paper size
"Inches" ;Enter paper units
"Landscape" ;Enter drawing orientation
"NO" ;Plot upside down?
"Extents" ;Enter plot area
"FIT" ;Enter plot scale
"Center" ;Enter plot offset
"YES" ;Plot with plot styles?
"acad.ctb" ;Enter plot style table name
"YES" ;Plot with lineweights?
"NO" ;Scale lineweights with plot scale?
"YES" ;Plot paper space last?
"NO" ;Remove hidden lines in paper space?
"No" ;Write the plot to a file?
"NO" ;Save changes to page setup
"Yes") ;Proceed with plot
;(Command "IncludePlotStamp" "1") ;Plot Stamp On
(princ "\n\t PDF no Plot Stamp to C:/Users/mdunn/Documents ") ;Comment @ routine completion
(princ) ;No Nil returned
) ;Ends PDF-Brics lisp routine

lsp
lsp
PDF-Brics-NoStamp.lsp
1K

Comments

  • It's probably not working because you're setting it outside of your command function. It is also a environment variable, not a command, so it's more efficient to use setvar/getvar calls. The plot output folder is governed by another variable "PlotOutputPath". Change this to direct where you want your prints to go to.

    Try the attached

    ;DWG to PDF BricsCAD    10:18 AM 6/11/2019
    ;Saves to C:\Users\mdunn\Documents   (not sure how to change this)
    ;B Size, PS, Extents, Color, PDF, NO STAMP
    
    
    (defun C:PDF-NoStamp-Brics ( )  ;starts lisp routine
        ; Save & set environment variables
        (acet-sysvar-set
            (list
                (
                    "CMDECHO" 0
                    "IncludePlotStamp" 0 ;Plot Stamp Off
                    "PlotOutputPath" "C:/Users/mdunn/Documents" ;Plot file location. Change to your preferred folder
                )
            )
         )
    
            (Command "._-Plot"  ;Command Line Plot Command 
                "YES"       ;Detailed plot configuration? 
                ""      ;Enter a layout name, Keeps ext'g name (Layout1) 
                "Brics PDF 8-23-2018.pc3"   ;Enter an output device name 
                "Ledger"    ;Enter paper size 
                "Inches"    ;Enter paper units 
                "Landscape" ;Enter drawing orientation 
                "NO"        ;Plot upside down? 
                "Extents"   ;Enter plot area 
                "FIT"       ;Enter plot scale 
                "Center"    ;Enter plot offset 
                "YES"       ;Plot with plot styles? 
                "acad.ctb"  ;Enter plot style table name 
                "YES"       ;Plot with lineweights? 
                "NO"        ;Scale lineweights with plot scale? 
                "YES"       ;Plot paper space last? 
                "NO"        ;Remove hidden lines in paper space? 
                "No"        ;Write the plot to a file? 
                "NO"        ;Save changes to page setup 
                "Yes"       ;Proceed with plot 
            )
        (princ (stcrat "\n\t     PDF no Plot Stamp to " (getvar 'PlotOutputPath)))  ;Comment @ routine completion
        (acet-sysvar-restore) ; Reset environment variables
        (princ)     ;No Nil returned
    )   ;Ends PDF-Brics lisp routine
    

    Regards,
    Jason Bourhill
    BricsCAD V19 Ultimate
    Quickly create HELP links on your forum posts

    CAD Concepts

    lsp
    lsp
    PDF-Brics-NoStamp2.lsp
    1K
Sign In or Register to comment.
Origami
Origami is the Japanese word for paper folding. ORI means to fold and KAMI means paper and involves the creation of paper forms usually entirely by folding.

Powered by VanillaForums, Designed by Steam