topic Re: Lisp without user input during command in Visual LISP, AutoLISP and General Customization Forum

Lisp without user input during command

BriannaWong98 — Thu, 07 Jan 2021 23:31:53 GMT

Hi all,

I have an existing lisp where currently theres shorthand commands to change previous selection to a different layer. However, there's no way to simply highlight and change it. Currently I have to highlight, use select command, then use change command to change layers.

Despite all my fuddling, there seems to be no way to code lisp so it simply makes my highlight the selection then changes it. It clears my selection when Select command runs, then errors because it wants me to select before moving onto Change command. How can I make it so whatever I highlight becomes the selection, then have Change command change the layer of the selection?

Current Code (Shorthand substitutes have been fully typed out instead):

(Defun C:SEC9 () [this example is for changing to layer named "9"]
(COMMAND "SELECT" "")

(Command "CHANGE" "P" "" "P" "LA" "9" "")

)

Re: Lisp without user input during command

john.uhden — Fri, 08 Jan 2021 00:52:34 GMT

(Defun C:C9 ( / ss) (and (setq ss (ssget "P")) (vl-cmdf "_.CHANGE" ss "" "P" "LA" "9" "") ) )

Of course that doesn't keep you from having to type in "C9", but once I complete my psychic interface app things will be easier on the fingers. 🙂

Which reminds me of a comic act I saw on TV...

"All those who believe in telekinesis, please raise my hand."

Re: Lisp without user input during command

BriannaWong98 — Fri, 08 Jan 2021 02:02:19 GMT

Hi John,

That code does what mine already does. I have to highlight something, then do some sort of command or use SELECT command to make it previous, and only then does it the change command do something to it.

I'm looking for a way to highlight something, then have the program successfully use the change command somehow, without me doing anything. I hope I'm making sense

Re: Lisp without user input during command

Sea-Haven — Fri, 08 Jan 2021 04:30:02 GMT

If you select object/s then chprop P the p implies previous/current selection set, so a simple mod of Johns code.

(command "chprop" "P" "c" 1 "")

Re: Lisp without user input during command

Kent1Cooper — Fri, 08 Jan 2021 12:46:47 GMT

The (ssget) function has an "_I" mode for Implied selection, that is, pre-selected object(s):

(defun C:SEC9 ()
(command "_.chprop"

(cond

((ssget "_I")); there's a pre-selection -- use it

((ssget)); otherwise, ask User for selection

); cond

"" "_layer" "9" ""

); command
(princ)
)

Re: Lisp without user input during command

Kent1Cooper — Fri, 08 Jan 2021 12:54:53 GMT

@Sea-Haven wrote:

....the p implies previous/current selection set....

(command "chprop" "P" "c" 1 "")

For me [Acad2019] that does not work. It uses the previous selection for whatever I did before, not the current selection. And if you invoke it without any pre-selection, of course it does the same -- you don't get to select things.

Re: Lisp without user input during command

john.uhden — Fri, 08 Jan 2021 14:49:20 GMT

Well, until I build the psychic interface you're going to have to do
SOMETHING.
The key here is that once you've gripped the objects they become the
previous selection set without having to use the SELECT command, that is if
PICKFIRST is set to 1 (which is stored in the registry not the drawing).

Re: Lisp without user input during command

Kent1Cooper — Fri, 08 Jan 2021 16:45:36 GMT

@john.uhden wrote:
.... once you've gripped the objects they become the previous selection set ....

I repeat, not for me [see my previous Reply]. To elaborate: I defined a command modeled after by @Sea-Haven 's suggestion:

(defun C:L9 () (command "_.chprop" "_previous" "" "_layer" "9" ""))

[including completing the selection, which wasn't in theirs]. I MOVEd a couple of things to make them the Previous selection. I then Pick-first-pre-selected some different things, and with them selected/highlighted/gripped, called that L9 command. Those different things were not the ones changed to Layer 9, but rather the earlier couple of things. Pre-selected objects do not become the Previous selection. [And yes, my PICKFIRST & PICKADD settings are appropriate.]

Re: Lisp without user input during command

john.uhden — Fri, 08 Jan 2021 17:26:20 GMT

I screwed up. It's Implied, not Previous...
(setq ss (ssget "I"))

Re: Lisp without user input during command

Sea-Haven — Fri, 08 Jan 2021 22:25:15 GMT

Thanks Kent had a play unless you use "select" to pick objects it will change the previous selection not the new one that you want to use, like others I would be more inclined to use a ssget method.

There really is not much difference enter command pick objects for me that is my habit of changing stuff.

Re: Lisp without user input during command

BriannaWong98 — Thu, 04 Mar 2021 23:03:42 GMT

Sorry to revive this so soon, but is there any way to macro this? The ability to push a button and have it auto select what's highlighted and change it to layer x is invaluable to me

Re: Lisp without user input during command

john.uhden — Thu, 04 Mar 2021 23:17:10 GMT

My psychic interface will be ready in about 15 years, if I'm still around.

Re: Lisp without user input during command

BriannaWong98 — Thu, 04 Mar 2021 23:31:18 GMT

Nevermind, I just discovered the -LAYMCH command which is everything I need ^u^

Re: Lisp without user input during command

Kent1Cooper — Fri, 05 Mar 2021 02:37:49 GMT

Though you may not need it any more, there is a way to macro [macro-ize? macrify?] it. If you set it up to ensure a command like SEC9 at Message 5 is loaded in every drawing, you can put into a button a macro that contains merely:

SEC9