update: Live YouMay

parent e8b13bf3
once $ s "bd"
d1 -- kick
-- $ euclid "<4 6>" 4
$ euclid "<<0 1 5 7> 3>" 8
......
......@@ -95,18 +95,18 @@ do
d6 -- drumroll
$ rarely (degradeBy "0 1!8")
$ fast "<8!3 16> [16 [32 16]]"
$ s "dr" # silence
$ s "dr"
d7 -- Snares
$ fix (# s "hh:8") (s "h")
$ fix (# s "sn:10") (s "s")
$ s "~ [s*[1|2] h]"
# gain 0.9 # silence
# gain 0.7
d8 -- Allez
$ whenmod 16 12 (# gain 0)
$ sometimesBy "0 0.5" (fast 2)
$ s "k(5,8)"
# s "jazz"
# gain 0.9 # silence
# gain 0.7
d9
$ superimpose (
(# s "supergong") . (|- gain 0.1) .
......@@ -116,7 +116,7 @@ do
$ off 0.25 (|+ note "<0 12>")
$ slow 4
$ note (melody - 2)
# s "superfork" # gain 0.7 # silence
# s "superfork" # gain 0.5
-- Changement de modes dans la progression harmonique
......
-- You may: septièmes printamnières
do
solo 1
solo 2
unsolo 3
unsolo 4
unsolo 5
unsolo 6
solo 7
solo 8
do
let cLaMin = "[4, 7, 12, 14]"
let cReMin = "[2, 4, 8, 11]" -- le fameux sol dièse !
let cMiMaj = "[2, 5, 7, 10]"
setcps 0.45
d1
$ jux rev
$ whenmod 8 6 (fast 2)
$ fast 2
$ s "909"
# gain 0.35
d3 -- Drums
$ fast "4 <8!3 [8 . [8|16]]>"
$ s "~ . drum:8"
# gain 0.6
d4 -- Basse reguliere
$ jux rev
$ whenmod 8 6 (# gain 0.8)
$ n "b(<5,7>,8)"
# note ( (scale "major" "0 . 5 2 7"
) - 24)
# s "bassWarsaw"
# gain 0.65
# sustain "1 . <0.5 0.25> 0.25"
d5 -- Piano lead
-- $ superimpose (arp "down")
$ note (
-- scale "major" (
"0" -- melodie
+ (slowcat
[cLaMin, cReMin, cMiMaj, cReMin]
) -- base accord manuel
)
# s "superpiano"
# velocity 0.35
# sustain 4
d6 -- Secondaire
-- $ superimpose (arp "down")
$ note (scale "major" (
"8 . 7 7 . 5 . <3!3 2 2!3 3>" -- melodie
- 7
))
# s "superfork"
# gain 0.55
d7
$ fast 4
$ s "~ <h!2 [h ~ h] h>"
# s "hh" # n "<0!7 [0|0|1]>"
# gain 0.6
-- # pan (slow 16 $ sine)
d8
$ s "glitch:2"
# gain 0.7
# speed (range 0.2 0.9 rand)
-- Sandbox
setcps 0.5
d1 $ s "jazz"
d1 $ s "jazz(<1 3>,8,<0 1>)"
# gain 0.6
d3 $ s "dr*8" # gain 0.8
d2 $ someCycles (fast 2) $ s "~ snare:1" # gain 0.7
d3 $ fast "<16!3 4> <8!3 [8 16]>" $ s "drum:8" # gain 0.8
d4
$ note ("<2!3 <-2 5>>"
- 14
)
#
s "supersaw"
# voice 0.1
# gain 0.6
do -- Intro choeurs "pensif"
unsolo 1
unsolo 2
unsolo 3
unsolo 4
unsolo 5
unsolo 6
unsolo 7
unsolo 8
unsolo 9
setcps 1
d1 $ s "dr dr cp dr"
......@@ -2,13 +2,13 @@ setcps 0.6
d10 -- metronome
$ s "tok*4" # note ("10 0 0 0" - 28)
# gain 0.5
# gain 0.8
d1 -- grosse caisse / caisse claire poum tchak
$ fix (# s "[bd,lt]") (s "k")
$ fix (# s "sn:2") (s "s")
$ s "k ~ s ~ k s/4 s ~"
# gain 0.6
# gain 0.7
d2 -- charley double croche
$ s "hh*16" # note "1 0 0 0 1 0 0 0 1 0 0 0 1 0 1 2 1"
......@@ -21,14 +21,14 @@ chordsBass = "<a'min c f d'min>"
d3 -- basse simple octave sur accords
$ superimpose (
(# s "bassWarsaw") . (|- gain 0.1) . (|+ note 12) . (|/ sustain 8)
(# s "bassWarsaw") . (|- gain 0.4) . (|+ note 12) . (|/ sustain 8)
)
$ jux (# s "subBass1")
-- la mineur do fa re mineur)
-- $ every' 4 3 (# note 0)
$ note (slowcat (take 7 (repeat patBass) ++ [patBassAlt]) + chordsBass)
# s "subBass1"
# gain 0.8
# gain 1.2
# sustain "1/6 . 1/3 . 1/6 . 1/3"
|- note 36
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment