[Zemlemer]

Здравствуйте! Возможно ли прописать для AutoCad озвучку некоторых команд с помощью лиспа?

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

Чего?? В смысле - голосовое управление? Offtop: И по возгласу "*ля!" выполнять отмену последнего действия?

[Zemlemer]

Сообщение от Кулик Алексей aka kpblc Чего?? В смысле - голосовое управление? Offtop: И по возгласу "*ля!" выполнять отмену последнего действия?

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

[Сергей812]

реактор на команду, наверно)

[Zemlemer]

Сообщение от Сергей812 реактор на команду, наверно)

Манкировал раздел с описанием, что такое реакторы. Почитаю, спасибо.

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

Квакать (теоретически) возможно. Как вариант https://nateholt.wordpress.com/2010/...olisp-utility/

[Нубий-IV]

Offtop:
Квакать - это несерьезно. Надо хотя бы так:
Cooking with Half-Life SFX: Pelmeni
Иначе зачем это все?

[Семёныч]

Сообщение от Zemlemer Например, чтоб квакало

Или пукало. Или рыгало...

[ShaggyDoc]

Да не так уж это и сложно, причем без реакторов. Надо просто переопределить команду Автокада.
Напоминаю, что для вызова истинной команды применяется префикс "." Например _.LINE (_ указывает на родное английское имя).
А если написать на Lisp свою функцию C:LINE и вызвать ее LINE, то она и будет срабатывать. А уж внутри нее можно что угодно вставить, хоть "пуканье".

Вот вызов любого звука (не пиканья) надо делать из файла и это чуть-чуть сложнее, это надо библиотечную функцию на на Лисп сделать. В ET есть функция acet-sys-beep, но она только пикает, хотя можно из пиканья с разными частотами подобие "музыки" создать.

А мы смеха ради делали замену команды OOPS (в русских Автокадах ОЙ) на свою, которая говорила на русском языке "Ой, бля!". Так, для баловства.

[skkkk]

Сообщение от Кулик Алексей aka kpblc Чего?? В смысле - голосовое управление?

А что? Было бы прикольно. Запуск команд голосом - это уже что-то оригинальное. В дополнение ко всему множеству вариантов вызова команд. Прозвать этого товарища Арвтокадий, и ну его заданиями заваливать! Способ по скорости легко составил бы конкуренцию кнопкам на панели и ленте - как минимум. Интересно, можно ли на лиспе такую распознавалку написать? Полагаю, на чистом лиспе - сильно вряд ли. Или может, использовать API какой-нибудь Алисы?

Сообщение от ShaggyDoc А мы смеха ради делали замену команды OOPS (в русских Автокадах ОЙ) на свою

Как же скучно я живу
Надо будет тоже побаловаться-поразвлекаться над коллегами и что-нибудь эдакое вворачивать при ошибках в виде звуковых комментариев, например, "Эй, кто-нибудь, уберите от меня эту обезьяну с гранатой! Эдак она мне весь мозг разворотит." Есть еще синтезатор речи в сети довольно популярный, с таким забавным голосом мужским.

[CalcProg]

не стоит обучать садистов.
после целого дня работы с 'музыкальным' автокадом наступят тяжкие последствия, от головной боли до рукоприкладства. ))))

[Zemlemer]

Изначальная мысль была - asmr прога.

Прочитал, что в играх озвучивают часто повторяющиеся действия приятными ненавязчивыми звуками.
Таким образом, игрок больше втягивается. Что, если и с Кадом сработает?

[CalcProg]

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

----- добавлено через ~4 мин. -----
знал одного чувака, так его раздрожал звук нажимаемых клавиш на клавиатуре. ))))

[Zemlemer]

Не проговаривание команд, а именно краткие звуки. Что-то вроде квакания.

[CalcProg]

хочешь музыкальный синтезатор из автокада сотворить? )))

[ShaggyDoc]

Сообщение от CalcProg не стоит обучать садистов. после целого дня работы с 'музыкальным' автокадом наступят тяжкие последствия, от головной боли до рукоприкладства. ))))

Надо просто дать настройку "Отключать звуки".

[Zemlemer]

А как на LIsp взаимодействовать с файлами звуков - mp3 или около того?

----- добавлено через ~7 мин. -----

Сообщение от Кулик Алексей aka kpblc Квакать (теоретически) возможно. Как вариант https://nateholt.wordpress.com/2010/...olisp-utility/

Квакать - да, но можно ли воспроизводить аудиофайлы прямо из када?

----- добавлено через ~9 мин. -----

Не поделитесь, как делали воспроизведение звуков? Через лисп никак не воспроизвести звуковой файл?

[Boxa]

Сообщение от Zemlemer Не поделитесь, как делали воспроизведение звуков? Через лисп никак не воспроизвести звуковой файл?

Никто не мешает на .NET написать лисп функцию для воспроизведения любой фигни или для озвучивания команд (text-to-speech).
Да и на лиспе свет клином не сошелся, все это проще и быстрее на .NET делать, вот только зачем?

