[Nitrogenium]

Собственно, вопрос ясен из заголовка - надо создать набор из примитивов TEXT или MTEXT, содержащего такой текст:
"ПК "любое количество цифр"+"две цифры,точка,две цифры, используя ssget
Например вот такой текст:
ПК 2+50.00
ПК 45+58.45
ПК 120+84.65
Написал вот так: (ssget "_C" po1 po2 (list (cons 0 "*TEXT") (cons 8 "Layer002") (cons 1 "ПК *#+##'.##")))
Но тут используется *, которая заменяет любые символы, а мне надо любое количество цифр.
po1 и po2 - это координаты точек

[Дима_]

Самое простое - "если любое количество цифр" в разумных пределах - то использовать "<OR "OR>" c перебором решеток (скажем от # до #####) - ну или фильтровать постфактум.

[Nitrogenium]

фильтровать постфактум? Это как?

[Дима_]

Пишешь функциию на входе набор, условия отбора; на выходе отфильтрованный набор (я бы наборам предпочел списки - но можно и с наборами - если требуется).

[Nitrogenium]

Что-то я не очень понял
(ssget "_C" po1 po2 (list (cons 0 "*TEXT") (cons 8 "Layer002") (cons -4 "<OR") (cons 1 "ПК #+##'.##") (cons 1 "ПК ##+##'.##") (cons 1 "ПК #+##'.##") (cons 1 "ПК ###+##'.##") (cons 1 "ПК ####+##'.##") (cons 1 "ПК #####+##'.##") (cons -4 "OR>"))) А вот это может прокатит?

[Дима_]

А почему нет - это собственно 1 вариант из #2.

[Nitrogenium]

да вроде все верно, но не особо работает даже просто это:
(list (cons 0 "*TEXT") (cons 8 "Layer002") (cons 1 "ПК #+##'.##"))
cons-ов больше 2-х можно ставить?
Может надо AND использовать?

[Лиспер]

А зачем так жестко-то?

Код:

[Выделить все]

(ssget '((0 . "*TEXT") (8 . "Layer002") (1 . "ПК #+##'.##,ПК ##+##'.##,ПК ###+##'.##,ПК ####+##'.##,ПК #####+##'.##")))

Так не проще? Offtop: А если гарантируется, что после ПК абсолютно точно идет пробел и сколько-то цифр, то тогда еще проще получится

Код:

[Выделить все]

(ssget '((0 . "*TEXT") (8 . "Layer002") (1 . "ПК *+##'.##")))

[Nitrogenium]

А через cons нельзя разве?

[Лиспер]

Можно. Но каков смысл, если критерии заранее известны?

[Nitrogenium]

(ssget "_C" po1 po2 (list (cons -4 "<OR") (cons 0 "*TEXT") (cons 8 "Layer002") (cons 1 "ПК #+##'.##") (cons -4 "OR>")))
Вот это создает набор, но создает неверно, то есть ПК е3+45.15 скажем в набор войдет =(((((!

[VVA]

ПК е3+45.15 -> (cons 1 "ПК ?#+##'.##")

[Лиспер]

А почему в #11 используется OR?

[Nitrogenium]

Уж все что можно перебрал - ничего не подходит: набор не создается
...либо фильтр не работает

[TararykovDG]

Уж все что можно перебрал - ничего не подходит: набор не создается ...либо фильтр не работает

Выкладывай чертеж где не создается

[Do$]

Сообщение от Nitrogenium (ssget "_C" po1 po2 (list (cons -4 "<OR") (cons 0 "*TEXT") (cons 8 "Layer002") (cons 1 "ПК #+##'.##") (cons -4 "OR>")))

на русский язык это выражение можно перевести так:
создать набор объектов, попавших в секущую рамку, определяемую точками po1 и po2, при этом объект набора должен быть или текстом или на слое "Layer002" или в его dxf-коде 1 должна содержаться строка, отвечающая шаблону "ПК #+##'.##"

[Nitrogenium]

Вот файл - особенного ничего не представляет - создан в целях отладки

на русский язык это выражение можно перевести так: создать набор объектов, попавших в секущую рамку, определяемую точками po1 и po2, при этом объект набора должен быть или текстом или на слое "Layer002" или в его dxf-коде 1 должна содержаться строка, отвечающая шаблону "ПК #+##'.##"

Да, при попытке прописать AND отказывается создавать набор
Выяснилось, что апостраф '. работать не хочет, а просто . работает
Все - разобрался: должен использоваться `, а не '

[TararykovDG]

Ну вот на вашем чертеже так все работает

Код:

[Выделить все]

 
(setq nbr (ssget "_X" (list (cons 0 "*TEXT") (cons -4 "<OR") (cons 1 "ПК #+##`.##") (cons 1 "ПК ##+##`.##") (cons 1 "ПК ###+##`.##") (cons 1 "ПК ####+##`.##") (cons 1 "ПК #####+##`.##") (cons -4 "OR>"))))

По-моему Вы в предыдущих примерах использовали символ " ' " (апостроф), в конструкции (cons 1 "ПК #+##'.##"), а нужно " ` " (обратный апостроф) поэтому и не работало

P.S не успел автор сам разобрался

[Nitrogenium]

Всем спасибо!
Правда хотелось бы уточнить - реально ли написать, чтобы количество цифр перед плюсом было вообще любым

[Дима_]

Сообщение от Nitrogenium реально ли написать, чтобы количество цифр перед плюсом было вообще любым

ИХМО только вторым метод в #2.