Вопрос такой.
Есть точки со значениями уровней (порядка 100 точек), мне необходимо перевести каждую точку в Балтийскую Систему, соответсвенно добавить определенное число N к каждому уровню. Возможно это сделать не заходя каждый раз в определенную точку Text и правя значение на нужное.

[dermoon]

Из стандартных средств есть "find" (поиск и замена), но для твоего случая это не очень удобно, текст-то везде разный. Может, что есть в экспрессе, или писать лисп ручками.

[Apelsinov]

(defun c:textplus (/ A n nabor dxfcod)
(setq n 0)
(if (setq A (getreal "Введи число, которое нужно прибавить:"))
(if (setq nabor (ssget '((0 . "TEXT"))))
(while (setq dxfcod (ssname nabor n))
(entmod
(subst (cons 1
(rtos
(+ A (atof (cdr (assoc 1 (setq dxfcod (entget dxfcod))))))
)
)
(assoc 1 dxfcod)
dxfcod
)
)
(setq n (+ n 1))
)
)
)
(princ)
)