Two small Bach Fugues (see source in code comments) Use run_file <filenamepath> to execute. Hear it on https://soundcloud.com/sp-rbn/twobachfugues

BachFugues2-RF.rb

#BachFugues2-RF.rb
#Two small bach Fugues arranged for String Trio by Alexandre Evstyugov-Babaev
#from https://musescore.com/user/27897310/scores/14176597 copyright Attribution, Share Alike
#converted for Sonic Pi by Robin Newman, Feb 2024
use_synth :blade
use_synth_defaults amp: 0.6
s=0.95;r=0.05
with_fx :reverb, room: 0.6,mix: 0.6 do
a1=[]
b1=[]
a1[0]=[:r,:r,:C5,:B4,:C5,:A4,:C5,:B4,:C5,:G4,:C5,:B4,:C5,:F4,:C5,:B4,:C5,:E4,:C5,:B4,:C5,:D4,:C5,:B4,:A4,:B4,:C5,:A4,:B4,:C5,:E5,:D5,:C5,:B4,:C5,:B4,:E5,:D5,:C5,:A4,:D5,:C5,:B4,:C5,:C5,:C5,:C5,:C5,:F5,:D5,:G5,:F5,:E5,:C5,:F5,:E5,:D5,:B4,:E5,:D5,:C5,:A4,:D5,:C5,:B4,:C5,:B4,:A4,:G4,:G5,:Fs5,:G5,:E5,:G5,:Fs5,:G5,:D5,:G5,:Fs5,:G5,:C5,:G5,:Fs5,:G5,:B4,:G5,:Fs5,:G5,:A4,:G5,:Fs5,:E5,:Fs5,:G5,:E5,:Fs5,:G4,:F5,:E5,:D5,:E5,:F5,:D5,:E5,:F4,:E5,:D5,:C5,:D5,:E5,:C5,:D5,:E4,:D5,:C5,:B4,:C5,:D5,:B4,:C5,:D4,:C5,:B4,:A4,:B4,:C5,:A4,:B4,:Gs4,:A4,:Gs4,:Fs4,:E4,:E5,:D5,:E5,:C5,:D5,:C5,:B4,:A4,:Cs5,:D5,:C5,:F5,:E5,:D5,:C5,:B4,:A4,:B4,:F5,:E5,:D5,:C5,:D5,:Cs5,:B4,:Cs5,:D5,:B4,:Cs5,:D5,:F5,:E5,:D5,:E5,:Bf5,:A5,:G5,:F5,:E5,:D5,:Cs5,:D5,:E5,:C5,:D5,:B4,:G5,:Fs5,:E5,:Fs5,:C6,:B5,:A5,:G5,:Fs5,:G5,:A5,:B5,:A5,:G5,:Fs5,:E5,:A5,:A5,:G5,:G5,:Fs5,:Fs5,:E5,:Ef5,:E5,:Fs5,:D5,:E5,:Cs5,:C5,:C5,:B4,:A4,:B4,:C5,:A4,:B4,:G4,:Fs4,:G4,:A4,:B4,:A4,:C5,:B4,:A4,:G4,:A4,:Fs4,:G4,:E4,:E4,:A4,:G4,:Fs4,:D4,:D4,:G4,:Fs4,:E4,:C5,:B4,:C5,:Fs5,:C5,:G5,:C5,:A5,:D5,:G5,:A5,:Fs5,:G5,:E5,:G5,:Fs5,:G5,:D5,:G5,:Fs5,:G5,:C5,:G5,:Fs5,:G5,:B4,:G5,:Fs5,:G5,:A4,:G5,:Fs5,:E5,:Fs5,:G5,:E5,:Fs5,:B4,:A5,:G5,:Fs5,:G5,:A5,:Fs5,:G5,:C5,:B5,:A5,:G5,:A5,:B5,:G5,:A5,:B5,:G5,:r,:B4,:D5,:G5,:C5,:B4,:D5,:G5,:A4,:G4,:B5,:C6,:A5,:D5,:C6,:B5,:G5,:C5,:Bf5,:A5,:F5,:B4,:A5,:G5,:E5,:A4,:G5,:F5,:D5,:G4,:F5,:E5,:D5,:C5,:B4,:C5,:D5,:G4,:F4,:G4,:C5,:r,:G4,:Fs4,:G4,:F5,:r,:G4,:C5,:C5,:B4]
b1[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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,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,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.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.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,1.0,1.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.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,1.0,1.5,1.0,0.5,1.5,0.5,3.5,0.5,2.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.0,1.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.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,1.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.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.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,0.5,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.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,5.0,2.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.75,0.5,0.25]
a1[1]=[[:G4,:C5],:r]
b1[1]=[2.0,4.0]
a1[2]=[:r,:r,:r,:D5,:E5,:F5,:G5,:D5,:C5,:D5,:B4,:E5,:D5,:E5,:C5,:D5,:B4,:C5,:A4,:D5,:C5,:D5,:B4,:C5,:A4,:B4,:G4,:Bf4,:A4,:G4,:F4,:A4,:G4,:F4,:E4,:G4,:A4,:B4,:C5,:Fs4,:G4,:A4,:B4,:E4,:Fs4,:G4,:A4,:D4,:E4,:Fs4,:G4,:G4,:Fs4,:E4,:Fs4,:G4,:r,:r,:r,:r,:r,:r,:G5,:A5,:B5,:C6,:G5,:F5,:G5,:E5,:A5,:G5,:A5,:F5,:G5,:E5,:F5,:D5,:G5,:F5,:G5,:E5,:F5,:D5,:E5,:Cs5,:A4,:D5,:D5,:Cs5,:B4,:Cs5,:A4,:D5,:E5,:F5,:A4,:D5,:F5,:E5,:E5,:F5,:G5,:A5,:F5,:E5,:F5,:D5,:B5,:A5,:B5,:Gs5,:B4,:C5,:D5,:E5,:A4,:G4,:A4,:F4,:D5,:C5,:D5,:B4,:C5,:A4,:B4,:Gs4,:E4,:r,:E4,:Fs4,:Gs4,:A4,:Gs4,:A4,:B4,:C5,:B4,:C5,:D5,:E5,:Ef5,:E5,:Fs5,:G5,:E5,:Ef5,:E5,:C6,:B5,:A5,:Fs5,:B5,:A5,:G5,:E5,:Ef5,:E5,:C5,:E5,:B4,:E5,:A4,:E5,:C5,:E5,:B4,:E5,:A4,:E5,:G4,:E5,:Ef5,:E5,:A4,:E5,:G4,:E5,:Fs4,:G4,:A4,:C5,:B4,:A4,:G4,:Fs4,:G4,:r,:G4,:G4,:Bf4,:Bf4,:A4,:G4,:F4,:r,:F4,:F4,:A4,:A4,:G4,:F4,:E4,:r,:G4,:Bf4,:D5,:D5,:C5,:Bf4,:A4,:C5,:D5,:E5,:F5,:C5,:Bf4,:C5,:A4,:D5,:C5,:D5,:Bf4,:C5,:A4,:Bf4,:G4,:C5,:Bf4,:C5,:A4,:Bf4,:G4,:A4,:F4,:r,:r,:F4,:E4,:F4,:D4,:E4,:C4,:D4,:B3,:D4,:G4,:F4,:E4,:r,:G4,:A4,:B4,:C5,:B4,:C5,:D5,:E5,:D5,:E5,:F5,:G5,:E5,:D5,:E5,:G5,:Cs5,:D5,:E5,:F5,:B4,:C5,:D5,:E5,:A4,:B4,:C5,:D5,:G4,:A4,:B4,:C5,:C5,:B4,:A4,:B4]
b1[2]=[4.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,2.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.0,1.0,1.0,2.0,4.0,4.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,1.25,0.25,0.75,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.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,0.25,0.25,0.25,0.25,2.5,0.5,0.5,0.5,2.5,0.5,0.5,0.5,2.5,0.5,0.5,0.5,2.25,0.25,0.25,0.25,0.5,0.5,0.5,0.5,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.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.5,0.5,0.5,0.75,0.25,0.25,0.25,1.0,0.5,0.5,0.5,0.75,0.25,0.25,0.25,1.0,0.5,0.5,0.5,0.75,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,1.0,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,0.5,0.5,1.0,0.25,0.25,0.25,0.25,2.5,0.5,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,1.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.0]
a1[3]=[:C5]
b1[3]=[4.0]
c1=[78,52,76,58]
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]*s,release: b1[i][j]*r,pan: -0.4
sleep b1[i][j]
end
end
end

