Turkish march guitar arrangement for Sonic Pi

This is an arrangement for turkish march(scored for guitar), and I made the same arrangement in sonic pi

use_bpm 200

use_synth :piano
use_synth_defaults amp: rrand(0.5, 1)

#bass
in_thread do
  2.times do
    use_synth_defaults amp: rrand(0.2, 0.5)
    sleep 2
    play_pattern_timed [:A2, :C3], [1]
    play_pattern_timed [:A2], [2]
    play_pattern_timed [:A2, :C3], [1]
    play_pattern_timed [:A2], [2]
    play_pattern_timed [:A2, :C3, :A2, :C3, :A2, :C3], [1]
    play_pattern_timed [:A2], [2]
    play_pattern_timed [ :E2, :E2, :E2], [4]
    sleep 2.5
  end
end

#melody
2.times do
  play_pattern_timed [ :B3, :A3, :Gs3, :A3], [0.5]
  play_pattern_timed [:C4], [2]
  play_pattern_timed [ :D4, :C4, :B3, :C4], [0.5]
  play_pattern_timed [ :E4], [2]
  play_pattern_timed [ :F4, :E4, :Ds4, :E4, :B4, :A4, :Gs4, :A4, :B4, :A4, :Gs4, :A4], [0.5]
  play_pattern_timed [ :C5], [2]
  play_pattern_timed [:A4, :C5], [1]
  play_pattern_timed [:G4, :A4, :B4], [0.125]
  sleep 0.75
  play_chord [:Fs4, :A4]
  sleep 1
  play_chord [:E4, :G4]
  sleep 1
  play_chord [:Fs4, :A4]
  sleep 1
  play_pattern_timed [:G4, :A4, :B4], [0.125]
  sleep 0.75
  play_chord [:Fs4, :A4]
  sleep 1
  play_chord [:E4, :G4]
  sleep 1
  play_chord [:Fs4, :A4]
  sleep 1
  play_pattern_timed [:G4, :A4, :B4], [0.125]
  sleep 0.75
  play_chord [:Fs4, :A4]
  sleep 1
  play_chord [:E4, :G4]
  sleep 1
  play_chord [:Ds4, :Fs4]
  sleep 1
  play_chord [:B3, :E4]
  sleep 2
end

#part B
in_thread do
  2.times do
    sleep 2
    play_pattern_timed [:C3, :E2, :G2], [2]
  end
  2.times do
    sleep 2
    play_pattern_timed [:A2, :D3, :E2], [2]
  end
end



#melody
2.times do
  play_chord [:C4, :E4]
  sleep 1
  play_chord [:D4, :F4]
  sleep 1
  play_chord [:E4, :G4]
  sleep 1
  play_chord [:E4, :G4]
  sleep 1
  play_pattern_timed [:A4, :G4, :F4, :E4], [0.5]
  play [:B4, :D4]
  sleep 2
end

2.times do
  play_chord [:A3, :C4]
  sleep 1
  play_chord [:B3, :D4]
  sleep 1
  play_chord [:C4, :E4]
  sleep 1
  play_chord [:C4, :E4]
  sleep 1
  play_pattern_timed [:F4, :E4, :D4, :C4], [0.5]
  play_chord [:Gs4, :B4]
  sleep 1
  play :E4
  sleep 1
end
#PART A RECAP

#bass
in_thread do
  use_synth_defaults amp: rrand(0.5, 1)
  sleep 2
  play_pattern_timed [:A2, :C3], [1]
  play_pattern_timed [:A2], [2]
  play_pattern_timed [:A2, :C3], [1]
  play_pattern_timed [:A2], [2]
  play_pattern_timed [:A2, :C3, :A2, :C3], [1]
  play_pattern_timed [:F2], [1]
  play_chord [:A3, :Ds4]
  sleep 1
  play_chord [:A3, :Ds4]
  sleep 1
  play_chord [:A3, :Fs4]
  sleep 1
  play :E3
  sleep 1
  play_chord [:A3, :E4]
  sleep 1
  play_pattern_timed [:D3, :F3, :C3, :E3, :D3], [1]
  play_chord [:F3, :B3]
  sleep 1
  play_chord [:F3, :A3]
  sleep 1
  play_chord [:E2, :Gs3]
  sleep 4
  play :A2, amp: 1.22
  sleep 2
