wrote:
.... color and lineweight, it is possible make it set back to by layer after this lisp?
Directly as A minimal adjustment to yours, if you like, just do exactly that after drawing the Circle, in the same way that you changed them:
....
(repeat (setq n (cdr (assoc 90 (entget pl))))
(command
"color" 3 "lweight" 0.3
"_.circle" (vlax-curve-getPointAtParam pl (setq n (1- n))) 0.8
"color" "BYLAYER" "lweight" "BYLAYER"
); command
); repeat [vertices]
....
| # | Наименование новости | Тональность | Информативность | Дата публикации |
|---|---|---|---|---|
| 1 | Найдена причина редкой формы болезни Альцгеймера с кровоизлияниями | 0 | 8.36 | 12-08-2026 |