| file$ - имя файла звука, который будет использоваться, как 3D-звук |
| Загружает звук и возвращает его указатель для использования с EmitSound. |
|
; Пример Load3DSound ; ------------------- 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") ; загружаем звук 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 |