| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Товарищи! помогите с лиспом

Товарищи! помогите с лиспом

Закрытая тема
Поиск в этой теме
Непрочитано 13.06.2007, 19:34
Товарищи! помогите с лиспом
САПР
 
волжский
Регистрация: 20.02.2007
Сообщений: 14

доброго времени суток всем присутствующим. очень нужна ваша помощь. задачка по лиспу такова:
нужно написать програмку на лиспе, которая бы строила параболоид, потом делала бы его сечение.
далее мы задаем горизонтальную линию на определенной высоте от начала сечения параболоида (сечение просто в виде параболы - без штриховки), у нас строится горизонтальная линия на заданной высоте,
она пробегает само сечение и возвращает длину между точками, которые являются пересечением параболы и линии.
т.е. нам нужно получить расстояние м/у точками х1 и х2 (см. рисунок).
помогите пожалуйста с этой задачкой :cry: - буду очень признателен .
чтобы показать что я хоть чего то начинал делать-выкладываю лисп-код, который якобы строит сечение параболоида(см. файл)

ps: было бы замечательно построить синусоиду, затем задавать эту горизонтальную линию и получать не только результат м/у точками х1 и х2, но и м/у х3 и х4 и т.д., т.е. накапливать результаты пробега линии по синусоиде.(выводить результаты отдельно каждый требуется). кто сможет-помогите пожалуйста.

[ATTACH]1181748895.rar[/ATTACH]
Просмотров: 6905
 
Непрочитано 26.06.2007, 17:15
#21
sersgey_r

Учусь писать прогри на лиспе
 
Регистрация: 15.06.2007
Таганрог
Сообщений: 8


Цитата:
Сообщение от Кулик Алексей aka kpblc
А я даже и не заметил. Все подряд посты править я точно не буду
Кстати, sersgey_r, это намек
это быстрые пальцы и плохое внимание
а потом прикольно так )
пусть думают что хотят
но за помощь спасибо, очень помог
sersgey_r вне форума  
 
Непрочитано 26.06.2007, 17:59
#22
Zouss


 
Регистрация: 14.03.2006
Сообщений: 863


забавная ориентация у вас в профиле
Цитата:
Учусь писать прогри на лиспе
это про грибы или про быстрые грипсы?
про удаление текста можно сделать так:
сразу после (command "TEXT" "_J" "_M" sp 3.0 0 ss3)
написать (setq doomed_text_ename (entlast))
после чего в нужном месте программы (entdel doomed_text_ename)
Zouss вне форума  
 
Непрочитано 27.06.2007, 07:21
#23
sersgey_r

Учусь писать прогри на лиспе
 
Регистрация: 15.06.2007
Таганрог
Сообщений: 8


Цитата:
Сообщение от Zouss
забавная ориентация у вас в профиле
Цитата:
Учусь писать прогри на лиспе
это про грибы или про быстрые грипсы?
про удаление текста можно сделать так:
сразу после (command "TEXT" "_J" "_M" sp 3.0 0 ss3)
написать (setq doomed_text_ename (entlast))
после чего в нужном месте программы (entdel doomed_text_ename)
Хорошо когда есть люди умные вот подскажут, поддержат, так и писать на лиспе писать не страшно станет )
sersgey_r вне форума  
 
Непрочитано 27.06.2008, 18:20
#24
Говард Тич

конструктор
 
Регистрация: 18.07.2007
Москва
Сообщений: 161


сделал макрос для рисования линии на определенном слое
^C^C(setq CL (Getvar "Clayer"));_-la;_set;Wall;^C;;;^C^C_line;\\;(setvar "clayer" CL)-все прекрасно работает

Пробую такое же сделать в лисп-файле-не получается
(defun C:fw ()
(setq CL (Getvar "Clayer"))
(command "_layer" "_set" "Wall" "")
(command "_line")
(setvar "clayer" CL)
)

Слой не нужно создавать.
Автокад 2004
Говард Тич вне форума  
 
Непрочитано 27.06.2008, 19:39
#25
stroygeodezia


 
Регистрация: 03.06.2008
Сообщений: 43


У Вас в макросе стоят два "слэша" "\\", это пауза для ввода данных.
Попробуйте добавить две "pause" в (command "_line")

Пробуйте!!!
stroygeodezia вне форума  
 
Непрочитано 11.02.2019, 08:38
#26
Зодчий1989


 
Регистрация: 09.01.2013
Сообщений: 127


Добрый день всем. Дабы не плодить темы прошу помощи тут.
Необходим Лисп для облегчения жизни архитекторов.
Исходные данные:
1) Полилинии и площади проставленные в них полями ACADa.
2) Блок с атрибутами для вписывания жилой и общей площади.
Задача.
Просуммировать поля уже непосредственно в блоке с последующей связью и изменением значений автоматически.

Как я это вижу.
1) Запуск LISPa.
2) Выбор блока, в который будет суммироваться площадь\ Enter
3) Выбор площадей жилой части помещения\ Enter
4) Выбор площадей(оставшихся) нежилой части\ Enter
5) Завершение работы LISPa с записью в атрибуты блока сумм площадей.
P.S. еще бы всем выделенным объектам назначать цвет индивидуальный, дабы видеть связь. или другой вид визуального контроля

Конечно же не за спасибо.

ACAD 2016. Пример.dwg

Последний раз редактировалось Зодчий1989, 11.02.2019 в 08:59.
Зодчий1989 вне форума  
 
Непрочитано 11.02.2019, 08:47
| 1 #27
Boxa

КЖ; C#
 
Регистрация: 03.11.2005
Санкт-Петербург
Сообщений: 2,588


Цитата:
Сообщение от Зодчий1989 Посмотреть сообщение
Необходим Лисп для облегчения жизни архитекторов
А если точнее, то Вы просите за спасибо написать Вам программу для автоматизации составления квартирографии и эта программа нужна не Вам, а архитекторам и явно нужна не для развлечения, а для зарабатывания денег... Я все правильно понял?
С такой постановкой задачи, вот прямо очень хочется отправить Вас сюда: http://forum.dwg.ru/forumdisplay.php?f=33 , если я ошибся, то показывайте свой код и поясняйте, что именно у Вас не получается и в чем.

ЗЫ.
Рекомендую чистить файлы, прежде чем выкладывать их в доступ, факт наличия штампов и подписей в публичном файле, не выглядит достаточно обоснованным...
Boxa вне форума  
 
Непрочитано 11.02.2019, 09:00
#28
Зодчий1989


 
Регистрация: 09.01.2013
Сообщений: 127


Спасибо.

Цитата:
Сообщение от Boxa Посмотреть сообщение
вот прямо очень хочется отправить Вас сюда
Обязательно схожу туда.
Зодчий1989 вне форума  
Закрытая тема
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Товарищи! помогите с лиспом

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск