Форум QUIK [тема: способ звукового сигнала в луа]

способ звукового сигнала в луа

Sat, 09 Mar 2024 05:25:20 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
nikolz написал:
Если Вам хочется запустить звук и не ждать, когда закончится, то уберите в последней команде "wait"
=============
Спасибо, выглядит как то, что я запрашивал.
09.03.2024 05:25:20, funduk.

способ звукового сигнала в луа

Fri, 08 Mar 2024 13:06:26 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:
====code====

   playsnddll.mciSendString ( 'play "C:/Windows/Media/Windows Hardware Fail.wav"' )

============= Если есть пробелы, то не работает.
=============

Да, Вы правы. Команда Play не поддерживает команды с именами файлов, которые нельзя привести к короткому имени, т.е. с пробелами. Посмотрел внимательно на MCI. Он действительно старый.

Но работает в команде Open.
Т.е. надо подавать две команды
OPEN "C:\\Windows\\Media\\Windows Hardware Fail.wav" ALIAS SND1
PLAY SND1

Для остановки команда
STOP SND1

Также такой подход будет означать, что после команды OPEN, в памяти сохранится ALIAS SND1. И повторно не надо уже открывать. Можно просто заново подать команду PLAY.
08.03.2024 13:06:26, Nikolay.

способ звукового сигнала в луа

Fri, 08 Mar 2024 09:12:18 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Рассказываю как просто сделать функцию для воспроизведения звука в различных форматах.
Надо сделать на СИ dll для луа вот с такой функцией. ====code====

static int mciSS(lua_State*L){  mciSendString((char*)lua_tostring(L,1),0,0,0); }

============= если кто-то не сможет ,пишите - выложу готовую dll.
Далее у меня такая dll называется nks. Вызов функции в скрипте записан как nks.mciss
=================
Поясняю как ее применять:
===========
Чтобы воспроизвести файл в формате WAV
надо открыть устройство с этим файлом так: ====code====

local file="C:/Windows/Media/Alarm10.wav" -- звуковой файл
nks.mciss("open "..file.."  alias MediaFile wait"); -- открыть устройство

============= Для воспроизведения содержимого файла пишем там , где хочется: ====code====

nks.mciss("play MediaFile FROM 0 wait");

============= ========================
Чтобы воспроизвести файл в формате MP3
надо сделать все тоже самое, но для этого файла
Например у меня это файл "D:/nks/test.mp3" ====code====

local file="D:/nks/test.mp3" -- звуковой файл
nks.mciss("open "..file.."  alias MediaFile wait"); -- открыть устройство

============= Для воспроизведения содержимого файла пишем там, где хочется: ====code====

nks.mciss("play MediaFile FROM 0 wait");

============= Опции :
----------------------------
Если Вам хочется запустить звук и не ждать, когда закончится, то уберите в последней команде "wait"
----------------------------
Если Вам хочется воспроизводить много различных звуков в разных местах скрипта,
то в начале скрипта откройте все звуковые файлы и для каждого из них сделайте уникальное имя устройства.
Его надо написать вместо "MediaFile"
Для воспроизведения конкретного файла надо указать имя его устройства в команде воспроизведения вместо "MediaFile"
==============
Желаю успешного прослушивания звуковых файлов.
08.03.2024 09:12:18, nikolz.

способ звукового сигнала в луа

Thu, 07 Mar 2024 21:15:20 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Например, это работает: ====code====

playsnddll.mciSendString('play "C:/Windows/Media/ringout.wav"')

=============
07.03.2024 21:15:20, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 21:12:55 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Nikolay написал:
Вы же использовали кавычки не в том месте.

=============
Опять ничего не понял...
Я из Луа по-всякому задавал команды, в т.ч. ====code====

playsnddll.mciSendString('play "C:/Windows/Media/Windows Hardware Fail.wav"')

============= Если есть пробелы, то не работает.
07.03.2024 21:12:55, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 19:36:01 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:

Я в #31 обрамлял также часть пути, по-всякому пробовал, не работает! Если у вас работает, то покажите команду из Луа и из Си.
=============
Да, но Вы это сделали некорректно. В Lua, если надо передать кавычки, можно использовать апострофы.

И при использовании w32 команда будет выглядеть так:

w32.mciSendString('PLAY "C:\Windows\Media\Windows Hardware Fail.wav"')

Вы же использовали кавычки не в том месте.
07.03.2024 19:36:01, Nikolay.

способ звукового сигнала в луа

Thu, 07 Mar 2024 18:55:41 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
nikolz написал:
if (lua_gettop(L)>1)SleepEx(lua_tointeger(L,2),1);

=============
Не понял, в чём здесь отличие от простого Sleep?

====quote====
Nikolay написал:
Там тоже надо путь с пробелами обрамлять в кавычки. Весь путь, а не только часть.
=============
Я в #31 обрамлял также часть пути, по-всякому пробовал, не работает! Если у вас работает, то покажите команду из Луа и из Си.
07.03.2024 18:55:41, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 17:09:38 +0300

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

