Странные штучки с PCM 16-bit stereo / Звук / Форум / Программирование игр / GameDev.ru

Пишу музыкальную ковырялку, и вот уже несколько дней не могу разобраться с одной очень странной штукой.

Вот что у меня сейчас получается: http://en.zimagez.com/zimage/screenshot2015-09-0612-32-44.php

Вот что мне хочется получить: http://en.zimagez.com/zimage/screenshot2015-09-0612-33-32.php

Общие черты прослеживаются, однако в некоторых местах амплитуда ведет себя словно чумачечая (собсна, отсюда и весь шум на картинке): http://en.zimagez.com/zimage/screenshot2015-09-0612-35-20.php

Вот картинка с еще более высоким зумом по горизонтали (и вертикальными полосочками) http://en.zimagez.com/zimage/screenshot2015-09-0612-58-37.php

Декодирую mp3-шник с помощью mpg123, с выходной кодировкой MPG123_ENC_SIGNED_16

Декодер:

+ Показать

− Скрыть

assert(mpg123_init() == MPG123_OK, "mpg123 lib init error")

local err = ffi.new("int[1]", 0)
local mh = mpg123_new(nil, err)
if err[0] ~= MPG123_OK then
  print("Basic setup goes wrong: ", cstr(mpg123_plain_strerror(err[0])))
end

local rate = ffi.new("long[1]")
local channels = ffi.new("int[1]")
local encoding = ffi.new("int[1]")

if mpg123_open(mh, "test.mp3") ~= MPG123_OK or mpg123_getformat(mh, rate, channels, encoding) ~= MPG123_OK then
  print("Trouble with mpg123: ", cstr(mpg123_strerror(mh)) )
  cleanup(mh);
end
print(rate[0], channels[0], encoding[0] == MPG123_ENC_SIGNED_16)

mpg123_format_none(mh)
mpg123_format(mh, rate[0], channels[0], encoding[0])
local block_size = mpg123_encsize(encoding[0])

local values = {}
local prev = 0

local buff_size = mpg123_outblock(mh)
local buffer = ffi.new("unsigned char[?]", buff_size)
local done = ffi.new("size_t[1]")
repeat
  local err = mpg123_read(mh, buffer, buff_size, done);
  for_carr(buffer, nil, 0, buff_size, function(val)
        table.insert(values, val)
    end)
until err ~= MPG123_OK

Рисователь:

+ Показать

− Скрыть

tmp = values
values = {}
local i = 0
for _,v in ipairs(tmp) do
  if i == 0 then
    values[#values + 1] = 256*v
  elseif i == 1 then
    values[#values] = (values[#values] +  v + samples/2) % samples
  end
  i = (i + 1) % 2
end

love.window.setFullscreen(true, "desktop")
local w,h = love.graphics.getDimensions()

local maxW = #values / w
local maxH = samples / h
local offset = 0

local img_data = love.image.newImageData(w, h)
local img = love.graphics.newImage(img_data)

local function reorder(a , b)
  return math.min(a, b), math.max(a, b)
end

local function clamp_x(x)
  return math.max(math.min(x, w-1), 0)
end

local function clamp_y(y)
  return math.max(math.min(y, h-1), 0)
end

local zoom = 100
local prev_b = samples / 2
local prev_y = samples / 2
function redraw()
  img_data:mapPixel(function() return 0,0,0,255 end)
  for x = 2, w * zoom - 1, 2 do
    local y = values[offset + x]
    local dy = y / maxH - prev_b
    local from, to = reorder(prev_b, prev_b + dy / 2)
    for i = from, to do
      img_data:setPixel(clamp_x((x-2) / zoom), clamp_y(i), 0, 200, 255, 255)
    end
    from, to = reorder(prev_b + dy / 2, prev_b + dy)
    for i = from, to do
      img_data:setPixel(clamp_x((x-1) / zoom), clamp_y(i), 0, 200, 255, 255)
    end
    prev_b = y / maxH
    
    local y = values[offset + x + 1]
    img_data:setPixel(x / zoom, y / maxH, 255, 200, 0, 255)
  end
  img:refresh()
end

redraw()
local step = 100
function love.update(dt)
  if love.keyboard.isDown("left") then
    offset = math.max(offset - step * dt, 0)
  elseif love.keyboard.isDown("right") then
    offset = math.min(offset + step * dt, #values - w * zoom)
  end
  offset = math.floor(offset)
  redraw()
end

function love.draw()
  love.graphics.draw(img)
end

function love.keypressed(key)
  if key == "up" then 
    step = step * 2
  elseif key == "down" then
    step = step / 2
  elseif key == "-" then 
    zoom = zoom * 2
  elseif key == "=" then
    zoom = zoom / 2
  end
end