expand sound library examples

Author: monkstone

processing_app/library/sound/README.md

@@ -1,3 +1,4 @@
 ### README
+Remember you need to install processing sound library, either using processing ide or to `~/.jruby_art/libraries`.
 
-You can use processing-3.0+ to install the sound library from processing.org.  This sound library has been adopted by processing.org, although the minim library is still available to install from the processing ide.
+To use processing ide installed libraries then set `processing_ide: true` in `./jruby_art.config.yml` else set `processing_ide: false` in `./jruby_art.config.yml` for k9 or manually installed libraries.

processing_app/library/sound/Rakefile

@@ -1,30 +1,34 @@
-# Simple demo Rakefile to autorun samples in current directory
-# adjust path to rp5 executable, and or opts as required
+# -*- encoding: utf-8 -*-
 
-SAMPLES_DIR = './'
+PRWD = File.expand_path(__dir__)
 
 desc 'run demo'
-task default: [:demo]
+task :default => [:all]
 
-desc 'demo'
-task :demo do
-  samples_list.shuffle.each { |sample| run_sample sample }
+desc 'autorun all samples'
+task :all do
+  Rake::Task[:soundfile].execute
+  Rake::Task[:oscillators].execute
+  Rake::Task[:noise].execute
+  Rake::Task[:effects].execute
 end
 
-def samples_list
-  files = []
-  Dir.chdir(SAMPLES_DIR)
-  Dir.glob('*.rb').each do |file|
-    files << File.join(SAMPLES_DIR, file)
-  end
-  return files
+desc 'run soundfile samples'
+task :soundfile do
+  sh "cd #{PRWD}/soundfile && rake"
 end
 
-def run_sample(sample_name)
-  puts "Running #{sample_name}...quit to run next sample"
-  open("|k9 -r #{sample_name}", 'r') do |io|
-    while l = io.gets
-      puts(l.chop)
-    end
-  end
+desc 'oscillators'
+task :oscillators do
+  sh "cd #{PRWD}/oscillators && rake"
+end
+
+desc 'noise'
+task :noise do
+  sh "cd #{PRWD}/noise && rake"
+end
+
+desc 'effects'
+task :effects do
+  sh "cd #{PRWD}/effects && rake"
 end

processing_app/library/sound/analysis/Rakefile

@@ -0,0 +1,30 @@
+# Simple demo Rakefile to autorun samples in current directory
+# adjust path to rp5 executable, and or opts as required
+
+SAMPLES_DIR = './'
+
+desc 'run demo'
+task default: [:demo]
+
+desc 'demo'
+task :demo do
+  samples_list.shuffle.each { |sample| run_sample sample }
+end
+
+def samples_list
+  files = []
+  Dir.chdir(SAMPLES_DIR)
+  Dir.glob('*.rb').each do |file|
+    files << File.join(SAMPLES_DIR, file)
+  end
+  return files
+end
+
+def run_sample(sample_name)
+  puts "Running #{sample_name}...quit to run next sample"
+  open("|k9 - r #{sample_name}", 'r') do |io|
+    while l = io.gets
+      puts(l.chop)
+    end
+  end
+end

processing_app/library/sound/analysis/audio_wave_form.rb

@@ -0,0 +1,46 @@
+# frozen_string_literal: true
+
+# Play a sound sample and pass it through a tape delay, changing the delay
+# parameters based on the mouse position.
+
+load_library :sound
+java_import 'processing.sound.Waveform'
+java_import 'processing.sound.SoundFile'
+
+attr_reader :waveform, :sample
+SAMPLES = 100
+def settings
+  size(640, 360)
+end
+
+def setup
+  sketch_title 'Waveform Analyser'
+  # Load and play a soundfile and loop it
+  @sample = SoundFile.new(self, data_path('beat.aiff'))
+  sample.loop
+  # Create and patch the waveform tracker
+  @waveform = Waveform.new(self, SAMPLES)
+  waveform.input(sample)
+end
+
+def draw
+  # Set background color, noFill and stroke style
+  background(0)
+  stroke(255)
+  strokeWeight(2)
+  noFill
+
+  # Perform the analysis
+  waveform.analyze
+
+  begin_shape
+  SAMPLES.times do |i|
+    # Draw current data of the waveform
+    # Each sample in the data array is between -1 and +1
+    vertex(
+      map1d(i, 0..SAMPLES, 0..width),
+      map1d(waveform.data[i], -1..1, 0..height)
+    )
+  end
+  end_shape
+end

…cessing_app/library/sound/data/beat.aiff …pp/library/sound/analysis/data/beat.aiffprocessing_app/library/sound/data/beat.aiff renamed to processing_app/library/sound/analysis/data/beat.aiff processing_app/library/sound/data/beat.aiff renamed to processing_app/library/sound/analysis/data/beat.aiff

