|
sound - указатель звука
entity - указатель объекта |
|
Указанный объект издает звук. Функция возвращает канал звука. Звук должен быть предварительно загружен командой Load3DSound для получения 3D-эффекта. |
|
; Пример EmitSound ; ----------------- Graphics3D 640,480 SetBuffer BackBuffer() camera=CreateCamera() PositionEntity camera,0,1,-10 light=CreateLight() RotateEntity light,90,0,0 plane=CreatePlane() ground_tex=LoadTexture("media/Chorme-2.bmp") EntityTexture plane,ground_tex cube=CreateCube() cube_tex=LoadTexture("media/b3dlogo.jpg") EntityTexture cube,cube_tex PositionEntity cube,0,1,0 microphone=CreateListener(camera) ; Создаем микрофон, привязанный к камере sound=Load3DSound("media/ufo.wav") ; Загружаем 3D-звук While Not KeyDown(1) If KeyDown(205)=True Then TurnEntity camera,0,-1,0 If KeyDown(203)=True Then TurnEntity camera,0,1,0 If KeyDown(208)=True Then MoveEntity camera,0,0,-0.05 If KeyDown(200)=True Then MoveEntity camera,0,0,0.05 ; Если нажата левая кнопка мыши, то куб издает звук If MouseHit(1) = True Then EmitSound(sound,cube) RenderWorld Text 0,0,"Use cursor keys to move about" Text 0,20,"Press left mouse button to make a sound be emitted from the cube" Flip Wend End |