PLAY "C:\\Windows\\Media\\Windows Hardware Fail.wav"

Все также как при работе с терминалом. Там тоже надо путь с пробелами обрамлять в кавычки. Весь путь, а не только часть.
07.03.2024 17:09:38, Nikolay.

способ звукового сигнала в луа

Thu, 07 Mar 2024 16:44:18 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:
Вернее, дело не в звуковом устройстве: в упрощённом варианте команд файлы с пробелами не играются, а в той форме, что была у w32, как помню, они игрались.
=============
Выкладываю исходник на варианте mciSendString ====code====

static int mciSS(lua_State*L){
    mciSendString((char*)lua_tostring(L,1),0,0,0); 
   if (lua_gettop(L)>1)SleepEx(lua_tointeger(L,2),1); 
    return 0; }

============= позволяет воспроизводить файлы wav, MP3, повторять, делать паузу
07.03.2024 16:44:18, nikolz.

способ звукового сигнала в луа

Thu, 07 Mar 2024 16:18:15 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Вернее, дело не в звуковом устройстве: в упрощённом варианте команд файлы с пробелами не играются, а в той форме, что была у w32, как помню, они игрались.
07.03.2024 16:18:15, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 16:09:44 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Короче, устройство waveaudio почему-то не играет файлы с пробелами, хоть тресни...
07.03.2024 16:09:44, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 16:04:41 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Опять ошибся: это другой файл игрался, просто я с него комментарии зачем-то убрал...
07.03.2024 16:04:41, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 16:01:46 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Тьфу ты, черти мелкомягкие: я так и подозревал, что такой костыль заработает: ====code====

mciSendString("PLAY C:/Windows/Media/Windows Hardware Fail.wav type waveaudio", NULL, 0, NULL);

============= Явная ошибка в парсинге команды...

Сколько времени на эту ерунду потерял вместо того, чтобы что-то полкзное для себя сделать...
07.03.2024 16:01:46, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:29:44 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Нет, не работают оба варианта: ====code====

mciSendString("PLAY C:/Windows/Media/\"Windows Hardware Fail.wav\"", NULL, 0, NULL);
mciSendString("PLAY \"C:/Windows/Media/Windows Hardware Fail.wav\"", NULL, 0, NULL);

=============
07.03.2024 15:29:44, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:23:41 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Нет, тут я ошибся, сейчас ещё проверю...
07.03.2024 15:23:41, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:22:10 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
А в примерах, аналогичных w32, это работало без доп. кавычек...
07.03.2024 15:22:10, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:20:21 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Nikolay написал:
Чтобы брался путь с пробелами, необходимо путь обрамлять кавычками.

=============
Попробовал так: ====code====

mciSendString("PLAY C:\\Windows\\Media\\\"Windows Hardware Fail.wav\"", NULL, 0, NULL);

============= Не работает!
07.03.2024 15:20:21, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:07:06 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Для чего в Си и в Луа в путях ставят две обратных косых вместо оной прямой, ведь Виндовс в путях понимает одну прямую косую: C:/Windows/Media/Alarm09.wav?
07.03.2024 15:07:06, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:06:40 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
размером в 28 КБайт
07.03.2024 15:06:40, nikolz.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:04:56 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:

====quote====
nikolz написал:
могу выложить dll
=============
Программеров интересуют исходники, чтобы не грузить зоопарк посторонних длл (по одной для каждого случая)...
=============
Она одна на все случаи
07.03.2024 15:04:56, nikolz.

способ звукового сигнала в луа

Thu, 07 Mar 2024 15:03:16 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:
Хм, методом тыка убрал ALIAS, как было в w32, устройство взял waveaudio, и звуки стали смешиваться: ====code====

  static int forLua_mciSendString(lua_State  * L)
{ mciSendString( "OPEN waveaudio" , NULL,  0 , NULL);
  mciSendString( "PLAY C:\\Windows\\Media\\Alarm09.wav" , NULL,  0 , NULL);
  mciSendString( "PLAY C:\\Windows\\Media\\Alarm06.wav" , NULL,  0 , NULL);
  mciSendString( "PLAY C:\\Windows\\Media\\ringout.wav" , NULL,  0 , NULL);
//  mciSendString( "PLAY C:\\Windows\\Media\\Windows Hardware Fail.wav" , NULL,  0 , NULL);
   return   0 ;
}

============= Т.е., методика такая: один раз выдаём команду OPEN и потом много раз только PLAY, а в OnStop можно выдать CLOSE waveaudio?

Но почему не получается играть файлы с пробелами, как в комментариях??
И почему в консольной программе это всё продолжает не работать???
=============
Команда OPEN не нужна, если надо просто проиграть файл. ALIAS не нужен, его и нет в документации для PLAY.

