Bergamsaca by Salomene Rossi 1642 arranged for Sonic Pi. Hear it on https://soundcloud.com/rbnsonicpi/salomone-rossi-bergamasca-canzona

Salomone_Rossi_Bergamasca_Canzona-RF.rb

#Salomone_Rossi_Bergamasca_Canzona-RF.rb
#converted to Sonic Pi format by Robin newman Sept 2020
#from a MuseScore by Daniel Rubin
#use run_file "path/to/Salomone_Rossi_Bergamasca_Canzona-RF.rb"
with_fx :reverb,room: 0.7,mix: 0.7 do
with_fx :level,amp: 0.4 do
use_synth :tri
a1=[]
b1=[]
a1[0]=[:r,:D6,:D6,:C6,:E6,:D6,:C6,:B5,:D6,:C6,:B5,:A5,:G5,:A5,:B5,:C6,:A5,:G5,:D6,:G6,:F6,:E6,:E6,:D6,:C6,:B5,:A5,:B5,:C6,:D6,:C6,:B5,:A5,:G5,:G5,:A5,:G5,:D6,:E6,:F6,:G6,:F6,:E6,:D6,:C6,:B5,:A5,:B5,:C6,:D6,:C6,:B5,:A5,:B5,:C6,:D6,:E6,:F6,:G6,:F6,:E6,:C6,:D6,:E6,:F6,:G6,:E6,:Fs6,:G6,:Fs6,:G6,:Fs6,:E6,:Fs6,:G6,:D6,:G6,:F6,:E6,:E6,:D6,:C6,:B5,:G5,:A5,:B5,:G5,:D6,:B5,:C6,:B5,:A5,:G5,:A5,:G5,:D6,:B5,:C6,:D6,:E6,:F6,:D6,:E6,:C6,:D6,:E6,:F6,:G6,:E6,:Fs6,:D6,:E6,:Fs6,:G6,:A6,:Fs6,:G6,:G5,:A5,:B5,:C6,:D6,:B5,:C6,:F5,:G5,:A5,:B5,:C6,:A5,:B5,:C6,:D6,:E6,:D6,:C6,:B5,:A5,:G5,:A5,:G5,:G6,:D6,:G6,:D6,:E6,:G6,:Fs6,:E6,:Fs6,:G6,:D6,:A5,:B5,:G5,:A5,:B5,:C6,:A5,:B5,:G5,:A5,:B5,:A5,:G5,:r,:G6,:F6,:E6,:D6,:C6,:B5,:A5,:G5,:A5,:G5,:Fs5,:G5,:A5,:B5,:C6,:A5,:B5,:A5,:B5,:C6,:D6,:C6,:D6,:B5,:C6,:B5,:A5,:B5,:C6,:B5,:C6,:A5,:B5,:C6,:D6,:E6,:D6,:C6,:B5,:A5,:G5,:A5,:G5,:A5,:B5,:G5,:G6,:F6,:E6,:D6,:G6,:E6,:E6,:Fs6,:G6,:Fs6,:G6,:F6,:E6,:D6,:E6,:F6,:E6,:D6,:C6,:D6,:E6,:F6,:G6,:Fs6,:G6,:Fs6,:G6,:Fs6,:E6,:Fs6,:G6,:D6,:C6,:D6,:E6,:D6,:D6,:E6,:D6,:E6,:F6,:G6,:G6,:Fs6,:E6,:Fs6,:G6,:Fs6,:Fs6,:G6,:F6,:G6,:A6,:G6,:G6,:A6,:G6,:A6,:B6,:A6,:A6,:G6,:F6,:G6,:A6,:G6,:E6,:Fs6,:E6,:Fs6,:G6,:Fs6,:G6,:A6,:Fs6,:G6,:D6,:G5,:G6,:E6,:C6,:A5,:D6,:G5,:C6,:A5,:D6,:B5,:E6,:C6,:B5,:A5,:B5,:B5,:A5,:B5,:C6,:D6,:B5,:C6,:D6,:E6,:F6,:G6,:F6,:E6,:G6,:Fs6,:E6,:Fs6,:E6,:D6,:E6,:Fs6,:G6,:A6,:Fs6,:G6,:D6,:E6,:F6,:G6,:B5,:C6,:D6,:E6,:G6,:F6,:E6,:F6,:D6,:E6,:F6,:E6,:D6,:C6,:B5,:D6,:C6,:B5,:A5,:G5,:A5,:G5,:G6,:F6,:E6,:E6,:D6,:C6,:B5,:D6,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:G5,:G6,:E6,:F6,:D6,:E6,:C6,:D6,:B5,:E6,:C6,:D6,:B5,:C6,:A5,:B5,:G5,:D6,:B5,:C6,:A5,:B5,:G5,:A5,:Fs5,:B5,:G5,:A5,:F5,:G5,:E5,:F5,:D5,:E5,:F5,:G5,:E5,:Fs5,:G5,:A5,:G5,:Fs5,:G5,:Fs5,:G5,:A5,:B5,:C6,:A5,:G5,:B5,:A5,:B5,:C6,:D6,:C6,:B5,:C6,:D6,:E6,:F6,:D6,:E6,:C6,:E6,:D6,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:B5,:C6,:A5,:B5,:D6,:C6,:B5,:A5,:G5,:F5,:E5,:E6,:D6,:C6,:B5,:A5,:G5,:A5,:G5,:A5,:B5,:C6,:D6,:C6,:B5,:A5,:B5,:B5,:C6,:D6,:G6,:F6,:E6,:G6,:F6,:E6,:D6,:C6,:B5,:A5,:B5,:C6,:D6,:C6,:B5,:B5,:C6,:D6,:C6,:B5,:C6,:A5,:B5,:C6,:B5,:A5,:B5,:C6,:D6,:E6,:F6,:G6,:E6,:Fs6,:G6,:Fs6,:G6,:Fs6,:E6,:Fs6,:G6,:B5,:A5,:B5,:C6,:D6,:B5,:C6,:D6,:E6,:F6,:G6,:F6,:E6,:D6,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:B5,:C6,:A5,:B5,:C6,:D6,:C6,:B5,:C6,:D6,:B5,:C6,:B5,:A5,:G5,:A5,:B5,:C6,:A5,:B5,:C6,:D6,:E6,:F6,:G6,:E6]
b1[0]=[2.0,1.0,1.0,1.0,1.0,1.5,0.5,2.0,1.0,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,2.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,0.5,0.5,1.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,2.0,2.0,0.5,0.25,0.25,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.25,0.25,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.25,0.25,0.5,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,2.0,1.0,0.5,0.5,1.0,1.0,1.5,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,0.5,0.5,1.0,2.0,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,1.0,2.0,0.5,0.5,0.5,0.5,1.0,1.0,0.5,0.5,1.0,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,2.0,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,2.0,0.5,0.25,0.25,0.5,0.5,1.0,1.0,0.5,1.0,0.5,0.5,0.25,0.25,0.5,0.5,0.5,0.25,0.25,0.5,0.5,0.5,0.5,1.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.0,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.0,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,1.0,1.0,0.5,1.0,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,1.0,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,0.5,0.5,1.0,1.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.75,0.25,1.0,2.0,0.5,0.5,0.5,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25]
a1[1]=[:Fs6,:G6,:Fs6,:G6,:Fs6,:G6,:Fs6,:E6,:Fs6,:G6,:r]
b1[1]=[0.5,0.25,0.25,0.25,0.25,0.125,0.125,0.125,0.125,2.0,2.0]
c1=[100,80]
in_thread do
for i in 0..a1.length-1
use_bpm c1[i]
for j in 0..a1[i].length-1
play a1[i][j],sustain: b1[i][j]*0.9,release: b1[i][j]*0.1,pan: -0.6,amp: 0.7
sleep b1[i][j]
end
end
end

