Created
October 17, 2016 12:58
-
-
Save AlexandreRangel/de95c3d32513cc0268d639985d62e1a2 to your computer and use it in GitHub Desktop.
Sonic Pi music code
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Alexandre rANGEL www.quasecinema.org | |
# the target calls the arrow v04 | |
# 17-Out-2016 | |
# Sonic Pi 2.11 dev | |
synth = '/Users/rangel/Documents/SamplesPi/synth-psycho.wav' | |
use_bpm 140 | |
live_loop :synth1 do | |
part = rrand_i(1,7) | |
with_fx :compressor, slope_above: 0.75, slope_below: 3 do | |
with_fx :flanger, phase: [4,8,16,32,64].choose do | |
with_fx :slicer, phase: [1,0.25,0.5].choose do | |
with_fx :echo, phase: rrand(0.1,0.333), decay: 2 do | |
with_fx :pitch_shift, pitch: -8 do | |
sample synth, rate: 0.25/2, amp: 5, | |
start: (1.0/8)*part, | |
finish: (1.0/8)*(part+1), | |
attack: 1, release: 1, | |
pan: (ring -0.8,0.8).tick, pan_slide: 1 | |
end | |
end | |
end | |
end | |
end | |
sleep 8 | |
end | |
sleep 8 | |
live_loop :synth2 do | |
with_fx :echo, phase: [1,2,2,2,3].choose, mix: [0,0.25].choose do | |
with_fx :slicer, phase: [0.25,0.25,0.25,0.25,0.5].choose do | |
with_fx :wobble, phase: 2, res: 0, wave: 2, smooth: 0.25, mix: 0.6 do | |
with_fx :whammy, transpose: -12, mix: 0.5, grainsize: 0.25 do | |
with_fx :slicer, phase: 0.5 do | |
with_fx :nrlpf, mix: 0.7 do | |
sample synth, rate: [0.5,1].choose, amp: 0.2, release: 2 if one_in(2) | |
end | |
end | |
end | |
end | |
end | |
end | |
sleep 16 | |
end | |
sleep 8 | |
live_loop :drums do | |
x = tick | |
sample :bd_haus, amp: ring(1,0,0,0)[x] | |
with_fx :slicer, phase: (ring 0.5,0.5,0.25,0.1)[(x/32)] do | |
with_fx :echo, phase: 0.05, mix: rrand(0.1,0.2), decay: 3 do | |
sample :drum_snare_soft, amp: ring(0,0,0,0, 0.8,0,0,0)[x] | |
end | |
end | |
with_fx :slicer, phase: 0.25 do | |
with_fx :krush, mix: 0.5 do | |
sample :guit_em9, amp: ring(1,0,0,0)[x] if one_in(24) | |
end | |
end | |
sample :drum_snare_soft, amp: ring(0,0,0,0, 0,0,0,0)[x] | |
sample :drum_bass_soft, amp: ring(0,1,0,1, 0,1,0,1)[x] | |
sleep 0.25 | |
end |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment