Skip to content

Instantly share code, notes, and snippets.

Avatar
💭
Ducunt volentem fata - nolentem trahunt.

G. Martin Butz mbutz

💭
Ducunt volentem fata - nolentem trahunt.
View GitHub Profile
@mbutz
mbutz / 040-2021-08-04.tidal
Created Aug 4, 2021
#40 of my 100-Patterns-with-TidalCycles exercise.
View 040-2021-08-04.tidal
-- Pattern #40 from 100
-- 040-2021-08-04.tidal
d1
$ slow 2
$ off 0.125 (|- note 3)
$ note (scale "minor" "0 2 4 6") # s "tabla:1" # end "0.35"
d2
$ slow 4
@mbutz
mbutz / 039-2021-07-07.tidal
Created Jul 7, 2021
#39 of my 100-Patterns-with-TidalCycles exercise.
View 039-2021-07-07.tidal
-- Pattern #39 from 100
-- 039-2021-07-07.tidal
d1
$ every 2 (degradeBy 0.25)
$ struct "t(<5, 9 , 7>,16)"
$ (off 0.5 (|+ gain (range 0.25 1 rand)))
$ n (scale "minor" $ floor <$> (fast 5 (range 0 12 sine)))
# s "omi" # legato (slow 4 $ range 1 4 cosine)
# room (range 0.125 0.75 $ slow 4 sine)
@mbutz
mbutz / 038-2021-06-28.tidal
Created Jun 28, 2021
#38 of my 100-Patterns-with-TidalCycles exercise.
View 038-2021-06-28.tidal
-- Pattern #38 from 100
-- 038-2021-06-28.tidal
d1
$ jux rev
$ degradeBy <0.125>
$ sometimesBy "<0.125 0.25>" (|* 8)
$ s "{ hi*16, hi:2*8, 808hc:0(<5 7 9>,16, <2 4 6>) }"
# gain 1
# room 0.3
@mbutz
mbutz / 037-2021-06-21.tidal
Created Jun 21, 2021
#37 of my 100-Patterns-with-TidalCycles exercise.
View 037-2021-06-21.tidal
-- Pattern #37 from 100
-- 037-2021-06-21.tidal
d1
$ every 2 (# triode 24)
$ hpf (segment "<8 4 2>" $ range 50 3000 sine)
# n "<c4'minor7'iii c4'minor7'ii c4'minor7'iiii>"
# s "superfm(<9 11>,16)"
# gain 0.575
# legato 0.75
@mbutz
mbutz / 036-2021-05-23.tidal
Created May 23, 2021
#36 of my 100-Patterns-with-TidalCycles exercise.
View 036-2021-05-23.tidal
-- Pattern #36 from 100
-- 036-2021-05-23.tidal
d1 $ degradeBy 0.75 $ n "[[0 2 3] 6*2 8, 5 10*4 8 10 [~] 5]" # s "yeah"
d2 $ n "[~ 5]*4" # s "linnhats" # gain 0.9 # begin 0 # end 0.175
d3 $ "3 3 3 [~ 3, 4]" # s "stomp"
d4 $ slow 4 $ n "<[g3, c4, f4] [g4, c4, bf3]>" # s "supersquare" # gain 0.5
@mbutz
mbutz / 035-2021-05-13.tidal
Created May 13, 2021
#35 of my 100-Patterns-with-TidalCycles exercise.
View 035-2021-05-13.tidal
-- Pattern #35 from 100
-- 035-2021-05-13.tidal
d1
$ segment 16 $ struct "t(<3 5 7 9>,16)" $ shuffle 6
$ n (scale "ionian" "0 . 2 4 . 7 0 2") # s "tides" |+ "c5"
# legato 4
# gain (range 0.75 1.25 rand)
# room 0.5
# size 0.85
@mbutz
mbutz / 034-2021-04-30.tidal
Created Apr 30, 2021
#34 of my 100-Patterns-with-TidalCycles exercise.
View 034-2021-04-30.tidal
-- Pattern #34 from 100
-- 034-2021-04-30.tidal
-- the following is appropriated from Allison Walker
-- https://www.youtube.com/watch?v=uelz0Vbov-4
d1
$ fast 2
$ often
(off 0.25 (|+ gain 0.75) . (|+ speed 1.5) . (# room 0.85) . (# sz 0.75))
@mbutz
mbutz / 033-2021-04-15.tidal
Created Apr 15, 2021
#33 of my 100-Patterns-with-TidalCycles exercise.
View 033-2021-04-15.tidal
-- Pattern #33 from 100
-- 033-2021-04-15.tidal
d1 $
slow 2 $ chop 4 $ n "4(2,4)" # up "0 0 -2" # s "lc" # begin 0 # end 0.25
-- slow 2 $ striate 2 $ n "4(5,8)" # up "0 0 -2" # s "lc" # begin 1.0 # end 0.5
# cut 1
# room 0.75
# sz 0.75
# gain 1
@mbutz
mbutz / 032-2021-04-10.tidal
Created Apr 10, 2021
#32 of my 100-Patterns-with-TidalCycles exercise.
View 032-2021-04-10.tidal
-- Pattern #32 from 100
-- 032-2021-04-10.tidal
d1 $ ifp ((== 0).(flip mod 2))
(striate 4)
(# coarse "24 48")
$ s "psr [psr:3 psr:2]"
d3 $ fast 2 $ iter 4 $ n "c4 <g4 bf3 d4> <c5 f5 d4> [g5, bf5]"
# s "superhoover"
@mbutz
mbutz / 031-2021-03-30.tidal
Created Mar 30, 2021
#31 of my 100-Patterns-with-TidalCycles exercise.
View 031-2021-03-30.tidal
-- Pattern #31 from 100
-- 031-2021-03-30.tidal
d1
$ fast 4
$ sometimes (off 0.25 (rev))
$ rarely (off 0.75 (rev))
$ sometimes (0.75 ~>)
$ (|+ n "<12 7 -12>")
$ n (scale "mixolydian" "0? 2 [4] 7?") # "supersquare"