Sound3D - Issue
Verfasst: 04.02.2013 22:50
ich bin ja mal froh dass das 3d- Zeugs nun mittlerweile (510B6 win32) auch mal wieder auf schlappen
Grafikkarten (intel) unterstützt wird.
Aaaber
irgendwas ist da verdreht beim 3D-Sound
im ff Code schiebt man mit a den node (würfel nebst sound) nach links mit d nach rechts
Der Sound geht aber in die falsche Richtung.
oben und unten (w /S) ist wohl ok
Vorne und hinten (Up/down) wohl auch, immerhin wird es leiser
Ist das nur hier so (komische direct-3d treiberei auf dem ollen Laptopf) oder ist das allgemein so und eher 'ne Art Bug
(hier ist es egal ob "normal" oder "opengl")
Grafikkarten (intel) unterstützt wird.
Aaaber
irgendwas ist da verdreht beim 3D-Sound
im ff Code schiebt man mit a den node (würfel nebst sound) nach links mit d nach rechts
Der Sound geht aber in die falsche Richtung.
oben und unten (w /S) ist wohl ok
Vorne und hinten (Up/down) wohl auch, immerhin wird es leiser
Ist das nur hier so (komische direct-3d treiberei auf dem ollen Laptopf) oder ist das allgemein so und eher 'ne Art Bug
(hier ist es egal ob "normal" oder "opengl")
Code: Alles auswählen
InitEngine3D()
InitSprite()
InitKeyboard()
InitMouse()
OpenWindow(0,0,0,1000,1000,"k",#PB_Window_ScreenCentered|#PB_Window_SystemMenu)
OpenWindowedScreen(WindowID(0),0,0,1000,1000,1,0,0)
Add3DArchive("D:/PureBasic/510/Examples/3D/Data", #PB_3DArchive_FileSystem) ;change to appr. dir
Add3DArchive("D:\PureBasic\510\Examples\3D\Data/Packs/skybox.zip", #PB_3DArchive_Zip) ;change to appr. dir
Add3DArchive("D:\PureBasic\510\Examples\3D\Data/Textures", #PB_3DArchive_FileSystem) ;change to appr. dir
SkyBox("stevecube.jpg")
cam=CreateCamera(#PB_Any, 0, 0, 1000, 1000)
cube=CreateCube(#PB_Any,10)
tex_cloud=LoadTexture(#PB_Any, "clouds.jpg")
material=CreateMaterial(#PB_Any,TextureID(tex_cloud))
Debug material
cubee=CreateEntity(#PB_Any,MeshID(cube),MaterialID(material))
If IsMesh(cubee)
MoveEntity(cubee,0,0,0)
EndIf
sir= LoadSound3D(#PB_Any,"schwurbel.wav",#PB_Sound3D_Loop) ;change to a mono-sound-file
SoundVolume3D(sir, 100)
SoundRange3D(sir, 1, 100)
PlaySound3D(sir, #PB_Sound3D_Loop)
SoundListenerLocate(CameraX(cam),CameraY(cam),CameraZ(cam))
node=CreateNode(#PB_Any, 0, 0, -75)
AttachNodeObject(node, SoundID3D(sir))
AttachNodeObject(node, EntityID(cubee))
Repeat
ExamineKeyboard()
ExamineMouse()
If KeyboardPushed(#PB_Key_Escape)
quit+1
EndIf
RotateNode(node,0.3,0.4,0.5,#PB_Relative) ;aber nur weil 3*3+4*4=5*5 ist
If KeyboardPushed(#PB_Key_D)
MoveNode(node,0.5,0,0)
EndIf
If KeyboardPushed(#PB_Key_A)
MoveNode(node,-0.5,0,0)
EndIf
If KeyboardPushed(#PB_Key_W)
MoveNode(node,0,0.5,0)
EndIf
If KeyboardPushed(#PB_Key_S)
MoveNode(node,0,-0.5,0)
EndIf
If KeyboardPushed(#PB_Key_Up)
MoveNode(node,0,0,5)
EndIf
If KeyboardPushed(#PB_Key_Down)
MoveNode(node,0,0,-5)
EndIf
StartDrawing(WindowOutput(0))
DrawText(0,0,Str(NodeX(node))+" "+Str(NodeY(node))+" "+Str(NodeZ(node)))
StopDrawing()
RenderWorld()
FlipBuffers()
Until quit
End