[Ingpro]

Решение см. пост #30.
Возможно ли с помощью лисп загружать (выбранный в файле DWG) текст с названием лиспа и сразу быть в команде.
Т.е. так: у меня в файле DWG есть тексты с названием лиспов, я кликаю по тексту, не выделяя его,
и лисп с таким названием загружается (из папки Support) и команда активна. Просто есть лисп-программы, которыми не часто пользуешься, поэтому нет смысла добавлять их а в автозагрузку, а так по мере надобности загружать, по-моему, удобно...
Просто таких лиспов много и надо каждый раз - ЗАГПРИЛ, потом скопировать название команды, потом
вставить в командную строку... И даже, если все лиспы в автозагрузке - зайти в папку, скопировать
название команды, потом - в командную строку...

[Кулик Алексей aka kpblc]

Сообщение от kp+ Но нельзя ли все мелкие редко используемые лиспы скомпилировать в один файл fas

Самое главное не упереться в ограничение файла проекта в 64 кб )

[kp+]

Сообщение от Ingpro Может и можно, но я не знаю как...

Все меню "проект" лисп-редактора к вашим услугам.
Создать новый проект, в свойствах добавить к нему все нужные файлы, собрать компилированный fas файл.

Offtop: Почти как засунуть бегемота в холодильник: открыть холодильник, засунуть бегемота, закрыть холодильник

Сообщение от Кулик Алексей aka kpblc Самое главное не упереться в ограничение файла проекта в 64 кб )

Для "30-40" мелких lsp-файлов это вряд ли случится. Разве что их будет 30-40 тысяч. Но такого даже в полной версии ruCAD не было, кажется

[Кулик Алексей aka kpblc]

Сообщение от kp+ Все меню "проект" лисп-редактора к вашим услугам. Создать новый проект, в свойствах добавить к нему все нужные файлы, собрать компилированный fas файл.

Просто так не получится: редактор после закрытия принудительно обрубает файл описания проекта, если он хотя бы на байт превышает 64 кб. И проект становится некомпилируемым.

[kp+]

И сколько исходных файлов надо, чтоб достичь этого предела? В нем же просто перечень исходных файлов с какими-то служ. пометками, указаниями по компиляции, так?
Понимаю, что на серьезном большом проекте этот файл теоретически может разрастись, но здесь не тот масштаб.
Опять же, при многотысячном количестве исходников будет играть роль даже длина пути к файлам, а при нескольких десятках - хоть в "мои документы" положи, не страшно.

[Ingpro]

Сообщение от kp+ в свойствах добавить к нему все нужные файлы

Можно пример из одной строчки? В каком виде это должно быть.

[kp+]

Тут одной строчкой не обойдешься, картинки надо. Если просто ради интереса поклацать пункты меню не хотите.
Сейчас не возле компа с акадом, не с чего делать снимки экрана.
Но в хелпе вроде нормально написано;

https://help.autodesk.com/view/OARX/...4-B9774B961F3C

[Кулик Алексей aka kpblc]

Сообщение от kp+ И сколько исходных файлов надо, чтоб достичь этого предела? В нем же просто перечень исходных файлов с какими-то служ. пометками, указаниями по компиляции, так? Понимаю, что на серьезном большом проекте этот файл теоретически может разрастись, но здесь не тот масштаб. Опять же, при многотысячном количестве исходников будет играть роль даже длина пути к файлам, а при нескольких десятках - хоть в "мои документы" положи, не страшно.

Мое дело предупредить С другой стороны, не сильно сложно написать загрузчик всего и вся, и положить его в mnl

[name02]

Сообщение от Ingpro А если из кода убрать макросы и прописать путь к папке Support, это сработает?

Не сработает, так как пока lisp-файл не загружен в автокад, то соответственно автокад ничего про него не знает - команда T2M будет для него будет бессмысленна.
Можно не писать полный путь к файлу, если файл лежит в путях поддержки. Но имя файла все равно нужно писать:

Код:

[Выделить все]

 (cons
 "T2M" ;"псевдоним" - текст, который содержится в мультитексте
 (cons
  "t2M"	;имя команды, которая запускает макрос из файла, лежащего в путях поддержки
  "Text2MTextV2-0.lsp"
 ) ;_ END_OF cons
) ;_ END_OF cons

[Ingpro]

Сообщение от name02 Можно не писать полный путь к файлу, если файл лежит в путях поддержки

Спасибо, name02, Ваш код наиболее близок для моей задачи... Буду пробовать разные варианты...

[Ingpro]

