Skip to content

Instantly share code, notes, and snippets.

@rbnpi

rbnpi/VivaldiLaFollia-RF.rb

Last active March 22, 2021 14:02
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save rbnpi/ab6c623621c82da3194ff21b767555a1 to your computer and use it in GitHub Desktop.
Save rbnpi/ab6c623621c82da3194ff21b767555a1 to your computer and use it in GitHub Desktop.
Download ZIP
Vivaldi's La Follia Trio Sonata in D Minor arranged for Sonic Pi Hear it on https://soundcloud.com/rbnsonicpi/vivaldi-la-follia
Raw
VivaldiLaFollia-RF.rb
#Vivaldi L Follia coded for Sonic Pi by Robin Newman, March 2021
#use run_file "path/to/this/file" to execute in Sonic Pi
st=0 #starting section (can change to start playing from any tempo change 0 - 13)
s=0.98;r=0.02 #multipliers for reslease and sustain fractions of duration
am=1 #amp multiplier changed for last 4 bars
with_fx :reverb,room: 0.8,mix: 0.6 do
with_fx :level, amp: 0.8 do #overall level multiplier
use_synth :tri #for top two parts
a0=[]
b0=[]
a0[0]=[:D5,:D5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:D5,:E5,:E5,:E5,:F5,:F5,:F5,:E5,:E5,:E5,:D5,:D5,:D5,:Cs5,:D5,:D5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:D5,:E5,:E5,:E5,:F5,:F5,:F5,:E5,:E5,:F5,:G5,:F5,:E5,:D5,:Cs5,:D5,:D5]
b0[0]=[1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,3.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,0.5,0.5,1.0,0.5,0.25,0.25,1.5,0.5,3.0]
a0[1]=[:F5,:F5,:G5,:A5,:F5,:E5,:E5,:E5,:F5,:F5,:G5,:A5,:F5,:G5,:G5,:G5,:A5,:A5,:Bf5,:C6,:A5,:G5,:G5,:A5,:Bf5,:G5,:F5,:F5,:G5,:A5,:F5,:E5,:F5,:F5,:G5,:A5,:F5,:E5,:E5,:E5,:F5,:F5,:G5,:A5,:F5,:G5,:G5,:G5,:A5,:A5,:Bf5,:C6,:A5,:G5,:A5,:Bf5,:Bf5,:A5,:G5,:F5,:E5,:D5,:D5]
b0[1]=[1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,3.0,1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,0.75,0.25,1.5,0.5,0.5,0.25,0.25,1.5,0.5,3.0]
a0[2]=[:D4,:F5,:r,:Cs4,:E5,:r,:F4,:F5,:r,:E4,:G5,:r,:A4,:A5,:r,:E4,:G5,:r,:F4,:A5,:Bf5,:E5,:Cs5,:Cs4,:r,:D5,:D4,:r,:Cs5,:Cs4,:r,:D5,:D4,:r,:E5,:E4,:r,:F5,:F4,:r,:G5,:F5,:Bf5,:E5,:D5,:D5,:r,:r,:F4,:A4,:D5,:Cs5,:r,:E4,:A4,:Cs5,:D5,:r,:F4,:A4,:D5,:E5,:r,:C5,:E5,:G5,:F5,:r,:A4,:C5,:F5,:E5,:r,:Cs5,:E5,:G5,:F5,:r,:D5,:F5,:D5,:Cs5,:r,:E5,:A4,:r,:A4,:F4,:D4,:F5,:r,:A4,:E4,:Cs4,:E5,:r,:A4,:F4,:D4,:F5,:r,:C5,:G4,:E4,:G5,:r,:C5,:A4,:F4,:A5,:G5,:F5,:E5,:F5,:G5,:E5,:D5,:D5,:r,:r,:A5,:G5,:F5,:E5,:D5,:Cs5,:B4,:A4,:A5,:F5,:r,:r,:r,:C6,:Bf5,:A5,:G5,:F5,:E5,:D5,:C5,:C6,:A5,:r,:r,:r,:A5,:G5,:F5,:E5,:D5,:Cs5,:B4,:A4,:A5,:F5,:r,:r,:E5,:G5,:G5,:F5,:r,:r,:r,:A5,:G5,:F5,:E5,:D5,:Cs5,:B4,:A4,:A5,:F5,:r,:r,:r,:C6,:Bf5,:A5,:G5,:F5,:E5,:D5,:C5,:C6,:A5,:r,:r,:r,:A5,:G5,:F5,:E5,:D5,:Cs5,:B4,:A4,:G5,:F5,:E5,:D5,:Cs5,:D5,:D5,:r,:A5,:E5,:Cs5,:A4,:E5,:G5,:D5,:D5,:D5,:G5,:E5,:C5,:E5,:G5,:Bf5,:A5,:A5,:C5,:A5,:G5,:G5,:Cs5,:G5,:F5,:D5,:A5,:Bf5,:Cs5,:A5,:A5,:G5,:G5,:F5,:F5,:r,:r,:A5,:E5,:Cs5,:A4,:E5,:G5,:D5,:D5,:D5,:G5,:E5,:C5,:E5,:G5,:Bf5,:A5,:A5,:C5,:A5,:G5,:G5,:Cs5,:G5,:F5,:Cs5,:D5,:F4,[:A3,:A4],:Cs5,:D5,:r,:r,:F5,:A5,:F5,:D5,:A4,:A5,:F5,:E5,:r,:E5,:A5,:E5,:Cs5,:A4,:G5,:E5,:F5,:r,:F5,:A5,:F5,:D5,:A4,:A5,:F5,:G5,:r,:G5,:C6,:G5,:E5,:C5,:C6,:G5,:A5,:r,:A5,:C6,:A5,:F5,:C5,:C6,:A5,:G5,:r,:Bf5,:G5,:E5,:Cs5,:E5,:G5,:E5,:F5,:r,:F5,:A5,:F5,:D5,:A4,:F5,:D5,:Cs5,:A4,:E5,:A5,:E5,:Cs5,:A4,:E5,:A5,:G5,:F5,:r,:F5,:A5,:F5,:D5,:A4,:A5,:F5,:E5,:r,:E5,:G5,:E5,:Cs5,:A4,:G5,:E5,:F5,:r,:F5,:A5,:F5,:D5,:A4,:A5,:F5,:G5,:r,:G5,:C6,:G5,:E5,:C5,:C6,:G5,:A5,:r,:A5,:C6,:A5,:F5,:C5,:C6,:A5,:G5,:r,:Bf5,:G5,:E5,:Cs5,:A4,:G5,:E5,:F5,:E5,:D5,:Cs5,:D5,:E4,:Cs5,:D4,:D5,:A4,:F5,:D5,:A5,:D5,:Cs5,:A4,:E5,:Cs5,:A5,:Cs5,:D5,:A4,:F5,:D5,:A5,:D5,:E5,:C5,:G5,:E5,:C6,:E5,:F5,:C5,:A5,:F5,:C6,:F5,:E5,:C5,:G5,:E5,:Bf5,:E5,:A5,:A4,:D5,:F5,:E5,:D5,:Cs5,:B4,:A4,:E5,:D5,:Cs5,:A5,:Cs5,:D5,:A4,:F5,:E5,:D5,:A5,:D5,:Cs5,:B4,:A4,:E5,:D5,:Cs5,:A5,:Cs5,:D5,:A4,:F5,:E5,:D5,:A5,:D5,:E5,:D5,:C5,:G5,:F5,:E5,:C6,:E5,:F5,:C5,:A5,:G5,:F5,:C6,:F5,:E5,:D5,:C5,:G5,:F5,:E5,:Bf5,:A5,:G5,:F5,:E5,:D5,:Cs5,:A4,:D5,:E4,:D5,:Cs5,:D5]
b0[2]=[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,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,1.0,1.0,1.0,1.5,0.5,3.0,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,0.5,0.5,1.5,0.5,3.0,3.0,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,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,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,1.5,0.5,1.0,1.0,1.0,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,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,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,1.5,0.5,3.0,3.0,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.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,0.5,0.5,1.0,1.0,1.0,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.5,0.5,0.5,0.5,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,3.0,1.0,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,1.0,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,1.0,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,1.0,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,1.0,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,1.0,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,1.0,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.5,0.25,0.25,0.5,0.5,0.5,0.5,3.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,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.5,0.5,0.5,0.5,0.33333334,0.33333334,0.33333334,0.5,0.5,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.5,0.5,0.5,0.5,0.33333334,0.33333334,0.33333334,0.5,0.5,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.5,0.5,0.5,0.5,0.33333334,0.33333334,0.33333334,0.5,0.5,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,3.0]
a0[3]=[:r,:A4,:G5,:F5,:E5,:F5,:E5,:D5,:E5,:F5,:C5,:F5,:E5,:D5,:E5,:A4,:D5,:Cs5,:D5,:E5,:Cs5,:A4,:Cs5,:D5,:Cs5,:B4,:Cs5,:D5,:A4,:A5,:B5,:C6,:C5,:Bf5,:A5,:G5,:A5,:G5,:F5,:E5,:D5]
b0[3]=[3.0,1.0,3.0,0.5,0.5,2.0,0.5,0.5,1.0,1.0,1.0,2.0,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.5,0.5,1.0,1.0,1.0,0.5,0.5,1.0,1.0,2.0,0.5,0.5,1.0,2.0,2.0,2.0,3.0]
a0[4]=[:D5,:D4,:F4,:D4,:A4,:D5,:Cs5,:A4,:Cs4,:E4,:A4,:Cs5,:D5,:D4,:F4,:D4,:A4,:D5,:E5,:C4,:E4,:G4,:C5,:E5,:F5,:F4,:A4,:F4,:C5,:F5,:E5,:C4,:E4,:G4,:Cs5,:E5,:D5,:D4,:F4,:D4,:Bf4,:D5,:Cs5,:A4,:Cs4,:E4,:A4,:Cs5,:D5,:D4,:F4,:D4,:A4,:D5,:Cs5,:A4,:Cs4,:E4,:A4,:Cs5,:D5,:D4,:F4,:D4,:A4,:D5,:E5,:C4,:E4,:G4,:C5,:E5,:F5,:F4,:A4,:F4,:C5,:F5,:E5,:F5,:G5,:Cs5,:A4,:G5,:F5,:E5,:D5,:Cs5,:D5,:D5]
b0[4]=[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,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,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,1.5,0.5,3.0]
a0[5]=[:r,:A5,:F5,:A5,:D5,:r,:A5,:F5,:A5,:Cs5,:r,:A5,:E5,:A5,:Cs5,:r,:A5,:F5,:A5,:D5,:r,:A5,:F5,:A5,:E5,:r,:C6,:G5,:C6,:E5,:r,:C6,:A5,:C6,:F5,:r,:C6,:A5,:C6,:E5,:r,:G5,:E5,:G5,:Cs5,:r,:A5,:F5,:A5,:D5,:r,:D5,:F5,:D5,:Cs5,:r,:A5,:E5,:A5,:Cs5,:r,:A5,:F5,:A5,:D5,:r,:A5,:F5,:A5,:Cs5,:r,:A5,:E5,:A5,:Cs5,:r,:A5,:F5,:A5,:D5,:r,:A5,:F5,:A5,:E5,:r,:C6,:G5,:C6,:E5,:r,:C6,:A5,:C6,:F5,:r,:C6,:A5,:C6,:E5,:r,:G5,:E5,:G5,:Cs5,:r,:F5,:D5,:F5,:A4,:F5,:D5,:F5,:A4,:E5,:Cs5,:E5,:D5]
b0[5]=[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,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,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,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,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,3.0]
a0[6]=[:A5,:G5,:F5,:E5,:F5,:G5,:Cs5,:Cs5,:D5,:D5,:E5,:F5,:G5,:E5,:E5,:F5,:G5,:A5,:G5,:F5,:E5,:F5,:G5,:F5,:E5,:D5,:E5,:F5,:E5,:D5,:Cs5,:A5,:G5,:F5,:E5,:F5,:G5,:Cs5,:Cs5,:D5,:D5,:E5,:F5,:G5,:E5,:E5,:A5,:G5,:F5,:E5,:F5,:G5,:Cs5,:A4,:D5,:Cs5,:D5,:E5,:E5,:D5,:D5]
b0[6]=[1.0,0.5,0.5,0.5,0.375,0.125,2.0,1.0,1.0,0.75,0.25,0.75,0.25,2.0,1.0,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,3.0,1.0,0.5,0.5,0.5,0.375,0.125,2.0,1.0,1.0,0.75,0.25,0.75,0.25,2.0,1.0,1.0,0.5,0.5,0.5,0.375,0.125,1.5,0.5,1.25,0.25,0.25,0.25,1.5,0.5,3.0]
a0[7]=[:F5,:E5,:F5,:F5,:E5,:F5,:F5,:G5,:F5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:D5,:E5,:F5,:E5,:F5,:F5,:E5,:F5,:F5,:E5,:F5,:G5,:F5,:G5,:G5,:F5,:G5,:G5,:F5,:G5,:A5,:G5,:A5,:A5,:G5,:A5,:A5,:Bf5,:A5,:G5,:F5,:G5,:G5,:F5,:G5,:G5,:A5,:G5,:F5,:E5,:F5,:F5,:E5,:F5,:F5,:G5,:F5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:D5,:E5,:F5,:E5,:F5,:F5,:E5,:F5,:F5,:G5,:F5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:D5,:E5,:F5,:E5,:F5,:F5,:E5,:F5,:F5,:E5,:F5,:G5,:F5,:G5,:G5,:F5,:G5,:G5,:F5,:G5,:A5,:G5,:A5,:A5,:G5,:A5,:A5,:Bf5,:A5,:G5,:F5,:G5,:G5,:F5,:G5,:G5,:A5,:G5,:A5,:G5,:F5,:E5,:D5,:D5,:F5,:r,:r,:E5,:r,:r,:F5,:r,:r,:G5,:r,:r,:A5,:r,:r,:G5,:r,:r,:F5,:r,:r,:E5,:r,:r,:F5,:r,:r,:E5,:r,:r,:F5,:r,:r,:G5,:r,:r,:A5,:r,:r,:G5,:r,:r,:F5,:E5,:E5,:D5]
b0[7]=[0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,1.5,0.5,3.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,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,1.0,1.0,1.0,1.5,0.5,3.0]
a0[8]=[:D5,:E5,:D5,:A5,:D5,:D5,:Cs5,[:A3,:A4],:Cs5,:D5,:E5,:D5,:A5,:D5,:E5,:D5,:C5,:C4,:E5,:F5,:G5,:F5,:C6,:F5,:E5,:F5,:E5,:A5,:Cs5,:D5,:E5,:D5,:Bf5,:D5,:D5,:Cs5,:D5,:E5,:D5,:A5,:D5,:D5,:Cs5,:A4,:Cs5,:D5,:E5,:D5,:A5,:D5,:E5,:D5,:C5,:C4,:E5,:F5,:G5,:F5,:C6,:F5,:F5,:E5,:Bf5,:A5,:G5,:A5,:G5,:F5,:F5,:E5,:D5]
b0[8]=[0.75,0.25,0.5,1.0,0.5,1.0,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,1.5,1.5,0.75,0.25,0.5,1.0,0.5,1.0,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,0.75,0.25,0.5,1.0,0.5,1.0,0.5,0.75,0.25,0.5,0.75,0.25,0.5,1.0,0.5,3.0]
a0[9]=[:D5,:F4,:D4,:D5,:D4,:D5,:Cs5,:E4,:A3,:Cs5,:A3,:Cs5,:D5,:F4,:D4,:D5,:D4,:D5,:E5,:G4,:C4,:E5,:C4,:E5,:F5,:C5,:F4,:F5,:F4,:F5,:E5,:G4,:C4,:E5,:Cs4,:E5,:D5,:F4,:Bf3,:D5,:G3,:D5,:Cs5,:E4,:A3,:Cs5,:A3,:Cs5,:D5,:F4,:D4,:D5,:D4,:D5,:Cs5,:E4,:A3,:Cs5,:A3,:Cs5,:D5,:F4,:D4,:D5,:D4,:D5,:E5,:G4,:C4,:E5,:C4,:E5,:F5,:C5,:F4,:F5,:F4,:F5,:E5,:G4,:C4,:E5,:Cs4,:E5,:D5,:F4,:A3,:D5,:A3,:Cs5,:D5,:r,:F5,:E5,:F5,:F4,:F5,:F4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:F4,:F5,:E5,:F5,:F4,:F5,:F4,:G4,:G5,:F5,:G5,:G4,:G5,:G4,:A4,:A5,:G5,:A5,:A4,:A5,:A4,:G4,:G5,:F5,:G5,:G4,:G5,:G4,:F4,:F5,:E5,:F5,:F4,:F5,:F4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:F4,:F5,:E5,:F5,:F4,:F5,:F4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:F4,:F5,:E5,:F5,:F4,:F5,:F4,:G4,:G5,:F5,:G5,:G4,:G5,:G4,:A4,:A5,:G5,:A5,:A4,:A5,:A4,:G4,:G5,:F5,:G5,:G4,:G5,:G4,:F5,:G5,:F5,:E5,:E4,:E5,:E4,:D4,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:G5,:E5,:C5,:G5,:G5,:E5,:C5,:G5,:G5,:E5,:C5,:G5,:A5,:F5,:C5,:A5,:A5,:F5,:C5,:A5,:A5,:F5,:C5,:A5,:G5,:E5,:C5,:G5,:G5,:E5,:A4,:G5,:G5,:E5,:A4,:G5,:F5,:D5,:A4,:F5,:F5,:D5,:Bf4,:F5,:F5,:D5,:Bf4,:F5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:F5,:D5,:A4,:F5,:G5,:E5,:C5,:G5,:G5,:E5,:C5,:G5,:G5,:E5,:C5,:G5,:A5,:F5,:C5,:A5,:A5,:F5,:C5,:A5,:A5,:F5,:C5,:A5,:G5,:E5,:A4,:G5,:G5,:E5,:A4,:G5,:G5,:E5,:A4,:G5,:F5,:D5,:A4,:F5,:E5,:Cs5,:A4,:E5,:E5,:Cs5,:A4,:E5,:D5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:Bf5,:Bf5,:F5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:A5,:C6,:C6,:A5,:A5,:C6,:C6,:A5,:A5,:C6,:C6,:A5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:Bf5,:Bf5,:F5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:A5,:C6,:C6,:A5,:A5,:C6,:C6,:A5,:A5,:C6,:C6,:A5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:F5,:D6,:F5,:D6,:E5,:D6,:E5,:D6,:E5,:Cs6,:E5,:Cs6,:D6,:F5,:F4,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:F4,:F5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:A5,:A4,:A5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:F5,:F4,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:F4,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:F4,:F5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:A5,:A4,:A5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:G5,:Bf5,:Bf5,:G5,:F5,:D6,:F5,:D6,:E5,:D6,:E5,:D6,:E5,:Cs6,:E5,:Cs6,:D6,:F5,:F5,:F5,:E5,:E5,:E5,:E5,:E5,:E5,:D5,:r,:r]
b0[9]=[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,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,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,3.0,0.5,0.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,0.5,0.5,0.5,0.5,3.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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,3.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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,3.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,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,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,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,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,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,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,3.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.0,1.0]
a0[10]=[:F4,:F4,:F4,:E4,:E4,:E4]
b0[10]=[1.0,1.5,0.5,1.0,1.5,0.5]
a0[11]=[:E4]
b0[11]=[1.0]
a0[12]=[:E4]
b0[12]=[1.5]
a0[13]=[:E4,:D4]
b0[13]=[0.5,3.0]
c0=[71,92,144,71,172,144,63,144,71,144,144,130,115,105]
in_thread do
for i in st..a0.length-1
am=0.4 if i>=10 #reduce volume for last 4 bars
use_bpm c0[i]
for j in 0..a0[i].length-1
play a0[i][j],sustain: b0[i][j]*s,release: b0[i][j]*r,amp: 0.8*am,pan: -0.3
sleep b0[i][j]
end
end
end
a1=[]
b1=[]
a1[0]=[:F4,:F4,:F4,:E4,:E4,:E4,:F4,:F4,:F4,:G4,:G4,:G4,:A4,:A4,:A4,:G4,:G4,:G4,:F4,:F4,:F4,:E4,:F4,:F4,:F4,:E4,:E4,:E4,:F4,:F4,:F4,:G4,:G4,:G4,:A4,:A4,:A4,:G4,:G4,:A4,:Bf4,:A4,:G4,:F4,:E4,:D4,:D4]
b1[0]=[1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,3.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,0.5,0.5,1.0,0.5,0.25,0.25,1.5,0.5,3.0]
a1[1]=[:D5,:D5,:E5,:F5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:E5,:F5,:D5,:E5,:E5,:E5,:F5,:F5,:G5,:A5,:F5,:E5,:E5,:F5,:G5,:E5,:D5,:D5,:E5,:F5,:D5,:Cs5,:D5,:D5,:E5,:F5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:E5,:F5,:D5,:E5,:E5,:E5,:F5,:F5,:G5,:A5,:F5,:E5,:E5,:F5,:G5,:E5,:F5,:E5,:D5,:Cs5,:D5,:D5]
b1[1]=[1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,3.0,1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,1.5,0.5,1.0,0.75,0.25,0.75,0.25,1.0,0.75,0.25,0.75,0.25,0.5,0.25,0.25,1.5,0.5,3.0]
a1[2]=[:r,:D5,:D4,:r,:Cs5,:Cs4,:r,:D5,:D4,:r,:E5,:E4,:r,:F5,:F4,:r,:E5,:E4,:r,:D5,:D4,:Cs4,:E5,:r,:D4,:F5,:r,:Cs4,:E5,:r,:F4,:F5,:r,:E4,:G5,:r,:C5,:C6,:r,:E4,:E5,:A4,:F5,:D5,:Cs5,:D5,:D5,:r,:A4,:F4,:D4,:F5,:r,:A4,:E4,:Cs4,:E5,:r,:A4,:F4,:D4,:F5,:r,:C5,:G4,:E4,:G5,:r,:C5,:A4,:F4,:A5,:r,:C5,:G4,:E4,:G5,:r,:A4,:F4,:D4,:D5,:r,:E5,:Cs5,:r,:Cs5,:D5,:r,:F4,:A4,:D5,:Cs5,:r,:E4,:A4,:Cs5,:D5,:r,:F4,:A4,:D5,:E5,:r,:C5,:E5,:G5,:F5,:r,:A4,:C5,:F5,:Ef5,:Cs5,:D5,:E5,:Cs5,:D5,:D5,:r,:D5,:C5,:Bf4,:A4,:G4,:F4,:E4,:D4,:D5,:Cs5,:r,:r,:r,:D5,:C5,:Bf4,:A4,:G4,:F4,:E4,:D4,:D5,:E5,:r,:r,:r,:F5,:E5,:D5,:C5,:Bf4,:A4,:G4,:F4,:F5,:E5,:r,:r,:r,:D5,:C5,:Bf4,:A4,:G4,:F4,:E4,:D4,:D5,:Cs5,:E5,:E5,:A4,:D5,:C5,:Bf4,:A4,:G4,:F4,:E4,:D4,:D5,:Cs5,:r,:r,:r,:D5,:C5,:Bf4,:A4,:G4,:F4,:E4,:D4,:D5,:E5,:r,:r,:r,:F5,:E5,:D5,:C5,:Bf4,:A4,:G4,:F4,:F5,:E5,:E5,:E5,:A4,:Bf4,:E4,:A4,:D5,:D5,:A4,:F4,:D4,:A4,:D5,:Cs5,:Cs5,:Cs5,:D5,:A4,:F4,:D4,:A4,:D5,:E5,:E5,:E5,:F5,:C5,:A4,:F4,:F5,:E5,:C5,:G4,:E4,:E5,:D5,:A4,:F5,:G5,:E5,:Cs5,:Cs5,:D5,:A4,:F4,:D4,:A4,:D5,:Cs5,:Cs5,:Cs5,:D5,:A4,:F4,:D4,:A4,:D5,:E5,:E5,:E5,:F5,:C5,:A4,:F4,:F5,:E5,:C5,:G4,:E4,:E5,:D5,:G5,:F5,:E5,:D5,:D5,:A4,:F4,:A4,:D4,:r,:Cs5,:A4,:E4,:A4,:Cs4,:r,:D5,:A4,:F4,:A4,:D4,:r,:E5,:C5,:G4,:C5,:E4,:r,:F5,:C5,:A4,:C5,:F4,:r,:E5,:C5,:G4,:C5,:E4,:r,:D5,:A4,:F4,:A4,:D4,:r,:E5,:A5,:E5,:Cs5,:A4,:Cs5,:D5,:A4,:F4,:A4,:D4,:r,:Cs5,:A4,:E4,:A4,:Cs4,:r,:D5,:A4,:F4,:A4,:D4,:r,:E5,:C5,:G4,:C5,:E4,:r,:F5,:C5,:A4,:C5,:F4,:r,:E5,:C5,:G4,:C5,:E4,:r,:E5,:A4,:Bf4,:E4,:A4,:G4,:F4,:F4,:r,:F4,:F5,:F4,:E4,:r,:E4,:E5,:E4,:F4,:r,:F4,:F5,:F4,:G4,:r,:G4,:G5,:G4,:A4,:r,:A4,:A5,:A4,:G4,:r,:G4,:G5,:G4,:F4,:r,:D5,:G5,:F5,:E5,:r,:E4,:E5,:E4,:F4,:r,:F4,:F5,:F4,:E4,:r,:E4,:E5,:E4,:F4,:r,:F4,:F5,:F4,:G4,:r,:G4,:G5,:G4,:A4,:r,:A4,:A5,:A4,:G4,:r,:G4,:E5,:A4,:F4,:E4,:A4,:G4,:F4]
b1[2]=[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,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,1.0,1.0,0.5,0.5,1.5,0.5,3.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,1.0,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,0.5,0.5,2.5,0.5,1.5,0.5,3.0,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,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,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,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,1.0,1.5,0.5,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,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,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.5,0.5,1.0,1.5,0.5,0.5,0.5,1.5,0.5,3.0,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,1.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,1.0,1.0,3.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.5,0.5,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,1.0,0.25,0.25,0.25,0.25,1.0,0.5,0.5,0.5,0.5,0.5,1.0,0.5,3.0,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,3.0]
a1[3]=[:D4,:D5,:Cs5,:B4,:Cs5,:D5,:A4,:A5,:B5,:C6,:C5,:Bf5,:A5,:G5,:A5,:G5,:C5,:G5,:F5,:E5,:F5,:G5,:E5,:r,:r,:A4,:D5,:E5,:A4,:G5,:F5,:E5,:F5,:E5,:D5,:E5,:F5,:C5,:F5,:Ef5,:Cs5,:D5,:A4,:Cs5,:D5]
b1[3]=[1.0,3.0,0.5,0.5,1.0,1.0,1.0,0.5,0.5,1.0,1.0,2.0,0.5,0.5,1.0,1.0,1.0,2.0,0.5,0.5,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,0.5,0.5,2.0,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,3.0]
a1[4]=[:F4,:r,:F4,:E4,:r,:E4,:F4,:r,:F4,:G4,:r,:G4,:A4,:r,:A4,:G4,:r,:G4,:F4,:r,:F4,:E4,:F4,:r,:F4,:E4,:r,:E4,:F4,:r,:F4,:G4,:r,:G4,:A4,:r,:A4,:G4,:A4,:Bf4,:Bf4,:A4,:G4,:F4,:E4,:D4,:D4]
b1[4]=[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,1.0,3.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.5,0.5,1.5,0.5,0.5,0.25,0.25,1.5,0.5,3.0]
a1[5]=[:r,:r,:A5,:F5,:A5,:D5,:r,:A5,:E5,:A5,:Cs5,:r,:A5,:E5,:A5,:F5,:r,:A5,:F5,:A5,:D5,:r,:C6,:G5,:C6,:E5,:r,:C6,:G5,:C6,:A5,:r,:C6,:A5,:C6,:F5,:r,:C6,:G5,:C6,:E5,:r,:G5,:E5,:G5,:D5,:r,:F5,:D5,:F5,:Bf4,:F5,:D5,:F5,:E5,:A5,:E5,:A5,:Cs5,:r,:A5,:E5,:A5,:F5,:r,:A5,:F5,:A5,:E5,:r,:A5,:E5,:A5,:Cs5,:r,:A5,:E5,:A5,:F5,:r,:A5,:F5,:A5,:D5,:r,:C6,:G5,:C6,:E5,:r,:C6,:G5,:C6,:A5,:r,:C6,:A5,:C6,:F5,:r,:C6,:G5,:C6,:E5,:r,:G5,:E5,:G5,:F5,:D5,:A4,:D5,:E4,:D5,:A4,:D5,:E4,:Cs5,:A4,:Cs5,:D5]
b1[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,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,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,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,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,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,3.0]
a1[6]=[:F4,:Bf4,:E4,:E4,:F4,:F4,:G4,:G4,:A4,:Bf4,:A4,:G4,:A4,:G4,:F4,:G4,:F4,:E4,:F4,:Bf4,:E4,:E4,:F4,:F4,:G4,:G4,:F4,:Bf4,:G4,:E4,:E5,:A4,:F5,:D5,:Cs5,:D5,:D5]
b1[6]=[2.0,1.0,2.0,1.0,2.0,1.0,2.0,1.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,3.0,2.0,1.0,2.0,1.0,2.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,1.5,0.5,3.0]
a1[7]=[:D5,:Cs5,:D5,:D5,:Cs5,:D5,:D5,:E5,:D5,:Cs5,:B4,:Cs5,:Cs5,:B4,:Cs5,:Cs5,:B4,:Cs5,:D5,:Cs5,:D5,:D5,:Cs5,:D5,:D5,:C5,:D5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:D5,:E5,:F5,:E5,:F5,:F5,:E5,:F5,:F5,:G5,:F5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:F5,:E5,:D5,:Cs5,:D5,:D5,:Cs5,:D5,:D5,:E5,:D5,:Cs5,:B4,:Cs5,:Cs5,:B4,:Cs5,:Cs5,:B4,:Cs5,:D5,:Cs5,:D5,:D5,:Cs5,:D5,:D5,:E5,:D5,:Cs5,:B4,:Cs5,:Cs5,:B4,:Cs5,:Cs5,:B4,:Cs5,:D5,:Cs5,:D5,:D5,:Cs5,:D5,:D5,:C5,:D5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:D5,:E5,:F5,:E5,:F5,:F5,:E5,:F5,:F5,:G5,:F5,:E5,:D5,:E5,:E5,:D5,:E5,:E5,:F5,:E5,:F5,:E5,:D5,:Cs5,:D5,:D5,:D5,:r,:r,:Cs5,:r,:r,:D5,:r,:r,:E5,:r,:r,:F5,:r,:r,:E5,:r,:r,:D5,:r,:r,:Cs5,:r,:r,:D5,:r,:r,:Cs5,:r,:r,:D5,:r,:r,:E5,:r,:r,:F5,:r,:r,:E5,:r,:r,:D5,:D5,:Cs5,:D5]
b1[7]=[0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,1.5,0.5,3.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,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,1.0,1.0,1.0,1.5,0.5,3.0]
a1[8]=[:F4,:F4,:F4,:F4,:E4,:E4,:E4,:E4,:F4,:F4,:F4,:F4,:G4,:G4,:G4,:G4,:A4,:A4,:A4,:A4,:G4,:G4,:G4,:G4,:F4,:F4,:F4,:F4,:E4,:E4,:E4,:E4,:F4,:F4,:F4,:F4,:E4,:E4,:E4,:E4,:F4,:F4,:F4,:F4,:G4,:G4,:G4,:G4,:A4,:A4,:A4,:A4,:G4,:G5,:F5,:E5,:F5,:E5,:D5,:D5,:Cs5,:D5]
b1[8]=[1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.5,0.75,0.25,0.5,0.75,0.25,0.5,1.0,0.5,3.0]
a1[9]=[:F4,:F4,:F4,:E4,:E4,:E4,:F4,:F4,:F4,:G4,:G4,:G4,:A4,:A4,:A4,:G4,:G4,:G4,:F4,:F4,:F4,:E4,:E4,:E4,:F4,:F4,:F4,:E4,:E4,:E4,:F4,:F4,:F4,:G4,:G4,:G4,:A4,:A4,:A4,:G4,:G4,:G4,:F4,:E4,:E4,:D4,:r,:D5,:Cs5,:D5,:D4,:D5,:D4,:Cs4,:Cs5,:B4,:Cs5,:Cs4,:Cs5,:Cs4,:D4,:D5,:Cs5,:D5,:D4,:D5,:D4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:F4,:F5,:E5,:F5,:F4,:F5,:F4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:D4,:D5,:Cs5,:D5,:D4,:D5,:D4,:Cs4,:Cs5,:B4,:Cs5,:Cs4,:Cs5,:Cs4,:D4,:D5,:Cs5,:D5,:D4,:D5,:D4,:Cs4,:Cs5,:B4,:Cs5,:Cs4,:Cs5,:Cs4,:D4,:D5,:Cs5,:D5,:D4,:D5,:D4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:F4,:F5,:E5,:F5,:F4,:F5,:F4,:E4,:E5,:D5,:E5,:E4,:E5,:E4,:D5,:E5,:D5,:Cs5,:Cs4,:Cs5,:Cs4,:D4,:D5,:D5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:D5,:E5,:E5,:E5,:F5,:F5,:F5,:E5,:E5,:E5,:D5,:D5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:D5,:Cs5,:Cs5,:Cs5,:D5,:D5,:D5,:E5,:E5,:E5,:F5,:F5,:F5,:E5,:E5,:E5,:D5,:Cs5,:Cs5,:D5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:D5,:F5,:F5,:D5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:F5,:A5,:A5,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:A4,:F5,:A5,:F5,:G5,:E5,:G5,:E5,:Cs5,:E5,:Cs5,:E5,:D5,:D5,:D4,:D5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:D5,:D4,:D5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:F4,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:D5,:D4,:D5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:D5,:D4,:D5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:Cs5,:E5,:E5,:Cs5,:D5,:D4,:D5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:F5,:F4,:F5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:E5,:G5,:G5,:E5,:A4,:F5,:A5,:F5,:E5,:G5,:E5,:G5,:Cs5,:E5,:Cs5,:E5,:D5,:D5,:D5,:D5,:D5,:D5,:D5,:Cs5,:Cs5,:Cs5,:D5,:r,:r]
b1[9]=[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,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,1.0,1.0,1.0,1.0,1.0,3.0,0.5,0.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,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.25,0.25,0.5,0.5,0.5,0.5,3.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,3.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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,3.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,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,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,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,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,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,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,3.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.0,1.0]
a1[10]=[:D4,:D4,:D4,:D4,:D4,:D4]
b1[10]=[1.0,1.5,0.5,1.0,1.5,0.5]
a1[11]=[:Cs4]
b1[11]=[1.0]
a1[12]=[:Cs4]
b1[12]=[1.5]
a1[13]=[:Cs4,:D4]
b1[13]=[0.5,3.0]
c1=[71,92,144,71,172,144,63,144,71,144,144,130,115,100]
in_thread do
for i in st..a1.length-1
am=0.4 if i>=10 #reduce volume for last 4 bars
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,amp: 0.8*am,pan: 0.3
sleep b1[i][j]
end
end
end
use_synth :pulse
a2=[]
b2=[]
a2[0]=[:D3,:D3,:D3,:A2,:A2,:A2,:D3,:D3,:D3,:C3,:C3,:C3,:F3,:F3,:F3,:C3,:Cs3,:Cs3,:D3,:Bf2,:G2,:A2,:A3,:G3,:F3,:E3,:D3,:D3,:D3,:A2,:A2,:A2,:D3,:D3,:D3,:C3,:C3,:C3,:F3,:F3,:F3,:C3,:Cs3,:Cs3,:D3,:G3,:A3,:A2,:D3]
b2[0]=[1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,0.5,0.5,1.0,1.0,3.0]
a2[1]=[:D3,:D4,:r,:A3,:Bf3,:A3,:G3,:F3,:E3,:D3,:D4,:r,:C4,:D4,:C4,:Bf3,:A3,:G3,:F3,:F4,:r,:C4,:Cs4,:D4,:D3,:A3,:Bf3,:A3,:G3,:F3,:E3,:D3,:D4,:r,:A3,:Bf3,:A3,:G3,:F3,:E3,:D3,:D4,:r,:C4,:D4,:C4,:Bf3,:A3,:G3,:F3,:F4,:r,:C4,:Cs4,:D4,:E4,:Cs4,:D4,:G3,:A3,:A2,:D3]
b2[1]=[1.0,1.0,1.0,0.75,0.25,0.75,0.25,0.75,0.25,1.0,1.0,1.0,0.75,0.25,0.75,0.25,0.75,0.25,1.0,1.0,1.0,1.0,2.0,1.0,2.0,0.75,0.25,0.75,0.25,0.75,0.25,1.0,1.0,1.0,0.75,0.25,0.75,0.25,0.75,0.25,1.0,1.0,1.0,0.75,0.25,0.75,0.25,0.75,0.25,1.0,1.0,1.0,1.0,0.75,0.25,0.75,0.25,0.5,0.5,1.0,1.0,3.0]
a2[2]=[:D4,:r,:D3,:A3,:r,:A2,:D3,:r,:D4,:C4,:r,:C3,:F3,:r,:F3,:C4,:r,:Cs4,:D4,:r,:G2,:A2,:A3,:A2,:D3,:r,:D3,:A3,:r,:A2,:D3,:r,:D4,:C4,:r,:C3,:F3,:r,:F3,:C3,:Cs3,:D3,:G2,:A2,:D3,:D3,:D4,:D3,:A2,:A3,:A2,:D3,:D4,:D3,:C3,:C4,:C3,:F3,:F4,:F3,:C3,:E3,:Cs3,:D3,:Bf3,:Bf2,:A2,:A3,:A2,:D3,:D4,:D3,:A2,:A3,:A2,:D3,:D4,:D3,:C3,:C4,:C3,:F3,:F4,:F3,:G3,:A3,:Bf3,:A3,:G3,:Bf3,:A3,:A2,:D3,:D3,:E3,:F3,:D3,:F3,:G3,:A2,:B2,:Cs3,:B2,:Cs3,:A2,:D3,:E3,:F3,:D3,:F3,:G3,:C3,:D3,:E3,:D3,:E3,:C3,:F3,:G3,:A3,:F3,:A3,:B3,:C4,:Cs4,:Cs4,:D4,:D3,:F3,:D3,:F3,:G3,:A3,:A3,:G3,:F3,:E3,:D3,:Cs3,:B2,:A2,:Cs3,:D3,:E3,:F3,:D3,:F3,:G3,:A2,:B2,:Cs3,:B2,:Cs3,:A2,:D3,:E3,:F3,:D3,:F3,:G3,:C3,:D3,:E3,:D3,:E3,:C3,:F3,:G3,:A3,:F3,:A3,:B3,:C4,:Cs4,:Cs4,:D4,:D3,:A3,:A2,:D3,:D3,:F3,:G3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:E3,:D3,:A3,:Cs4,:D4,:E4,:A3,:Cs4,:D4,:E4,:A3,:Cs4,:B3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:E3,:D3,:C3,:E3,:F3,:G3,:C3,:E3,:F3,:G3,:C3,:E3,:D3,:C3,:F3,:A3,:Bf3,:C4,:F3,:A3,:Bf3,:C4,:F3,:A3,:G3,:F3,:C4,:C4,:D4,:E4,:Cs4,:Cs4,:D4,:E4,:A3,:Cs4,:B3,:A3,:D4,:F3,:G3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:E3,:D3,:A3,:Cs3,:D3,:E3,:A2,:Cs3,:D3,:E3,:A2,:Cs3,:B2,:A2,:D3,:F3,:G3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:E3,:D3,:A3,:Cs4,:D4,:E4,:A3,:Cs4,:D4,:E4,:A3,:Cs4,:B3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:G3,:A3,:D3,:F3,:E3,:D3,:C3,:E3,:F3,:G3,:C3,:E3,:F3,:G3,:C3,:E3,:D3,:C3,:F3,:A3,:Bf3,:C4,:F3,:A3,:Bf3,:C4,:F3,:A3,:G3,:F3,:C4,:C4,:D4,:E4,:Cs4,:Cs4,:D4,:E4,:A3,:Cs4,:B3,:A3,:D4,:A3,:Bf3,:G3,:A3,:A2,:D3,:D4,:D3,:F3,:D3,:A3,:A2,:Cs3,:A2,:D4,:D3,:F3,:D3,:C4,:C3,:E3,:C3,:F2,:F3,:A3,:F3,:C4,:C3,:E3,:Cs3,:D3,:D4,:F4,:D4,:A3,:A2,:Cs3,:A2,:D4,:D3,:F3,:D3,:A3,:A2,:Cs3,:A2,:D4,:D3,:F3,:D3,:C4,:C3,:E3,:C3,:F2,:F3,:A3,:F3,:C4,:C3,:E3,:Cs3,:D3,:G3,:F3,:G3,:A3,:A2,:D3,:D3,:D3,:D3,:A2,:A2,:A2,:D3,:D3,:D3,:C3,:C3,:C3,:F3,:F3,:F3,:C3,:Cs3,:Cs3,:D3,:Bf2,:G2,:A2,:A2,:A2,:D3,:D3,:D3,:A2,:A2,:A2,:D3,:D3,:D3,:C3,:C3,:C3,:F3,:F3,:F3,:C3,:Cs3,:Cs3,:D3,:G3,:A3,:A2,:D3]
b2[2]=[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,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.5,0.5,1.0,1.0,2.0,3.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,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,0.5,0.5,0.5,0.5,0.5,0.5,1.0,2.0,3.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,1.0,1.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,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.5,0.5,0.5,0.5,1.0,1.0,3.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.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.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,3.0,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,1.0,0.5,0.5,1.0,0.25,0.25,0.5,0.5,3.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,1.0,1.5,0.5,0.5,0.5,1.0,1.0,3.0]
a2[3]=[:D3,:D4,:D4,:D3,:D3,:D4,:A2,:A3,:A3,:A2,:A2,:A3,:D3,:D4,:D4,:D3,:D3,:D4,:C3,:C4,:C4,:C3,:C3,:C4,:F3,:F4,:F4,:F3,:F3,:F4,:C3,:C4,:C4,:C3,:A2,:Cs3,:D3,:D4,:D4,:D3,:G3,:G2,:A2,:A3,:A3,:A2,:A2,:A3,:D3,:D4,:D4,:D3,:D3,:D4,:A2,:A3,:A3,:A2,:A2,:A3,:D3,:D4,:D4,:D3,:D3,:D4,:C3,:C4,:C4,:C3,:C3,:C4,:F3,:F4,:F4,:F3,:F3,:F4,:G4,:G3,:G3,:A3,:Bf3,:G3,:A3,:F3,:A3,:A2,:A2,:A3,:D3]
b2[3]=[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,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,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,3.0]
a2[4]=[:D3,:r,:D3,:A3,:r,:A3,:D3,:r,:D3,:C3,:r,:C3,:F2,:r,:F2,:C3,:r,:A2,:D3,:r,:G2,:A2,:D3,:r,:D3,:A3,:r,:A3,:D3,:r,:D3,:C3,:r,:C3,:F2,:r,:F2,:C3,:Cs3,:D3,:G3,:A3,:A2,:D3]
b2[4]=[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,1.0,3.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,0.5,0.5,1.0,1.0,3.0]
a2[5]=[:D3,:D4,:D4,:D3,:D3,:r,:A3,:A3,:A2,:A2,:Cs3,:D3,:D4,:D4,:D3,:D3,:r,:C4,:C4,:C3,:C3,:E3,:F3,:F4,:F4,:F3,:F3,:r,:C4,:C4,:C3,:A2,:Cs3,:D3,:D4,:D4,:D3,:G3,:G2,:A2,:A3,:A3,:A2,:A2,:Cs3,:D3,:D4,:D4,:D3,:D3,:r,:A3,:A3,:A2,:A2,:Cs3,:D3,:D4,:D4,:D3,:D3,:r,:C4,:C4,:C3,:C3,:E3,:F3,:F4,:F4,:F3,:F3,:r,:C4,:C4,:C3,:A2,:Cs3,:D3,:A3,:A2,:D3]
b2[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,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,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,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,1.0,1.0,1.0,3.0]
a2[6]=[:D3,:G2,:A2,:A2,:D3,:D3,:C3,:C3,:F3,:Bf2,:C3,:A2,:Bf2,:G2,:A2,:D3,:G2,:A2,:A2,:D3,:D3,:C3,:C3,:F3,:G3,:r,:A3,:G3,:F3,:E3,:D3,:G3,:A3,:A2,:D3]
b2[6]=[2.0,1.0,2.0,1.0,2.0,1.0,2.0,1.0,1.0,2.0,1.0,2.0,1.0,2.0,3.0,2.0,1.0,2.0,1.0,2.0,1.0,2.0,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,3.0]
a2[7]=[:D4,:D3,:r,:A3,:A2,:r,:D4,:D3,:r,:C4,:C3,:r,:F3,:F2,:r,:C3,:Cs3,:A2,:D3,:Bf2,:G2,:A2,:A3,:r,:D3,:D4,:r,:A2,:A3,:r,:D3,:D4,:r,:C3,:C4,:r,:F2,:F3,:r,:C3,:Cs3,:A2,:D3,:G3,:A3,:A2,:D3,:D4,:D3,:E3,:F3,:G3,:A3,:F3,:E3,:D3,:A3,:A2,:B2,:Cs3,:D3,:E3,:Cs3,:B2,:A2,:D4,:D3,:E3,:F3,:G3,:A3,:F3,:E3,:D3,:C4,:C3,:D3,:E3,:F3,:G3,:E3,:D3,:C3,:F4,:F3,:G3,:A3,:Bf3,:C4,:A3,:G3,:F3,:C4,:C3,:D3,:E3,:F3,:G3,:E3,:D3,:C3,:D4,:D3,:E3,:F3,:G3,:A3,:F3,:E3,:D3,:A3,:A2,:B2,:Cs3,:D3,:E3,:Cs3,:B2,:A2,:D4,:D3,:E3,:F3,:G3,:A3,:F3,:E3,:D3,:A3,:A2,:B2,:Cs3,:D3,:E3,:Cs3,:B2,:A2,:D4,:D3,:E3,:F3,:G3,:A3,:F3,:E3,:D3,:C4,:C3,:D3,:E3,:F3,:G3,:E3,:D3,:C3,:F4,:F3,:G3,:A3,:Bf3,:C4,:A3,:G3,:F3,:C4,:C3,:D3,:E3,:F3,:G3,:A2,:B2,:Cs3,:D3,:E3,:F3,:G3,:A3,:Bf3,:A3,:A2,:D3]
b2[7]=[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,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,1.0,1.0,0.5,0.5,1.0,1.0,3.0,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.33333334,0.6666667,0.33333334,3.0]
a2[8]=[:D3,:D3,:D3,:D3,:A2,:A2,:A2,:A2,:D3,:D3,:D3,:D3,:C3,:C3,:C3,:C3,:F3,:F3,:F3,:F3,:C3,:Cs3,:Cs3,:A2,:D3,:D3,:G2,:G2,:A2,:A2,:A2,:A2,:D3,:D3,:D3,:D3,:A2,:A2,:A2,:A2,:D3,:D3,:D3,:D3,:C3,:C3,:C3,:C3,:F3,:F3,:F3,:F3,:C3,:C3,:Cs3,:D3,:E3,:D3,:G3,:A3,:A2,:D3]
b2[8]=[1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,1.0,0.5,3.0]
a2[9]=[:D3,:D3,:D3,:A2,:A2,:A2,:D3,:D3,:D3,:C3,:C3,:C3,:F3,:F3,:F3,:C3,:Cs3,:Cs3,:D3,:Bf2,:G2,:A2,:A2,:A2,:D3,:D3,:D3,:A2,:A2,:A2,:D3,:D3,:D3,:C3,:C3,:C3,:F3,:F3,:F3,:C3,:C3,:Cs3,:D3,:A3,:A2,:D3,:D4,:D3,:D3,:E3,:F3,:G3,:A3,:B3,:Cs4,:D4,:A3,:A2,:A2,:B2,:Cs3,:D3,:E3,:F3,:G3,:A3,:D3,:D2,:D3,:E3,:F3,:G3,:A3,:Bf3,:C4,:D4,:C4,:C3,:C3,:D3,:E3,:F3,:G3,:A3,:Bf3,:C4,:F3,:F2,:F3,:G3,:A3,:Bf3,:C4,:D4,:E4,:F4,:C4,:C3,:Cs3,:D3,:E3,:F3,:G3,:A3,:B3,:Cs4,:D4,:D3,:G2,:A2,:Bf2,:C3,:D3,:E3,:F3,:G3,:A2,:A2,:B2,:Cs3,:D3,:E3,:F3,:G3,:A3,:D3,:D2,:D3,:E3,:F3,:G3,:A3,:B3,:Cs4,:D4,:A3,:A2,:A2,:B2,:Cs3,:D3,:E3,:F3,:G3,:A3,:D3,:D2,:D3,:E3,:F3,:G3,:A3,:Bf3,:C4,:D4,:C4,:C3,:C3,:D3,:E3,:F3,:G3,:A3,:Bf3,:C4,:F3,:F2,:F3,:G3,:A3,:Bf3,:C4,:D4,:E4,:F4,:C4,:C3,:Cs3,:D3,:E3,:F3,:G3,:A3,:B3,:Cs4,:D3,:G2,:A2,:B2,:Cs3,:D3,:E3,:F3,:G3,:A3,:D3,:D4,:D3,:F3,:E3,:D3,:A3,:A2,:Cs3,:B2,:A2,:D3,:D4,:F4,:E4,:D4,:C4,:C3,:E3,:D3,:C3,:F2,:F3,:A3,:G3,:F3,:C3,:Cs3,:E3,:D3,:Cs3,:D3,:G2,:Bf2,:A2,:G2,:A2,:A3,:Cs4,:B3,:A3,:D4,:D3,:F3,:E3,:D3,:A3,:A2,:Cs3,:B2,:A2,:D3,:D4,:F4,:E4,:D4,:C4,:C3,:E3,:D3,:C3,:F2,:F3,:A3,:G3,:F3,:C3,:Cs3,:E3,:D3,:Cs3,:D3,:A3,:A2,:D3,:D3,:D3,:D3,:D3,:D3,:D3,:A3,:A3,:A3,:A3,:A3,:A3,:D3,:D3,:D3,:D3,:D3,:D3,:C3,:C3,:C3,:C3,:C3,:C3,:F3,:F3,:F3,:F3,:F3,:F3,:C4,:C4,:Cs4,:Cs4,:Cs4,:Cs4,:D4,:D4,:D3,:D3,:D3,:D3,:A3,:A3,:A3,:A3,:A3,:A3,:D3,:D3,:D3,:D3,:D3,:D3,:A3,:A3,:A3,:A3,:A3,:A3,:D3,:D3,:D3,:D3,:D3,:D3,:C3,:C3,:C3,:C3,:C3,:C3,:F3,:F3,:F3,:F3,:F3,:F3,:C4,:C4,:Cs4,:Cs4,:Cs4,:Cs4,:D4,:D3,:G3,:G3,:A3,:A3,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:A2,:A3,:A2,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:C3,:C4,:C3,:F3,:A3,:A3,:F3,:F3,:A3,:A3,:F3,:F3,:A3,:A3,:F3,:C3,:Cs3,:Cs3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:A2,:A3,:A2,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:A2,:A3,:A2,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:C3,:C4,:C3,:F3,:A3,:A3,:F3,:F3,:A3,:A3,:F3,:F3,:A3,:A3,:F3,:C3,:Cs3,:Cs3,:D3,:A3,:A2,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:G2,:G3,:G3,:G2,:G2,:G3,:G3,:G2,:G2,:G3,:G3,:G2,:A2,:A3,:A3,:A2,:A2,:A3,:A3,:A2,:A2,:A3,:A3,:A2,:D3,:r,:r]
b2[9]=[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,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,1.0,1.0,1.0,1.0,1.0,3.0,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.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.5,0.5,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.5,0.5,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,1.0,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.5,0.5,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.5,0.5,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.5,0.5,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,3.0,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.0,0.5,0.5,0.5,0.5,1.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,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,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,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,3.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,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,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,1.0,1.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.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,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,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,1.0,1.5,0.5,1.0,1.0,1.0,3.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,1.0,1.0,1.0]
a2[10]=[:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:D3,:D4,:D4,:D3,:G2,:G3,:G3,:G2,:G2,:G3,:G3,:G2,:G2,:G3,:G3,:G2]
b2[10]=[0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25,0.25]
a2[11]=[:A2,:A3,:A3,:A2]
b2[11]=[0.25,0.25,0.25,0.25]
a2[12]=[:A2,:A3,:A3,:A2,:A2,:A3]
b2[12]=[0.25,0.25,0.25,0.25,0.25,0.25]
a2[13]=[:A3,:A2,:D3]
b2[13]=[0.25,0.25,3.0]
c2=[71,92,144,71,172,144,63,144,71,144,144,130,115,100]
in_thread do
for i in st..a2.length-1
am=0.4 if i>=10 #reduce volume for last 4 bars
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,amp: 0.5*am
sleep b2[i][j]
end
end
end
end #level
end #reverb
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment