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
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
once "dr*8"
-- region Mad Funk: joyeuse intro techno-funk, partant run 160bpm
-- Tags: Techno, run, funk, crushade
-- Ready: 9.5/10
resetCycles
-- endregion
do
-- region Nova Utils
let gG a = (gain ("^77" * a)) -- gain Global
let gM' l h a = (gG (range l h a)) -- gain Modéré
let gM a = (gM' 0.2 0.8 a) -- gain Modéré doux
let gDJF = (# djfbus 1 (range 0.05 0.95 "^49"))
let novaOn ch pat = someCyclesBy ch pat
let novaOff ch pat = someCyclesBy (1 - ch) pat
-- endregion Nova Utils
let g = gDJF
let bpm = 80 -- Que tu crois!
setcps (bpm/60/4)
-- d10 $ funk_noise
d1
$ g
-- $ every' 8 7 (# lpf 200)
-- region Pauses Hip-hop
$ whenmod 8 6 (juxBy 0.5 rev)
-- $ "k . k(<3 <5 4>>,8)" -- Le simple
-- region hardkick
$ novaOn "^42" (
superimpose (
(# "hardkick:4")
. (sometimesBy "<0!3 0.5>" (stut 2 0.8 "s"))
. (# legato 0.9)
-- . (# note (-4))
. (|* gain 0.65)
)
)
-- region INTRO/Run
-- $ slow 2 -- intro
-- $ whenmod 8 6 (# silence)
$ novaOn "^41" (<|"k k k k k k k <k [~ k]>")
$ novaOff "^41" (<|"k . k(<3 5>,8)") -- L'agité
$ "[cpu,jazz]"
# midiG' "^78" 0 1.1
# pan 0.45
d2 $ g
$ slow 2
$ someCyclesBy "^31" (hurry 2)
$ juxBy 0.75 (rev . sometimes (mask "t(16,16)" . ply 2))
$ novaOn "^43" (<| "~ s*<1 <2 <4 <8 [8 16]>>>>")
$ novaOff "^43" (<| "~ s*[4 8]")
$ "snare:3"
# gM' 0 1.5 "^79"
# pan (slow 8 $ range 0.4 0.8 sine)
d3 $ g -- Drumroll
-- $ slow 8 -- TODO IN/OUTRO
-- $ fast (slow 8 "<1 [2 [2|4]] 4 [4 8]>" )
$ novaOn ("^76") (slice 8 (run "<8!3 16> 16") . (loopAt 0.5) . (>| "breaks165"))
$ ply "2 <4 8>" $ "drum:2"
# gM' 0.3 1.5 "^80"
# pan (slow 8 $ range 0.2 0.6 cosine)
d4 $ g -- Bassline
$ juxBy 0.5 id
$ slow 2
$ sometimesBy "^89" rev -- reverse cowgirl
$ novaOn "^58" (slice 8 $ "<0!3 1>*2 3*2 <0 1> 4*<2 4 8>") -- Jumpy rappel
$ novaOn "^57" (slice 8 $ "<0!3 <1 2>>*8") -- COME ON CRUSH
$ novaOff "^57" (slice 8 $ run 8) -- Classique: jumpy groovy
$ "fbass:8"
# legato 1
# crushbus 40 (range 10 3.5 "^53") -- CRUSH THIS
# gM' 0 1.5 "^81"
# pan 0.6
d5 $ g -- Guitare pompe
-- region Guitare pompe
$ novaOn "^59" (slice 8 (cat [
"0*4",
"0 1 2 3",
"0*4 1 3(3,8) 5",
"4 5 6 7",
"0 7 4 7",
"[0 4]*4",
"7 <7 6> <3 5> <7 4>",
"4*4 . 4*<8 16>",
"7 0 7 0",
"0*4"
]) . (# n 9))
-- region INTRO-guitar
$ novaOff "^59" (slice 8 ( -- Intro
"0(<1 4>,<1 4 8>) . [1*<1 2 4>, 3(<1 3 5>,8)]"
) . (# n 11))
$ "fguitar"
# crushbus 50 (range 10 5.5 "^54") -- CRUSH THIS
# cut 8
# gM' 0.3 1.5 "^82"
# pan 0.3
d6 $ g -- Epiano groovy
$ sometimesBy "^35" (scramble 8)
$ sometimesBy "^55" (off "e" ((# cut 61) . (|* gain 0.9)))
-- $ whenmod 32 16 (whenmod 4 2 (jux rev)) -- TODO variations once introduced
$ novaOff "^59" (slow 2)
-- $ mask "f(<1!16 2!16>,2,<1!4 0!4>)" -- TODO INTRO MASK THIS
-- $ novaOn "^91" (slice 8 "0 3 2 1 0 3 <2 6> 7") -- variant
-- $ novaOff "^91" (slice 8 "0 3 2 1 4 5 6 7*<1 2>") -- regulier
-- "3*4 <0 5> 0 <3 4>*2 0*2 5 0 4" -- TODO FREESTYLE
-- $ slice 8 "3*4 <0 5> 0 <3 4>*2 0*2 5 0 4" -- TODO FREESTYLE
-- "0 1 2 [3*<4 2>]!4 [5 <4 5>]"
-- "2*4 3*4 5(3,8)"
-- "0 3 2 1!5" -- repeat aigu
-- "5!7 7" -- END OF FILE
-- "4!5 5 6 7*<1 2>" -- repeat end
-- )
$ "fepiano"
# n (slow 8 "<24 25>")
# gM' 0.3 1.5 "^83"
# cut 6
# pan 0.7
d7 $ (|- lpf 1000) $ g
$ whenmod 16 8 (fast 2) $ "clap"
# gM' 0.3 1.5 "^84"
# room 0.4