eryn/music
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[ff7 Prelude] move everything down an octave

Browse source
This commit is contained in:
Eryn Wells 2018-03-08 17:06:51 -08:00
parent b6c3a9d069
commit be39cb09fb
1 changed files with 13 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

26
sonicpi/ff-prelude-arpeggios.rb
View file

@ -7,23 +7,23 @@ with_fx :reverb, room: 0.85, damp: 0.8 do
live_loop :updown do live_loop :updown do
use_synth :sine use_synth :sine
progression = [[:c4, :major], progression = [[:c3, :major],
[:a3, :minor], [:a2, :minor],
[:c4, :major], [:c3, :major],
[:a3, :minor], [:a2, :minor],
[:f3, :major], [:f2, :major],
[:g3, :major], [:g2, :major],
[:ab3, :major], [:ab2, :major],
[:bb3, :major]] [:bb2, :major]]
arpeggio = [0, 1, 2, 4] arpeggio = [0, 1, 2, 4]
num_octaves = 4 octaves = 4
duration = 0.25 duration = 0.25
progression.each do |chord| progression.each do |chord|
scale_notes = scale chord[0], chord[1] # encode this... scale_notes = scale chord[0], chord[1] # encode this...
num_octaves.times do |oct| octaves.times do |oct|
puts "octave: #{oct}" puts "octave: #{oct}"
arpeggio.each do |note| arpeggio.each do |note|
play scale_notes[note] + oct * 12 play scale_notes[note] + oct * 12
@ -32,13 +32,13 @@ with_fx :reverb, room: 0.85, damp: 0.8 do
end end
# Top note of the arpeggio is the tonic. # Top note of the arpeggio is the tonic.
play scale_notes[0] + num_octaves * 12 play scale_notes[0] + octaves * 12
sleep duration sleep duration
(num_octaves - 1).times do |oct| (octaves - 1).times do |oct|
puts "octave: #{oct}" puts "octave: #{oct}"
arpeggio.reverse_each do |note| arpeggio.reverse_each do |note|
play scale_notes[note] + (num_octaves - oct - 1) * 12 play scale_notes[note] + (octaves - oct - 1) * 12
sleep duration sleep duration
end end
end end