Select Individual Objects in a Selection Group

Select Individual Objects in a Selection Group

daniel.welchLFHPQ
Contributor Contributor
1,654 Views
4 Replies
Message 1 of 5

Select Individual Objects in a Selection Group

daniel.welchLFHPQ
Contributor
Contributor

Hi,

 

Is there a way to select multiple objects and then "next" through them one at a time?  If not, does a LISP already exist to do this?

danielwelchLFHPQ_0-1691680994647.png

Then click "next" and the first object selected in the group is selected.

danielwelchLFHPQ_1-1691681055855.png

Then click "next" and the second object selected in the group is selected and so on.

danielwelchLFHPQ_2-1691681113661.png

0 Likes
Accepted solutions (1)
1,655 Views
4 Replies
Replies (4)
Message 2 of 5

Valentin_CAD
Mentor
Mentor

@daniel.welchLFHPQ ,

 

Please elaborate your intended purpose.

 

You may want to research these links:



Select the "Mark as Solution" if my post solves your issue or answers your question.

Seleccione "Marcar como solución" si mi publicación resuelve o responde a su pregunta.


Emilio Valentin

0 Likes
Message 3 of 5

daniel.welchLFHPQ
Contributor
Contributor

@Valentin_CAD 

 

My goal is to be able to select multiple blocks (specifically connectors in ACADE) then next through them and change various attributes that need different values between the blocks.  For example:  Say I want to change the location on 5 different connectors to 5 different locations.  I would select all 5 of the connectors then I could "next" through each connector and change the location without having to select them individually with my mouse.

 

This functionality would allow me to create a script that would take in a list of locations and then next through the selected blocks and change the location attribute of each block according to the corresponding value in the list.  This would repeat for all of the selected connectors.

0 Likes
Message 4 of 5

Kent1Cooper
Consultant
Consultant
Accepted solution

Something like this?  [minimally tested]

(defun C:SSST (); = Selection Set to Step Through
  (prompt "\nTo establish Selection Set to Step Through with STSS command,")
  (setq *SSST* (ssget))
)

(defun C:STSS (/ n); = Step Through Selection Set
  (if *SSST*
    (progn ; then
      (setq n (sslength *SSST*))
      (sssetfirst nil ; select/grip/highlight
        (ssadd ; put into unnamed selection set
          (ssname *SSST*
            (cond
              (*STSSn* (setq *STSSn* (rem (1+ *STSSn*) n)))
              ((setq *STSSn* 0))
            ); cond
          ); ssname
        ); ssadd
      ); sssetfirst
    ); progn
    (prompt "\nNo set established by SSST command yet."); else
  ); if
  (prin1)
)
Kent Cooper, AIA
Message 5 of 5

daniel.welchLFHPQ
Contributor
Contributor

@Kent1Cooper 

 

Yes, just like this thank you!

0 Likes