[Ева]

Здравствуйте! у меня возникла такая проблема, требуется отрисовать двойную мультилинию, но я работаю не в автокаде, а в bricscad, где команда _.mline не поддерживается. Помогите, пожалуйста, советом, каким еще способом можно решить эту задачу? Должно получиться две полилинии, что-то вроде обводки, причем полилинии могут идти под любым углом.

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

Попробуй сделать свой тип линии.

[vdkm]

А _offset ?
Такая команда есть ?

[Ева]

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

[Ева]

насчет своего типа линии.... обводка осуществляется на заданном расстоянии, которое вводит пользователь, заранее оно не известно

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

Сообщение от Ева насчет своего типа линии.... обводка осуществляется на заданном расстоянии, которое вводит пользователь, заранее оно не известно

Если линия непрерывная, то, может, будет иметь смысл использовать масштаб линии (celtscale)?

[Ева]

Кулик Алексей aka kpblc, расскажите, пожалуйста, подробнее как это использовать ?

[VVA]

>Ева
А такой код в Бриксе работает?

Код:

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

(defun C:PL2 ( / dst en lst osm *error*)
(defun *error*(msg)(princ msg)(setvar "OSMODE" osm)(princ))
(setq osm (getvar "OSMODE"))  
(initget 1)
(setq dst (getdist "\nЗадайте расстояние обводки:"))
(setvar "CMDECHO" 1)(setvar "PLINETYPE" 2)  
(princ "\nОбрисуйте что-нибудь")
(command "_PLINE")
(while (> (getvar "CMDACTIVE") 0)(command pause))
(setq en (entlast))
(foreach pt (entget en)
  (if (= (car pt ) 10)
    (setq lst (cons (cdr pt) lst))
    )
  )
(setq lst (reverse lst))
(setq osm (getvar "OSMODE"))
(setvar "OSMODE" 0)
(command "_OFFSET" dst en (polar (car lst)(+(angle (car lst)(cadr lst))(* 0.5 PI))(* 0.01 (distance (car lst)(cadr lst)))) "")
(command "_OFFSET" dst en (polar (car lst)(+(angle (cadr lst)(car lst))(* 0.5 PI))(* 0.01 (distance (car lst)(cadr lst)))) "")
(setvar "OSMODE" osm)
(entdel en)
(princ)  
  )

[Ева]

VVA, работает!!!!!!!!!!!!!! всем большое спасибо, что откликнулись))) вы мне очень помогли. Отдельное спасибо VVA, уже не в первый раз получаю от вас полезный совет