[Pilot]

В 2005-м появилась очень удобная объектная привязка MTP - середина между двумя точками.
При других включенных объктных привязках MTP не цепляется за что попало (в отличие от макроса '_CAL;(CUR+CUR)/2.
Но это при обычном черчении.

Но если лисп-прога запрашивает точку и вот тут ответить MTP - то дальнейшая работа идет некорректно. Возможно, что для MTP нужно указывать 2 точки, а лиспу нужна одна.

Какие будут соображения, а также наблюдения по особенностям работы этой привязки?

[Pilot]

Ну так что, привязкой MTP никто не пользуется?

[Геннадий aka PG]

Есть прога, для запроса первой точки линии, как середина между 2-мя указанными, так что лично я этой привязкой не пользуюсь

[Pilot]

2 Геннадий aka PG
Прога на чем? Если на лиспе, то ее не получится использовать в ответ на запрос точки от других лисп-программ.

[Геннадий aka PG]

На лиспе

Код:

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

//08-02-2001
// Игнатьев Леонид  e-mail: ignat@triniti.ru     
// добавлены строки отключения и включения привязки

;;;-------------> LINE FROM MIDDLE <-----------------------------------
(defun c:lnmid( / pt1 pt2 pt0 osm)
 (setq	osm  (getvar "OSMODE"))
 (initget 3) ;; запрет пустого ввода
 (setq pt1 (getpoint "\nSelect First  Point : ")
       pt2 (getpoint "\nSelect Second Point : ")
       pt0 (polar pt1 (angle pt1 pt2) (* 0.5 (distance pt1 pt2)))
  )
 (setvar "OSMODE" 0)	 
 (COMMAND "LINE" pt0  )
 (setvar "OSMODE" osm)
)
;;;---------> THE  END <-----------------------------------------------

а если в ответ на приглашение ввода средней точки ввести ('cal "mee") - сделать кнопочку.
у меня в сборнике pg3 были такие пункты в меню

Код:

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

**ПРИВЯЗКИ
ID_ПРИВЯЗКИ    [_Toolbar("Привязки", _Floating, _Hide, 714, 222, 1)]
ID_MIENEN      [_Button("Конец-Конец:Середина", "mid-end-end.bmp", "mid-end-end")]('cal "mee") 
ID_MIENCE      [_Button("Конец-Центр:Середина", "mid-end-cen.bmp", "mid-end-cen")](cal "(end+cen)/2") 
ID_MIMIMI      [_Button("Середина-Середина:Середина", "mid-mid-mid.bmp", "mid-mid-mid")](cal "(mid+mid)/2") 
ID_MICECE      [_Button("Центр-Центр:Середина", "mid-cen-cen.bmp", "mid-cen-cen")](cal "(cen+cen)/2") 
ID_MIMICE      [_Button("Середина-Центр:Середина", "mid-mid-cen.bmp", "mid-mid-cen")](cal "(mid+cen)/2") 
ID_MIMITA      [_Button("Середина-Касательная:Середина", "mid-mid-tan.bmp", "mid-mid-tan")](cal "(mid+tan)/2") 
ID_MIENTA      [_Button("Конец-Касательная:Середина", "mid-end-tan.bmp", "mid-end-tan")](cal "(end+tan)/2") 


***HELPSTRINGS
ID_MIMICE      [Точка на середине средней точки и центра окружности]
ID_MIENEN      [Точка на середине конечных точек]
ID_MICECE      [Точка на середине двух центров окружностей]
ID_MIENTA      [Точка на середине конечной точки и касательной]
ID_MIMIMI      [Точка на середине средних точек]
ID_MIMITA      [Точка на середине средней точки и касательной]
ID_MIENCE      [Точка на середине конечной точки и центра окружности]
ID_LINE_0      [Creates straight line segments:  LINE]

кто автор не помню.

[Pilot]

Ага! Хоть и на Лиспе - но все-же через калькулятор.
Но замечено (и не только мной), что он имеет неприятную особенность:
Если возле будущей результирующей точки не пустота, а какие-либо объекты, то действующая объектная привязка цепляется за эти объекты и местоположение результирующей точки оказывается непредсказуемым.
Привязка MTP лишена этого недостатка.