end

#melody

play_pattern_timed [ :B3, :A3, :Gs3, :A3], [0.5]
play_pattern_timed [:C4], [2]
play_pattern_timed [ :D4, :C4, :B3, :C4], [0.5]
play_pattern_timed [ :E4], [2]
play_pattern_timed [ :F4, :E4, :Ds4, :E4, :B4, :A4, :Gs4, :A4, :B4, :A4, :Gs4, :A4], [0.5]
play_pattern_timed [ :C5], [2]
play_pattern_timed [:A4, :B4, :C5, :B4, :A4, :Gs4, :A4, :E4, :F4, :D4, :C4], [1]
play_pattern_timed [:B3], [2]
play_pattern_timed [:C4, :B3, :A3, :Gs3], [0.5]
play :A3
sleep 2

# A major octaves

in_thread do
  10.times do
    play_pattern_timed [:A2], [1.1]
  end
  sleep 0.25
  play_pattern_timed [:D3, :Cs3], [2]
  2.times do
    play_pattern_timed [:A2], [1.1]
  end
end

#octaves
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:Gs3, :Gs4], [0.125]
sleep 0.875
play_pattern_timed [:Fs4, :Gs4, :A4, :B4], [1]
play_pattern_timed [:Gs3, :Gs4], [0.125]
sleep 0.875
play_pattern_timed [:E3, :E4], [0.125]
sleep 0.875
#REPEAT OCTAVES

in_thread do
  10.times do
    play_pattern_timed [:A2], [1.1]
  end
  sleep 0.25
  play_pattern_timed [:D3, :Gs3, :E3, :Cs3, :A2], [1]
end

#octaves
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:Gs3, :Gs4], [0.125]
sleep 0.875
play_pattern_timed [:Fs4, :B4, :Gs4, :E4], [1]
play :A4, amp: 1.3
sleep 2

#part C

in_thread do
  play_pattern_timed [:A3], [2]
  play_pattern_timed [:Fs3, :Fs3, :Gs3, :Gs3], [2]
  play_pattern_timed [:Fs3, :Fs3, :F3, :F3], [2]
  play_pattern_timed [:Fs3, :Fs3, :Gs3, :Gs3], [2]
  play_pattern_timed [:Gs2, :Gs3, :Cs3], [2]
end


#melody
play_pattern_timed [:Cs5, :D5, :Cs5, :B4], [0.5]
play_pattern_timed [:A4, :B4, :A4, :Gs4, :Fs4, :A4, :Gs4, :Fs4, :F4, :Fs4, :Gs4, :F4, :Cs4, :Ds4, :E4, :Cs4], [0.5]
play_pattern_timed [:Fs4, :F4, :Fs4, :Gs4, :A4, :Gs4, :A4, :B4, :Cs5, :C5, :Cs5, :C5, :Cs5, :D5, :Cs5, :B4], [0.5]
play_pattern_timed [:A4, :B4, :A4, :Gs4, :Fs4, :A4, :Gs4, :Fs4, :E4, :Fs4, :Gs4, :E4, :Cs4, :Ds4, :E4, :Cs4], [0.5]
play_pattern_timed [:Ds4, :E4, :Fs4, :Ds4, :C4, :Cs4, :Ds4, :C4], [0.5]
play :Cs4, amp: 1.35
sleep 2

#part C2

in_thread do
  sleep 2
  play_pattern_timed [:A2], [4]
  play_pattern_timed [:B2, :E2], [2]
  play_pattern_timed [:A2], [4]
  play_pattern_timed [:E2, :E2], [2]
  play_pattern_timed [:A2], [4]
  play_pattern_timed [:B2, :E2], [2]
  play_pattern_timed [:A2, :Fs2, :D2, :E2], [1]
  play :A2, amp: 1.3
  sleep 2