a2=[]
b2=[]
a2[0]=[:r,:r,:r,:r,:G4,:Fs4,:G4,:E4,:G4,:Fs4,:G4,:D4,:G4,:Fs4,:G4,:C4,:G4,:Fs4,:G4,:B3,:G4,:Fs4,:G4,:A3,:G4,:Fs4,:E4,:Fs4,:G4,:E4,:Fs4,:G4,:A4,:G4,:F4,:E4,:F4,:E4,:A4,:G4,:A4,:D5,:G4,:C5,:Fs4,:B4,:E4,:A4,:D4,:r,:r,:r,:r,:r,:r,:r,:A4,:G4,:A4,:F4,:A4,:Gs4,:A4,:E4,:A4,:Gs4,:A4,:D4,:A4,:Gs4,:A4,:C4,:A4,:Gs4,:A4,:B3,:A4,:Gs4,:Fs4,:Gs4,:A4,:Fs4,:Gs4,:A4,:F4,:E4,:D4,:E4,:Bf4,:A4,:G4,:F4,:D4,:Cs4,:B3,:Cs4,:D4,:B3,:Cs4,:D4,:G4,:F4,:E4,:F4,:G4,:E4,:F4,:Ef4,:E4,:Ef4,:Cs4,:Ef4,:E4,:Cs4,:Ef4,:E4,:Ef4,:E4,:Fs4,:G4,:G5,:Fs5,:E5,:C5,:B4,:C5,:B4,:Fs5,:Fs5,:E5,:Ef5,:E5,:Fs5,:D5,:E5,:Cs5,:A4,:E5,:E5,:D5,:Cs5,:D5,:E5,:C5,:D5,:B4,:B4,:A4,:G4,:A4,:B4,:G4,:A4,:Fs4,:Fs4,:E4,:Ef4,:E4,:Ef4,:r,:E4,:Ef4,:E4,:A4,:E4,:B4,:E4,:C5,:D4,:Cs4,:D4,:G4,:D4,:A4,:D4,:B4,:r,:r,:r,:A4,:D5,:C5,:B4,:Fs4,:G4,:Fs4,:E4,:G4,:D4,:G4,:C4,:B3,:A3,:B3,:D4,:B3,:A3,:B3,:E4,:B3,:A3,:B3,:D4,:B3,:A3,:B3,:C4,:B3,:A3,:G3,:A3,:B3,:C4,:A3,:D4,:C4,:B3,:A3,:B3,:C4,:D4,:B3,:E4,:D4,:C4,:B3,:C4,:D4,:E4,:Fs4,:G4,:A4,:B4,:C5,:B4,:A4,:G4,:Fs4,:E4,:G4,:Fs4,:G4,:D4,:G4,:Fs4,:G4,:C4,:G4,:Fs4,:G4,:B3,:G4,:Fs4,:G4,:A3,:G4,:Fs4,:E4,:Fs4,:G4,:E4,:Fs4,:G3,:F4,:E4,:D4,:E4,:F4,:D4,:E4,:F3,:E4,:D4,:C4,:D4,:E4,:C4,:D4,:E3,:D4,:C4,:B3,:C4,:D4,:B3,:C4,:D3,:C4,:B3,:A3,:B3,:C4,:A3,:B3,:C4,:r,:E4,:D4,:E4,:F4,:E4,:D4,:E4,:G4,:E4,:D4,:E4,:A4,:E4,:D4,:E4,:G4,:E4,:D4,:E4,:F4,:D4,:G4,:F4,:E4,:r,:A4,:G4,:A4,:B4,:r,:D5,:C5,:D5,:E5,:E4,:D4,:F4]
b2[0]=[4.0,4.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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.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,1.0,1.0,4.0,4.0,4.0,4.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.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,1.0,1.0,0.5,1.0,1.0,0.5,0.5,1.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,1.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.25,0.25,0.25,0.25,2.5,0.5,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,2.5,0.5,1.0,0.5,0.5,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.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.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.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.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,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,0.75,0.25,0.5,0.5]
a2[1]=[:E4,:r]
b2[1]=[2.0,4.0]
a2[2]=[:r,:G4,:A4,:B4,:C5,:G4,:F4,:G4,:E4,:A4,:G4,:A4,:F4,:G4,:E4,:F4,:D4,:G4,:F4,:G4,:E4,:F4,:D4,:E4,:C4,:C5,:B4,:A4,:G4,:F4,:E4,:G4,:F4,:E4,:D4,:F4,:E4,:F4,:E4,:D4,:C4,:B3,:C4,:r,:G4,:Fs4,:E4,:D4,:r,:E4,:D4,:E4,:C4,:r,:D4,:C4,:D4,:B3,:r,:C4,:B3,:C4,:A3,:r,:D4,:C4,:D4,:B3,:r,:r,:D4,:E4,:Fs4,:G4,:D4,:C4,:D4,:B3,:E4,:D4,:E4,:C4,:D4,:B3,:C4,:A3,:D4,:C4,:D4,:B3,:C4,:A3,:B3,:G3,:G4,:F4,:G4,:E4,:F4,:D4,:E4,:C4,:C5,:Bf4,:C5,:A4,:Bf4,:G4,:A4,:F4,:F5,:E5,:F5,:D5,:E5,:C5,:D5,:B4,:A4,:G4,:E4,:A4,:G4,:F4,:D4,:G4,:G4,:F4,:E4,:F4,:D4,:E4,:E4,:D4,:Cs4,:D4,:D4,:Cs4,:B3,:Cs4,:A3,:D4,:Gs3,:C4,:Fs3,:Gs3,:A3,:B3,:r,:r,:C4,:F4,:E4,:D4,:B3,:E4,:E4,:A4,:G4,:F4,:D4,:G4,:G4,:C5,:B4,:A4,:Fs4,:B4,:B4,:Cs5,:Ef5,:E5,:B4,:A4,:B4,:G4,:C5,:B4,:C5,:A4,:B4,:G4,:A4,:Fs4,:B4,:A4,:B4,:G4,:A4,:Fs4,:G4,:E4,:G4,:A4,:G4,:Fs4,:A4,:G4,:Fs4,:E4,:Ef4,:E4,:r,:E4,:E4,:G4,:Cs4,:D4,:r,:D4,:D4,:F4,:B3,:C4,:r,:E4,:G4,:Bf4,:E4,:F4,:r,:r,:r,:G3,:A3,:B3,:C4,:G3,:F3,:G3,:E3,:A3,:G3,:A3,:F3,:G3,:E3,:F3,:D3,:G3,:F3,:G3,:E3,:F3,:D3,:E3,:C3,:B3,:C4,:D4,:E4,:E4,:A4,:G4,:F4,:D4,:E4,:F4,:G4,:r,:C5,:B4,:C5,:A4,:r,:B4,:A4,:B4,:G4,:r,:A4,:G4,:A4,:F4,:r,:G4,:F4,:G4,:E4,:r,:A4,:G4,:A4,:D4,:r,:G4,:F4,:G4]
b2[2]=[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,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,3.5,0.5,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,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.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,1.5,0.5,0.5,0.5,0.5,0.5,1.25,0.25,0.25,0.25,0.75,0.25,2.25,0.25,0.25,0.25,1.25,0.25,0.25,0.25,1.5,0.5,1.5,0.5,1.5,0.5,0.5,0.5,1.0,1.0,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,0.5,0.5,0.5,0.5,1.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,0.5,0.5,0.5,0.5,0.5,0.5,3.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,1.0,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,4.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,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25,1.0,0.25,0.25,0.25,0.25]
a2[3]=[:E4]
b2[3]=[4.0]
c2=[78,52,76,58]
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]*s,release: b2[i][j]*r,pan: 0.4
sleep b2[i][j]
end
end
end