Ответили на форуме cadtutor , спасибо Lee Mac! Лисп "ctext" во вложении.
https://www.cadtutor.net/forum/topic...g-and-pasting/

То есть теперь появилась возможность вставить (просто кликнуть по тексту) свою команду загрузки лисп в командную строку типа:

Код:

[Выделить все]

 (_autoload "Setka")(c:Setka)

Я ставлю лисп Lee на цифру 1 (например) в acad.pgp:
1, *ctext
и загрузка лисп-команды происходит в 2 клика, и команда сразу активна, и лисп не добавлен в автозагрузку.
Это особенно удобно (IMXO) для многофункциональных лиспов, таких как "PLTOOLS", "bgtools 3.12a", "SumT",
в которых множество разных команд для вызова. Мне, к примеру, оттуда надо 3-5 команд и я их записываю в виде:

Код:

[Выделить все]

 (_autoload "PLTOOLS")(c:PL-L2A)

Код:

[Выделить все]

 (_autoload "PLTOOLS")(c:MPL)

Для "bgtools 3.12a" такая запись не работает (не знаю причину),
работает такая строка с вызовом:

Код:

[Выделить все]

 (if (not c:bgtools 3.12a) (load "bgtools 3.12a.lsp" nil)) (if c:BGBLCC (c:BGBLCC))

такого же типа строки нужно применять для файлов с расширением (.fas) и (.vlx), например (также благодарность Lee Mac!) :

Код:

[Выделить все]

 (if (not c:dimtext_bgmask) (load "dimtext_bgmask.fas" nil)) (if c:dimtext_bgmask (c:dimtext_bgmask))

Я могу в своем файле .dwg или шаблоне .dwt создать сколько угодно строчек для вызова лисп-команд,
при этом я освобождаю автозагрузку.

[Кулик Алексей aka kpblc]

И на что только люди не пойдут... Сделать собственное меню с mnl-файлом не судьба? И заставить mnl грузить сколько угодно приложений откуда угодно?Это же не нанокад, тут все элементарно.

[Ingpro]

Сообщение от Кулик Алексей aka kpblc Сделать собственное меню с mnl-файлом не судьба?

...mnu, cui... Загрузка/выгрузка работает нестабильно...

[Кулик Алексей aka kpblc]

У меня подобная схема, правда, доработанная до относительного ума, корректно работает на 2013, 2016, 2018 - 2021 независимо от локализации.
Все эти mnu, cui, cuix - это головняк? Ну если не попробовать ни разу то естественно.
Слетают панели? wsautosave.
Никогда не знаешь что произойдет? Ну при такой конкретике, конечно, ничего не скажешь.
Загрузка / выгрузка работает нестабильно? Угу, ага, конечно. Типа оно будет гарантированно работать при подходе "че-то сделать на основании текста". Да я тебе механизм порушить смогу в 5 секунд, тупо добавив в многострочник форматирование.
В общем, если человеку сильно хочется геморроя, тут я бессилен.

[1958]

Сообщение от Ingpro Все эти mnu, cui, cuix - это головняк. Загрузка/выгрузка работает нестабильно, часто выдает ошибку 404, да ещё и панели слетают, никогда не знаешь, что произойдет... Возможно это зависит от локализованной версии, у меня AutoCAD 2015 rus...

Прошу прощения, но это чушь собачья! Загружать лиспы через задницу текст в чертеже - это, конечно, очень мудро и изящно. Lee Mac, наверно долго смеялся на вашими потугами, и в конце концов, сжалившись, накопал код. Я следил за этой темой на cadtutore, там неоднократно вам предлагали вариант с меню. Но хозяин-барин, ему надо, как он сказал.

[zenon]

Сообщение от Кулик Алексей aka kpblc У меня подобная схема, правда, доработанная до относительного ума, корректно работает на 2013, 2016, 2018 - 2021 независимо от локализации. Все эти mnu, cui, cuix - это головняк? Ну если не попробовать ни разу то естественно. Слетают панели? wsautosave. Никогда не знаешь что произойдет? Ну при такой конкретике, конечно, ничего не скажешь. Загрузка / выгрузка работает нестабильно? Угу, ага, конечно. Типа оно будет гарантированно работать при подходе "че-то сделать на основании текста". Да я тебе механизм порушить смогу в 5 секунд, тупо добавив в многострочник форматирование. В общем, если человеку сильно хочется геморроя, тут я бессилен.

Ну почему, вполне может быть, особенно если у юзера на базе Autocad полный зоопарк (вертикалки, навески, расширения и прочая).
Один СПДС графикс чего стоит со своими постоянными изменениями настроек и системных переменных.