Автоматический перенос текста в AutoCAD, Перенос слов из текстового файла в AutoCAD 2010 по координатам Опции

[Гость_DemaLtd_*]

Необходимо перенести на чертеж наименование отдельных узлов (более 6000) из Еxcel по указанным координатам.
Команда _.text X,Y txt открывает в указанных координатах окно редактора и требует "рукопашное" занесение текста,
даже после внесения текста по ENTER не выходит из редактора.
Хотелось бы автоматизировать данную операцию.

[Гость_DemaLtd_*]

Необходимо перенести на чертеж наименование отдельных узлов (более 6000) из Еxcel по указанным координатам.
Команда _.text X,Y txt открывает в указанных координатах окно редактора и требует "рукопашное" занесение текста,
даже после внесения текста по ENTER не выходит из редактора.
Хотелось бы автоматизировать данную операцию.

[glam]

В общем кокетливый сфинкс пусть дальше строит из себя агента 007.

А решение задачи поставленной автором темы оказалось очень простым. Действительно можно обойтись безо всяких лиспов и прочих вещей.

Работает так.

В исходном файле в экселе (пример прилагается) у нас должно быть как минимум 4 ряда, я сделал 6, наверное можно сделать еще 7й ряд, который будет указывать текстовый стиль. Далее объединяем значения наших рядом в еще одном ряде командой
=СЦЕПИТЬ("текст ";Номер ряда с координатой X;",";Номер ряда с координатой Y;",";Номер ряда с координатой Z;" ";200;" ";0;" ";Номер ряда с вставляемым текстом)
в результате получаем строку вида _text 325465,852147,0 200 0 Текст 1
Цифры 200 и 0 в этой строке обозначают высоту вставляемого текста и угол его поворота. В файле примера для них тоже отведены отдельные ряды, если высота текста и угол поворота всех вставляемых текстовых блоков будет одинаковым, тогда можно не делать отдельные ряды и просто ввести фиксированные цифры в формуле сцепления.
Далее применяем эту формулу на все ячейки которые должны идти последовательно в строках одна за другой.
Получили искомый интересующий нас ряд. Копируем его в буфер обмена. Создаем в блокноте пустой текстовый файл. Вставляем содержимое буфера обмена в него и сохраняем файл с расширением scr. Это файл скрипта автокада, который будет последовательно выполнять очередность команд записанных в нем. В нашем случае это команда вставки текстовых блоков с заданным содержанием в заданные координаты с заданной высотой текста и углом поворота. В примере специально сделал разные высоты текста и углы поворота, для демонстрации того что это работает.
Осталось только скормить этот файл автокаду. Делается это просто. Команда _script и в появившемся диалоговом окне выбираем наш созданный файл с расширением scr. Всё!

Получите распишитесь!
А мосье сфинск может дальше изображать из себя великого и ужасного умника (коим по факту он вряд ли может быть даже с большой натяжкой) и заливать недалеким до копания в истине людям о мегакрутых программах для построения траекторий баллистических болеголовок.

P.S. Забыл сказать, что при использовании английского автокада вместо команды "текст" необходимо использовать команду "text", а еще правильнее будет независимо от языка автокада использовать универсальную команду _text. И еще 1 момент - текст будет вставляться с текущим активным текстовым стилем. Наверное в строке скрипта возможно указать чтобы еще и заданные группы текстов вставлялись с заданными текстовыми стилями, но я думаю это уже детали и мелочи и к вопросу темы они не относятся.
Пока пример никто не успел скачать сразу откорректировал его под эти реалии.

P.P.S. Gemini, раз уж вы обратили внимание на данную тему. То теперь совершенно ответственно заявляю что все сообщения кроме первого и #18 в ней можно удалить как не несущие никакой смысловой нагрузки, в таком случае тема сведется к классической схеме из двух сообщений "Вопрос"-"Ответ".




Вы правы, именно это я и сделаю

Сообщение отредактировал Gemini - 22.11.2010, 4:30

Прикрепленные файлы

 Text2AcadCoordinates.rar ( 4,9 килобайт ) Кол-во скачиваний: 129