[meisgreen]

нужно сделать чтобы выравнивало линии нарисованные при выключенном орто
выделяю все линии (setq a (ssget "_X" '((0 . "LINE"))))
подскажите пожалуйста как мне получить координаты конца и начала линий?

[Bull]

Зачем таким образом-то выделяешь? Если нужно просто линии, находящиеся примерно на одной коорд Y, то выделять можно, указав рамкой. Потом в панели свойств уже задать одну и ту же координату по Y для "начало по Y" и "конец по Y". Упс... Почти забыл. При этом после выделения рамкой в тех же свойствах вместо "All" выбираешь "Line"

[ssn]

а ещё лучше включить трассировку и не рисовать кривых линий
и макрос был где то для этих нужд... надо только поискать. тут http://www.caduser.ru/

[Profan]

Можно посмотреть здесь:
Выравнивание отрезков по осям X и Y
http://www.caduser.ru/cgi-bin/f1/board.cgi?t=20394KY

[meisgreen]

Сообщение от Bull Зачем таким образом-то выделяешь? Если нужно просто линии, находящиеся примерно на одной коорд Y, то выделять можно, указав рамкой. Потом в панели свойств уже задать одну и ту же координату по Y для "начало по Y" и "конец по Y". Упс... Почти забыл. При этом после выделения рамкой в тех же свойствах вместо "All" выбираешь "Line"

нужно чтобы она автоматом находила "кривые" отрезка на всей области - видимой и невидимой
Спасибо за пример, осталось переделать только маску отклонения по координатам

[Bull]

Сообщение от meisgreen нужно чтобы она автоматом находила "кривые" отрезка на всей области - видимой и невидимой

А.... Ну тогда я пас.

PS А лиспики эти как выравнивают-то? Как узнают, нужно опустить слева или поднять справа конец?

PPS Про трассировку (отслеживание углов) слышал? (пост №3 здесь) Вопросов не возникнет таких в будущем.