You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
47 lines
739 B
Plaintext
47 lines
739 B
Plaintext
-- Coogan, Leonard : Untitled
|
|
-- First "song" with Tidal/SuperCollider!
|
|
|
|
-- First pattern, respectively
|
|
|
|
d1 $ n (slow 2 $ fmap (*7) $ run 8)
|
|
# s "808"
|
|
# decay "[1 0.2]/4"
|
|
# voice "[0.5 0]/8"
|
|
# speed (sine + 0.8)
|
|
|
|
d2
|
|
$ chop "<32 128 32 16>"
|
|
$ s "[~ hh]*8"
|
|
|
|
d3
|
|
$ jux rev
|
|
$ chop "<32 64 16>"
|
|
$ s "[bd:4 bd:3]*2"
|
|
# gain "0.95"
|
|
|
|
d4
|
|
$ chop 16
|
|
$ s "[ht]"
|
|
-- # gain (sine + 1.0)
|
|
|
|
d5
|
|
$ jux (rev)
|
|
$ chunk 4 (fast 2 . (|- n 12))
|
|
$ off 0.25 (|+ 7)
|
|
$ struct (iter 8 "f(5,8)")
|
|
$ n (scale "hexPhyrgian" "0 .. 5")
|
|
# s "eutow"
|
|
# gain 0.8
|
|
# rate 9
|
|
# speed 2
|
|
# octave 4
|
|
# sustain 0.5
|
|
# legato 2
|
|
|
|
|
|
d6
|
|
-- $ jux (rev . (|*| speed 2)) $ every 3 (rev . chop 8)
|
|
$ s "cp:1 cp:2"
|
|
-- $ s "cp:1 cp:2(3,8, <0 2 3>)"
|
|
-- # gain (sine + 0.8)
|