a2=[]
b2=[]
a2[0]=[:r,:B5,:B5,:E5,:G5,:Fs5,:G5,:B5,:A5,:G5,:Fs5,:G5,:Fs5,:G5,:B5,:C6,:D6,:B5,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:D5,:D6,:C6,:B5,:A5,:G5,:F5,:E5,:F5,:G5,:Fs5,:G5,:B5,:B5,:C6,:B5,:A5,:G5,:Fs5,:E5,:Fs5,:G5,:D6,:C6,:B5,:A5,:B5,:C6,:B5,:A5,:B5,:A5,:B5,:A5,:G5,:A5,:B5,:B5,:A5,:B5,:B5,:C6,:G5,:Fs5,:G5,:A5,:D6,:C6,:B5,:A5,:G5,:C6,:F6,:D6,:E6,:F6,:G6,:E6,:Fs6,:G6,:Fs6,:G6,:B5,:G5,:A5,:B5,:C6,:D6,:B5,:C6,:E6,:D6,:C6,:B5,:A5,:G5,:A5,:Fs5,:G5,:A5,:B5,:C6,:A5,:B5,:A5,:B5,:C6,:D6,:C6,:B5,:A5,:G5,:A5,:B5,:C6,:B5,:A5,:G5,:F5,:E5,:F5,:G5,:Fs5,:G5,:E5,:Fs5,:G5,:Fs5,:G5,:B5,:B5,:C6,:G5,:C6,:G5,:A5,:A5,:D6,:A5,:B5,:A5,:G5,:F5,:E5,:F5,:G5,:E5,:Fs5,:G5,:Fs5,:G5,:D6,:C6,:B5,:A5,:G5,:F5,:E5,:D5,:E5,:G5,:Fs5,:G5,:A5,:G5,:Fs5,:G5,:A5,:Fs5,:G5,:F5,:G5,:A5,:B5,:A5,:B5,:G5,:A5,:G5,:F5,:G5,:A5,:G5,:A5,:F5,:G5,:A5,:B5,:C6,:B5,:A5,:G5,:Fs5,:G5,:Fs5,:G5,:B5,:C6,:B5,:C6,:B5,:A5,:G5,:C6,:A5,:D6,:C6,:B5,:A5,:D6,:B5,:A5,:B5,:G5,:A5,:G5,:A5,:B5,:C6,:B5,:A5,:G5,:A5,:B5,:A5,:B5,:A5,:G5,:A5,:B5,:B5,:A5,:B5,:C6,:B5,:B5,:C6,:B5,:C6,:D6,:E6,:E6,:A5,:G5,:A5,:B5,:A5,:A5,:B5,:A5,:B5,:C6,:B5,:B5,:C6,:B5,:C6,:D6,:C6,:A5,:B5,:A5,:B5,:C6,:B5,:C6,:B5,:A5,:G5,:A5,:B5,:A5,:A5,:B5,:B5,:B5,:E6,:C6,:C6,:A5,:B5,:G5,:A5,:F5,:G5,:G5,:E5,:Fs5,:G5,:Fs5,:G5,:D6,:C6,:B5,:A5,:B5,:G5,:A5,:B5,:C6,:B5,:A5,:G5,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:B5,:C6,:A5,:B5,:A5,:B5,:A5,:G5,:A5,:B5,:C6,:G5,:Fs5,:G5,:Fs5,:G5,:B5,:C6,:D6,:G5,:A5,:G5,:Fs5,:G5,:A5,:D5,:G5,:A5,:B5,:E5,:A5,:G5,:Fs5,:D5,:E5,:A5,:G5,:Fs5,:G5,:B5,:A5,:B5,:A5,:B5,:C6,:B5,:A5,:G5,:Fs5,:G5,:Fs5,:D6,:B5,:C6,:A5,:B5,:G5,:A5,:F5,:G5,:A5,:E5,:A5,:G5,:Fs5,:G5,:D6,:C6,:B5,:A5,:B5,:A5,:G5,:A5,:B5,:C6,:D6,:B5,:C6,:E6,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:G5,:Fs5,:G5,:A5,:Fs5,:G5,:A5,:B5,:C6,:D6,:B5,:C6,:C6,:G5,:E5,:Fs5,:E5,:D5,:E5,:G5,:Fs5,:G5,:D6,:C6,:B5,:C6,:E6,:D6,:C6,:B5,:A5,:G5,:Fs5,:G5,:Fs5,:G5,:D6,:C6,:B5,:A5,:G5,:A5,:C6,:B5,:A5,:G5,:F5,:G5,:G6,:F6,:E6,:D6,:C6,:B5,:A5,:G5,:A5,:G5,:D6,:C6,:B5,:A5,:B5,:G5,:A5,:B5,:C6,:D6,:E6,:D6,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:G5,:Fs5,:G5,:A5,:Fs5,:G5,:A5,:B5,:A5,:G5,:A5,:B5,:G5,:A5,:B5,:C6,:B5,:A5,:G5,:A5,:F5,:G5,:A5,:B5,:G5,:C6,:B5]
b2[0]=[2.0,1.0,1.0,1.0,2.0,1.0,2.0,1.0,0.5,0.5,1.0,2.0,1.0,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,2.0,1.0,2.0,1.0,1.0,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,0.5,0.25,0.25,0.25,0.25,0.25,0.25,2.0,0.5,0.5,0.5,0.5,1.0,1.0,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,2.0,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,1.0,0.5,2.0,1.0,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,0.5,1.0,0.5,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,1.0,0.5,2.0,0.5,1.0,0.5,0.5,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,2.0,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,1.0,0.5,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.75,0.25,0.5,0.5,0.5,1.0,0.5,1.0,1.0,0.5,1.0,0.5,2.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,0.5,0.5,0.5,1.0,0.5,2.0,0.75,0.25,0.5,0.25,0.25,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.0,0.5,0.5,1.0,2.0,1.0,1.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,1.0,0.5,2.0,0.5,1.0,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,1.0,0.5,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,1.0,2.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5]
a2[1]=[:A5,:B5,:A5,:B5,:A5,:B5,:A5,:G5,:A5,:B5,:r]
b2[1]=[0.5,0.25,0.25,0.25,0.25,0.125,0.125,0.125,0.125,2.0,2.0]
c2=[100,80]
in_thread do
for i in 0..a2.length-1
use_bpm c2[i]
for j in 0..a2[i].length-1
play a2[i][j],sustain: b2[i][j]*0.9,release: b2[i][j]*0.1,pan: 0.6,amp: 0.7
sleep b2[i][j]
end
end
end
end #level
with_fx :level,amp: 0.8 do
use_synth :pluck
a3=[]
b3=[]
a3[0]=[:r,[:B3,:G4],[:B3,:G4],[:G3,:C4,:G4],:G4,:Fs4,[:B3,:G4],[:G3,:B3,:G4],:Fs4,:G4,:Fs4,[:D3,:G3,:B3,:G4],:G4,[:E4,:G4],[:C4,:E4,:G4],[:A3,:D4],:r,[:B3,:D4],[:G3,:D4],[:G3,:D4],[:G3,:C4,:G4],:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:E4],[:A3,:D4,:Fs4],[:B3,:G4],[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:E4],[:A3,:D4,:Fs4],[:G3,:B3,:G4],[:D4,:G4],[:C4,:E4],:D4,[:G3,:B3,:G4],[:D4,:G4],[:C4,:E4],[:C4,:E4],:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:E4],[:A3,:C4,:E4],[:A3,:D4,:Fs4],[:A3,:D4,:Fs4],[:G3,:B3,:G4],[:B3,:G4],[:C4,:A4],[:E4,:G4],:Fs4,:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:E4],[:A3,:D4,:Fs4],:B3,:A3,:G3,:F3,[:G3,:C4,:E4],[:A3,:D4,:Fs4],[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:E4],[:A3,:D4,:Fs4],[:B3,:G4],[:C4,:A4],[:E4,:G4],:Fs4,:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:G3,:C4,:E4],[:A3,:D4,:Fs4],[:B3,:G4],[:C4,:A4],[:G3,:C4,:G4],:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:B3,:G4],[:G3,:C4,:G4],[:G3,:C4,:G4],[:A3,:D4,:Fs4],[:A3,:D4,:Fs4],[:B3,:G4],[:B3,:G4],[:C4,:A4],[:C4,:A4],[:E4,:G4],:Fs4,:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:B3,:G4],[:G3,:C4,:G4],[:G3,:C4,:G4],[:C4,:E4,:A4],[:A3,:D4,:Fs4],[:B3,:G4],[:G3,:B3,:G4],[:A3,:C4],[:A3,:D4],[:C4,:E4],:G4,:Fs4,[:G3,:B3,:G4],[:D4,:G4],[:C4,:E4],:D4,[:G3,:B3,:G4],[:D4,:G4],[:C4,:E4],[:C4,:E4],:Fs4,[:G3,:B3,:G4],:r,:G3,:A3,:B3,:E4,:D4,:D4,:C4,:Fs4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:E4],[:A3,:D4,:Fs4],[:D4,:G4],[:C4,:E4],:Fs4,:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:G3,:B3,:G4],[:G3,:C4,:G4],[:G3,:C4,:G4],[:A3,:D4,:Fs4],[:B3,:G4],[:G3,:B3,:G4],[:C4,:E4],:D4,:E4,:G4,[:G3,:B3,:G4],[:B3,:G4],[:B3,:G4],[:G3,:C4,:E4],[:G3,:C4,:E4],:Fs4,:G4,[:B3,:G4],[:B3,:G4],[:C4,:A4],[:E4,:G4],:Fs4,:G4,:Fs4,[:G3,:B3,:G4],[:B3,:G4],[:B3,:G4],[:G3,:C4,:G4],[:G3,:C4,:G4],[:A3,:D4,:Fs4],[:A3,:D4,:Fs4],[:B3,:G4],[:B3,:G4],[:C4,:A4],[:C4,:A4],[:E4,:G4]]
b3[0]=[2.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,2.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,2.0,2.0,2.0,2.0,1.0,1.0,2.0,2.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,0.5,1.0,0.5,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,2.0,1.0,1.0,2.0,2.0,2.0,2.0,2.0,0.5,1.0,0.5,2.0,2.0,2.0,2.0,2.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.5,1.0,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,2.0,2.0,1.0,1.0,2.0,2.0,2.0,2.0,0.5,0.5,0.5,0.5,2.0,2.0,2.0,2.0,2.0,2.0,2.0,1.0,1.0,2.0,2.0,2.0,2.0,1.0,2.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,0.5,1.5,2.0,1.0,1.0,1.0,1.0,0.5,1.5,1.0,1.0,2.0,2.0,0.5,1.0,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0]
a3[1]=[[:A3,:D4,:Fs4],[:D3,:G3,:B3,:G4],:r]
b3[1]=[2.0,2.0,2.0]
c3=[100,80]
in_thread do
for i in 0..a3.length-1
use_bpm c3[i]
for j in 0..a3[i].length-1
play a3[i][j],sustain: b3[i][j]*0.9#,release: b3[i][j]*0.1
sleep b3[i][j]
end
end
end

