WavePlayer

function listWavFilesOnMonitor()
  local files = fs.list(".")
  local monitor = peripheral.find("monitor")
  if monitor then
    monitor.clear()
    for i, file in ipairs(files) do
      if fs.isDir(file) then
        -- skip directories
      elseif string.sub(file, -4) == ".wav" then
        monitor.setCursorPos(1, i)
        monitor.write(file)
        local y = i
        monitor.setCursorPos(1, y)
        monitor.setTextColour(colours.blue)
        monitor.setCursorBlink(false)
        while true do
          local event, side, x, y = os.pullEvent("monitor_touch")
          if y == monitor.getY() + y - 1 then
            print(file)
            break
          end
        end
        monitor.setTextColour(colours.white)
        monitor.setCursorBlink(true)
      end
    end
  end
end