# Filtered Dnb
# Author: Sam Aaron

use_sample_bpm :loop_amen

with_fx :rlpf, cutoff: 10, cutoff_slide: 4 do |c|
  live_loop :dnb do
    sample :bass_dnb_f, amp: 5
    sample :loop_amen, amp: 5
    sleep 1
    control c, cutoff: rrand(40, 120), cutoff_slide: rrand(1, 4)
  end
end

# -----------------------------------------------------------------------------------
# This composition was shared via algojam.com, consider sharing your creation to :) #
# https://github.com/dirkbosman/algojam/tree/master/src/pages/jams                  #
# -----------------------------------------------------------------------------------

# Rerezzed
# Author: Sam Aaron

use_debug false
notes = (scale :e1, :minor_pentatonic, num_octaves: 2).shuffle

live_loop :rerezzed do
  tick_reset
  t = 0.04
  sleep -t
  with_fx :bitcrusher do
    s = synth :dsaw, note: :e3, sustain: 8, note_slide: t, release: 0
    64.times do
      sleep 0.125
      control s, note: notes.tick
    end
  end
  sleep t
end

live_loop :industry do
  sample :loop_industrial, beat_stretch: 1
  sleep 1
end

live_loop :drive do
  sample :bd_haus, amp: 3
  sleep 0.5
end

# -----------------------------------------------------------------------------------
# This composition was shared via algojam.com, consider sharing your creation to :) #
# https://github.com/dirkbosman/algojam/tree/master/src/pages/jams                  #
# -----------------------------------------------------------------------------------

#James Bond Theme
#Coded by Davids Fiddle

#220 BPM
use_bpm 220

w = 4
dh = 3
h = 2
dq = 1.5
q = 1
e = 0.5

#Drums
in_thread do
  48.times do
    sleep h
    sample :drum_cymbal_closed
    sleep h
  end
  2.times do
    sample :drum_cymbal_closed
    sleep dq
    sample :drum_cymbal_closed
    sleep h
    sample :drum_bass_hard
    sleep e+h
  end
  2.times do
    sample :drum_cymbal_closed
    sleep dq
  end
  sample :drum_cymbal_closed
  sleep q
  40.times do
    sleep 2
    sample :drum_cymbal_closed
    sleep 2
  end
  2.times do
    sample :drum_cymbal_closed
    sleep dq
    sample :drum_cymbal_closed
    sleep h
    sample :drum_bass_hard
    sleep e+h
  end
  2.times do
    sample :drum_cymbal_closed
    sleep dq
  end
  sample :drum_cymbal_closed
  sleep q
end


#Bass
in_thread do
  use_synth :blade
  use_synth_defaults amp: 0.8
  12.times do
    play_pattern_timed [:b2,:b2,:c3,:c3,:cs3,:cs3,:c3,:c3],[dh,q,dh,q,dh,q,dh,q], release: 0.1
  end
  play_pattern_timed [:b2,:b2,:r,:b3,:r,:b2,:b2,:r,:b3,:r,:b2,:b2,:r],[dq,dq,e,h,e,dq,dq,e,h,e,dq,dq,q], release: 0.1
  10.times do
    play_pattern_timed [:b2,:b2,:c3,:c3,:cs3,:cs3,:c3,:c3],[dh,q,dh,q,dh,q,dh,q], release: 0.1
  end
  play_pattern_timed [:b2,:b2,:r,:b3,:r,:b2,:b2,:r,:b3,:r,:b2,:b2,:r],[dq,dq,e,h,e,dq,dq,e,h,e,dq,dq,q], release: 0.1
end

#Left Hand
in_thread do
  use_synth :chipbass
  use_synth_defaults pan: 0.2
  sleep 8*w
  3.times do
    play_pattern_timed [:b2,:c3,:cs3,:c3],[w,w,w,w]
  end
  sleep 4*w
  sleep 24*w
  play_pattern_timed [:r,:r,:r,:b2,:r,:r,:r,:r,:b2,:r,:r],[h,q,e,h,e,h,q,e,h,e,w]
  sleep 8*w
  3.times do
    play_pattern_timed [:b2,:c3,:cs3,:c3],[w,w,w,w]
  end
  sleep 4*w
  4.times do
    play_pattern_timed [:b2,:c3,:cs3,:c3],[w,w,w,w]
  end
  use_synth :hoover
  play_pattern_timed [:r,:r,:r,:b2,:r,:r,:r,:r,:b2,:r,:r],[h,q,e,h,e,h,q,e,h,e,w]
end

