#Gabrieli - Canzon septimi toni a 8, Ch.171 arranged for Sonic Pi by Robin Newman
#November 2017

define :dl do |b| #function for debugging checking part lengths
l=0
b.each do |v|
l+=v
end
return l
end

sf=0.9;rf=0.1;av=0.1;ab=0.05 #sustain/release factors, attack values av,ab
use_synth :tri #upper parts on :tri lower ones on :pulse
with_fx :reverb, room: 0.8,mix: 0.6 do
with_fx :level,amp: 0.8 do
use_synth_defaults amp: 0.6 #for first two parts
a1=[]
b1=[]
a1[0]=[:G4,:G4,:G4,:C5,:B4,:C5,:D5,:E5,:D5,:E5,:F5,:G5,:E5,:F5,:E5,:D5,:C5,:D5,:E5,:C5,:D5,:G5,:F5,:D5,:E5,:D5,:C5,:B4,:C5,:B4,:A4,:D5,:B4,:D5,:G4,:G5,:E5,:G5,:C5,:r,:C5,:A4,:D5,:C5,:F5,:E5,:A5,:G5,:E5,:E5,:E5,:E5,:F5,:E5,:D5,:Cs5,:D5,:r,:B4,:B4,:B4,:C5,:B4,:A4,:G4,:Fs4,:G4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b1[0]=[2.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,3.0,0.5,0.5,1.5,0.5,1.0,1.0,1.0,1.5,0.5,1.0,3.0,1.0,2.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.5,0.5,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,4.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,2.0,4.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a1[1]=[:D5,:D5,:E5,:D5,:r,:D5,:Cs5,:D5,:B4,:C5,:A4,:B4,:r,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:C5,:r,:r,:G5,:F5,:E5,:D5,:A5,:A5,:Gs5]
b1[1]=[1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,2.0,1.0,3.0,1.5,0.5,1.0,0.5,1.0,0.5,1.0]
a1[2]=[:A5,:E5,:Fs5,:Fs5,:G5,:D5,:G5,:F5,:E5,:D5,:C5,:r,:E5,:D5,:C5,:B4,:r,:C5,:B4,:A4,:G4,:C5,:A4,:B4,:C5,:E5,:D5,:C5,:B4,:A4,:Gs4,:A4,:Cs5,:D5,:D5,:E5,:r,:r,:E5,:D5,:D5,:Cs5,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b1[2]=[2.0,2.0,2.0,2.0,2.0,2.0,3.0,1.0,4.0,4.0,2.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,2.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a1[3]=[:D5,:D5,:E5,:D5,:r,:D5,:Cs5,:D5,:B4,:C5,:A4,:B4,:r,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:C5,:r,:r,:G5,:F5,:E5,:D5,:A5,:A5,:Gs5]
b1[3]=[1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,2.0,1.0,3.0,1.5,0.5,1.0,0.5,1.0,0.5,1.0]
a1[4]=[:A5,:E5,:Fs5,:Fs5,:G5,:D5,:G5,:F5,:E5,:D5,:C5,:r,:r,:r,:r,:r,:E5,:D5,:C5,:B4,:A4,:G4,:F4,:E4,:F4,:G4,:A4,:B4,:C5,:D5,:B4,:E5,:D5,:C5,:B4,:E4,:F4,:G4,:A4,:B4,:C5,:D5,:B4,:E5,:E5,:D5,:E5,:Cs5,:D5,:Cs5,:D5,:r,:D5,:D5,:D5,:E5,:r,:E5,:D5,:E5,:G5,:E5,:r,:A5,:A5,:A5,:A5,:A4,:B4,:C5,:B4,:C5,:D5,:E5,:D5,:E5,:F5,:G5,:G4,:A4,:B4,:A4,:B4,:C5,:D5,:C5,:D5,:E5,:F5,:E5,:F5,:G5,:A5,:r,:r,:A5,:G5,:F5,:E5,:r,:r,:A4,:A4,:B4,:Cs5,:D5,:Cs5,:D5,:r,:r,:r]
b1[4]=[2.0,2.0,2.0,2.0,2.0,2.0,3.0,1.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.25,0.25,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,1.0,1.0,1.0,2.0,1.0,4.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,0.25,2.0,1.0,1.0,3.0,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,0.25,0.25,0.5,0.5,0.5,2.0,0.25,0.25,0.5,0.5,0.5,1.0,2.0,1.0,3.0,0.25,0.5,0.25]
a1[5]=[:D5,:D5,:E5,:D5,:r,:r,:r,:D5,:Cs5,:D5,:B4,:C5,:A4,:B4,:r,:r,:r,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:C5,:r,:r,:r,:r,:G5,:F5,:E5,:D5,:A5,:A5,:Gs5]
b1[5]=[1.0,1.0,1.0,2.0,0.25,0.5,0.25,0.75,0.25,0.5,0.5,0.5,0.5,2.0,0.25,0.5,0.25,1.0,1.0,1.0,1.5,0.5,0.5,0.5,2.0,0.25,0.5,3.0,0.25,1.5,0.5,1.0,0.5,1.0,0.5,1.0]
a1[6]=[:A5,:E5,:Fs5,:Fs5,:G5,:D5,:G5,:F5,:E5,:r,:D5,:r,:C5,:r,:E5,:E5,:E5,:F5,:C5,:C5,:C5,:D5,:F5,:D5,:E5,:F5,:D5,:C5,:r,:r,:G5,:E5,:F5,:G5,:E5,:D5,:G5,:Fs5,:G5,:Fs5,:G5,:r,:r,:G4,:A4,:B4,:C5,:D5,:B4,:C5,:D5,:E5,:F5,:G5,:F5,:E5,:D5,:C5,:G5,:G5,:D5,:E5,:r,:r,:G5,:E5,:F5,:G5,:F5,:E5,:D5,:C5,:G5,:G5]
b1[6]=[2.0,2.0,2.0,2.0,2.0,2.0,3.0,1.0,3.75,0.25,3.75,0.25,0.75,0.25,1.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,3.75,0.5,0.25,0.5,0.5,0.5,1.0,1.0,3.0,1.0,2.0,4.0,2.0,3.75,1.0,0.25,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,2.0,2.0,1.0,1.0,1.0,1.0,2.0,0.25,0.25,0.5,0.5,0.5,1.5,0.5,1.0,1.0,2.0,2.0,7.75]
c1=[120,150,120,150,120,150,120]
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],attack: av,sustain: b1[i][j]*sf,release: b1[i][j]*rf,pan: -1
sleep b1[i][j]
end
end
end

a2=[]
b2=[]
a2[0]=[:r,:r,:C4,:C4,:C4,:F4,:E4,:F4,:G4,:A4,:G4,:A4,:B4,:C5,:A4,:B4,:C5,:B4,:C5,:B4,:A4,:G4,:G4,:A4,:G4,:Fs4,:G4,:D4,:B3,:D4,:G3,:G4,:E4,:G4,:C4,:r,:G4,:E4,:A4,:G4,:C5,:B4,:E5,:D5,:C5,:C5,:C5,:G4,:C5,:Bf4,:A4,:r,:A4,:Fs4,:A4,:D4,:G4,:G4,:G4,:E4,:B3,:r,:E4,:E4,:D4,:C4,:A3,:D4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b2[0]=[4.0,4.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,2.0,1.0,3.0,0.5,0.5,3.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.5,0.5,1.0,1.0,2.0,1.0,1.0,1.0,1.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,1.0,1.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,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a2[1]=[:B4,:B4,:C5,:B4,:r,:G4,:G4,:E4,:G4,:r,:B4,:B4,:A4,:G4,:C5,:A4,:D4,:G4,:r,:r,:B4,:C5,:D5,:D5,:Cs5,:D5,:A4,:A4,:B4]
b2[1]=[1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,2.0,1.0,3.0,0.75,0.25,0.5,1.0,0.5,0.5,1.0,0.5,1.0]
a2[2]=[:Cs5,:Cs5,:D5,:D5,:D5,:G4,:C5,:G4,:G4,:G4,:r,:C5,:B4,:A4,:Gs4,:r,:A4,:G4,:F4,:E4,:E4,:F4,:F4,:E4,:E4,:A4,:D4,:E4,:E4,:A4,:G4,:E4,:F4,:E4,:D4,:Cs4,:E4,:F4,:F4,:E4,:r,:r,:A4,:F4,:D4,:A4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b2[2]=[2.0,2.0,2.0,2.0,4.0,4.0,2.0,2.0,4.0,2.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,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.5,0.5,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a2[3]=[:B4,:B4,:C5,:B4,:r,:G4,:G4,:E4,:G4,:r,:B4,:B4,:A4,:G4,:C5,:A4,:D4,:G4,:r,:r,:B4,:C5,:D5,:D5,:Cs5,:D5,:A4,:A4,:B4]
b2[3]=[1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,2.0,1.0,3.0,0.75,0.25,0.5,1.0,0.5,0.5,1.0,0.5,1.0]
a2[4]=[:Cs5,:Cs5,:D5,:D5,:D5,:G4,:C5,:G4,:G4,:G4,:r,:r,:r,:r,:r,:E4,:Fs4,:G4,:F4,:E4,:E4,:D4,:C4,:C4,:B3,:G4,:G4,:r,:D5,:C5,:C5,:Bf4,:Bf4,:A4,:A4,:r,:G4,:B4,:B4,:C5,:r,:G4,:G4,:C5,:B4,:C5,:r,:C5,:C5,:C5,:C5,:C5,:C5,:r,:B4,:B4,:A4,:D5,:Cs5,:r,:r,:A4,:F4,:A4,:A4,:r,:r,:r]
b2[4]=[2.0,2.0,2.0,2.0,4.0,4.0,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,2.0,1.0,2.0,1.5,0.5,2.0,1.5,0.5,2.0,1.0,4.0,4.0,2.0,2.0,1.5,0.5,1.0,1.0,4.0,4.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,0.25,2.0,1.0,1.0,2.0,2.0,3.75,0.25,2.0,2.0,2.0,2.0,3.75,2.0,0.25,3.0,1.0,2.0,3.0,0.25,0.5,0.25]
a2[5]=[:B4,:B4,:C5,:B4,:r,:r,:r,:G4,:G4,:E4,:G4,:r,:r,:r,:B4,:B4,:A4,:G4,:C5,:A4,:D4,:G4,:r,:r,:r,:r,:B4,:C5,:D5,:D5,:Cs5,:D5,:A4,:A4,:B4]
b2[5]=[1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,1.5,0.5,0.5,0.5,2.0,0.25,0.5,3.0,0.25,0.75,0.25,0.5,1.0,0.5,0.5,1.0,0.5,1.0]
a2[6]=[:Cs5,:Cs5,:D5,:D5,:D5,:r,:G4,:r,:C5,:G4,:G4,:r,:G4,:r,:C5,:C5,:C5,:C5,:A4,:A4,:A4,:Bf4,:Bf4,:Bf4,:Bf4,:A4,:r,:r,:C5,:C5,:C5,:B4,:D5,:D5,:r,:D5,:r,:D5,:r,:r,:G4,:G4,:D4,:E4,:F4,:G4,:r,:G4,:G4,:G4,:E4,:F4,:G4,:C4,:C5,:C5,:C5,:r,:D5]
b2[6]=[2.0,2.0,2.0,2.0,3.75,0.25,3.75,0.25,2.0,2.0,3.75,0.25,0.75,0.25,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,3.0,1.0,3.75,0.25,3.75,0.25,3.75,1.0,0.25,1.0,1.0,1.0,1.5,0.5,2.75,0.25,1.0,1.0,1.0,1.5,0.5,3.0,1.0,4.0,2.0,3.75,0.5,7.5]
c2=[120,150,120,150,120,150,120]
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],attack: av,sustain: b2[i][j]*sf,release: b2[i][j]*rf, pan: -0.8
sleep b2[i][j]
end
end
end
use_synth :pulse
use_synth_defaults amp: 0.4 #for parts 3 and 4
a3=[]
b3=[]
a3[0]=[:r,:r,:r,:r,:r,:G3,:G3,:G3,:C4,:B3,:C4,:D4,:E4,:D4,:E4,:Fs4,:G4,:E4,:Fs4,:G4,:D4,:G3,:G3,:G3,:C4,:G3,:G3,:G3,:A3,:G3,:A3,:B3,:C4,:D4,:E4,:C4,:D4,:C4,:B3,:C4,:G4,:A4,:E4,:A4,:G4,:F4,:E4,:D4,:D4,:B3,:D4,:G3,:r,:E4,:E4,:D4,:C4,:B3,:A3,:D4,:B3,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b3[0]=[4.0,4.0,4.0,4.0,4.0,2.0,1.0,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,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.5,0.5,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,3.0,1.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a3[1]=[:G4,:G4,:G4,:G4,:r,:D4,:D4,:C4,:B3,:r,:D4,:E4,:C4,:D4,:B3,:G3,:D4,:G3,:r,:r,:D4,:A4,:A4,:F4,:F4,:E4,:E4]
b3[1]=[1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,2.0,1.0,3.0,1.5,0.5,1.0,0.5,1.0,0.5,1.0]
a3[2]=[:E4,:r,:r,:D4,:E4,:E4,:G4,:G3,:D4,:G3,:r,:G4,:E4,:C4,:G4,:E4,:r,:E4,:C4,:A3,:E4,:C4,:C4,:C4,:F4,:D4,:C4,:G4,:F4,:F4,:E4,:C4,:D4,:D4,:C4,:A3,:B3,:B3,:A3,:A3,:D4,:D4,:Cs4,:r,:r,:Cs4,:D4,:D4,:E4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b3[2]=[4.0,4.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,2.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,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,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a3[3]=[:G4,:G4,:G4,:G4,:r,:D4,:D4,:C4,:B3,:r,:D4,:E4,:C4,:D4,:B3,:G3,:D4,:G3,:r,:r,:D4,:A4,:A4,:F4,:F4,:E4,:E4]
b3[3]=[1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,2.0,1.0,3.0,1.5,0.5,1.0,0.5,1.0,0.5,1.0]
a3[4]=[:E4,:r,:r,:D4,:E4,:E4,:G4,:G3,:D4,:G3,:r,:r,:r,:r,:r,:r,:C4,:D4,:B3,:C4,:A3,:B3,:G3,:A3,:E4,:C4,:D4,:E4,:D4,:C4,:r,:G4,:G4,:D4,:B3,:C4,:D4,:E4,:F4,:G4,:G4,:F4,:E4,:D4,:r,:D4,:G4,:G4,:G4,:r,:G3,:G3,:C4,:D4,:C4,:r,:C4,:C4,:C4,:C4,:C4,:C4,:r,:D4,:D4,:D4,:r,:E4,:E4,:Cs4,:D4,:E4,:F4,:E4,:D4,:E4,:D4,:r,:r,:r]
b3[4]=[4.0,4.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,4.0,4.0,4.0,4.0,4.0,2.0,2.0,1.0,1.0,1.5,0.5,1.0,1.0,2.0,1.5,0.5,2.0,2.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,2.0,1.0,2.0,4.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.5,0.5,1.0,1.0,0.25,2.0,1.0,1.0,2.0,2.0,3.75,0.25,2.0,2.0,3.75,0.25,2.0,2.0,1.5,0.5,1.0,1.0,1.0,1.0,2.0,3.0,0.25,0.5,0.25]
a3[5]=[:G4,:G4,:G4,:G4,:r,:r,:r,:D4,:D4,:C4,:B3,:r,:r,:r,:D4,:E4,:C4,:D4,:B3,:G3,:D4,:G3,:r,:r,:r,:r,:D4,:A4,:A4,:F4,:F4,:E4,:E4]
b3[5]=[1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.5,0.5,0.5,0.5,1.0,1.0,1.0,2.0,0.25,0.5,3.0,0.25,1.5,0.5,1.0,0.5,1.0,0.5,1.0]
a3[6]=[:E4,:r,:r,:r,:D4,:E4,:E4,:G4,:G3,:D4,:G3,:r,:G4,:G4,:G4,:A4,:F4,:F4,:F4,:F4,:D4,:D4,:D4,:F4,:r,:r,:E4,:E4,:E4,:G4,:G3,:r,:D4,:D4,:r,:D4,:r,:r,:E4,:D4,:D4,:C4,:G4,:G4,:D4,:E4,:F4,:G4,:G3,:G4,:r,:r,:G4,:G4,:C4,:E4,:F4,:G4,:F4,:E4,:C4,:C4,:D4]
b3[6]=[3.75,4.0,2.0,0.25,2.0,2.0,2.0,2.0,2.0,2.0,2.75,0.25,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,2.0,3.75,0.25,2.0,3.75,0.25,3.75,1.0,0.25,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.5,0.5,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,1.5,0.5,1.5,0.5,1.0,1.0,2.25,7.5]
c3=[120,150,120,150,120,150,120]
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],attack: ab,sustain: b3[i][j]*sf,release: b3[i][j]*rf,pan: -0.4
sleep b3[i][j]
end
end
end

a4=[]
b4=[]
a4[0]=[:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:C3,:C3,:C3,:F3,:E3,:F3,:G3,:A3,:G3,:A3,:B3,:C4,:A3,:B3,:C4,:G3,:C3,:C4,:A3,:C4,:F3,:G3,:A3,:D3,:r,:G3,:E3,:G3,:C3,:D3,:E3,:F3,:G3,:G2,:A2,:B2,:C3,:D3,:G2,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b4[0]=[4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,1.0,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,2.0,1.0,1.0,1.0,1.0,1.0,1.0,4.0,2.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,2.0,2.0,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a4[1]=[:G3,:G3,:C3,:G3,:r,:G3,:G3,:A3,:G3,:r,:G3,:Fs3,:G3,:E3,:F3,:D3,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:r,:r,:G3,:A3,:B3,:D4,:A3,:D3,:D3,:A2,:E3]
b4[1]=[1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,0.5,0.5,2.0,1.0,3.0,0.75,0.25,0.5,0.5,1.0,0.5,1.0,0.5,1.0]
a4[2]=[:A2,:A3,:D4,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:A3,:B3,:C4,:D4,:G3,:C4,:r,:C4,:G3,:A3,:E3,:r,:A3,:E3,:F3,:C3,:r,:r,:C4,:A3,:B3,:C4,:A3,:F3,:G3,:A3,:F3,:D3,:E3,:A2,:A3,:F3,:D3,:A3,:r,:r,:A3,:Bf3,:Bf3,:A3,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r]
b4[2]=[2.0,4.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,1.0,1.0,1.0,1.0,2.0,1.0,1.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,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0]
a4[3]=[:G3,:G3,:C3,:G3,:r,:G3,:G3,:A3,:G3,:r,:G3,:Fs3,:G3,:E3,:F3,:D3,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:r,:r,:G3,:A3,:B3,:D4,:A3,:D3,:D3,:A2,:E3]
b4[3]=[1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,0.5,0.5,2.0,1.0,3.0,0.75,0.25,0.5,0.5,1.0,0.5,1.0,0.5,1.0]
a4[4]=[:A2,:A3,:D4,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:A3,:B3,:C4,:D4,:G3,:C4,:r,:r,:r,:r,:r,:C4,:B3,:A3,:G3,:B3,:A3,:G3,:A3,:F3,:G3,:F3,:E3,:G3,:F3,:E3,:F3,:D3,:E3,:D3,:C3,:E3,:D3,:C3,:D3,:B2,:C3,:D3,:E3,:F3,:G3,:A3,:B3,:G3,:C4,:G3,:C3,:D3,:E3,:F3,:G3,:A3,:B3,:G3,:C4,:C4,:G3,:G3,:A3,:D3,:r,:G2,:G2,:G2,:C3,:r,:C3,:B2,:C3,:G3,:C3,:r,:F3,:F3,:F3,:F3,:F3,:C3,:r,:G2,:G3,:D3,:r,:A3,:r,:A3,:r,:D3,:r,:r,:r]
b4[4]=[2.0,4.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,1.0,1.0,1.0,1.0,4.0,4.0,4.0,4.0,4.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,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,2.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,1.0,1.0,4.0,4.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,0.25,2.0,1.0,1.0,2.0,2.0,3.75,0.25,2.0,2.0,3.75,0.25,7.75,0.25,3.75,0.25,3.0,0.25,0.5,0.25]
a4[5]=[:G3,:G3,:C3,:G3,:r,:r,:r,:G3,:G3,:A3,:G3,:r,:r,:r,:G3,:Fs3,:G3,:E3,:F3,:D3,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:r,:r,:r,:r,:G3,:A3,:B3,:D4,:A3,:D3,:D3,:A2,:E3]
b4[5]=[1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,0.5,0.5,2.0,0.25,0.5,3.0,0.25,0.75,0.25,0.5,0.5,1.0,0.5,1.0,0.5,1.0]
a4[6]=[:A2,:A3,:D4,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:A3,:B3,:C4,:D4,:G3,:C4,:r,:C4,:C4,:C4,:F3,:C4,:A3,:F3,:Bf3,:Bf3,:Bf3,:Bf3,:F3,:r,:r,:C4,:C4,:C4,:G3,:A3,:B3,:C4,:D4,:r,:D3,:r,:G3,:r,:r,:G3,:G3,:G3,:C3,:B2,:E3,:C3,:G3,:C3,:C4,:C4,:B3,:C4,:G3,:C3,:D3,:E3,:C3,:G3]
b4[6]=[2.0,4.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,1.0,1.0,1.0,1.0,0.75,0.25,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,1.5,0.5,1.5,0.5,3.75,0.25,3.75,0.25,3.75,1.0,0.25,1.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,3.0,1.0,2.0,2.25,7.5]
c4=[120,150,120,150,120,150,120]
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],attack: ab,sustain: b4[i][j]*sf,release: b4[i][j]*rf,pan: -0.2
sleep b4[i][j]
end
end
end
use_synth :tri
use_synth_defaults amp: 0.6 #for parts 5 and 6
a5=[]
b5=[]
a5[0]=[:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:D5,:D5,:D5,:G5,:F5,:E5,:A5,:Fs5,:G5,:A5,:Fs5,:G5,:F5,:E5,:D5,:E5,:D5,:r,:D5,:E5,:F5,:G5,:F5,:E5,:G5,:F5,:E5,:D5,:F5,:E5,:D5,:E5,:D5,:D5,:Cs5,:D5,:Cs5,:D5,:A5,:A5,:Fs5,:G5,:Fs5]
b5[0]=[4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,2.0,1.0,1.0,4.0,2.0,3.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,2.0,2.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,2.0,1.0,1.5,0.5,1.0,1.0,2.0,1.0,1.0,1.0,2.0,2.0,4.0,2.0]
a5[1]=[:G5,:r,:D5,:D5,:E5,:D5,:r,:D5,:Cs5,:D5,:B4,:C5,:A4,:B4,:r,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:C5,:B4,:A4,:G4,:r,:r,:D5,:C5,:B4]
b5[1]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,1.0]
a5[2]=[:A4,:r,:A4,:B4,:B4,:C5,:G4,:C5,:B4,:C5,:r,:r,:r,:r,:r,:r,:r,:r,:r,:Cs5,:D5,:D5,:E5,:r,:r,:E5,:D5,:D5,:Cs5,:Cs5,:D5,:E5,:F5,:D5,:E5,:C5,:D5,:B4,:C5,:A4,:B4,:A4,:r,:r,:C5,:D5,:E5,:F5,:D5,:E5,:Cs5,:D5,:Bf4,:C5,:A4,:Bf4,:A4,:E5,:A4,:D5,:B4,:r,:G5,:G5,:F5,:E5,:r,:A5,:A5,:G5,:Fs5,:r,:A5,:Fs5,:G5,:A5,:D5,:G5,:Fs5]
b5[2]=[4.0,2.0,2.0,2.0,2.0,2.0,4.0,4.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,1.5,0.5,1.5,0.5,1.5,0.5,2.0,2.0,4.0,1.0,1.0,1.0,1.0,1.5,0.5,1.5,0.5,1.5,0.5,1.5,0.5,2.0,2.0,2.0,1.0,1.0,2.0,0.5,0.5,0.5,0.5,2.0,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.5,0.5,1.0,2.0,2.0,1.0]
a5[3]=[:G5,:r,:D5,:D5,:E5,:D5,:r,:D5,:Cs5,:D5,:B4,:C5,:A4,:B4,:r,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:C5,:B4,:A4,:G4,:r,:r,:D5,:C5,:B4]
b5[3]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,1.0]
a5[4]=[:A4,:r,:A4,:B4,:B4,:C5,:G4,:C5,:B4,:C5,:r,:E5,:D5,:C5,:B4,:D5,:C5,:B4,:C5,:A4,:B4,:A4,:G4,:B4,:A4,:G4,:A4,:F4,:G4,:F4,:E4,:G4,:F4,:E4,:F4,:D4,:E4,:F4,:G4,:A4,:B4,:G4,:C5,:B4,:C5,:r,:r,:r,:r,:E4,:F4,:G4,:A4,:B4,:C5,:D5,:B4,:E5,:D5,:C5,:B4,:r,:r,:r,:A4,:A4,:A4,:B4,:r,:E5,:D5,:E5,:G5,:E5,:r,:r,:F5,:F5,:F5,:C5,:A4,:B4,:C5,:B4,:C5,:D5,:E5,:D5,:E5,:F5,:G5,:G4,:A4,:B4,:A4,:B4,:C5,:D5,:C5,:D5,:E5,:F5,:E5,:F5,:G5,:A5,:A5,:G5,:F5,:E5,:A4,:A4,:B4,:Cs5,:D5,:E5,:F5,:E5,:Fs5,:r,:r,:r]
b5[4]=[4.0,2.0,2.0,2.0,2.0,2.0,4.0,4.0,2.0,2.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.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,2.0,4.0,4.0,4.0,4.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.25,0.25,2.0,4.0,4.0,1.0,1.0,1.0,1.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.25,2.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,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.5,0.5,0.5,0.5,2.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,2.0,3.0,0.25,0.5,0.25]
a5[5]=[:G5,:r,:r,:r,:D5,:D5,:E5,:D5,:r,:r,:r,:D5,:Cs5,:D5,:B4,:C5,:A4,:B4,:r,:r,:r,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:C5,:B4,:A4,:G4,:r,:r,:r,:r,:D5,:C5,:B4]
b5[5]=[2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,0.75,0.25,0.5,0.5,0.5,0.5,2.0,0.25,0.5,0.25,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.5,0.5,1.0,1.0,0.25,0.5,1.0,0.25,1.5,0.5,1.0]
a5[6]=[:A4,:r,:r,:A4,:B4,:B4,:C5,:G4,:C5,:B4,:C5,:r,:r,:A4,:A4,:A4,:Bf4,:r,:A4,:C5,:A4,:B4,:C5,:A4,:G4,:r,:r,:D5,:B4,:C5,:D5,:B4,:A4,:D5,:C5,:A4,:B4,:r,:G4,:A4,:B4,:C5,:D5,:B4,:C5,:D5,:E5,:F5,:G5,:F5,:E5,:D5,:C5,:G5,:G5,:D5,:E5,:D5,:G5,:E5,:F5,:G5,:F5,:E5,:D5,:C5,:G5,:E5,:D5]
b5[6]=[3.75,2.0,0.25,2.0,2.0,2.0,2.0,4.0,4.0,2.0,3.75,1.0,0.25,1.0,1.0,1.0,3.75,0.25,0.5,0.5,0.5,0.5,1.0,1.0,3.75,0.5,0.25,0.5,0.5,0.5,1.0,1.0,2.0,3.0,1.0,2.0,0.75,0.25,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,2.0,2.0,1.0,1.0,1.0,1.0,2.0,2.5,0.5,0.5,0.5,1.5,0.5,1.0,1.0,2.0,2.0,2.25,7.5]
c5=[120,150,120,150,120,150,120]
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],attack: av,sustain: b5[i][j]*sf,release: b5[i][j]*rf,pan: 1
sleep b5[i][j]
end
end
end

a6=[]
b6=[]
a6[0]=[:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:B4,:B4,:B4,:C5,:A4,:A4,:A4,:D5,:B4,:Cs5,:D5,:B4,:Cs5,:D5,:Cs5,:D5,:r,:r,:A4,:C5,:C5,:B4,:A4,:G4,:A4,:G4,:A4,:B4,:Cs5,:D5,:E5,:Cs5,:D5,:B4,:A4]
b6[0]=[4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,1.0,1.0,2.0,2.0,4.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,2.0,1.0,4.0,4.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.5,0.5,0.5,0.5,0.5,0.5,2.0,2.0,4.0]
a6[1]=[:G4,:r,:B4,:B4,:C5,:B4,:r,:G4,:G4,:E4,:G4,:r,:G4,:C4,:F4,:F4,:C4,:G4,:G4,:Fs4,:G4,:E4,:F4,:G4,:G4,:Fs4,:G4,:r,:r,:D4,:E4,:E4]
b6[1]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.75,0.25,0.5,1.0,0.5,1.0,1.0,1.0,1.5,0.5,1.0]
a6[2]=[:E4,:A4,:A4,:A4,:G4,:r,:C5,:C5,:C4,:G4,:G4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:E4,:F4,:F4,:E4,:r,:r,:A4,:F4,:D4,:A4,:A4,:A4,:B4,:C5,:A4,:B4,:G4,:A4,:F4,:G4,:A4,:Gs4,:A4,:F4,:G4,:E4,:F4,:D4,:E4,:D4,:r,:A4,:G4,:E4,:G4,:D4,:G4,:E4,:F4,:D4,:E4,:C4,:D4,:Cs4,:D4,:D4,:B3,:r,:G4,:G4,:F4,:E4,:r,:A4,:A4,:G4,:Fs4,:r,:A4,:Fs4,:G4,:A4,:D4,:D4]
b6[2]=[2.0,2.0,2.0,2.0,4.0,2.0,2.0,2.0,2.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,1.0,1.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,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.5,0.5,1.5,0.5,2.0,2.0,1.0,1.0,1.0,1.0,0.5,0.5,1.5,0.5,1.5,0.5,1.5,0.5,2.0,1.0,3.0,1.0,2.0,0.5,0.5,0.5,0.5,2.0,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.5,0.5,1.0,1.0,2.0]
a6[3]=[:G4,:r,:B4,:B4,:C5,:B4,:r,:G4,:G4,:E4,:G4,:r,:G4,:C4,:F4,:F4,:C4,:G4,:G4,:Fs4,:G4,:E4,:F4,:G4,:G4,:Fs4,:G4,:r,:r,:D4,:E4,:E4]
b6[3]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.75,0.25,0.5,1.0,0.5,1.0,1.0,1.0,1.5,0.5,1.0]
a6[4]=[:E4,:A4,:A4,:A4,:G4,:r,:C5,:C5,:C4,:G4,:G4,:r,:r,:C4,:D4,:E4,:D4,:E4,:A4,:D4,:G4,:G4,:G4,:G4,:r,:r,:r,:r,:E4,:D4,:C4,:G4,:r,:r,:r,:Fs4,:Fs4,:Fs4,:G4,:r,:G4,:G4,:C5,:D5,:C5,:r,:r,:A4,:A4,:A4,:A4,:A4,:G4,:G4,:G4,:G4,:A4,:r,:A4,:r,:A4,:r,:Fs4,:r,:r,:r]
b6[4]=[2.0,2.0,2.0,2.0,4.0,2.0,2.0,2.0,2.0,4.0,4.0,2.0,1.0,1.0,1.0,2.0,1.0,2.0,1.0,1.0,3.0,1.0,2.0,2.0,4.0,4.0,4.0,4.0,2.0,2.0,2.0,2.0,4.0,4.0,1.0,1.0,1.0,1.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.25,2.0,1.0,1.0,2.0,2.0,2.0,2.0,2.0,2.0,3.75,0.25,3.75,0.25,7.75,0.25,3.0,0.25,0.5,0.25]
a6[5]=[:G4,:r,:r,:r,:B4,:B4,:C5,:B4,:r,:r,:r,:G4,:G4,:E4,:G4,:r,:r,:r,:G4,:C4,:F4,:F4,:C4,:G4,:G4,:Fs4,:G4,:E4,:F4,:G4,:G4,:Fs4,:G4,:r,:r,:r,:r,:D4,:E4,:E4]
b6[5]=[2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.75,0.25,0.5,1.0,0.5,1.0,0.25,0.5,1.0,0.25,1.5,0.5,1.0]
a6[6]=[:E4,:A4,:A4,:A4,:G4,:r,:r,:C5,:C5,:C4,:G4,:r,:G4,:r,:r,:F4,:C4,:F4,:D4,:r,:r,:F4,:F4,:F4,:E4,:r,:r,:G4,:G4,:G4,:D4,:A4,:B4,:C5,:D5,:r,:B4,:B4,:B4,:G4,:G4,:C5,:r,:r,:r,:G4,:G4,:C4,:D4,:C4,:r,:r,:r,:G4,:G4,:E4,:F4,:G4,:G4,:G4]
b6[6]=[2.0,2.0,2.0,2.0,3.75,2.0,0.25,2.0,2.0,2.0,3.75,0.25,3.75,1.0,0.25,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,3.0,1.0,1.0,1.0,2.75,0.25,1.0,1.0,1.0,2.0,2.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,2.0,0.25,0.5,0.25,1.0,2.0,3.0,1.0,4.0,2.25,7.5]
c6=[120,150,120,150,120,150,120]
in_thread do
for i in 0..a6.length-1
use_bpm c6[i]
for j in 0..a6[i].length-1
play a6[i][j],attack: av,sustain: b6[i][j]*sf,release: b6[i][j]*rf,pan: 0.8
sleep b6[i][j]
end
end
end
use_synth :pulse
use_synth_defaults amp: 0.4 #for aprts 7 and 8
a7=[]
b7=[]
a7[0]=[:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:D4,:D4,:D4,:E4,:D4,:Cs4,:D4,:r,:r,:r,:A4,:Fs4,:G4,:A4,:Fs4,:G4,:F4,:E4,:D4,:E4,:D4,:r,:r,:r,:D4,:E4,:Fs4,:G4,:F4,:E4,:G4,:F4,:E4,:D4,:F4,:E4,:D4,:D4]
b7[0]=[4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,1.0,1.0,2.0,4.0,2.0,2.0,2.0,2.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,2.0,2.0,2.0,2.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,2.0,4.0,4.0]
a7[1]=[:D4,:r,:G4,:G4,:G4,:G4,:r,:D4,:D4,:C4,:B3,:r,:B3,:E4,:A3,:B3,:E4,:C4,:C4,:A3,:D4,:G3,:D4,:D4,:D4,:r,:r,:A3,:C4,:E4]
b7[1]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,1.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,1.0]
a7[2]=[:Cs4,:E4,:D4,:D4,:G3,:G4,:G4,:G4,:E4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:A3,:D4,:D4,:Cs4,:r,:r,:Cs4,:D4,:D4,:E4,:E4,:F4,:G4,:A4,:F4,:G4,:E4,:F4,:D4,:E4,:D4,:B3,:D4,:A3,:D4,:B3,:C4,:A3,:B3,:G3,:A3,:Gs3,:A3,:r,:E4,:D4,:D4,:C4,:C4,:Bf3,:G3,:A3,:G3,:G4,:Fs4,:r,:G4,:D4,:C4,:C4,:A3,:A4,:D4,:E4,:Fs4,:Bf4,:A4]
b7[2]=[2.0,2.0,2.0,2.0,2.0,4.0,2.0,8.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,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,0.5,0.5,1.5,0.5,1.5,0.5,1.5,0.5,2.0,1.0,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,1.0,1.0,2.0,3.0,1.0,3.0,1.0,3.0,1.0,1.0,1.0,2.0]
a7[3]=[:D4,:r,:G4,:G4,:G4,:G4,:r,:D4,:D4,:C4,:B3,:r,:B3,:E4,:A3,:B3,:E4,:C4,:C4,:A3,:D4,:G3,:D4,:D4,:D4,:r,:r,:A3,:C4,:E4]
b7[3]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,1.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,1.0]
a7[4]=[:Cs4,:E4,:D4,:D4,:G3,:G4,:G4,:G4,:E4,:E4,:Fs4,:G4,:F4,:G4,:C4,:A3,:B3,:C4,:B3,:C4,:G3,:D4,:E4,:D4,:C4,:r,:r,:r,:r,:G3,:G3,:G4,:r,:r,:r,:D4,:D4,:D4,:D4,:r,:C4,:D4,:G4,:G4,:G4,:r,:r,:F4,:F4,:F4,:F4,:F4,:E4,:r,:D4,:G4,:F4,:F4,:E4,:r,:r,:A4,:G4,:F4,:E4,:A3,:A3,:A3,:A3,:r,:r,:r]
b7[4]=[2.0,2.0,2.0,2.0,2.0,4.0,2.0,8.0,2.0,2.0,1.0,2.0,1.0,2.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,4.0,4.0,4.0,4.0,3.0,1.0,4.0,4.0,4.0,1.0,1.0,1.0,1.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.25,2.0,1.0,1.0,2.0,2.0,3.75,0.25,3.0,1.0,2.0,2.0,3.75,0.5,0.25,0.5,0.5,0.5,1.0,1.0,2.0,2.0,3.0,0.25,0.5,0.25]
a7[5]=[:D4,:r,:r,:r,:G4,:G4,:G4,:G4,:r,:r,:r,:D4,:D4,:C4,:B3,:r,:r,:r,:B3,:E4,:A3,:B3,:E4,:C4,:C4,:A3,:D4,:G3,:D4,:D4,:D4,:r,:r,:r,:r,:A3,:C4,:E4]
b7[5]=[2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,1.5,0.5,1.0,1.0,0.25,0.5,1.0,0.25,1.5,0.5,1.0]
a7[6]=[:Cs4,:E4,:D4,:D4,:G3,:G4,:G4,:G4,:r,:E4,:r,:r,:A3,:A3,:A3,:F4,:r,:r,:r,:F4,:F4,:F4,:C4,:E4,:r,:r,:D4,:D4,:D4,:B3,:A3,:D4,:B3,:r,:D4,:D4,:D4,:C4,:D4,:G4,:G4,:C4,:D4,:G4,:r,:r,:r,:G4,:G4,:G3,:C4,:C4,:C4,:D4,:E4,:C4,:B3]
b7[6]=[2.0,2.0,2.0,2.0,2.0,4.0,2.0,7.75,0.25,3.75,1.0,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,4.0,3.75,1.0,0.25,1.0,1.0,1.0,2.0,2.0,2.0,0.75,0.25,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,0.25,0.5,0.25,1.0,3.0,2.0,2.0,1.0,1.0,1.0,4.0,2.25,7.5]
c7=[120,150,120,150,120,150,120]
in_thread do
for i in 0..a7.length-1
use_bpm c7[i]
for j in 0..a7[i].length-1
play a7[i][j],attack: ab,sustain: b7[i][j]*sf,release: b7[i][j]*rf,pan: 0.4
sleep b7[i][j]
end
end
end

a8=[]
b8=[]
a8[0]=[:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:G3,:G3,:G3,:C4,:D4,:A3,:D3,:r,:r,:r,:D4,:B3,:Cs4,:D4,:B3,:Cs4,:D4,:Cs4,:D4,:D3,:E3,:Fs3,:G3,:F3,:E3,:G3,:F3,:E3,:D3,:F3,:E3,:D3,:E3,:D3,:A3,:D3,:D3]
b8[0]=[4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,4.0,2.0,1.0,1.0,2.0,2.0,4.0,2.0,2.0,4.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,2.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,1.0,1.0,2.0,2.0,2.0,4.0,4.0]
a8[1]=[:G2,:r,:G3,:G3,:C3,:G3,:r,:G3,:G3,:A3,:G3,:r,:G3,:Fs3,:G3,:E3,:F3,:D3,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:D3,:E3,:G3,:D3,:G3,:r,:r,:D3,:E3,:F3,:A3,:E3]
b8[1]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,1.0,1.0,1.0,1.0,0.75,0.25,0.5,0.5,1.0]
a8[2]=[:A3,:D3,:D4,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:C3,:r,:r,:r,:r,:r,:r,:r,:r,:r,:A3,:F3,:D3,:A3,:r,:r,:A3,:Bf3,:Bf3,:A3,:r,:r,:r,:r,:C3,:D3,:E3,:F3,:D3,:E3,:C3,:D3,:B2,:C3,:A2,:B2,:A2,:F3,:G3,:A3,:Bf3,:G3,:A3,:F3,:G3,:E3,:F3,:D3,:E3,:D3,:G3,:C3,:D3,:D3,:D3]
b8[2]=[4.0,4.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,4.0,4.0,4.0,4.0,4.0,4.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,2.0,2.0,4.0,2.0,1.0,1.0,1.0,1.0,1.5,0.5,1.5,0.5,1.5,0.5,1.5,0.5,2.0,1.0,1.0,1.0,1.0,1.5,0.5,1.5,0.5,1.5,0.5,1.0,1.0,2.0,2.0,4.0,4.0,4.0,4.0,4.0]
a8[3]=[:G2,:r,:G3,:G3,:C3,:G3,:r,:G3,:G3,:A3,:G3,:r,:G3,:Fs3,:G3,:E3,:F3,:D3,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:D3,:E3,:G3,:D3,:G3,:r,:r,:D3,:E3,:F3,:A3,:E3]
b8[3]=[2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,1.0,1.0,1.0,1.0,0.75,0.25,0.5,0.5,1.0]
a8[4]=[:A3,:D3,:D4,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:C3,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:C3,:r,:r,:r,:r,:C3,:D3,:E3,:F3,:G3,:A3,:B3,:G3,:C4,:G3,:r,:r,:r,:D3,:D3,:D3,:G3,:r,:C3,:B2,:C3,:G3,:C3,:r,:r,:F3,:F3,:F3,:A3,:F3,:C4,:C3,:G3,:G2,:D3,:r,:A2,:r,:A2,:r,:D3,:r,:r,:r]
b8[4]=[4.0,4.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,2.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,0.5,0.5,0.5,0.5,4.0,2.0,4.0,4.0,4.0,4.0,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,2.0,2.0,4.0,4.0,1.0,1.0,1.0,1.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.25,2.0,1.0,1.0,2.0,2.0,2.0,2.0,2.0,2.0,3.75,0.25,7.75,0.25,3.75,0.25,3.0,0.25,0.5,0.25]
a8[5]=[:G2,:r,:r,:r,:G3,:G3,:C3,:G3,:r,:r,:r,:G3,:G3,:A3,:G3,:r,:r,:r,:G3,:Fs3,:G3,:E3,:F3,:D3,:E3,:D3,:E3,:C3,:D3,:B2,:C3,:D3,:E3,:G3,:D3,:G3,:r,:r,:r,:r,:D3,:E3,:F3,:A3,:E3]
b8[5]=[2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,1.0,1.0,1.0,2.0,0.25,0.5,0.25,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,0.5,0.5,0.75,0.25,0.5,0.5,1.0,1.0,0.25,0.5,1.0,0.25,0.75,0.25,0.5,0.5,1.0]
a8[6]=[:A3,:r,:D3,:r,:D4,:C4,:B3,:A3,:G3,:F3,:E3,:D3,:C3,:D3,:E3,:F3,:G3,:r,:C3,:r,:r,:F3,:F3,:F3,:Bf2,:r,:r,:F3,:F3,:F3,:C3,:r,:r,:G3,:G3,:G3,:D3,:r,:G2,:r,:G3,:G3,:G3,:C3,:B2,:E3,:C3,:G3,:C3,:C4,:C4,:B3,:C4,:G3,:C3,:r,:C3,:r,:G2]
b8[6]=[3.75,0.25,3.75,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,3.75,0.25,3.75,1.0,0.25,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,3.75,1.0,0.25,1.0,1.0,1.0,7.75,0.25,0.75,0.25,1.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,2.0,3.75,0.25,7.75,0.5,7.5]
c8=[120,150,120,150,120,150,120]
in_thread do
for i in 0..a8.length-1
use_bpm c8[i]
for j in 0..a8[i].length-1
play a8[i][j],attack: ab,sustain: b8[i][j]*sf,release: b8[i][j]*rf,pan: 0.2
sleep b8[i][j]
end
end
end
#for debugging, checking durations
#puts dl(b1[6]),dl(b2[6]),dl(b3[6]),dl(b4[6]),dl(b5[6]),dl(b6[6]),dl(b7[6]),dl(b8[6])
end
end