Skip to content

Instantly share code, notes, and snippets.

@jeremejazz
Last active February 12, 2022 10:35
Show Gist options
  • Save jeremejazz/19b86f4cdd594985cfa4459baca4ecbf to your computer and use it in GitHub Desktop.
Save jeremejazz/19b86f4cdd594985cfa4459baca4ecbf to your computer and use it in GitHub Desktop.
ang huling while loop (chords only)
# Ang Huling El Bimbo by Eraserheads in Sonic Pi
use_bpm 90
define :main do | start_tick = 0 |
use_synth :pluck
with_fx :reverb, room: 1 do
if start_tick > 0
tick_set start_tick
end
chords = [chord(:g2, :major), chord(:a2, :dom7), chord(:c3, :major), chord(:g2, :major)].ring
r = tick
# pattern = [ 1,1,0.75, 0.5, 0.25, 0.5, 1]
play chords[r]
sleep 1
play chords[r]
sleep 0.75
play chords[r], release: 1
sleep 0.5
play chords[r] , release: 0.5
sleep 0.25
play chords[r]
sleep 0.5
play chords[r], release: 2
sleep 1
end
end
define :refrain do
use_synth :pluck
with_fx :reverb, room: 1 do
r = tick
chords = [chord(:e3, :minor), ( chord :g2, :major), ( chord :c3, :major), ( chord :d3, :major)].ring
8.times do
play chords[r]
sleep 0.5
end
end
end
4.times do
main
end
sleep 4
3.times do | index |
main index + 1
end
4.times do
main
end
# ngunit ang paborito...
4.times do
main
end
# nakakaindak...
4.times do
main
end
8.times do
refrain
end
8.times do
main
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment