2015122_sonic_pi.rb

# przybiezeli do betlejem pasterze

define :p do |n|
  play 60, release: 0.2
  play n, release: 0.2
  sleep 0.25
end

live_loop :mel do
  #  with_fx :ring_mod do
  p 60
  p 59
  p 60
  p 62
  p 64
  p 62
  p 64
  p 65
  p 67
  p 67
  p 69
  p 69
  p 67
  p 67
  p 67
  p 67
  #  end
end

live_loop :l2 do
  sync :mel
  use_synth :fm
  16.times do
    p = one_in 2
    play 48, release: 0.3 if p
    play 72, release: 0.2, amp: 0.7 unless p
    sample :bd_haus
    sleep 0.25
  end
end