0 / 0 / 0
Регистрация: 13.08.2016
Сообщений: 6
|
|
1 | |
Необходимо начертить 5 кругов разного цвета с одним центром, указанным курсором на экране13.08.2016, 07:56. Показов 1457. Ответов 8
Метки нет (Все метки)
Здравствуйте. Не знаю, имею ли я право обратиться к специалистам с просьбой сделать программку на LISP для Autocad (Nanocad), но хотелось бы получить помощь.
Есть таблица Эксель, вставленная в Autocad c 5-тью значениями диаметров. Необходимо начертить 5 кругов разного цвета с одним центром, указанным курсором на экране, и заданной толщиной линии.
0
|
13.08.2016, 07:56 | |
Ответы с готовыми решениями:
8
Сформировать на экране N кругов (красного цвета) и N ромбов (синего цвета) Изобразить три вертикальные полосы разного цвета на экране, которые меняют свои цвета Модуль GRAPH: Начертить на экране узор из 100 окружностей случайного диаметра и цвета Набор ромбов разного цвета, соединенных одним углом в общем центре, вращаются против часовой стрелки |
0 / 0 / 0
Регистрация: 13.08.2016
Сообщений: 6
|
|
13.08.2016, 09:51 [ТС] | 3 |
Я конечно извиняюсь. Но проблема в том, что я не программист и не знаком с языком Лисп. А эти круги должен чертить человек не знакомый с программой Автокад. Поэтому хотелось бы, чтобы он ввел значения диаметров и нажатием кнопки на определенном месте экрана получил эти круги. Спасибо. Еще раз извините.
0
|
Почетный модератор
|
|
13.08.2016, 10:48 | 4 |
а я вас ни в чем и не обвинял, чтобы вы извинялись.
я задал встречный вопрос и все. вариантов два - вы создаете тему с подробным описанием, или если хотите ваши сообщения вынесу в отдельную тему, и ждете когда кто то откликнется, рисовать в автокаде я как инженер умею, но с лиспом у меня тоже напряг, да и не нужен он мне. или вы готовите кошелек (или тот человек которому это нужно) и обращаетесь к фрилансерам. а нет - вариант три - срочно изучаете лисп и делаете сами.
0
|
0 / 0 / 0
Регистрация: 13.08.2016
Сообщений: 6
|
|
13.08.2016, 19:02 [ТС] | 5 |
Господа, нужна помощь.
Имеется таблица, надо начертить 5 кругов с радиусами, указанными в таблице. присвоить толщину линии и цвет. У меня получилось так (см. вложения). На большее ума не хватает. Помогите. Заранее благодарен.
0
|
0 / 0 / 0
Регистрация: 13.08.2016
Сообщений: 6
|
|
14.08.2016, 10:36 [ТС] | 6 |
получилось так.
defun c:5KR (/ p1 R1 R2 R3 R4 R5) (SETQ p1 (getpoint "\nПоказать центр:")) (SETQ R1 (getreal "\nЗадать_R1:")) (setq R2 (getreal "\nЗадать_R2:")) (setq R3 (getreal "\nЗадать_R3:")) (setq R4 (getreal "\nЗадать_R4:")) (setq R5 (getreal "\nЗадать_R5:")) (setvar "celweight" 50) ;толщина линии 0,5 (command "_color" 240) ; цвет линии красный (command "_circle" p1 R1) (command "_color" 160) ; цвет линии синий (command "_circle" p1 R2) (command "_color" 100) ; цвет линии зеленый (command "_circle" p1 R3) (command "_color" 210) ; цвет линии фиалетовый (command "_circle" p1 R4) (command "_color" 130) ; цвет линии голубой (command "_circle" p1 R5) ) ; end_defun Не могу задать радиусы автоматически из таблицы. Помогите, пожалуйста.
0
|
1046 / 967 / 153
Регистрация: 10.08.2015
Сообщений: 5,224
|
|
15.08.2016, 01:32 | 7 |
почитай про COM... в гугле есть ответ на твой вопрос, меньше ленись а больше ищи и все получится
0
|
0 / 0 / 0
Регистрация: 13.08.2016
Сообщений: 6
|
|
15.08.2016, 07:17 [ТС] | 8 |
Дорогой, vlisp. А конкретнее можно для чайника. Что такое СОМ? И как его найти в ГУГЛ?
0
|
0 / 0 / 0
Регистрация: 13.08.2016
Сообщений: 6
|
|
20.08.2016, 20:32 [ТС] | 9 |
Всем спасибо, тему можно закрыть, прогу сочинил методом тыка.
(defun c:UU (/ p1 R1 R2 R3 R4 R5 obj k y v m h) (setq k 1 y 2 v 3 m 4 h 5) (vl-load-com) (if (setq obj (car (entsel))) (progn (setq obj (vlax-ename->vla-object obj)) (if (= (vla-get-ObjectName obj) "AcDbTable") (setq R1 (vla-GetText obj k 1) R2 (vla-GetText obj y 1) R3 (vla-GetText obj v 1) R4 (vla-GetText obj m 1) R5 (vla-GetText obj h 1))))) (SETQ p1 (getpoint "\nПоказать центр:")) (setvar "celweight" 50) ;толщина линии 0,5 (command "_color" 240) ; цвет линии красный (command "_circle" p1 R1) (command "_color" 160) ; цвет линии синий (command "_circle" p1 R2) (command "_color" 100) ; цвет линии зеленый (command "_circle" p1 R3) (command "_color" 210) ; цвет линии фиалетовый (command "_circle" p1 R4) (command "_color" 130) ; цвет линии голубой (command "_circle" p1 R5) ) ; end_defun
0
|
20.08.2016, 20:32 | |
20.08.2016, 20:32 | |
Помогаю со студенческими работами здесь
9
Имеются n досок разного цвета. Необходимо выбрать из них не менее k досок одного цвета длиной не менее h сантиметров При попытке переустановить ОС когда вылазит окошко чтобы выбрать язык на экране появляются полосы разного цвета и окно размножается Нарисовать несколько окон разного цвета и разного размера в разных местах Рисование квадратов разного размера, разного цвета и появляющихся в произвольных местах экрана Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Опции темы | |
|
Новые блоги и статьи | |||||
Книги и учебные ресурсы по C#
InfoMaster 08.01.2025
Базовые учебники и руководства
Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .
|
Что такое NullReferenceException и как исправить?
InfoMaster 08.01.2025
NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .
|
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
|
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
|
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
|
Использование GraphQL в Go (Golang)
InfoMaster 08.01.2025
Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
|
Что лучше использовать при создании класса в Java: сеттеры или конструктор?
Alexander-7 08.01.2025
Вопрос подробнее:
На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .
|
Как работать с GraphQL на TypeScript
InfoMaster 08.01.2025
Введение в GraphQL и TypeScript
В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .
|
Счётчик на базе сумматоров + регистров и генератора сигналов согласования.
Hrethgir 07.01.2025
Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
|
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален
В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
|
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
|
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели
В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
|