[prajdziswet]

Вопрос:
1) как получить набор если находишься не в области видимости, то есть
я делаю так
(setq nabor_s (ssget "_W" '(159395 90167) '(160855 89167) '((0 . "*EXT")))) (или "_C" неважно)
если я нахожусь в той части экрана, то есть вижу рамку (секущую) - я получаю набор , если нет то не получаю...как мне получить набор даже если я не вижу тех координат
2) как мне получить набор из листа находясь в модели (рамка с координатами)

Р.S Заранее благодарствую =)
Ну и пояснение скриншотами, где х1 и х2 -координаты рамки

[Кулик Алексей aka kpblc]

Очень старое поведение выбора. Практически не лечится: только если сначала выбирать объекты, а потом использовать (ssget "_I") (насколько я помню ключи ssget).

[Vladimir_Sergeevich]

Если не ошибаюсь, (ssget "_X"... подбирает со всех пространств. только там не получится явно задать точки рамки и надо будет писать нечто в духе:

Код:

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

 (ssget "_x" (list 
	(cons 90 3) 
	(cons -4 ">,>,*") (cons 10 (	mapcar '- pt (list d d d)) ) 
	(cons -4 "<,<,*") (cons 10 (	mapcar '+ pt (list d d d)))
))

допилить туда (cons 410 "layout...") и все что еще душа пожелает

p.s. не ошибся. в чистом документе нарисовал два круга, один в модели, второй в листе:

Код:

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

Команда: (sslength (ssget "_x" (list (cons 0 "CIRCLE"))))
2
Команда: (sslength (ssget "_x" (list (cons 0 "CIRCLE") (cons 410 "model"))))
1
Команда: (sslength (ssget "_x" (list (cons 0 "CIRCLE") (cons 410 "Лист1"))))
1

[Disney]

Я вот так делаю

Код:

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

 (vl-cmdf "_zoom" "_W" '(159395 90167) '(160855 89167))
(setq nabor_s (ssget "_W" '(159395 90167) '(160855 89167) '((0 . "*EXT"))))

[prajdziswet]

Спасибо огромное,всегда приятно услышать идеи и подсказки
Vladimir_Sergeevich -спасибо покорпаюсь,просто не встречал условий -> надо поизучать ssget ( гдето видел, но и сейчас трудновато как задавать понять--пороюсь...идея выбора через условий мне больше нравиться)
Disney -спасибо, я об этом думал и делал zoom c ключом _e (сразу все на чертеже)..не элегантно,не очень красиво -но Просто и лаконично,но хочется как то по элегатнее,хоть незнаю как..
п.с ну и отдельное спасибо Кулику, без него общение б форуме замерло , да и толковые подсказки бывают (но жаль что мне тут автоматическое условие надо..)
если есть идеи буду благодарен..

[nolte]

собирает из всех пространств как и писалVladimir_Sergeevich,
(ssget "_X" (list(cons 0 "TEXT")))
для проверки можно перевести набор в список и...
Команда: (mapcar '(lambda(a)(dxf 410 a))lst)
("Лист1" "Лист2" "Model" "Model" "Model" "Model" "Model" "Model")
метод "GETBOUNDINGBOX" возвращает координату нижней левой и правой верхней точки описывающей рамки примитива.

[skkkk]

Сообщение от Disney Я вот так делаю

Я тоже делаю так, но в конце добавляю "_.zoom" "_p". Тогда пользователь ничего не замечает.

[Кулик Алексей aka kpblc]

Мне кажется, была тема с решением вопроса по получению примитивов вне видимой области экрана...
А если не секрет, почему именно такое требуется - именно рамкой, которая не факт что видна?
P.S. ИМХО самое лучшее решение предложил nolte - хотя оно и самое длинное по времени выполнения (да и при его реализации придется учитывать вариант разных систем координат). Выполнение зума на загруженных чертежах может занимать приличное время (да еще, помимо зума, наверняка понадобится обновление - тоже потери). Так что я бы задумывался о переделке алгоритма...

[skkkk]

Сообщение от Кулик Алексей aka kpblc Выполнение зума на загруженных чертежах может занимать приличное время

Бывали чертежи, на которых реакция на один поворот колеса затягивалась на несколько секунд, так тут не только программно, тут просто просмотреть этот чертеж - уже обплюешься. Я такие чертежи сперва чищу основательно, если нечего больше чистить, а тормоза не прекратились - разбиваю на несколько. Если нельзя разбить - морожу ненужные слои. А в основном зум по рамке, затем выделение, затем зум обратно (все программно) - реально даже и не заметно. Я для себя написал функцию - аналог ssget, но с возможностью своего приглашения, так там я и реализовал этот принцип. Тяну рамку, если первая ее точка ушла за экран при нажатии второй, то происходят описанные выше действия - и все попадает в набор. Работает безотказно. Правда почти все штатные команды пришлось слегка допиливать, чтоб они получали набор от моей функции, но оно того стоило: теперь, выбрав перенос, я вижу информативное предложение у курсора: "Что переносим, хозяин?" вместо скучного "Выберите объекты", а в качестве бонуса имею набор и того, что не попало в экран. Другой вопрос, что к тому времени, когда я смог такое написать, я уже привык щелкать рамкой несколько раз, в случае непопадания на экран всего что надо, да и взял в оборот инструменты типа выбор подобных, выбор объектов слоя, и прочих самописных "выборов" - в итоге так по-моему ни разу и не воспользовался на практике этим, так скажем, фиксом.

Сообщение от Кулик Алексей aka kpblc А если не секрет, почему именно такое требуется - именно рамкой, которая не факт что видна?

Если в текущем пространстве - я только что описал пример такого применения, а вот выбирать рамкой в модели, находясь при этом в листе - не могу сообразить ситуации, в которой мне бы подобное понадобилось.

[prajdziswet]

Спасибо

Сообщение от Кулик Алексей aka kpblc А если не секрет, почему именно такое требуется - именно рамкой, которая не факт что видна?

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

[baksconstructor]

Сообщение от prajdziswet если удалось определить в поле, как текст

А если рамка блоком ?

[prajdziswet]

- ну это как ты хочешь(я не обрабатываю текст внутри блока,пока что) :
1) про блоки много написано,например хорошо Алексей написал http://autolisp.ru/2014/06/27/dynblocks-parameters/ (самое лучшее)
2) да простым взрывом (если не динамический конечно),взять ssget и возвратить до взрыва, да и куча наверное идей найдется
но топик не про это..
А всем спасибо буду пытаться думать и пробывать

[VVA]

Сообщение от Disney Я вот так делаю

Сообщение от skkkk Я тоже делаю так, но в конце добавляю "_.zoom" "_p"

Я перед zoom _p даю еще одну команду Zoom с коэффициентом 0.95. У меня были случаи, когда не выбирались примитивы на самой границе

Код:

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

(command "_.Zoom" "_Window" (trans bl 0 1)(trans tr 0 1) "_.Zoom" "0.95x")

[Disney]

Сообщение от VVA Zoom с коэффициентом 0.95

Вот спасибо
А то я чтоб на границах с выбором проблем не было, к координатам рамки прибавлял небольшие значения(к правому верхнему) ну и отнимал(от левого нижнего)
Но использование command меня всегда немного огорчает, как-то это не профессионально. Так что на будущее возьму на вооружение вариант Vladimir_Sergeevich, хотя в нём казалось бы ни какой тайны не раскрыто, но то ли лениво было самому нормальный вариант продумывать, что заставляет использовать костыли с command.