Skip to content

Instantly share code, notes, and snippets.

@rbnpi
Last active October 31, 2021 23:06
Embed
What would you like to do?
Oyd, oyd una cosa by Fransisco Guerrero (16th century) coded for Sonic Pi. Hear it on https://soundcloud.com/rbnsonicpi/oyd-una-cosa
#OydUnaCosa.rb Oyd, oyd una cosa by Francisco Guerrero 1589
#coded for Sonic Pi by Robin newman October 2021
use_bpm 150
use_synth :chiplead
use_synth_defaults attack: 0.08
s=0.9;r=0.4
with_fx :reverb, room: 0.7,mix: 0.6 do
with_fx :level,amp: 0.5 do
a1=[:G4,:C5,:C5,:C5,:r,:B4,:D5,:D5,:D5,:E5,:E5,:E5,:D5,:D5,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:r,:r,:r,:B4,:C5,:C5,:A4,:B4,:C5,:G4,:C5,:B4,:A4,:B4,:D5,:E5,:F5,:G5,:E5,:F5,:E5,:D5,:D5,:Cs5,:D5,:D5,:r,:G5,:F5,:E5,:G5,:C5,:E5,:F5,:E5,:A4,:G4,:A4,:B4,:C5,:B4,:C5,:C5,:r,:C5,:B4,:A4,:C5,:F4,:G4,:A4,:B4,:C5,:A4,:B4,:B4,:r,:G5,:F5,:E5,:G5,:C5,:C5,:C5,:C5,:C5,:C5,:D5,:D5,:E5,:E5,:E5,:C5,:C5,:C5,:D5,:E5,:D5,:E5,:r,:r,:C5,:F5,:E5,:C5,:D5,:E5,:D5,:C5,:G5,:F5,:E5,:G5,:F5,:E5,:F5,:D5,:E5,:D5,:C5,:D5,:E5,:C5,:D5,:C5,:B4,:A4,:A4,:G4,:G4,:G4,:C5,:C5,:C5,:r,:B4,:D5,:D5,:D5,:E5,:E5,:E5,:D5,:D5,:G5,:G5,:F5,:E5,:E5,:D5,:D5,:r,:r,:r,:B4,:C5,:C5,:A4,:B4,:C5,:G4,:C5,:B4,:A4,:B4,:D5,:E5,:F5,:G5,:E5,:F5,:E5,:D5,:D5,:Cs5,:D5,:D5,:r,:G5,:F5,:E5,:G5,:C5,:E5,:F5,:E5,:A4,:G4,:A4,:B4,:C5,:B4,:C5,:C5,:r,:C5,:B4,:A4,:C5,:F4,:G4,:A4,:B4,:C5,:A4,:B4,:B4,:r,:G5,:F5,:E5,:G5,:C5,:C5,:C5,:C5,:C5,:C5,:D5,:D5,:E5,:E5]
b1=[2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,4.0,4.0,2.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,2.0,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,2.0,1.0,2.0,1.0,3.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,2.0,1.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,3.0,1.5,0.5,0.5,0.5,1.0,2.0,1.5,0.5,1.0,1.0,1.0,1.0,3.0,3.0,1.0,1.0,0.5,0.5,1.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,1.0,2.0,1.5,0.5,0.5,0.5,0.5,0.5,2.0,2.0,1.0,0.5,0.5,1.0,1.0,1.0,1.5,0.5,1.0,1.5,0.5,3.0,3.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,4.0,4.0,2.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,2.0,0.5,0.5,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,2.0,1.0,2.0,1.0,3.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,2.0,1.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,0.5,1.0,1.0,3.0,1.5,0.5,0.5,0.5,1.0,2.0,1.5,0.5,1.0,1.0,1.0,1.0,3.0,3.0]
in_thread do
for j in 0..a1.length-1
play a1[j],sustain: b1[j]*s,release: b1[j]*r,pan: -0.7,amp: 0.7
sleep b1[j]
end
end
a2=[:r,:r,:r,:G4,:B4,:B4,:C5,:r,:C5,:B4,:B4,:B4,:D5,:C5,:C5,:B4,:r,:B4,:C5,:C5,:C5,:B4,:G4,:A4,:B4,:r,:D5,:E5,:E5,:C5,:D5,:E5,:C5,:D5,:B4,:C5,:D5,:B4,:C5,:C5,:C5,:B4,:A4,:A4,:A4,:A4,:D5,:C5,:B4,:D5,:G4,:C5,:B4,:A4,:C5,:B4,:C5,:C5,:C5,:D5,:C5,:G4,:r,:r,:r,:D5,:C5,:B4,:D5,:G4,:B4,:B4,:C5,:G5,:F5,:E5,:G5,:C5,:E5,:F5,:E5,:C5,:B4,:C5,:C5,:C5,:A4,:A4,:A4,:B4,:C5,:A4,:B4,:G4,:C5,:A4,:A4,:G4,:A4,:B4,:C5,:B4,:C5,:E5,:D5,:C5,:E5,:D5,:C5,:D5,:B4,:B4,:A4,:G4,:A4,:B4,:A4,:A4,:B4,:G4,:G4,:Fs4,:G4,:G4,:r,:r,:r,:G4,:B4,:B4,:C5,:r,:C5,:B4,:B4,:B4,:D5,:C5,:C5,:B4,:r,:B4,:C5,:C5,:C5,:B4,:G4,:A4,:B4,:r,:D5,:E5,:E5,:C5,:D5,:E5,:C5,:D5,:B4,:C5,:D5,:B4,:C5,:C5,:C5,:B4,:A4,:A4,:A4,:A4,:D5,:C5,:B4,:D5,:G4,:C5,:B4,:A4,:C5,:B4,:C5,:C5,:C5,:D5,:C5,:G4,:r,:r,:r,:D5,:C5,:B4,:D5,:G4,:B4,:B4,:C5,:G5,:F5,:E5,:G5,:C5,:E5,:F5,:E5,:C5,:B4,:C5,:C5]
b2=[4.0,4.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,1.0,2.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,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,3.0,3.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,2.0,1.0,3.0,3.0,1.0,1.0,0.5,0.5,1.0,2.0,2.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,0.5,1.0,0.5,2.0,1.5,0.5,0.5,0.5,0.5,0.5,2.0,2.0,1.0,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,3.0,3.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,2.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,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,2.0,1.0,2.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,3.0,3.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,2.0,1.0,3.0,3.0]
in_thread do
for j in 0..a2.length-1
play a2[j],sustain: b2[j]*s,release: b2[j]*r,pan: -0.5,amp: 0.7
sleep b2[j]
end
end
a3=[:r,:C4,:G4,:G4,:G4,:r,:D4,:C4,:E4,:G4,:r,:G4,:G4,:A4,:A4,:G4,:G4,:r,:G4,:G4,:A4,:F4,:G4,:G4,:Fs4,:G4,:r,:G4,:C4,:C4,:F4,:D4,:C4,:C4,:G4,:G4,:G4,:A4,:G4,:G4,:A4,:G4,:G4,:F4,:E4,:D4,:D4,:r,:G4,:F4,:E4,:G4,:C4,:E4,:F4,:C4,:D4,:C4,:F4,:G4,:A4,:G4,:C4,:C4,:E4,:D4,:C4,:E4,:A3,:C4,:D4,:C4,:C4,:D4,:G3,:G3,:r,:G4,:G4,:E4,:G4,:G4,:G4,:A4,:G4,:A4,:G4,:G4,:G4,:C4,:F4,:F4,:F4,:D4,:C4,:F4,:E4,:r,:C4,:F4,:D4,:F4,:C4,:C4,:G4,:C4,:r,:r,:G4,:F4,:E4,:G4,:F4,:E4,:F4,:E4,:F4,:D4,:G4,:G3,:D4,:D4,:G3,:G3,:r,:C4,:G4,:G4,:G4,:r,:D4,:C4,:E4,:G4,:r,:G4,:G4,:A4,:A4,:G4,:G4,:r,:G4,:G4,:A4,:F4,:G4,:G4,:Fs4,:G4,:r,:G4,:C4,:C4,:F4,:D4,:C4,:C4,:G4,:G4,:G4,:A4,:G4,:G4,:A4,:G4,:G4,:F4,:E4,:D4,:D4,:r,:G4,:F4,:E4,:G4,:C4,:E4,:F4,:C4,:D4,:C4,:F4,:G4,:A4,:G4,:C4,:C4,:E4,:D4,:C4,:E4,:A3,:C4,:D4,:C4,:C4,:D4,:G3,:G3,:r,:G4,:G4,:E4,:G4,:G4,:G4,:A4,:G4,:A4,:G4,:G4,:G4]
b3=[4.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.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,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.5,0.5,1.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,1.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,0.5,0.5,0.5,0.5,1.0,1.0,3.0,6.0,1.0,1.0,0.5,0.5,1.0,2.0,2.0,1.0,1.0,1.0,1.0,0.5,0.5,0.5,0.5,2.0,2.0,3.0,3.0,1.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,3.0,3.0,4.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.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,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.5,0.5,1.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,1.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,0.5,0.5,0.5,0.5,1.0,1.0,3.0,6.0]
in_thread do
for j in 0..a3.length-1
play a3[j],sustain: b3[j]*s,release: b3[j]*r,pan: 0.7,amp: 0.7
sleep b3[j]
end
end
a4=[:r,:r,:G3,:G4,:G4,:G4,:C4,:D4,:D4,:D4,:D4,:A3,:C4,:D4,:r,:D4,:E4,:E4,:C4,:D4,:E4,:C4,:D4,:r,:r,:r,:D4,:G3,:D4,:D4,:C4,:A3,:C4,:G3,:A3,:B3,:C4,:D4,:E4,:A3,:A3,:A3,:r,:r,:r,:r,:r,:G4,:F4,:E4,:G4,:C4,:E4,:F4,:E4,:D4,:E4,:G4,:G4,:D4,:C4,:B3,:D4,:G3,:G3,:C4,:C4,:E4,:E4,:E4,:C4,:E4,:D4,:C4,:C4,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:G3,:G4,:G4,:G4,:C4,:D4,:D4,:D4,:D4,:A3,:C4,:D4,:r,:D4,:E4,:E4,:C4,:D4,:E4,:C4,:D4,:r,:r,:r,:D4,:G3,:D4,:D4,:C4,:A3,:C4,:G3,:A3,:B3,:C4,:D4,:E4,:A3,:A3,:A3,:r,:r,:r,:r,:r,:G4,:F4,:E4,:G4,:C4,:E4,:F4,:E4,:D4,:E4,:G4,:G4,:D4,:C4,:B3,:D4,:G3,:G3,:C4,:C4,:E4,:E4,:E4,:C4,:E4,:D4,:C4,:C4]
b4=[4.0,4.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,4.0,4.0,4.0,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,1.0,2.0,1.0,3.0,3.0,3.0,3.0,3.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,2.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,4.0,4.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,4.0,4.0,4.0,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,1.0,2.0,1.0,3.0,3.0,3.0,3.0,3.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,2.0,3.0,3.0]
in_thread do
for j in 0..a4.length-1
play a4[j],sustain: b4[j]*s,release: b4[j]*r,pan: 0.5,amp: 0.7
sleep b4[j]
end
end
a5=[:r,:r,:r,:G3,:C4,:C4,:C4,:C3,:G3,:G3,:G3,:D3,:F3,:C3,:G3,:r,:G3,:C4,:A3,:A3,:G3,:C4,:A3,:G3,:r,:r,:r,:G3,:E3,:D3,:G3,:C3,:F3,:C3,:D3,:E3,:F3,:G3,:D3,:A3,:A3,:D3,:D3,:r,:r,:r,:r,:r,:r,:r,:C4,:B3,:A3,:C4,:F3,:A3,:Bf3,:A3,:G3,:A3,:G3,:r,:G3,:F3,:E3,:G3,:C3,:C3,:r,:C4,:B3,:A3,:C4,:F3,:C3,:C3,:G3,:C3,:C3,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:r,:G3,:C4,:C4,:C4,:C3,:G3,:G3,:G3,:D3,:F3,:C3,:G3,:r,:G3,:C4,:A3,:A3,:G3,:C4,:A3,:G3,:r,:r,:r,:G3,:E3,:D3,:G3,:C3,:F3,:C3,:D3,:E3,:F3,:G3,:D3,:A3,:A3,:D3,:D3,:r,:r,:r,:r,:r,:r,:r,:C4,:B3,:A3,:C4,:F3,:A3,:Bf3,:A3,:G3,:A3,:G3,:r,:G3,:F3,:E3,:G3,:C3,:C3,:r,:C4,:B3,:A3,:C4,:F3,:C3,:C3,:G3,:C3,:C3]
b5=[4.0,4.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,4.0,4.0,4.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,3.0,3.0,3.0,3.0,3.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,0.5,0.5,1.0,2.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,2.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,3.0,4.0,4.0,2.0,2.0,1.0,1.0,1.0,1.0,1.0,1.0,2.0,1.0,1.0,2.0,2.0,1.0,1.0,2.0,1.0,1.0,1.0,1.0,2.0,4.0,4.0,4.0,4.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,3.0,3.0,3.0,3.0,3.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,0.5,0.5,1.0,2.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,1.5,0.5,0.5,0.5,1.0,1.0,1.0,2.0,3.0,3.0]
in_thread do
for j in 0..a5.length-1
play a5[j],sustain: b5[j]*s,release: b5[j]*r,amp: 0.7
sleep b5[j]
end
end
end #level
end #fx
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment