-- Doux ? sombre basse
do
setcps (120/60/4)
d1
$ s "k k <k!3 ~> <k!3 k*2>"
# s "jazz"
# gain 0.8
# lpf (slow 16 $ range 2000 500 sine)
d2 -- drumroll
$ fast "8 [16 . 32 [8 16]]" $ s "drum:2"
# gain (slow 64 $ range 0.8 0.9 cosine)
# room 0.48 # sz 0.5
d3
$ sometimesBy (slow 4 $ "<0 0.2 0.3 0.5>") degrade
$ jux (fast 2)
$ note (
whenmod 16 8 (12 - ) -- renversement
"0 0 0 2" + -- melodie
"c3'maj" + -- accord de base
"<0!3 12>" -- variation octave
)
# s "f(<3!3 <4 8>>,8)" # s "superfork"
# pan 1
# gain 0.9
d4 -- Basse
$ note ("[0, <3!3 7!3>(3,8)]"
- 24
)
# s "supersaw"
# voice 0.1
# gain 0.8
# pan 0