Принадлежу к такой
касте нашего общества, как студенчество, хотя и осталось
мне наслаждаться этим не так уж много (сейчас на пятом
курсе). Учусь в Белгородской государственной технологической
академии строительных материалов.
Программа расчета цилиндрической
косозубой зубчатой передачи
В архиве:
1. Исходные тексты программ на Delphi и AutoLISP - папка
"Исходные тексты программ"
2. Собственно инсталляшка программы - файл Gear.exe
3. Записка с полным описанием программы, метода расчета,
руководством пользователя и пр. - файл "Записка.doc"
4. Информация о себе - файл "Немного о себе.doc"
1. НАЗНАЧЕНИЕ
Программа предназначена для просмотра, поиска и редактирования
системных переменных AutoCAD. 2. ТРЕБОВАНИЯ К КОМПЬЮТЕРУ
Windows 98, 2000 и выше;
AutoCAD 2000 и выше;
3 Mb свободного пространства жесткого диска;
разрешение экрана: минимум 800x600 (рекомендуется 1024x768
и выше) 3. УСТАНОВКА
3.1. Запустите AutoCAD.
3.2. Выберите Tools / Load Application- и укажите файл
SetupSVR.fas или *.lsp.
3.3. Следуйте инструкциям установки. ОБНОВЛЕНИЕ от 18/07/2003 1. Исправлены
ошибки, связанные с переменной DIMASO, возникавшие в
AutoCAD 2002-2004.
2. Добавлено несколько функций к библиотеке ACADVarUtils.dll.
ОБНОВЛЕНИЕ от 26/06/2003
1. Добавлены переменные AutoCAD
2004
2. Есть возможность вынести ACADVar на правую кнопку
3. Есть возможность постоянного контроля за значениями
системных
переменных. Если в чертеже есть измененные переменные,
то кнопка на инструментальной панели становится красного
цвета, при этом меняется и макрос, выполняемый по кнопке.
4. Можно одновременно работать в нескольких версиях
AutoCAD.
5. Для программистов появилась бибиотека ACADVarUtils.dll
с некоторыми дополнительными возможностями, которые
не обеспечены в VLSIP. Как работать с этой dll из VLSIP
описано в справке к программе в разделе "Дополнительные
возможности".
Программа для отрисовки высотных
отметок с визуализацией вставляемого блока.
Блоки можно сделать по вкусу, но в них должен быть ОДИН
АТРИБУТ, куда заносится информация о высоте. Высота берется
из координаты Y, как разница между нулевой отметкой и
точкой вставки блока с учетом масштабных коэффициентов
модели и размерного стиля (задаются в начале программы).
Все предлагаемые значения можно изменить непосредственно
при отрисовке, или закомментировать строки программы,
чтобы избежать лишних запросов.
Блоки вставляются на слой "Размеры" с цветом
4 (задается в нвчале программы). Если такой слой отсутствует
- то он создается. Если заблокирован - выдается сообщение.
Высота нулевой отметки хранится в переменной внедокументного
пространства и если была установлена, то доступна из всех
чертежей текущего сеанса АКАД.
Программа отрисовки выносок
на одной или нескольких полках, в две строки (над и под
полкой), в окружности, в прямоугольнике. Как дополнение
- отрисовка координат X и Y для точки начала выноски (стрелки
Leader'а). Предусмотрено также редактирование текста и
добавление/удаление строк (только на полках), добавление
дополнительных линий к существующему блоку, если он был
отрисован этой программой.
Для установки необходимо распаковать архив в папку, которую
видит AutoCAD и загрузить через "настройку меню"
файл "pblock.mnu".
В "домашнем
задании" между строк было предложение добавить
к программе Trimhalf возможность работы с полилиниями.
Эту задачу практически удалось решить и попутно ещё
добавлены:
- функции работы с различными полилиниями, эллипсами
(эллиптическими дугами) и сплайнами;
- возможность оперативной отмены последних перемещений;
- возможность изменения настроек для каждого перемещаемого
объекта;
- контроль допустимости выбираемых и перемещаемых объектов
Программу Spec Владимир
скачал с
http://Muraviev.narod.ru, как сумел доработал. Для
записи материалов "прицепил" программы
- spkrep от kondrat@tts.lt
- material от http://Muraviev.narod.ru
- MTRL от gepos@mail.ru
- c:сталь чья не знаю
- wndate от gepos@mail.ru (переименовал в dmy)
Для того, чтобы выше перечисленные программы вписались
в Spec, пришлось кое-что изменить...
Подробнее в файле specHelp.txt.
Как поступает
пользователь, когда ему надо нарисовать окружность в центре
прямоугольника? Рисовать диагональ? Использовать координатные
фильтры? Применить отслеживание?
Кроме диагонали я уже ничего не помню.
А если надо рисовать что-нибудь посложнее. Например, сделать
зеркальное отображение относительно оси, которой не существует.
А должна она (эта самая ось) проходить через одну точку,
которая находится как раз посередине концов двух отрезков,
а вторая (точка оси) находится посередине середины третьего
отрезка и касательной к сплайну. Ну как задачка?
Вот и мне надоело диагонали рисовать и всякие вспомогательные
линии построения. А вспоминать координатные фильтры и
прочие хитрости ой как не хотелось. И тут я вспомнил про
такую вещь как функцию CAL.
Она ведь чего-то делает с привязками, вектора, кажется
помогает вычислять.
Ну и попробовал. И получилось. Да так, что и сам не ожидал.
Главное - никаких лиспов писать не надо. Все команды только
на кнопках нарисовать можно. Вышла очень полезная вещь.
Как устанавливать, надеюсь понятно.
Надо только меню установить.
Как работать? Очень просто.
Когда какая-нибудь команда Акада запрашивает точку, нажимаешь
на нужную кнопку этого меню, выбираешь концы, середины,
центра или касательные, и точка автоматически появляется
в рисунке, Акад запрашивает следующую точку (исходная
команда Акада не прерывается), снова давишь на кнопку,
и т д.
Наваял я всего 7 кнопок (считайте 7 промежуточных комманд)
объемом всего полтора килобайта. Мало?
Тогда прочтите описание к функции CAL и сделайте себе
сколько надо.
Удивительно только то, что сама Autodesk ни одного удобоваримого
применения функции CAL не нашла.
Да, чуть не забыл. Обязаательно требуется использование
geomcal.arx, где и сидит эта самая CAL.
Для людей работающих в
MDT6. Рым-Болт - 3D деталь (Mechanical Desktop
6) и таблица с ГОСТ данными на размеры. (в стандартной
поставке MDT6 рым-болтов по ГОСТ - нет)
Программа
отрисовки 2D в ACADе и 3D в MDT6 cтандартных шпилек.
Поддерживаются ГОСТ 22032-76 ... 22043-76. А так-же программу
можно использовать как справочник. Ограничения,
инсталляция, замечание: см. файл aShpilka.txt.
Выход
резьбы, сбеги, недорезы и проточки ГОСТ 27148-86.
Программа справочник по ГОСТу, с возможностью 2D черчения
проточки в ACADе, а также 3D черчения в MDT6. Изменения:
База данных - переписана в простые текстовые файлы.
Реализована возможность черчения 3D. Ограничения, инсталляция, замечание:
см. файл aProto.txt.
программа отрисовки на чертеже
сварки по ГОСТ 2.312-72 Особенности:
Удобство простановки, выбора параметров сварки.
Символ сварки - лидер (Leader), параметры - блок привязанный
к лидеру, следовательно имеется удобство перемещения текста
по полю чертежа.
Программа может работать автономно от АКАДа (без ф-ции
черчения).
Поддержка ГОСТов:
- 14771-76
- 14776-79
- 15164-78
- 15878-79
- 5264-80
- 8713-79
со временем база будет расти.
Размер окон, слой простановки символа сварки, настраиваются
в ini-файле. Инсталляция: Распакуй
в отдельный каталог. Создай кнопку в АКАДе с
командной строкой: ^C^C(startapp "Путь к файлу/aweld.exe").
Смотри внимательно!
Косая в пути - знак деления. Например: d:/alexsoft Замечания: Не работает с AutoCAD 14.
Третья
версия-модификация программы простановки позиций Андрея
Нестерова. Вторая
тут (автор: Косенко Александр Петрович). Изменения:
- параметры текста из "размерного стиля";
- длина линии - индивидуальная для каждой позиции;
- включена привязка вставки размерного текста.
- все параметры настраиваемые.
- программа для расчета,
определения размеров по ГОСТ 13765-86 и черчения пружин
винтовых цилиндрических сжатия из стали круглого сечения
по ГОСТ 13766-86 ... ГОСТ 13776-86. Инсталляция:
Переписать программу и сопутствующие файлы с базой
данных в любой каталог который видит ACAD. Создать
кнопку: ^C^C(startapp "APrugina")
или запускай отдельно. Программные требования:
для черчения - AutoCAD 2000 или выше, MDT 6.
для вывода результатов расчета - MS Word 2000 и выше.
AZubPer
v2.01 - программа для расчета геометрических параметров
"Передач зубчатых цилиндрических эвольвентных ГОСТ 16532-70"
. Инсталляция: Распакуй, запусти, работай.
ВАЖНО: Для получения бумажной копии результата
расчетов, должен быть инсталлирован MS Word 97 или выше.
Шрифт листинга - АНСИ кодировка, следовательно если Word
с кодировкой Юникод используй шрифт Pragmatica, SchoolBook
или аналогичный.
ASymbol v.3.1
- программа отрисовки на чертеже стандартных графических
элементов:
- шероховатости (ГОСТ 2.309-73);
- допуск формы и расположения (ГОСТ 2.308-73);
- обозначение сварных швов (ГОСТ 2.312-72);
- маркирование и клеймение (ГОСТ 2.314-68);
- виды, разрезы и сечения (ГОСТ 2.305-68);
- неразъемные соединения (пайка, склейка, сшивка ...)
(ГОСТ 2.313-82);
- разрыв длинных элементов (зигзаг, свободный, трубный);
- маркировка однотипных отверстий (ГОСТ 2.307-82). Требования:
Текущий стиль текста должен иметь 0.0 высоту. Высота текста
соответствует высоте указанной в dimtxt.
В процессе выполнения запросов программы нельзя выполнять
другие команды ACADа (например: На запрос указать точку,
дать команду Zoom, а затем указать точку). Инсталляция:
Переписать в любой каталог который видит ACAD. Создать
кнопку:
^C^C(startapp "ASYMBOL")
Программа независима, до прекращения работы находится
на нижней панели экрана. Второй экземпляр программы не
запускается. Текущие установки программы запоминаются
в *.ini файле.
Установите размер окна программы под свое разрешение монитора.
При выходе из программы это значение будет запомнено.
aDimEdit - программа
корректировки размеров.
Простановка знака диаметр, градус, симметричного допуска,
нижних и верхних допусков, звездочки (размер для справок).
По моему удобнее и красивее, чем стандартными средствами. Инсталляция: Переписать два файла aDimEdit.lsp,
aDimEdit.dcl в любой каталог который видит ACAD. Создать кнопку: ^C^C(load "aDimEdit") dea ВАЖНО: Если в поле "Текст" нет размерного текста
ставь <>
aEdMulti - программа
корректировки многострочного текста созданного командой
DTEXT (MTEXT - не поддерживает). Выбираете несколько
строк текста (можно окном). Они записываются в создаваемый
внешний файл "edacad.$$$". Автоматически запускается
стандартный редактор текста "Блокнот (NotePad)". И корректируй
как хочешь.
На вопрос "Редакция завершена?" жми "Ввод". Инсталляция: Переписать файл aEdMulti.lsp в любой
каталог который видит ACAD. Создать кнопку: ^C^C(load "aEdMulti") aEdM ВАЖНО:
а) После корректировки при выходе из Блокнота не забудь
нажать кнопку "Сохранить изменения".
б) В строке листинга программы aEdMulti.lsp под номером
35 стоит строка (setq name "c:\\temp\\edacad.$$$") указывающая
маршрут записи временного файла "C:\TEMP\" хочешь другой
исправляй сам.
в) Количество строк неизменно. Т.е. выбрал в редактор
10 строк. Изменил на 6.
На выходе в чертеже все равно останется 10 строк. 4
последние без изменения. Если в редакторе сделал 12
строк. На чертеже две последние не появятся.
aMoveTxt - программа
для изменения положения, выравнивания по левому краю
и установке межстрочного интервала многострочного текста
созданного командой DTEXT (MTEXT - не поддерживает).
Программа для тех кто работает как я. Создает пару строк
командой DTEXT. Потом при необходимости добавить текст
копирую пару строк ниже без соблюдения интервала и выравнивания,
потом просто выравниваю данной программой. Инсталляция: Переписать два файла aMoveTxt.lsp,
aMoveTxt.dcl в любой каталог который видит ACAD. Создать кнопку: ^C^C(load "aMoveTxt") aMT
ATexTreb v.2.0.1
- программа для простановки технических требований
(ТТ) в чертеж AutoCADа.
Интуитивно понятный интерфейс позволяет работать без изучения
документации на программу. Инсталляция:
- Переписать программу и сопутствующие файлы с ТТ (модифицируемые)
в любой каталог который видит ACAD.
- Создать кнопку: ^C^C(startapp "ATexTreb")
или запускай отдельно. Благодарность:
Косенко Александру за советы и замечания. Но все-же
моя лень оказалась сильнее.
Сборник из 3-х
программ СIRCLE предназначена для построения
резьбовых отверстия. Вызывается командой CRC. COP_ROT
предназначена для копирования объекта после поворота вокруг
данной точки. Вызывается командой COP_ROT. HOLE
для построения пазов с возможностью поворотом вокруг
данной точки. Вызывается командой HOLE.