end

play_pattern_timed [:E4, :D4, :Cs4, :B3, :A3, :B3, :Cs4, :D4, :E4, :Fs4, :Gs4, :A4], [0.5]
play_pattern_timed [:A4, :Gs4, :Fs4, :E4, :E4, :D4, :Cs4, :B3], [0.5]
play_pattern_timed [:A3, :B3, :Cs4, :D4, :E4, :Fs4, :Gs4, :A4], [0.5]
play_pattern_timed [:As4, :B4], [1]
play_pattern_timed [:E4, :D4, :Cs4, :B3, :A3, :B3, :Cs4, :D4, :E4, :Fs4, :Gs4, :A4], [0.5]
play_pattern_timed [:A4, :Gs4, :Fs4, :E4, :E4, :D4, :Cs4, :B3], [0.5]
play_pattern_timed [:Cs4, :E4, :A3, :Cs4, :B3, :D4, :Gs3, :B3], [0.5]
play :A3, amp: 1.3
sleep 2
#part C3

in_thread do
  play_pattern_timed [:A3], [2]
  play_pattern_timed [:Fs3, :Fs3, :Gs3, :Gs3], [2]
  play_pattern_timed [:Fs3, :Fs3], [2]
  play_pattern_timed [:A3, :Gs3, :G3, :Fs3], [1]
  play_pattern_timed [:B2, :B3, :B2, :B2], [2]
  play_pattern_timed [:Cs3, :Cs3, :Fs3], [2]
end

#melody
play_pattern_timed [:Cs5, :D5, :Cs5, :B4], [0.5]
play_pattern_timed [:A4, :B4, :A4, :Gs4, :Fs4, :A4, :Gs4, :Fs4, :F4, :Fs4, :Gs4, :F4, :Cs4, :Ds4, :E4, :Cs4], [0.5]
play_pattern_timed [:Fs4, :F4, :Fs4, :Gs4, :A4, :Gs4, :A4, :B4, :Cs5, :C5, :Cs5, :C5, :Cs5, :C5, :Cs5, :As4], [0.5]
play_pattern_timed [:D5, :Cs5, :D5, :Cs5, :D5, :Cs5, :D5, :Cs5, :D5, :Cs5, :B4, :A4, :Gs4, :A4, :B4, :Gs4], [0.5]
play_pattern_timed [:A4, :B4, :Cs5, :Fs4, :F4, :Fs4, :Gs4, :F4], [0.5]
play :Fs4, amp: 1.35
sleep 2
#OCTAVES

# A major octaves

in_thread do
  10.times do
    play_pattern_timed [:A2], [1.1]
  end
  sleep 0.25
  play_pattern_timed [:D3, :Cs3], [2]
  2.times do
    play_pattern_timed [:A2], [1.1]
  end
end

#octaves
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:Gs3, :Gs4], [0.125]
sleep 0.875
play_pattern_timed [:Fs4, :Gs4, :A4, :B4], [1]
play_pattern_timed [:Gs3, :Gs4], [0.125]
sleep 0.875
play_pattern_timed [:E3, :E4], [0.125]
sleep 0.875

#REPEAT OCTAVES

in_thread do
  10.times do
    play_pattern_timed [:A2], [1.1]
  end
  sleep 0.25
  play_pattern_timed [:D3, :Gs3, :E3, :Cs3, :A2], [1]
end

#octaves
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:Cs4, :Cs5], [0.125]
sleep 0.875
play_pattern_timed [:B3, :B4], [0.125]
sleep 0.875
play_pattern_timed [:A3, :A4], [0.125]
sleep 0.875
play_pattern_timed [:Gs3, :Gs4], [0.125]
sleep 0.875
play_pattern_timed [:Fs4, :B4, :Gs4, :E4], [1]
play :A4, amp: 1.3
sleep 2



3 Likes

Amazing, that’s an impressive amount of work, controlling the various voices!

As a guitarist I know this piece is renowned for being particularly fiendish :wink:

1 Like