a3=[]
b3=[]
a3[0]=[:r,:r,:r,:r,:r,:r,:C4,:B3,:C4,:A3,:C4,:B3,:C4,:G3,:C4,:B3,:C4,:F3,:C4,:B3,:C4,:E3,:C4,:B3,:C4,:D3,:C4,:B3,:A3,:B3,:C4,:A3,:B3,:C3,:B3,:A3,:G3,:A3,:B3,:G3,:A3,:B2,:A3,:G3,:Fs3,:G3,:A3,:Fs3,:G3,:A2,:G3,:Fs3,:E3,:Fs3,:G3,:E3,:Fs3,:G3,:Fs3,:G3,:A3,:B3,:G3,:A3,:B3,:C4,:C3,:B2,:B3,:A3,:A2,:G2,:G3,:C3,:A2,:D3,:C3,:B2,:G2,:C3,:B2,:A2,:F2,:B2,:A2,:Gs2,:E2,:A2,:G2,:F2,:D2,:D3,:B2,:E3,:Fs3,:Gs3,:E3,:A3,:G3,:F3,:E3,:D3,:A2,:A2,:A2,:A3,:r,:A3,:r,:A3,:r,:A3,:r,:A3,:r,:r,:r,:E4,:Ef4,:E4,:C4,:E4,:Ef4,:E4,:B3,:E4,:Ef4,:E4,:A3,:E4,:Ef4,:E4,:G3,:E4,:Ef4,:E4,:Fs3,:E4,:Ef4,:Cs4,:Ef4,:E4,:Cs4,:Ef4,:E3,:Fs3,:G3,:E3,:A3,:D4,:Cs4,:B3,:Cs4,:D4,:B3,:Cs4,:D3,:E3,:Fs3,:D3,:G3,:Fs3,:Gs3,:E3,:A3,:G3,:Fs3,:E3,:Fs3,:G3,:E3,:Fs3,:Ef3,:Cs3,:Ef3,:B2,:E3,:B2,:C3,:Fs2,:G2,:A2,:B2,:B3,:E3,:E2,:Fs2,:G2,:A2,:G3,:A3,:G3,:Fs3,:A3,:E3,:A3,:D3,:D2,:E2,:Fs2,:G2,:Fs3,:G3,:Fs3,:E3,:G3,:D3,:G3,:C3,:E3,:A2,:C3,:Fs2,:C4,:D4,:C4,:B3,:D4,:A3,:D4,:G3,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:C3,:B2,:C3,:A2,:C3,:B2,:C3,:G2,:C3,:B2,:C3,:F2,:C3,:B2,:C3,:E2,:C3,:B2,:C3,:D2,:C3,:B2,:A2,:B2,:C3,:A2,:B2,:C3,:D3,:E3,:Fs3,:G3,:G2,:A2,:B2,:C3,:E2,:F2,:G2]
b3[0]=[4.0,4.0,4.0,4.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.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,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,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.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,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.25,0.25,0.25,0.25,0.5,0.5,0.5,0.5,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,0.5,0.5,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,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,0.25,0.25,0.5,0.5,0.5,0.5,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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,1.0,1.0,2.0,4.0,4.0,4.0,4.0,4.0,4.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.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]
a3[1]=[:C2,:r]
b3[1]=[2.0,4.0]
a3[2]=[:r,:r,:r,:r,:G3,:A3,:B3,:C4,:G3,:F3,:G3,:E3,:A3,:G3,:A3,:F3,:G3,:E3,:F3,:D3,:G3,:F3,:G3,:E3,:F3,:D3,:E3,:C3,:B3,:A3,:G3,:Fs3,:D3,:G3,:Fs3,:E3,:G3,:Fs3,:D3,:G3,:Fs3,:E3,:D3,:C3,:A2,:D3,:D2,:G2,:D3,:E3,:Fs3,:G3,:D3,:C3,:D3,:B2,:C3,:B2,:A2,:G2,:B2,:E3,:D3,:C3,:A2,:D3,:C3,:B2,:D3,:G3,:F3,:E3,:G3,:C4,:Bf3,:A3,:C4,:F4,:E4,:D4,:E4,:D4,:C4,:Bf3,:A3,:Gs3,:A3,:G3,:F3,:F3,:E3,:C3,:D3,:r,:r,:E3,:Fs3,:Gs3,:A3,:E3,:D3,:E3,:C3,:F3,:E3,:F3,:D3,:E3,:C3,:D3,:B2,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:A2,:A3,:G3,:A3,:F3,:G3,:E3,:F3,:D3,:G3,:F3,:G3,:E3,:F3,:D3,:E3,:C3,:C4,:B3,:C4,:A3,:B3,:G3,:A3,:Fs3,:B3,:A3,:B3,:G3,:A3,:Fs3,:G3,:E3,:r,:E4,:Ef4,:E4,:G3,:C4,:B3,:A3,:Fs3,:B3,:E3,:Fs3,:G3,:A3,:B3,:G3,:E3,:G3,:Cs3,:A3,:E3,:A3,:A2,:G3,:F3,:E3,:D3,:E3,:F3,:G3,:A3,:F3,:D3,:F3,:B2,:G3,:D3,:B2,:G2,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:E3,:C3,:E3,:G2,:C3,:G2,:E2,:C2,:Bf2,:A2,:G2,:F2,:r,:C3,:D3,:E3,:F3,:D3,:G3,:F3,:E3,:C3,:F3,:E3,:F3,:C3,:B2,:A2,:B2,:C3,:B2,:C3,:G2,:A2,:B2,:C3,:G2,:F2,:G2,:E2,:A2,:G2,:A2,:F2,:G2,:E2,:F2,:D2,:G2,:F2,:G2,:E2,:F2,:D2,:E2,:C2,:r,:E3,:Cs3,:A2,:D3,:C3,:B2,:G2,:C3,:B2,:A2,:D3,:B2,:G2,:C3,:B2,:A2,:E2,:F2,:D2,:G2,:G2]
b3[2]=[4.0,4.0,4.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.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.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,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,1.0,0.5,0.5,3.0,1.0,6.0,1.0,0.5,0.5,1.5,0.5,1.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.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,1.0,1.0,3.0,1.0,4.5,0.5,0.5,0.5,0.5,0.5,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.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,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.25,0.25,0.5,0.5,3.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,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,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5]
a3[3]=[:C2]
b3[3]=[4.0]
c3=[78,52,76,58]
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]*s,release: b3[i][j]*r,amp: 0.7
sleep b3[i][j]
end
end
end
end#reverb