// 2011.07.05 # Doj
// Функции для звука

include" units\headers\mmsystem.de"

: sound ( p) SND_ASYNC sndPlaySoundA drop ;

include" units\utils\headers.de"

stdcall declare-header music.dll
:a PlayMusic t_pchar t_int music.dll header;

: music PlayMusic ;

: init-audio mmsystem-load music.dll header-load ;
