|

Внутренний мир AutoCAD

Во время подготовки конструкторской документации возникает необходимость подготовки большого количества чертежей имеющих стандартную рамку, принятую нашим ГОСТом. При использовании чертежного пакета «AutoCAD» данный вопрос решается путем разработки рамки а потом ее использовании как шаблона. Причем каждому сотруднику необходимо вручную заполнять свои данные.
CAD 128px


В предлагаемой статье рассказано как можно в течении нескольких секунд нарисовать рамку под формат А4 и заполнить ее своими данными.
В статье приводится листинг программы под Visual Lisp с помощью которой можно решить этот вопрос. Учитывая то, что листинг программы редактируется в любом текстовом редакторе его всегда можно модифицировать под свои данные.

Немного о синтаксисе языка и командах которые используются в тексте.

1. После символа «;» начинается текст который программой игнорируется и не подлежит исполнению;
2. Все команды начинаются со скобки и заканчиваются скобкой, между которыми находится слово command, название команды и переменные для нее;
3. В конце строки с командой часто используется пустой оператор «» (двойные кавычки между которыми ничего не находится). Интерпретатором языка Visual Lisp они воспринимаются как конец ввода данных и запуск на выполнение команды которую они завершают.
4. Команда «snap» с опцией «off» отключает привязку к сетке, если привязку не отключить возникнут проблемы с автоматическим построением чертежа.
5. Команда «_lweight» с опцией «0.3» изменяет толщину поли линии на 0.3.
6. Команда «_pline» рисует с помощью поли линии прямую от точки Х=20, У=5 линию длинной 284 под углом 90 градусов.
7. Команда «zoom «c» «110,30» перемещает точку с координатами 110,30 в центр экрана.
8. Команда «zoom «s» «1x»» изменяет коэффициент увеличения чертежа.
9. Команда «textsize» с опцией «2.5» изменяет постоянную переменную окружения среды AutoCAD отвечающую за размер выводимого шрифта. Один раз использованная команда выполняется все время пока не будет изменена на другую.
10. Команда «»_mtext» «158,41» «169,44» «Лит.» «»» выводит текст «Лит.» в окне имеющем координаты левого нижнего угла «158,41», координаты верхнего правого – «169,44».

Для запуска программы необходимо:
1. вырезать из статьи текст ограниченный линиями и сохранить его под именем например Ramka and text A4.lsp. Название файла может быть любым. Расширение обязательно «lsp».
2. Загрузить файл в редактор Visual Lisp или в окне автокада набрать строку
(load «диск:каталогифайл1.lsp») или (load «диск:/каталоги/файл1.lsp»)

модуль построения рамки для листа А4
(command «snap» «off» ) ; отключаем привязку к сетке
(command «_lweight» «0.3» «» ; толщина линий 0.3
«_pline» «20,5» «@284<90» «@185<0» «@284<270» «@185<180» «» ; рисуем внешнюю рамку для листа 297х210
«_pline» «20,60» «@185<0» «» ; построение толстых линий
«_pline» «20,20» «@185<0» «»
«_pline» «20,45» «@185<0» «»
«_pline» «155,5» «@40<90» «»
«_pline» «170,25» «@20<90» «»
«_pline» «187,25» «@20<90» «»
«_pline» «37,5» «@55<90» «»
«_pline» «60,5» «@55<90» «»
«_pline» «75,5» «@55<90» «»
«_pline» «27,35» «@25<90» «»
«_pline» «155,40» «@50<0» «»
«_pline» «155,25» «@50<0» «»
«_pline» «20,35» «@65<0» «»
«_pline» «175,20» «@5<90» «»
«_pline» «85,5» «@55<90» «» )

(command «_lweight» «0.2» «») ; меняем толщину линий на 0.2
(command «_pline» «165,25» «@15<90» «» ; построение тонких линий
«_pline» «160,25» «@15<90» «»
«_pline» «20,55» «@65<0» «»
«_pline» «20,50» «@65<0» «»
«_pline» «20,40» «@65<0» «»
«_pline» «20,30» «@65<0» «»
«_pline» «20,10» «@65<0» «»
«_pline» «20,15» «@65<0» «»
«_pline» «20,25» «@65<0» «»)

(command «zoom» «c» «110,30» «» ; перемещаем на центр экрана точку 110,30
«zoom» «s» «1x» «») ; коэффициент увеличения равен 1, при необходимости можно сделать любой. 2х-увеличение в два раза

; модуль заполнения рамки
(command «textsize» «2.5» ) ; изменяем разер шрифта на 2.5
(Command «_mtext» «158,41» «169,44» «Лит.» «» ;заполняем поля таблици
«_mtext» «172,41» «186,44» «Масса» «»
«_mtext» «190,41» «204,44» «Масш.» «»
«_mtext» «156,21» «168,24» «Лист» «»
«_mtext» «176.4,21» «192.2,24» «Листов» «»
«_mtext» » 21,36″ » 25,39″ «Из.» «»
«_mtext» » 28,36″ » 35,39″ «Лис» «»
«_mtext» » 38,36″ » 59,39″ «N докум.» «»
«_mtext» » 62,36″ » 74,39″ «Подп.» «»
«_mtext» » 76,36″ » 84,39″ «Дат» «»
«_mtext» » 21,31″ » 36,34″ «Разраб» «»
«_mtext» » 21,26″ » 36,29″ «Провер» «»
«_mtext» » 21,21″ » 36,24″ «Т.контр» «»
«_mtext» » 21,11″ » 36,14″ «Н.контр» «»
«_mtext» » 21, 6″ » 36,9″ «Утвер.» «»)

(Command «_mtext» «38,25.8» «59,29» «Иванов И.» «») ; поле проверил
(command «textsize» «7.0» ) ;изменяем размер шрифта на 7.0
(Command «_mtext» «157,7» «203,16» «ЦКБ» «»)
(command «textsize» «2.5» ) ; возвращаем размер шрифта на 2.5

Комментирование не разрешено

Share It

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Последнии комментарии

  • нина софиева: статья о т. чиппендейле (не знаю, как другие) взята один к одному из моей книги «Дизайн интерьера....
  • Виктория: Добрый день, Елена! Мы занимаемся установкой и обслуживанием систем видеонаблюдения в Украине и предлагаем...
  • Марина: Добрый день, Елена! Компания 3D-LAND предлагает Вам сотрудничество в области покраски и текстурирования под...
  • Екатерина: Добрый день! Наша компания изготавливание изделия из мрамора. Мы являемся прямыми импортерами мрамора....
  • Ирина: Здравствуйте, спасибо за содержательную статью. Ее смело можно брать за основу, если появилось желание...

++++++++++++

Дизайн интерьера

Дизайн квартир, сегодня, это не просто грамотный выбор материалов и оформление вашего дома, а целая дизайнерская концепция, которая воплощается в реальность. Дизайн интерьера предусматривает комплексную разработку дизайн-проекта, где будут учитываться все мельчайшие тонкости эстетического и технического плана.