plot with message option

plot with message option

Anonymous
Not applicable
2,969 Views
25 Replies
Message 1 of 26

plot with message option

Anonymous
Not applicable

hi everyone,

 

i don't know how to name this in the subject but here is what i wanted to happen.

 

When i click "plot" my drawing, is there a way to insert a message that would pop

out in the screen  before going to the plot dialogue box.  our third party program has

the ability to the hidiing where it bottom objects will show dashed or hidden lines. i just

wanted to ask or remind my fellow draftsmen here at work if they did the hiding. so

when we click to "PLOT", a message would pop up like "Did you do Hiding? the an answer

would be a yes or no so that if yes it would continue plotting and if no it would cancel the

plot command. is this possible? maybe run a lisp before the plot command executes. i

appreciate every help or idea i can get.

 

thank you.

0 Likes
Accepted solutions (1)
2,970 Views
25 Replies
Replies (25)
Message 21 of 26

sdeschneauEADWZ
Explorer
Explorer

Thank you, I have this working. 

 

On a similar note. Can this same concept be achieved when plotting from sheet sets? 

0 Likes
Message 22 of 26

Kent1Cooper
Consultant
Consultant

@sdeschneauEADWZ wrote:

....

On a similar note. Can this same concept be achieved when plotting from sheet sets? 


The same with PUBLISH instead of with PLOT, perhaps?

Kent Cooper, AIA
0 Likes
Message 23 of 26

pdonald001
Enthusiast
Enthusiast

Hi! Wanting to do a similar thing, but using LT 2024 with no clue how to make it a usable lsp. Can you help at all? Below is "message 10 with the bit from message 14 added".

(command "_.undefine" "PLOT")
(defun C:PLOT ()
(alert "Answer the draft stamp question at the command line.")
(initget "Yes No")
(if (= (getkword "\nShould there be a draft stamp [Yes/No]? <Yes>: ") "No")
(prompt "\nTurn on the draft layer, then Plot."); then
(progn ; else -- either "Yes" or nil [Enter default]; proceed
(initdia)
(command "_.plot")
); progn
); if
); defun

 I've made my required changes to the particulars, but I may have the options reversed - no way to test it and clueless about lsp writing.

Appreciate any help! 

0 Likes
Message 24 of 26

Sea-Haven
Mentor
Mentor

My $0.05 save Multi radio buttons in a support path so will autoload.

 

(if (not AH:Butts)(load "Multi radio buttons.lsp")) ; loads multi radio if not loaded
(setq ans (ah:butts 1 "V"   '("Should there be a draft stamp " "Yes" "No" ))) 	; ans holds the button picked value as a string

SeaHaven_0-1712273930008.png

 

0 Likes
Message 25 of 26

Kent1Cooper
Consultant
Consultant

@pdonald001 wrote:

.... I've made my required changes to the particulars, but I may have the options reversed - no way to test it .... 


What do you mean by "no way to test it"?  Can you not load it and run it and see whether it works?

 

In any case, I suspect you do have the options reversed.  If you answer No to the question, it would prompt you to turn on the draft Layer first.  If you answer Yes or accept that as the default with Enter, it just starts up Plot.  Should it be the other way around?  If you answer Yes [that you want the draft stamp], it should tell you to turn it on?  [If the Layer for that is constant, the routine could turn it on instead of prompting the User to do so.]  If you answer No, it should just go ahead and Plot?  [But what if that Layer is on?  If the Layer is constant, it could turn it off for you.]

Kent Cooper, AIA
0 Likes
Message 26 of 26

pdonald001
Enthusiast
Enthusiast
Thanks for that.
"No way to test it" is more than I have no idea what to do in order to make it go. Do I just save it as a script and link it to a custom button? Or save it as a lsp and appload it? Totally clueless, with only basic macros and scripts developed through a lot of trial and error over the years.

As for the functionality....turning on the layer if it should be on, and off if it shouldn't would be even better than manually having to do it. I wasn't thinking big enough!
0 Likes