#Right Hand
in_thread do
  use_synth :chiplead
  use_synth_defaults pam: -0.2, amp: 1.5
  sleep 8*w
  play_pattern_timed [:e3,:fs3,:fs3,:fs3,:fs3,:e3,:e3,:e3,:e3,:g3,:g3,:g3,:g3,:fs3,:fs3,:fs3],[q,e,e,q,h,q,q,q,q,e,e,q,h,q,q,q]
  play_pattern_timed [:e3,:fs3,:fs3,:fs3,:fs3,:e3,:e3,:e3,:e3,:g3,:g3,:g3,:g3,:fs3,:f3,:e3],[q,e,e,q,h,q,q,q,q,e,e,q,h,q,q,q]
  play_pattern_timed [:eb4,:d4,:b3,:a3,:b3,:r],[q,dh+h,q,q,w,w]
  sleep 4*w
  2.times do
    play_pattern_timed [:e3,:g3,:r,:eb4,:d4,:g3,:bb3,:b3,:r,:g3,:fs3,:b2,:e3,:cs3],[q,q,q,q,dh,q,q,dh,dh,h,w,q,q,q+w+w]
  end
  sleep 8*w
  play_pattern_timed [:b3,:b3,:r,:r,:b3,:b3,:r,:r,:b3,:a3,:r,:g3,:fs3,:e3],[dq,dq,q,h,dq,dq,q,h,e,e,e,e,q,q]
  sleep 8*w
  play_pattern_timed [:e3,:fs3,:fs3,:fs3,:fs3,:e3,:e3,:e3,:e3,:g3,:g3,:g3,:g3,:fs3,:fs3,:fs3],[q,e,e,q,h,q,q,q,q,e,e,q,h,q,q,q]
  play_pattern_timed [:e3,:fs3,:fs3,:fs3,:fs3,:e3,:e3,:e3,:e3,:g3,:g3,:g3,:g3,:fs3,:f3,:e3],[q,e,e,q,h,q,q,q,q,e,e,q,h,q,q,q]
  play_pattern_timed [:eb4,:d4,:b3,:a3,:b3,:r],[q,dh+h,q,q,w,w]
  sleep 4*w
  2.times do
    play_pattern_timed [:e3,:g3,:r,:eb4,:d4,:g3,:bb3,:b3,:r,:g3,:fs3,:b2,:e3,:cs3],[q,q,q,q,dh,q,q,dh,dh,h,w,q,q,q+w+w]
  end
  play_pattern_timed [:b3,:b3,:r,:b3,:b3,:r,:b3,:a3,:r,:g3,:fs3,:e3],[dq,dq,dh,dq,dq,dh,e,e,e,e,q,q]
end

# Attribution: https://github.com/mrbombmusic
# Download audio samples below and adjust paths to your local directory:
# https://github.com/mrbombmusic/trapbeat-2/blob/master/808_drum_kit.zip
# https://github.com/mrbombmusic/trapbeat-2/blob/master/MicroMoog%20Nasty%20Sub-F1.wav

bass = "/Users/admin/Music/SAmples/Analog Tape Synths From Mars - Samples From Mars/Ableton Live/Samples/Samples From Mars/Free Tape Synths/Micro Moog Nasty Sub/MicroMoog Nasty Sub-F1.wav"
kicks = "/Users/admin/Music/SAmples/808_drum_kit/kicks/"
snares = "/Users/admin/Music/SAmples/808_drum_kit/snares/"
hats = "/Users/admin/Music/SAmples/808_drum_kit/hihats/"

dur = sample_duration bass

use_bpm 54

live_loop :basss do
  cue :tick
  with_fx :slicer, phase: dur / 32, smooth: 0.22, probability: 0.7, seed: 432 do
    sample bass, pitch: 12
    sample bass
    sample bass, pitch: 24
    sleep dur
  end
end

live_loop :reds do
  cue :tick
  use_synth :tb303
  sleep dur / 4
  # play_chord chord(:f3, :minor), attack: 2, release: 3
  sleep dur*2 - (dur / 4)
end

k = 9

sync :tick
live_loop :ping do
  use_synth :blade
  sc = scale(:f3, :minor_pentatonic, num_octave: 3)
  use_random_seed 300
  12.times do
    # play sc.choose
    sleep (knit (dur / 16), 2, (dur / 8), 1).tick
  end
end

live_loop :kik do
  sample kicks, k, amp: 3, release: 3
  sleep dur / 2
  5.times do
    sample kicks, k, amp: (ring, 3, 2, 1, 2).tick
    sleep dur / 32
  end
  sleep (11*dur) / 32
end

live_loop :snair do
  sleep dur / 4
  sample snares, 11
  sleep dur / 4
end

h = 3

live_loop :hat do
  4.times do
    sample hats, h
    sleep dur/ 16
  end
  6.times do
    sample hats, h
    sleep dur/ 24
  end
  sleep dur / 16
  3.times do
    sample hats, h
    sleep dur/ 16
  end
  8.times do
    sample hats, h
    sleep dur/ 64
  end
  2.times do
    sample hats, h
    sleep dur/ 16
  end