@@ -0,0 +1,40 @@
+# frozen_string_literal: true
+
+# Play a sound sample and pass it through a tape delay, changing the delay
+# parameters based on the mouse position.
+load_library :sound
+java_import 'processing.sound.FFT'
+java_import 'processing.sound.SoundFile'
+
+attr_reader :fft, :sample, :sum, :bar_width
+SMOOTHING_FACTOR = 0.25
+BANDS = 128
+SCALE = 5
+def settings
+  size(640, 360)
+end
+
+def setup
+  sketch_title 'FFT Spectrum'
+  @bar_width = width / BANDS.to_f
+  # Load and play a soundfile and loop it
+  @sample = SoundFile.new(self, data_path('beat.aiff'))
+  sample.loop
+  # Create and patch the fft tracker
+  @fft = FFT.new(self)
+  fft.input(sample)
+  @sum = Array.new(BANDS, 0.0)
+end
+
+def draw
+  # Set background color, noStroke and fill color
+  background(125, 255, 125)
+  noStroke
+  fill(255, 0, 150)
+  fft.analyze
+  BANDS.times do |i|
+    # Smooth the FFT spectrum data by smoothing factor
+    sum[i] += (fft.spectrum[i] - sum[i]) * SMOOTHING_FACTOR
+    rect(i * bar_width, height, bar_width, -sum[i] * height * SCALE)
+  end
+end

processing_app/library/sound/analysis/fft_spectrum.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+# Play a sound sample and pass it through a tape delay, changing the delay
+# parameters based on the mouse position.
+load_library :sound
+java_import 'processing.sound.Amplitude'
+java_import 'processing.sound.SoundFile'
+
+attr_reader :rms, :sample, :sum
+SMOOTHING_FACTOR = 0.25
+def settings
+  size(640, 360)
+end
+
+def setup
+  sketch_title 'Peak Amplitude'
+  # Load and play a soundfile and loop it
+  @sample = SoundFile.new(self, data_path('beat.aiff'))
+  sample.loop
+  # Create and patch the rms tracker
+  @rms = Amplitude.new(self)
+  rms.input(sample)
+  @sum = 0
+end
+
+def draw
+  # Set background color, noStroke and fill color
+  background(125, 255, 125)
+  noStroke
+  fill(255, 0, 150)
+
+  # smooth the rms data by smoothing factor
+  @sum += (rms.analyze - sum) * SMOOTHING_FACTOR
+
+  # rms.analyze() return a value between 0 and 1. Its
+  # scaled to height/2 and then multiplied by a fixed scale factor
+  rms_scaled = sum * (height / 2) * 5
+
+  # We draw a circle whose size is coupled to the audio analysis
+  ellipse(width / 2, height / 2, rms_scaled, rms_scaled)
+end

processing_app/library/sound/analysis/peak_amplitude.rb

@@ -0,0 +1,30 @@
+# Simple demo Rakefile to autorun samples in current directory
+# adjust path to rp5 executable, and or opts as required
+
+SAMPLES_DIR = './'
+
+desc 'run demo'
+task default: [:demo]
+
+desc 'demo'
+task :demo do
+  samples_list.shuffle.each { |sample| run_sample sample }
+end
+
+def samples_list
+  files = []
+  Dir.chdir(SAMPLES_DIR)
+  Dir.glob('*.rb').each do |file|
+    files << File.join(SAMPLES_DIR, file)
+  end
+  return files
+end
+
+def run_sample(sample_name)
+  puts "Running #{sample_name}...quit to run next sample"
+  open("|k9 - r #{sample_name}", 'r') do |io|
+    while l = io.gets
+      puts(l.chop)
+    end
+  end
+end

processing_app/library/sound/brown_noise.rb

@@ -0,0 +1,38 @@
+# frozen_string_literal: true
+
+# Play a sound sample and pass it through a tape source, changing the source
+# parameters based on the mouse position.
+load_library :sound
+java_import 'processing.sound.WhiteNoise'
+java_import 'processing.sound.BandPass'
+
+attr_reader :filter, :source
+
+def settings
+  size(640, 360)
+end
+
+def setup
+  background(255)
+  sketch_title 'Band Pass Filter'
+  # Create the noise generator + filter
+  @filter = BandPass.new(self)
+  @source = WhiteNoise.new(self)
+  # Connect the filter to the source unit
+  source.play
+  filter.process(source)
+end
+
+def draw
+  # Map the left/right mouse position to a cutoff frequency between 20 and 10000 Hz
+  frequency = map1d(mouseX, 0..width, 20..10_000)
+  # And the vertical mouse position to the width of the band to be passed through
+  bandwidth = map1d(mouseY, 0..height, 1_000..100)
+  filter.freq(frequency)
+  filter.bw(bandwidth)
+  # Draw a circle indicating the position + width of the frequency window
+  # that is allowed to pass through
+  background(125, 255, 125)
+  no_stroke
+  fill(255, 0, 150)
+end