Topic: SSGET with and without preselected objects?

[Peter2]

I want to start a lisp-routine with this behaviour:

a) If objects are currently selected, store them: (setq ss (ssget))
b) If no objects are selected, to something else.

Way a) is clear, but it avoids step b). If it founds nothing, it asks the user for input instead of continuing.

How to do it right?

Regards
Peter

[ribarm]

Code: [Select]

(defun c:foo ( / ss )
  (if (setq ss (ssget "_I"))
    (if (setq ss (ssget "_:L"))
      (progn
      ;;; do stuff with ss ;;;
      )
      (progn
      ;;; do stuff with ss preselection but not with selection ss - you hit ENTER when asked "Select objects: ";;;
      )
    )
    (progn
    ;;; else do stuff without ss (nothing is preselected) ;;;
    )
  )
  (princ)
)


[Peter2]

Thanks Marco
the "_I" is something I ignored until now - oh, oh   

And the additional "_:L" is sophisticated

Have a good time!

[BIGAL]

additional "_:L" is sophisticated

have a look at Lee-mac ssget functions for some more handy options.

[HasanCAD]

http://lee-mac.com/ssget.html