|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
|
||||
Регистрация: 03.12.2009
Сообщений: 84
|
Цитата:
Подскажите (или ссылку на страницу этой темы, уверен, что обсуждалось на одной из 185 страниц), как редактировать примитивы внутри блоков. Интересует вариант с взрыванием и без. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,844
|
Взрывать точно не надо. А так - в готовых программах "Работа с подосновой", в библиотеке функций - "Нормализация блоков"
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
работа все больше удивляет Регистрация: 24.02.2012
Украина
Сообщений: 13
|
Здравствуйте! О лиспе и программировании только слышала, поэтому мой вопрос задаю здесь.
Есть программа, написанная в лиспе. Это расчет. Хотелось бы иметь то же самое, только в php. Есть человек, готовый сделать в php, но абсолютно не знакомый с лиспом. Вопрос у меня такой: как сделать задание для выполнения расчета на php? Точнее, как вычленить данные для задания из программы, написанной на лиспе? Вообще технически это реально сделать, если я в этом не в зуб ногой? |
|||
|
||||
Регистрация: 10.08.2013
Сообщений: 11,041
|
Цитата:
Если программа не скомпилирована, то исходный код открыт. Только зачем - PHP и лисп даже по синтаксису разные. Дайте человеку набор исходных данных, методику расчета и форму выходных отчетов. |
|||
|
||||
Регистрация: 24.03.2011
Сообщений: 12
|
Во всех учебниках написано что функция (ssget< точка >) формирует набор из всех примитивов проходящих через точку.
Вот простенький код: (command "_pline" '(10 10) '(-10 -10) "") (command "_pline" '(-10 10) '(10 -10) "") (setq obj (ssget '(0.0 0.0))) (setq b (sslength obj)) На выходе я получаю b=1. Что я не так делаю? Почему выбирается только один примитив, а не два? |
|||
|
||||
|
||||
|
||||
Регистрация: 24.03.2011
Сообщений: 12
|
Вот собственно цитата из Полищука.....
https://ibb.co/vPV05jd А методом научного тыка удалось установить, что выбирается примитив лежащий выше ... |
|||
|
||||
Регистрация: 24.03.2011
Сообщений: 12
|
Извините, но я опять заблудился в трех соснах)))
Вот простенький код: (setq z (cdr (assoc 11 (entget (car (entsel "ВЫБОР : \n")))))) (if (= z '(0.0 0.0 0.0)) (setq k "да") (setq k "нет") ) Делается выбор текста. На выходе К всегда НЕТ. Вот картинка: https://ibb.co/r33s2Pv Что у меня не так? |
|||
|
||||
Самому стыдно, не знаю базовых вещей, хоть и умудрился что то написать/адаптировать для своих скромных нужнд. Может быть просто давно не занимался автолиспом. Разбираю вот такой кусок кода:
Код:
Я пытался так: Код:
Код:
|
||||
|
||||
Регистрация: 05.09.2007
RUSSIA
Сообщений: 165
|
Попросили помочь определить через Лисп функцию, созданную на VBA. Не получается.
Если просто запустить - работает. Код:
Код:
Команда: _appload Name2.lsp успешно загружено. Команда: ; ошибка: считан неверный символ (восьмеричный): 0 В чем тут дело? |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,844
|
baaba, а что за код у Normal3points ?
mkung, попробуй через vla-runmacro: https://knowledge.autodesk.com/searc...2C707-htm.html
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
поди выдает ; ошибка: no function definition: NORMAL3POINTS ??
В таком виде никто код не проверит, потому что отсутствует описание функции Normal3points используемой в твоей IsInTriangle теоретически правильно первый вариант:
__________________
Не труд сделал из обезьяны человека, а лень и жажда халявы... |
||||
|
||||
|
||||
|
||||
Регистрация: 05.09.2007
RUSSIA
Сообщений: 165
|
Цитата:
Код:
То есть если я в командную строку ввожу выражения - работает. Если записываю их в Лисп-файл и загружаю - ошибка. Последний раз редактировалось mkung, 29.01.2019 в 12:58. |
|||
|
||||
Когда все функции загружены, нормально возвращает t/nil в зависимости попадает точка в треугольник или нет...
__________________
Не труд сделал из обезьяны человека, а лень и жажда халявы... |
||||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,844
|
mkung, я не работаю с VBA внутри ACAD (и никому не советую). VBA-Enabler у меня не установлен уже неизвестно сколько времени. Так что проверить не могу и вряд ли когда-нибудь смогу.
По сообщению непонятно, в каком месте вообще ошибка - может, в загрузке, может, в вызове. Кстати: https://www.afralisp.net/archive/met...cro_method.htm ----- добавлено через 40 сек. ----- И туда же, из официальной справки: после загрузки почему-то вызывается не просто имя процедуры: Код:
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
LISP. Вставка в таблицу поля, соотвествующего площади примитива | Profan | Готовые программы | 272 | 06.06.2021 23:12 |
Сейсмозащита и сейсмоизоляция существующих, построенных зд. | IANationalInformAgentstvo | Прочее. Архитектура и строительство | 216 | 20.01.2015 16:51 |
Мониторы LCD CRT | Разное | 94 | 17.06.2008 10:51 | |
ЮМОР 2006 =) | Perezz!! | Разное | 1122 | 04.01.2007 00:46 |