a4=[]
b4=[]
a4[0]=[:r,:G3,:G3,:C3,[:D3,:A3,:D4],:G3,:G2,:D3,:E3,:C3,:D3,:G2,:G3,:A3,:B3,:G3,:C4,:C3,:D3,:E3,:Fs3,:G3,:G2,:A2,:B2,:B2,:C3,:D3,:E3,[:D3,:A3,:D4],:G2,:G3,:G2,:C3,:D3,:G3,:G2,:G3,:G2,:C3,:D3,:G2,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:C3,:D3,:C3,:B2,:A2,:G2,:G3,:F3,:E3,:F3,:D3,:G3,:C3,:A2,:B2,:G2,:D3,:B2,:C3,:D3,:G2,:G3,:G2,:C3,:A2,:D3,:D3,:G2,:G3,:F3,:E3,:C3,[:D3,:A3,:D4],:G2,:G3,:G2,:C3,:E3,:D3,:G3,:F3,:E3,:D3,:C3,:E3,:D3,:G2,:G3,:G2,:C3,:E3,:D3,:G3,:F3,:E3,:C3,[:D3,:A3,:D4],:G2,:G3,:C3,:D3,:G3,:F3,:C3,:D3,:E3,[:D3,:A3,:D4],:G2,:G3,:G3,:C3,:C3,:D3,:D3,:G3,:G3,:F3,:F3,:E3,:E3,:C3,[:D3,:D4],:G2,:G3,:G3,:C3,:C3,:A2,:D3,:G3,:E3,:F3,:D3,:E3,:C3,[:D3,:A3,:D4],:G2,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:C3,:D3,:C3,:B2,:A2,:G2,:G3,:F3,:E3,:F3,:D3,:G3,:C3,:A2,:B2,:G2,:D3,:B2,:C3,:D3,:G2,:r,:C4,:A2,:B2,:C3,:D3,:D3,:E3,:Fs3,:G3,:E3,:Fs3,:G3,:A3,:A2,:B2,:C3,:D3,:A2,:B2,:C3,:D3,:E3,:C3,:D3,:G2,:G3,:G2,:C3,:E3,:D3,:G3,:F3,:E3,:D3,:C3,:E3,:D3,:C3,:D3,:E3,:C3,:D3,:G2,:G3,:G2,:C3,:C3,:D3,:G3,:G2,:C3,:D3,:E3,:D3,:C3,:B2,:C3,[:D3,:A3],:G2,:G3,:G3,:C3,:C3,:D3,:r,:Fs4,:G3,:G3,:F3,:E3,:C3,[:D3,:A3,:D4],:G2,:G3,:G3,:C3,:C3,:D3,:D3,:G3,:G3,:F3,:F3,:E3,:C3]
b4[0]=[2.0,1.0,1.0,2.0,2.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,0.5,0.5,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,2.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,2.0,1.0,1.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,0.5,0.5,1.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,2.0,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,0.75,0.25,1.0,1.0,0.5,0.5,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0]
a4[1]=[:D3,:G2,:r]
b4[1]=[2.0,2.0,2.0]
c4=[100,80]
in_thread do
for i in 0..a4.length-1
use_bpm c4[i]
for j in 0..a4[i].length-1
play a4[i][j],sustain: b4[i][j]*0.9,amp: 0.5#,release: b4[i][j]*0.1
sleep b4[i][j]
end
end
end

a5=[]
b5=[]
a5[0]=[:r,:r,:r,:Fs4,:r,:r,:D3,:r,:r]
b5[0]=[55*4,3.0,0.5,0.5,4,3.0,1.0,5*4,2.0]
a5[1]=[:r,:r]
b5[1]=[2.0,4]
c5=[100,80]
in_thread do
for i in 0..a5.length-1
use_bpm c5[i]
for j in 0..a5[i].length-1
play a5[i][j],sustain: b5[i][j]*0.9,amp: 0.5#,release: b5[i][j]*0.1
sleep b5[i][j]
end
end
end
end#level2
end #reverb