end

# Author: jindrichmynarz
# https://gist.github.com/jindrichmynarz/f233f75c719abe6a6c81

use_debug false
use_bpm 130

# Our mixer!
master = (ramp *range(0, 1, 0.01))
kick_volume = 1
bass_volume = 1
revbass_volume = 1
snare_volume = 0.5
hats_volume = 0.5
open_hats_volume = 1
synth_volume = 1
pad_volume = 1
beep_volume = 0.5

kick_cutoffs = range(50, 80, 0.5).mirror # A LFO for the poor
live_loop :kick do
  if (spread 1, 4).tick then # 4-on-the-floor
    sample :bd_tek, amp: master.look * kick_volume,
      cutoff: kick_cutoffs.look
  end
  sleep 0.25 # 16th note heartbeat
end

define :snare do |amp|
  sample :sn_dolf, amp: amp, start: 0.15, finish: 0.35, rate: 0.7
end

live_loop :snares do
  sleep 1
  snare 1 * master.tick * snare_volume
  sleep 1
end

live_loop :snare_break do
  sync :snares
  sleep 15.75
  with_fx :reverb, mix: 0.3, room: 0.8 do
    with_fx :echo, mix: 0.4, decay: 12, phase: 0.75 do
      snare 0.5 * master.tick * snare_volume
    end
  end
  sleep 0.25
end

live_loop :hats do
  sync :kick
  if (spread 3, 8).tick then
    # (spread 3, 8) produces this pattern: * _ _ * _ _ * _
    with_fx :rhpf, cutoff: 125, res: 0.8 do
      with_synth :pnoise do
        play :d1, amp: hats_volume * master.tick,
          attack: 0.05, decay: 0.08, release: 0.1
      end
    end
  end
  sleep 0.25
end

live_loop :noise_hats do
  sync :kick
  # Create hi-hats by slicing continuous noise
  with_fx :slicer, mix: 1, phase: 0.25, pulse_width: 0.1 do
    with_fx :hpf, cutoff: 130 do
      with_synth :noise do
        play :d1, decay: 1, amp: master.tick * hats_volume
      end
    end
  end
  sleep 1
end

open_hats_cutoffs = range(120, 130, 0.5).mirror
live_loop :open_hats do
  sync :kick
  with_fx :echo, amp: open_hats_volume * master.look,
  mix: 0.4, decay: 4, phase: 0.75 do
    with_fx :hpf, cutoff: open_hats_cutoffs.tick do
      with_fx :reverb, mix: 0.4, room: 0.8 do
        sleep 0.5
        sample :drum_cymbal_open, start: 0.2, finish: 0.3, amp: 0.5
        sleep 0.5
      end
    end
  end
end

bassline_rhythm = (ring 1, 0, 0, 0, 1, 0, 0, 0,
                   1, 0, 0.5, 0, 1, 0, 0.5, 0)
bassline_notes = (stretch [:d1] * 12 + [:f1, :f1, :a1, :f1], 8)
live_loop :bassline do
  sync :kick
  with_synth :fm do
    play bassline_notes.look,
      amp: master.look * bassline_rhythm.tick * bass_volume,
      attack: 0.03, divisor: 1, depth: 2.5
  end
  sleep 0.25
end

live_loop :revbassline do
  sync :snares
  sleep 7.5
  with_fx :pan, pan: -0.5 do
    with_synth :fm do
      play :d1, amp: bass_volume * master.tick,
        attack: 0.5, divisor: 0.5, depth: 6
    end
  end
  sleep 0.5
end

dchord = chord(:d2, :minor, num_octaves: 3)
synth_cutoffs = range(60, 100, 0.5).mirror
synth_rhythm = (ring 1.5, 1.5, 1)
synth_transpositions = (stretch 0, 36) + (stretch -12, 6) + (stretch 12, 6)
synth_phases = (stretch 0.75, 15) + [0.25]
synth_pans = (ring -0.5, 0.5)
live_loop :synth do
  sync :kick
  ch = invert_chord(dchord, rand_i(3))
  sleep synth_rhythm.tick
  with_fx :echo, amp: synth_volume * master.look, mix: 0.3,
  decay: 8, phase: synth_phases.look do
    with_fx :pan, pan: synth_pans.look do
      with_fx :reverb, room: 0.7, damp: 0.8 do
        with_synth_defaults attack: 0.05, release: 0.3 do
          with_transpose synth_transpositions.look do
            with_synth :sine do
              play_chord ch
            end
            cutoff = synth_cutoffs.look
            with_fx :ixi_techno, cutoff_min: cutoff,
            cutoff_max: cutoff - 30, phase: 1, res: 0.3 do
              with_synth :dsaw do
                play_chord ch, attack: 0.1
              end
            end
          end
        end
      end
    end
  end
