1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
-- Acte 3: BIRDS
prog = "<0 0 0 0 2 2 4 4>"
d3 $ superimpose ((|-| n 24) . (# gain 0.0)) $ degradeBy 0 $ n (scale "aeolian" (iter 6 $ "[-2 2 7 11 14 7 0 14]*2" + prog - "0 -7 0 -7 0 0 -7")) # s "supersaw" # legato 1 # gain 0.65 # orbit 1 # lpf (slow 6 $ range 500 1200 sine) # lpq (slow 8 $ range 0 0.1 sine) # voice 0.1 # silence
d4 $ n (scale "aeolian" ("[-7,-2,4,7,9,11,13]*4" + prog)) # s "superhammond" # attack 1 # gain 0.65 # lpf (slow 32 $ range 300 2500 sine) # lpq (slow 8 $ range 0 0.15 sine) # silence
d4 $ whenmod 8 6 (degradeBy 0.75) $ inside 2 (sometimesBy 0.1 (ply 2)) $ iter 4 $ n ("0 0 2 ~ [5 4] 2 <3 5> [1 [2 2]]" + "<5 5 5 8 2 3>") # s "<dr dr dr jazz>"
d5 $ s "insect*4" # n (irand 6) # speed (range 0.25 4 rand)
d6 $ s "birds" # n (irand 6) # speed (range 0.5 2 rand)
-- EHOUE
d6 $ sometimesBy "0 0.75" (stut 4 0.9 (1/16)) $ sometimesBy "0 0 0.5 0" (0.125 ~>) $ s "k k k? k?" # s "kick:5" # gain 0.9
-- moineau scratch
d7 $ degradeBy "<0 .. 0.5 0.5 .. 0.2 0.2 .. 0.6 0.6 .. 0>" $ n "0*16" # s "birds3" # n (choose [0,0,2]) # pan (slow 8 $ sine)
-- pivert!
d8 $ someCycles (# silence) $ often (stut 5 0.9 0.05) $ s "birds3:6(<1 1 3 1> ,8)"
d10 $ whenmod 4 2 (juxBy 0.3 rev) $ rarely (slow 2) $ whenmod 4 2 degrade $ sometimesBy (slow 8 $ "<0.2 0.5 0.9>") (off (1/16) id) $ s "dr*8" # s "drum:8"
-- vents du haut!
d12 $ chunk 16 (rev) $ rarely (rev) $ every 4 (# crush 6) $ s "wind*16" # note (run 8) # legato 2 # gain 0.7 # silence
-- bourrasque
d11 $ every 16 (jux rev) $ every 8 (# gain 0.9) $ s "space:3" # speed 0.25 # silence
-- AYWAY !
-- EEEEEEEEEEEEEEEEEEEWEEEEEEEEEEEEEEEEEEEEEEEEE !E
-- final
prog = "<0 0 0 0 2 2 4 -2>"
d1 $ superimpose ((|-| n 12) . (# gain 0.0)) $ n (scale "aeolian" (iter 6 $ "[-2 2 7 11 14 7 0 14]*2" + prog - "0 -7 0 -7 0 0 -7")) # s "supersaw" # legato 1 # gain 0.8 # orbit 1 # lpf (slow 6 $ range 500 1200 sine) # lpq (slow 8 $ range 0 0.1 sine) # voice 0.1 # silence
d4 $ n (scale "aeolian" ("[-7,-2,4,7,9,11,13]*4" + prog)) # s "superhammond" # attack 1 # gain 0.65 # lpf (slow 32 $ range 300 2500 sine) # lpq (slow 8 $ range 0 0.15 sine) # silence
d2 $ s "supersaw(<5 7 3>,8, <0 2>)" # n (scale "aeolian" (prog - 14)) # gain 0.85 # voice 0.1 # room 0.5 # orbit 0
-- BON CETAIT GRAVE COOL MAIS JE VAIS MARRETER ET JOUER A BLACK MESAAVEC SONIA !!!
-- ON SE REFAIT CA DEMAIN ? ;)
hush
M
-
-
d3 $ stack [s "d(1,8)" # s "drum:6", s "cp(2,4,1)"]
d4 $ whenmod 8 6 (degradeBy 0.75) $ inside 2 (sometimesBy 0.1 (ply 2)) $ iter 4 $ n ("[0 0 2 ~ [5 4] 2 <3 5> [1 [2 2]]]" + "<5 5 5 8 2 3>") # s "<dr dr dr jazz>" # silence
d5 $ s "insect*4" # n (irand 6) # speed (range 0.125 2 rand) # crush 4 # gain 1 # silence
hush
d6 $ s "birds" # n (irand 6) # speed (range 0.01 0.1 rand)
hush
-- Yes ce fut un plaisir :)
-- Black mesa? Have fun!
-- Moi je rejoins ma conv locale/distante avec amis :)
-- Avec GRAND PLAISIR MAMOI!
-- MOi le dimanche c'est reggae/dub
-- En mode gros kick reverb, piano fou, et joyeusetes
-- Si ça te dit :P
-- Bonne soirée les mamp
-- EHOUE
d6 $ sometimesBy "0 0.75" (stut 4 0.9 (1/16)) $ sometimesBy "0 0 0.5 0" (0.125 ~>) $ s "k k k? k?" # s "kick:5" # gain 0.9
-- moineau scratch
d7 $ n "0*16" # s "birds3" # n (choose [0,0,2]) # pan (slow 8 $ sine / 2)
-- pivert!
d8 $ someCycles (# silence) $ often (stut 5 0.9 0.05) $ s "birds3:6(<1 3 5 3>,8)"
d10 $ whenmod 4 2 (juxBy 0.3 rev) $ rarely (slow 2) $ whenmod 4 2 degrade $ sometimesBy (slow 8 $ "<0.2 0.5 0.9>") (off (1/16) id) $ s "dr*8" # s "drum:8"
-- vents du haut!
d12 $ someCycles (# s "dr:2") $ someCycles (# s "dr:1") $ s "<hh*4 hh*4 hh*4 [hh*4 ~]>" # s "hh" # release 0.5
-- bourrasque
d11 $ every 16 (jux rev) $ every 8 (# gain 0.9) $ s "space:3" # speed 0.25 # silence
-- AYWAY !
-- EEEEEEEEEEEEEEEEEEEWEEEEEEEEEEEEEEEEEEEEEEEEE !E