Чтобы брался путь с пробелами, необходимо путь обрамлять кавычками.
07.03.2024 15:03:16, Nikolay.

способ звукового сигнала в луа

Thu, 07 Mar 2024 14:57:53 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
В принципе, получился неплохой подарок к 8 Марта (а чем я хуже женщины?) Но неработоспособность в некоторых случаях омрачает предпраздничное настроение...
07.03.2024 14:57:53, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 14:55:01 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Хм, методом тыка убрал ALIAS, как было в w32, устройство взял waveaudio, и звуки стали смешиваться: ====code====

static int forLua_mciSendString(lua_State *L)
{ mciSendString("OPEN waveaudio", NULL, 0, NULL);
  mciSendString("PLAY C:\\Windows\\Media\\Alarm09.wav", NULL, 0, NULL);
  mciSendString("PLAY C:\\Windows\\Media\\Alarm06.wav", NULL, 0, NULL);
  mciSendString("PLAY C:\\Windows\\Media\\ringout.wav", NULL, 0, NULL);
//  mciSendString("PLAY C:\\Windows\\Media\\Windows Hardware Fail.wav", NULL, 0, NULL);
  return 0;
}

способ звукового сигнала в луа

Thu, 07 Mar 2024 12:48:59 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Я отправляю команду
mciSendString PLAY "filename"

Если отправить несколько команд, то будет играть сразу все отправленное.
07.03.2024 12:48:59, Nikolay.

способ звукового сигнала в луа

Thu, 07 Mar 2024 12:41:36 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Nikolay написал:
Можно даже проигрывать кусок из файла.
=============
Я на те страницына сайте МС смотрел, не нашёл, как смешивать звуки.
Я сейчас сделал аналог того, что у меня игралось в dll: ====code====

#include <stdio.h>
#include <windows.h>
#include <Mmsystem.h>

int main()
{ if (!mciSendString("OPEN C:\\Windows\\Media\\chord.wav TYPE MpegVideo ALIAS QUIK_MP3", NULL, 0, NULL)) puts("fail");
  mciSendString("PLAY QUIK_MP3", NULL, 0, NULL);
  return 0;
}

============= Не играет, выдаёт fail. Не пойму, почему это работает в dll для Квика. Такое впечатление, что в консольной программе mciSendString не работает. А у вас как?
Транслировать командой ====code====

gcc.exe playsnd.c -o playsnd.exe -O2 -s -lWinmm -m64 -std=c17

============= Попробовать что-ли с пом. mpeg123 что-то сделать? Она большая, а мне надо мало, ковырять её неохота...
07.03.2024 12:41:36, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 10:22:23 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
nikolz написал:
могу выложить dll
=============
Программеров интересуют исходники, чтобы не грузить зоопарк посторонних длл (по одной для каждого случая)...
07.03.2024 10:22:23, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 10:21:39 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:
Спасибо, а правильная это какая? У меня создалось впечатление, что mci это не умеет.
=============
PLAY

Все указано в документации https://learn.microsoft.com/en-us/windows/win32/multimedia/mci-command-strings
Можно даже проигрывать кусок из файла.

Если проигрывается WAV, то ничего не надо делать более. Если другой формат, то должна быть поддержка. MP3, кажется, тоже проигрывает без доп. усилий.

У меня оповещения на сработавший ордер иногда используются. Если бы это было с блокировкой через команду OPEN или с показом окна терминала, то при одновременном срабатывании нескольких ордеров будет печаль.
07.03.2024 10:21:39, Nikolay.

способ звукового сигнала в луа

Thu, 07 Mar 2024 10:04:23 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:
Ещё для смешивания звуков на форумах советовали использовать сторонние звуковые биб-ки или ДиректХ (ДиректСаунд).
=============
могу выложить dll
которая может воспроизводить WAV файлы асинхронно и синхронно из памяти и из файлов.
07.03.2024 10:04:23, nikolz.

способ звукового сигнала в луа

Thu, 07 Mar 2024 10:00:38 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.
Ещё для смешивания звуков на форумах советовали использовать сторонние звуковые биб-ки или ДиректХ (ДиректСаунд).
07.03.2024 10:00:38, Serge123.

способ звукового сигнала в луа

Thu, 07 Mar 2024 09:59:41 +0300

способ звукового сигнала в луа в форуме Программирование на языке Lua.

====quote====
Serge123 написал:

====quote====
Nikolay написал:
Можно даже параллельно проигрывать звуки, если использовать правильную команду.
=============
Спасибо, а правильная это какая? У меня создалось впечатление, что mci это не умеет.
=============
вариант воспроизведения mp3 файлов
скачайте из интернета прогу mpg123.exe ====code====

local x="D:/nks/test.mp3" -- звуковой файл
os.execute("D:/mpg123/mpg123.exe "..x)

=============
07.03.2024 09:59:41, nikolz.