Inne's Blog

# Welcome to Sonic Pi
use_debug false
set :bpm, 60 # use_bpm 60
with_fx :lpf do # only keep the bass
  live_loop :shaman_drum do
    use_bpm get(:bpm)
    with_fx :reverb, room: 0.7, mix: 0.5 do
      2.times do
        sample :bd_tek, amp: rrand(1.0, 1.4), cutoff: 70
        sleep 0.12 + rrand(-0.01, 0.01)
      end
    end
    sleep 0.55 + rrand(-0.02, 0.02)
  end
end
# Sphere
with_fx :slicer, phase: 16, mix: 0.15 do
  with_fx :wobble, phase: 8, mix: 0.3 do
    live_loop :sphere, sync: :shaman_drum do
      use_synth :dark_ambience
      # weiche Lautstärkewelle
      amp_wave = (range 0.1, 0.3, step: 0.01).mirror.tick
      play :e2, sustain: 8, release: 4, amp: amp_wave, cutoff: rrand(60, 90)
      sleep [8].choose # orig: 8
    end
  end
end
# BPM-Fade
live_loop :bpm_fade, sync: :shaman_drum do
  start = get(:bpm)
  ziel  = rrand(30, 90)
  steps = [16,32,64].choose # orig: 64
  dauer = [128].choose # orig: 128
  steps.times do |i|
    t = i.to_f / (steps - 1)
    curve = t ** 2 # quadratische Kurve
    bpm = start + (ziel - start) * curve
    set :bpm, bpm
    sleep dauer.to_f / steps
  end
  sleep rrand([256,512,1024].choose)
end