How to pick a 3D polyline

Hello everyone,

I have created a 3d polyline with the following code:

(defun Bigal2(lst)
(setq x 0)
(command "_3dpoly")
(while (= (getvar "cmdactive") 1 )
(repeat (length lst)
(command (nth x lst))
(setq x (+ x 1))
)
)
)
(setq pl '((5 5 5) (10 5 4) (10 10 3) (5 10 2) (5 7 1) (5 5 5)))

I then try to pick the same with the following line:

(setq sel1(ssget '((0 . "_3dpoly") (8 . "0"))))

It doesn't seem to work. What can be the problem?.

Thanks to BIGAL who gave the code for the creation of the "3dpoly".

The entity type (DXF Group 0) for a 3D Polyline entity is "POLYLINE", with bit code 8 enabled in DXF Group 70 to differentiate the entity from a 2D Polyline or Mesh.

Therefore your selection filter will need to be:

'((0 . "POLYLINE") (8 . "0") (-4 . "&=") (70 . )

Thanks very much LM. It works well. Perhaps this could be the solution to the thread under the heading "Poyline error" started by me couple of days ago.