[Kavalergrad]

Нашел в интернете Лисп "Самый примитивный кабельный журнал", но никак не получается его запустить.
На команду (asd) он выдает ; ошибка: no function definition: ASD. В чертеже созданы слои kb и kdlа в блоке атрибут PZ.
В строках

; (asd "Линии" "Блоки" "#" 20) ; запуск
(defun asd (lays_1 lays_2 att k / )

сделал изменения на

; (asd "Линии" "Блоки" "#" 20) ; запуск
(defun asd (kb kdl PZ 20 / )

и пробовал сделать изменения на

; (asd "Линии" "Блоки" "#" 20) ; запуск
(defun asd ("kb" "kdl" "PZ" 20 / )
результат тоже отрицательный.

Подскажите, пожалуйста, что не так сделано?

[koMon]

чтобы помочь - нужно лисп показать.
по сообщению функция ASD не определена.

[Kavalergrad]

Вот исходник этого лиспа

[Kavalergrad]

Вот файл dwg на котором я пытаюсь разобраться с этим Автолиспом. Он на Автокаде 2022.

[koMon]

там должны быть списки слоёв, что-то типа
(asd '("Линии_1" "Линии_2") '("Блоки_1" "Блоки_2") "Атрибут" 20)

а нет, всё-таки строки
(asd "Линии_1,Линии_2" "Блоки_1,Блоки_2" "Имя_Атрибута" 20)

[koMon]

[Kavalergrad]

Я никак не могу найти указанный тобой кусок кода. Где он?

[koMon]

этот лисп сделан функцией. то есть надо его загрузить, загрузится функция ASD. затем запускаешь её в виде (asd "Твои слои линий через запятую без пробелов" "Твои слои блоков через запятую без пробелов" "Имя твоего атрибута" Радиус_поиска_на_концах_линий)