It Gets Me Out Of My Head | downtempo and fairly dark

I’ve been listening to a lot of Chelsea Wolfe and Emma Ruth Rundel, so this is pretty dark, with kind of a trip-hop vibe with the slowed down Amen Break.
The main progression is Em, B7sus4, Asus4, B7sus4, Dsus4.
There’s an arpeggio playing chord notes and a meandering melody line random walking up and down a E Dorian scale.

use_bpm 30
vol1 = 0.2
vol2 = 0.1
vol3 = 0.5
live_loop :main do
  puts vt
  if vt > 240
    stop
  end
  vol1 += 0.2
  if vol1 > 0.999
    vol1=0.99
  end
  with_synth :dark_ambience do
    with_fx :gverb, spread:1 do
      with_octave 0 do
        chords = [(chord :e, :minor), (chord :e, :minor), (chord :b, '7sus4'), (chord :a, 'sus4'), (chord :b, '7sus4'), (chord :d+12, 'sus4')]
        c =chords.tick :progression
        play c, sustain: 2, amp: vol1
        set :thechord, c
        with_synth :growl do
          if one_in(3)
            time_warp -0.25 do
              play c[0]-24, amp:vol1/2.0
            end
          end
        end
        sleep 2
      end
    end
  end
end

thescale = (scale :e, :dorian, num_octave: 5)
scalelength = thescale.length
pos = 0

live_loop :singlennote do
  if vt > 20
    if vt > 180
      stop
    end
    vol2 += 0.05
    if vol2 > 0.5
      vol2 = 0.1
    end
    with_synth :hollow do
      with_fx :distortion do
        with_fx :panslicer, mix: 0.25 do
          with_fx :echo, decay: vol2*2 do
            play thescale[pos], amp: vol2
          end
          if one_in(2)
            pos += 1
            if one_in(4)
              pos+=2
            end
            if pos > scalelength
              pos = scalelength
            end
          else
            pos -=1
            if one_in(5)
              pos -= 3
            end
            if pos < 0
              pos = 0
            end
          end
        end
      end
    end
  end
  sleep [0.5, 0.5, 0.5, 2, 0.5, 0.5, 1].tick :melody
end

offset = 0
live_loop :arpeggio do
  if vt > 25
    if vt > 210
      stop
    end
    if one_in(10)
      offset=12
    end
    if one_in(5)
      offset=0
    end
    vol3 += 0.05
    if vol3 > 0.7
      vol3 = 0.1
    end
    with_synth :hollow do
      with_fx :flanger do
        with_fx :distortion, distort:0.99, amp:0.15 do
          with_fx :echo, phase: 0.5, decay: 0.75  do
            note =get[:thechord].tick :arpeggio
            play note-24+offset, amp:vol3, sustain: 0.333, cutoff: 80
            
          end
        end
      end
    end
  end
  sleep 0.3333*2
end

live_loop :beat do
  if vt > 210
    stop
  end
  if vt > 40
    if one_in(3)
      sample :loop_amen, beat_stretch: 2, amp:0.7
    else
      sample :loop_industrial, beat_stretch: 2, amp:0.7
    end
  end
  sleep 2
end

live_loop :beat2 do
  if vt > 200
    stop
  end
  if vt > 20
    if not one_in(3)
      with_fx :gverb, release:0.75 do
        sample :drum_bass_hard, amp:1
      end
    end
  end
  sleep 1
end
7 Likes

These are some lovely slow distorted vibes. Thanks so much for sharing.

1 Like