Topic: entsel with ability enter numbers?

[V@no]

Is there a way prompt user to select an entity and at the same time accept a number as input?

Thank you.

[BIGAL]

Do you mean select 5 objects but using ssget filters ? Using repeat may be the way to go. And look at Lee-Mac ssget functions, in particular :E

[V@no]

SSGET might not be what I'm looking for, because it returns selected entity instead of prompt user (I need prompt user to select 2 entities individually, and keep first entity selected, while picking second one)

[V@no]

My current hack is to include numbers in INITGET:

Code - Auto/Visual Lisp: [Select]

1. (DEFUN c:test (/ commands i input)
2.  
3.     (SETQ commands ""
4.           i        -1
5.     )
6.     (REPEAT 101
7.         (SETQ commands (STRCAT commands " " (ITOA (SETQ i (1+ i)))))
8.     )
9.     (INITGET commands)
10.     (SETQ input (ENTSEL "\nSelect object or enter a number 0-100: "))
11.     (IF (= (TYPE input) 'STR)
12.         (SETQ input (ATOI input))
13.     )
14.     (PRINC "\nresult: ")
15.     (PRINC input)
16.     (PRINC)
17. )

It works for my needs, but it's just an ugly hack...

[BIGAL]

Why not for 2 entities use entsel can have messages etc just do twice.

Code: [Select]

(setq ent1 (car (entsel "\Please pick object 1 ")))
(setq ent2  (car (entsel "\Please pick object 2 ")))
You can use (ssget pt) which selects a single item (ssname ss 0) useful if you want to show a drag line.

[V@no]

Why not for 2 entities use entsel can have messages etc just do twice.

That's exactly what I'm using, except entsel doesn't allow arbitrary input, hence is the hack above.

You can use (ssget pt) which selects a single item (ssname ss 0) useful if you want to show a drag line.

and pt is a set of coordinates? I think you lost me on this one.