LISPы написанные нейросетью

Выкладывай сюда, может, кому пригодится

 

Описание:
Программа создает точки со случайными смещениями относительно указанных пользователем координат. Пользователь может задать допустимые отклонения по осям X, Y и Z, а также выбрать, использовать ли общую высоту для всех точек или брать высоту из каждой указанной точки.
Инструкция:

1. Введите команду ТОЧКА_РАНДОМ.
2. Выберите способ задания высоты:
   • Общая — введите общую высоту по Z для всех точек.
   • ИзТочки — высота будет браться из Z-координаты каждой указанной точки.
3. Введите допустимые отклонения по осям X, Y и Z (0 для отсутствия смещения).
4. Укажите точки на экране. Для каждой точки программа:
   • Добавит случайные смещения в пределах заданных отклонений.
   • Создаст новую точку с измененными координатами.
5. Для завершения нажмите Enter.

 

Немного изменил - теперь рандомные точки не ставятся на исходных точках, а так же точность рандомных увеличил до 1мм

 

https://rutube.ru/video/b668ffef55b92023630bc8c57d0c8375/

 

Удалось через нейросеть реализовать диалоговое окно. Ушло много попыток, включаю поиск информации по dcl и скармливая эти данные нейронке. Но результат думаю впечатляет. Она может создавать диалоговые окна прямо в лиспе

--- Сообщения объединены, 20 янв 2025, Оригинальное время сообщения: 20 янв 2025 ---

 

Здорово, спасибо, попробую тоже использовать.

 

А я изобрел велосипед))
Замучал нейро до полу-смерти но заставил написать хороший ЛИСП для построения откоса а-ля аналог S_OTKOS
Логика построения откоса более надежная, нет "ужаса" при самопересекающихся линиях подошвы и откоса, и на сложных конфигурациях где подошва и откос могут образовывать замкнутый контур нет "вылетов" бергштрихов за пределы задаваемой бровки и подошвы :)
После загрузки лиспа вызвать его можно командой NEIRO (да-да фантазии нет, совсем), далее всё интуитивно понятно глядя в командную строку
Проверял на Civil 2019 + 2020 всё работает, но строится откос только в МСК

 

На замкнутых контурах, например прямоугольник внутри прямоугольника как строит линии на углах? Верхний угол с нижним соединяет? Или например когда откос поворачивает на градусов и идёт паралельно самому себе

 

попробовал данный лисп, вышла местами вот такая "лажа"

 

Протестировали на ~10 компах коллег, у 8 из 10 работает, у двух такая же шляпа . Причинно-следственная связь пока не установлена ни мной ни нейросетью. Единственное за что можно зацепиться это кривоватенькая установка цивила и пакета РУ адаптации. При чем один раз из двадцати попыток запуска он всё таки построил как надо (на том самом компе на котором изначально не работал). Потом построил 10% откоса нормально а 90% как у вас на изображении. А потом опять сломался . А может и в драйверах проблема...
Кто хотя бы примерно понимает в какую сторону думать, пишите

Стресс тест во вложении. Круг в прямоугольнике после S_OTKOS прям оргазм для глаз))

--- Сообщения объединены, 22 янв 2025, Оригинальное время сообщения: 22 янв 2025 ---

Кстати в качестве дополнения - когда тестируете код нейросети, можно буквально делать скриншот результата и скармливать его нейросетке, описывая то, чего быть не должно и что вы хотите видеть. Она прекрасно различает объекты на изображении, но только если они будут в контексте вашего с ней диалога. Так же немного очевидное действие - кормить её ошибками в командной строке. В совокупности с

работа с нейросетью получается максимально продуктивной!

 

Нужно добавить больше отладочных сообщений. Может направление линии или разный уровень как то влияет. Близкое расположение вершин одной полилинии. Микроповороты участков одной полилинии от вершины до вершины

 

Тестировалось на одних и тех же линиях на рабочем и не рабочем ПК. Можно сказать в одном и том же чертеже. Т.е. исключаем "не правильные" линии и не корректные шаблоны. Остается грешить только на АКАД и драйвера, либо настройки АКАДа

 

Все возможно, вплоть до настройки округления точности и единиц измерений, регенерации. Удачи, результат всё равно шикарный!

 

Та же самая шняга, фигня получается как у Negadai, 2021 Civil.
В Civil 2015 работает четко.

 

Ну, судя по коду тут 100% может повлиять высота объектов, особенно 3д полилинии, ну и включенные привязки, при командном методе сильно могут повлиять, я бы сказал что тут как раз этот случай, привязывается к углам и серединам судя по скринам.

 

Нужно строку
(command "_.line" pt_top midpoint "")
заменить на
(command "_.line" "_none" pt_top "_none" midpoint "")
спроси ради интереса, зачем, у нейросети

 

Если заменить:
lisp
(command "_.line" pt_top midpoint "")
на:
lisp
(command "_.line" "_none" pt_top "_none" midpoint "")
то штрихи будут строиться точно в указанных точках, без учета привязок. Это улучшит стабильность и точность работы скрипта.

Сейчас всё переделаем, протестируем, спасибо большое! Всё таки опыт и мышление никакие нейросети не заменят!
p.s. после тестов выложу обновленный лисп

--- Сообщения объединены, 23 янв 2025, Оригинальное время сообщения: 23 янв 2025 ---

Александр, огромное спасибо! Всё работает, теперь на всех машинах!!!
Товарищи, обновленный лисп прикрепляю, запускается так же, командой NEIRO

 

Проблем с привязками на углах поворота не появилось? То есть теперь лисп будет игнорировать угол, откладывая одинаковые расстояния между штрихами?

 

Stanislav1488, если линия плавная, то проблем нет, новая версия работает отлично.

 

Не дело. Заменить NEIRO на NOTKOS.