[Zemlemer]

Сообщение от Boxa Никто не мешает на .NET написать лисп функцию для воспроизведения любой фигни или для озвучивания команд (text-to-speech). Да и на лиспе свет клином не сошелся, все это проще и быстрее на .NET делать, вот только зачем?

К сожалению, Net не владею. Поэтому и спрашиваю, можно ли на Лиспе что-то подобное провернуть.
А зачем - выше писал, что хочу себе сделать версию asmrCad.

[CalcProg]

Не парься перкходи на лазарус. Проще не будет за то можно наваять всё, что хочешь. Да же свой "автокад с нуля". )))

[Zemlemer]

Ну вот, хотел лиспом в Кад пару звуков добавить, а предлагают писать новый Кад.

[Сергей812]

Сообщение от Zemlemer Ну вот, хотел лиспом в Кад пару звуков добавить, а предлагают писать новый Кад.

ну писать новый Кад, тем более на Лазарусе - это удовольствие для избранных) Было ранее предложено практическое решение

Сообщение от Boxa Никто не мешает на .NET написать лисп функцию для воспроизведения любой фигни

код которой может выглядеть примерно так - в несколько строк. Но вы не собираетесь даже вникать в это

Сообщение от Zemlemer К сожалению, Net не владею.

видимо, не особенно эта озвучка команд и нужна)

----- добавлено через ~22 мин. -----
ну а если все равно делать и загружать сборку .Net сборку, то логично уже и обработчик событий сделать там же, положить рядом со сборкой xml файл со списком соответствий имен команд и звуковых файлов - чтобы иметь возможность оперативно добавлять/удалять схему озвучки команд без наличия установленной студии на рабочем месте в простом блокноте. Во время загрузки .Net сборки в реализации интерфейса IExtensionApplication этот xml будет считан. Можно предусмотреть и отдельную команду для обновления данных из xml, ну а так же команду/команды для включения/выключения озвучки. Было бы реальное желание)

[skkkk]

Есть прекрасная библиотека для Автокада - DOSlib. Все ее функции прекрасно вызываются из лиспа.
Нужно просто обеспечить автозагрузку соответствующего версии Автокада arx-файла. Всё - библиотека готова к использованию.
В ней (помимо сотен прочих полезных) есть функция dos_wav, которая в качестве аргумента принимает строку с путем и именем wav-файла. И воспроизводит его, не открывая никаких плееров.
Думаю, это - то, что надо. Осталось переконвертировать нужные звуки в *.wav и разместить их где следует. Только, кажется, имена файлов обязательно должны быть на латинице.

Код:

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

(dos_wav "c:\\windows\\media\\tada.wav")

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

skkkk, ты только забыл уточнить, что DosLib - чистой воды arx, и, следовательно, зависит от разрядности и версии ACAD.

[Boxa]

Сообщение от Кулик Алексей aka kpblc ты только забыл уточнить, что DosLib - чистой воды arx, и, следовательно, зависит от разрядности и версии ACAD.

Неа, не забыл.

Сообщение от skkkk Нужно просто обеспечить автозагрузку соответствующего версии Автокада arx-файла.

Только это ничем не отличается от схемы с написанной на NET лисп функцией, только добавлено дурацкое ограничение, в виде wav формата...

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

Сорян, писал на бегу. Приношу свои извинения )

[Zemlemer]

Сообщение от skkkk Есть прекрасная библиотека для Автокада - DOSlib. Все ее функции прекрасно вызываются из лиспа. Нужно просто обеспечить автозагрузку соответствующего версии Автокада arx-файла. Всё - библиотека готова к использованию. В ней (помимо сотен прочих полезных) есть функция dos_wav, которая в качестве аргумента принимает строку с путем и именем wav-файла. И воспроизводит его, не открывая никаких плееров. Думаю, это - то, что надо. Осталось переконвертировать нужные звуки в *.wav и разместить их где следует. Только, кажется, имена файлов обязательно должны быть на латинице. Код: [Выделить все] (dos_wav "c:\\windows\\media\\tada.wav")

Пока не разобрался, почему не подгружается, но за наводку спасибо! Должно быть, знатная библиотека.

[Сергей812]

Сообщение от Zemlemer Пока не разобрался, почему не подгружается

если arx не подгружается, то попробуйте в свойствах скаченного файла снять "этот файл был скачен..."

[skkkk]

Сообщение от Boxa Только это ничем не отличается от схемы с написанной на NET лисп функцией

Так-то да, кроме одного: функция на NET, вроде, еще не написана)

[Zemlemer]

Сообщение от Сергей812 если arx не подгружается, то попробуйте в свойствах скаченного файла снять "этот файл был скачен..."

Разобрался, версия в архиве не соответствует версии када - для 2020 нужна 24.

Еще раз спасибо, работает! То, что нужно.

[Сергей812]

Сообщение от Zemlemer версия в архиве не соответствует версии када

там по версии ядра