Realistic sound box script help

[Ryosuke]

English : Hello everyone, I would like a little help on a realistic sound box system. see the link how it would work, if possible help I thank

Português : Ola a todos , gostaria de uma pequena ajuda em um sistema de caixa de som realista . vejam no link como funcionaria , se possível ajudar eu  agradeço 

see the image  (vejam a imagem ) : https://imgur.com/a/Ccuwm

The system will work using  

bindKey("r","down",
    function()
     if cone1 then 
     stopSound(cone1) 
     else 
      local cone1 playSound("IP STREAM RADIO") --- the object moves in the rhythm of the sound
      local theVeh = getPedOccupiedVehicle(localPlayer)local getComponent = getVehicleComponents(theVeh) 
      if (theVeh) then
      for k in pairs (getComponent) do
      local x, y, z = getVehicleComponentPosition(theVeh, cone) 
      cone1 = setVehicleComponentPosition(theVeh, cone, x+1, y+1, z+1) 
      end
      end
    end
)

[Skully]

Take a look at GetSoundFFTData, this resource does what you're trying to achieve though as a spectrum rather than a cone.

[Ryosuke]

3 minutes ago, Skully said:

Take a look at GetSoundFFTData, this resource does what you're trying to achieve though as a spectrum rather than a cone.

I do know however how to modify for a component of the vehicle?

[Skully]

2 minutes ago, Elvis Willian said:

I do know however how to modify for a component of the vehicle?

table getSoundFFTData ( element sound, int iSamples [, int iBands = 0 ] )

Use the function and save the return value into a table, then loop through the table (the amount of times you loop through depends on what iSample you pass), then using the table value set the vehicle component to open a small amount with some calculations.
 

local stream = playSound("http://mystream/") --- URL to the stream.
local x, y, z = getVehicleComponentPosition(theVehicle, stream)
local fftTable = getSoundFFTData(stream, 2048, 257)

if not (fftTable) then return false end
for i = 1, 256 do -- 256 because iBands is 257, so we iBands - 1
  -- setVehicleComponentPosition here using the fftTable[i] and some maths.
end

 

[Ryosuke]

6 minutes ago, Skully said:

table getSoundFFTData ( element sound, int iSamples [, int iBands = 0 ] )

Use the function and save the return value into a table, then loop through the table (the amount of times you loop through depends on what iSample you pass), then using the table value set the vehicle component to open a small amount with some calculations.
 

local stream = playSound("http://mystream/") --- URL to the stream.
local x, y, z = getVehicleComponentPosition(theVehicle, stream)
local fftTable = getSoundFFTData(stream, 2048, 257)

if not (fftTable) then return false end
for i = 1, 256 do -- 256 because iBands is 257, so we iBands - 1
  -- setVehicleComponentPosition here using the fftTable[i] and some maths.
end

 

Thank you, I'm going to work and test.

[Ryosuke]

28 minutes ago, Skully said:

table getSoundFFTData ( element sound, int iSamples [, int iBands = 0 ] )

Use the function and save the return value into a table, then loop through the table (the amount of times you loop through depends on what iSample you pass), then using the table value set the vehicle component to open a small amount with some calculations.
 

local stream = playSound("http://mystream/") --- URL to the stream.
local x, y, z = getVehicleComponentPosition(theVehicle, stream)
local fftTable = getSoundFFTData(stream, 2048, 257)

if not (fftTable) then return false end
for i = 1, 256 do -- 256 because iBands is 257, so we iBands - 1
  -- setVehicleComponentPosition here using the fftTable[i] and some maths.
end

 

function musicStartFunc()
local stream = playSound("http://92.222.66.160:80/") 
 local theVeh = getPedOccupiedVehicle(localPlayer)
  local getComponent = getVehicleComponents(theVeh) 
   if (theVeh) then
    for k in pairs (getComponent) do
     local x, y, z = getVehicleComponentPosition(theVeh, stream)
      local fftTable = getSoundFFTData(theVeh,stream, 2048, 257)
       if not (fftTable) then return false end
       
        for i = 1, 256 do 
        setVehicleComponentPosition(fftTable,'bump_rear_dummy', x+5, y+0, z+0)
        end
end
end
end
bindKey("9","down",musicStartFunc)

 

 

What is problem ?? Help pls