Ambient sonic pi patch

ambi-1-ocean.rb

#pure ambi ocean
#by alex-esc
#visuals made in hydra
#hydra code, run in https://hydra.ojack.xyz/
# osc(-5.38, 0.0021, -0.478).color(0.056, 0.441, 0.313).rotate(0.585, 0.124).modulate(noise(-1.075), () => 1.376 * Math.sin(0.019 * time)).out(o0);

use_random_seed 167162

melovol = 0.01

with_fx :reverb do
  with_fx :echo, phase: 3 do
    
    live_loop :melogen do
      stop
      sleepsust = (knit 0.25, 1, 0.50, 1, 0.75, 1, 1, 2,2,5,4,4,4,8,5,4).choose
      #sleepsust = (knit 0.25, 6, 0.50, 7, 0.75, 8, 1, 2,2,1,4,1,4,1,5,2).choose
      use_synth  :growl
      play (scale, :F6, :minor).choose, sustain: sleepsust, amp: melovol
      sleep sleepsust
    end
    
    live_loop :melogen2 do
      stop
      sustslip = (knit 0.25, 1, 0.50, 1, 0.75, 1, 1, 7,2,5,3,8,5,8).choose
      #sustslip = (knit 0.25, 8, 0.50, 4, 0.75, 3, 1, 1,2,1,3,2,5,1).choose
      use_synth :growl
      play (scale, :F5, :minor).choose, sustain: sustslip, amp: melovol
      sleep sustslip
    end
    
  end
end


# mixer
s1 = 0
s2 = 0
s3 = 0


live_loop :start do
  use_synth :hollow
  sust = 12
  play (scale, :C3, :dorian).choose, amp: s1,
    sustain: sust
  sleep sust
end


live_loop :fat do
  use_synth :hollow
  sust = 13
  sleep rrand(3,10)
  play (scale, :C3, :dorian).choose, amp: s2,
    sustain: sust
  sleep sust
end


live_loop :chipy do
  use_synth  :tri
  sust = rrand(4,8)
  #sleep rrand(4,8)
  play (scale, :G3, :dorian).choose, amp: s3,
    sustain: sust
  sleep sust
end