end

dubpad_cutoffs = range(70, 100, 5).mirror
dubpad_phases = (ring 8, 8, 8, 0.5)
dubpad_mixes = (ring 0.5, 0.5, 0.5, 0)
define :dubpad do |ch, amp|
  with_fx :echo, amp: amp, mix: dubpad_mixes.look,
  phase: 1.5, decay: 2 do
    with_fx :reverb, room: 0.8 do
      with_fx :ixi_techno, phase: dubpad_phases.tick, cutoff_min: 70 do
        with_synth :tb303 do
          with_synth_defaults attack: 0.1, release: 8,
          cutoff: dubpad_cutoffs.look, res: 0.5 do
            play_chord ch
            play_chord ch.map { |n| n + 0.3 } # Detune chord
          end
        end
      end
    end
  end
end

live_loop :pad do
  sync :snares
  dubpad dchord, master.tick * pad_volume
  sleep 16
end

beep_notes = (ring :d2, :d2, :f2, :e2, :d3, :g2)
live_loop :beeps do
  sync :kick
  sleep 0.5
  with_fx :distortion do
    with_synth :beep do
      play beep_notes.tick, amp: beep_volume * master.look,
        decay: 0.2, release: 0.1
    end
  end
  sleep 0.5
end

Here is the code:

// Dreamy Diamond
// by Rangga Purnama Aji
// https://ranggapurnamaaji1.wixsite.com/portfolio

osc(7, -0.125)
  .modulate(voronoi(1))
  .diff(voronoi(1).mult(gradient(-1).luma(0.125)))
  .luma(0.125)
  .add(
    shape(7, 0.5).mult(
      voronoi(10, 2).blend(o0).diff(gradient(1)).modulate(voronoi())
    )
  )
  .scrollY(-0.1)
  .scrollX(0.125)
  .blend(o0)
  .blend(o0)
  .out();

Here is the video:

# This is a piece of comment
# "https://confident-ritchie-5e6b2d.netlify.app/SoundHelix-Song-1.mp3"
use_bpm 60
notes = (ring :Cs, :D, :Cs, :Cs, :D, :Cs, :Cs, :D, :Cs, :Cs, :C, :Cs, :Cs, :Cs)
dur = (ring 0.250, 0.125, 0.125, 0.125,0.125, 0.125, 0.125, 0.125,0.125,0.125,0.125,0.125,0.125,0.125)
live_loop :loop1 do
  with_fx :reverb ,room: 0.9 do
    use_random_seed 1
    use_synth :dsaw

    2.times do

#Robot
#Coded by Davids Fiddle

low = 60
high = 120
use_bpm 120

live_loop :beat do
  tick
  sample :bd_klub
  sample (knit :glitch_robot1,3,:glitch_robot2,1).look,
    cutoff: (line low,high,steps: 16).mirror.look
  sleep 1
end

in_thread do #control cutoff
  sleep 30
  low = 90
  high = 200
end

# This is a piece of comment
use_bpm 60
notes = (ring :Cs, :D, :Cs, :Cs, :D, :Cs, :Cs, :D, :Cs, :Cs, :C, :Cs, :Cs, :Cs)
dur = (ring 0.250, 0.125, 0.125, 0.125,0.125, 0.125, 0.125, 0.125,0.125,0.125,0.125,0.125,0.125,0.125)
live_loop :loop1 do
  with_fx :reverb ,room: 0.9 do
    use_random_seed 1
    use_synth :dsaw

    2.times do

# This is a piece of comment
use_bpm 60
notes = (ring :Cs, :D, :Cs, :Cs, :D, :Cs, :Cs, :D, :Cs, :Cs, :C, :Cs, :Cs, :Cs)
dur = (ring 0.250, 0.125, 0.125, 0.125,0.125, 0.125, 0.125, 0.125,0.125,0.125,0.125,0.125,0.125,0.125)
live_loop :loop1 do
  with_fx :reverb ,room: 0.9 do
    use_random_seed 1
    use_synth :dsaw

    2.times do

---
uid: 20200701312343
title: "AlgoJam Submissions"
date: 2020-09-13
author: "Dirk B"
audio_url: "https://www.soundhelix.com/examples/mp3/SoundHelix-Song-1.mp3"
image: "../../../images/audio_code.jpg"
tags:
  - submit-template
---

# Place the code below within back-ticks ```ruby ```

low = 60
high = 120
use_bpm 120

live_loop :beat do
  tick
  sample :bd_klub
  sample (knit :glitch_robot1,3,:glitch_robot2,1).look,
    cutoff: (line low,high,steps: 16).mirror.look
  sleep 1
end

in_thread do #control cutoff
  sleep 30
  low = 90
  high = 200
end