|
|
| Другие темы раздела | |
|
AutoLISP Просьба прокомментировать готовую программу на AutoLisp
https://www.cyberforum.ru/ autolisp/ thread1711145.html (defun fillPoints (n l o i d) (if (= i n) (list (polar o d l)) (cons (polar o (+ (/ (* pi 2 i) n) d) l) (fillPoints n l o (+ i 1) d)) ) ) (defun drawPolygon (points) (if (cdr points) (or (command "_line" (car points) (cadr points) "") |
AutoLISP AutoLisp (Autocad 2010) Задача по помещению окружностей в центр треугольника Суть задания: нужно создать такую функцию, которая бы просматривала все элементы на чертеже, выбирала круги радиуса, меньше указанного и запихивала их в центр первого найденного треугольника. Исходя из того, что мне не понятно: 1) Как найти (определить) треугольник? 2) Как как найти его центр? Далее я справлюсь. (DEFUN GETVALN (S K) (COND |
| AutoLISP AutoLisp для вершин полилиний Здравствуйте! Помогите, пожалуйста, написать Лисп-код, который у выбранной полилинии от всех вершин, начиная со второй проводит полилинии вниз длиной, например, 200мм. Должно получиться как на рисунке. Т.е. алгоритм примерно такой: выбрать полилинию, программа определяет начало линии (так можно?), начиная со второй вершины, строятся полилинии вниз длиной 200 мм со свойствами слоя. https://www.cyberforum.ru/ autolisp/ thread1637936.html |
AutoLISP AutoLisp, поменять порядок цифр числа
https://www.cyberforum.ru/ autolisp/ thread1634253.html Необходимо перевернуть натуральное число n в том случае, если в него входит цифра 3. Я смог только проверить число на наличие тройки, а вот с переворотом беда. Помогите пожалуйста. (DEFUN REV(X) (COND ((< X 10) (COND ((= X 3) T) (T nil))) ((= (REM X 10) 3) T) (T (REV (FIX (/ X 10)))))) |
|
Построить 2 фигуры AutoLISP Здравствуйте, помогите построить 2 фигуры(отдельно) через AutoLisp. Первая - фигура в виде чашки, ввторая - в виде гриба, особых параметров или указаний нет, спасибо большое. |
AutoLISP AutoLisp Программирование с использованием двумерных списков Собственно, предыстория. Выбирая профессию для учебы, сильно лоханулся и начиная со второго курса мало что понимаю. Прошу помочь, возможно кому-то это легко. Помогите сдать сессию:cry: В данной вещественной квадратной матрице порядка N найти сумму элементов строки, в которой расположен элемент с наименьшим значением. Предполагается, что такой элемент един-ственный. https://www.cyberforum.ru/ autolisp/ thread1603856.html |
|
AutoLISP AutoLisp относительные координаты
https://www.cyberforum.ru/ autolisp/ thread1603763.html Всем привет! Есть команда (command "pline" A "@10<45" "@10<0" "@-10<45" "") Она отлично работает при использовании константных значений в записи координат. Подскажите, каким образом возможно вместо констант задать переменные. Спасибо. |
AutoLISP Отрисовка поверхности трохоиды (AutoLISP, 3dmesh) Помогите разработать программу отрисовки поверхности с использованием команды “3dmesh”. Команда 3dmesh строит поверхность с помощью сетки (mesh): Command: 3dmesh M: число N: число Point(1,1): x,y,z Point(1,2): x,y,z ………… Point(2,1): x,y,z ……………… |
|
AutoLISP Обход двумерного массива на AutoLisp
https://www.cyberforum.ru/ autolisp/ thread1589303.html Преподаватель задал задачку. Необходимо совершить обход массива в соответствии с картинкой. Массив задается как список подсписков: каждая строка - подсписок. Буду очень благодарна, если натолкнете на светлые мысли. Пока из идей только совершить обход в прямом порядке, выводя элементы в подписки, потом это дело повернуть и избавиться от вложенности. Но до самой самой сути обхода дойти пока не... |
AutoLISP AutoLISP работа с файлом
https://www.cyberforum.ru/ autolisp/ thread1575349.html Здравствуйте! Необходимо реализовать вывод и ввод в файлы. Программа чертит заданную по условию фигуру и проверяет попадает ли точка в заштрихованную область. Пользователь может выбрать вводить ли ему точку самому (с клавиатуры), либо ввести точку из файла (где я и застряла). Точка введённая пользователем с клавиатуры должна быть записана в файл (тут тоже не лучше). В общем не получается у меня с... |
|
AutoLISP Autolisp, построение семейства фигур Никак не могу отладить код готовой программы, то, что должно получится приложил. (defun ID () (setq P1 (getpoint "\n Нач. точка:")) (setq L (getdist P1 "\n Нач. длина:")) ) (defun QUADR (L A / P2 P3 P4) (setq P2 (polar P1 A L)) (setq PЗ (polar P2 (+ А (/ PI 2)) L)) (setq P4 (polar PЗ (+ A PI) L)) |
AutoLISP Построение соприкасающихся окружностей в Autolisp Помогите пожалуйста с заданием: Построение параметрических чертежей в среде AutoCAD 2010 Задание: По радиусу R и натуральному числу N построить рисунок из N соприкасающихся окружностей радиуса R, причем центры этих окружностей должны лежать на окружности с заданным центром. https://www.cyberforum.ru/ autolisp/ thread1568792.html |
|
188 / 155 / 17
Регистрация: 18.12.2015
Сообщений: 179
|
||||||
| 08.02.2017, 12:35 | 0 | |||||
AutoLISP; как сделать так, чтобы функции princ , prin1 и print печатали аргумент ПО ОДНОМУ РАЗУ - AutoLISP - Ответ 1009042808.02.2017, 12:35. Показов 3356. Ответов 7
Метки (Все метки)
Ответ
Вот ещё вариант:
Вернуться к обсуждению: AutoLISP; как сделать так, чтобы функции princ , prin1 и print печатали аргумент ПО ОДНОМУ РАЗУ AutoLISP
2
|
||||||
| 08.02.2017, 12:35 | |
|
Готовые ответы и решения:
7
Пройдите в квадрате от клеточки 1 к клеточке 2 так, чтобы посетить все клеточки по одному разу |
| 08.02.2017, 12:35 | |
| 08.02.2017, 12:35 | |
|
Помогаю со студенческими работами здесь
0
Как сделать так, чтобы при масштабировании объекта, объект расширялся только по одному вектору Нужно сделать так, чтобы программа запускалась только если ей передать заданный аргумент.
Как сделать так, чтобы функции были не вложенными?
|