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
122
123
124
125
126
127
128
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 gLPF = (# lpf (min 10000 ((range 200 20000 ("^49")))))
let gHPF = (# hpf (max 0 (min 7500 ((range "-7500" 7500 ("^49"))))))
let gDJF = (gLPF . gHPF)
let novaOn ch pat = someCyclesBy ch pat
let novaOff ch pat = someCyclesBy (1 - ch) pat
-- endregion Nova Utils
let gDelayD = (# delay (range 0 5 "^13"))
let gDelayFB = (# delayfb (range 0 0.9 "^14"))
let gRoom = ((|+ room (range 0 0.5 "^29")) . (# dry 0.99))
let gSize = (|+ size (min 0 (range "-0.5" 0.5 "^29")))
let gDelay = (gDelayD . gDelayFB . (# delayt 0.25) . (# orbit 2))
let g = (gDJF . gRoom)
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]"
# gM' 0 1.2 "^78"
# 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
# crush (range 10 3.5 "^53") -- CRUSH THIS
# gM' 0 1.5 "^81"
# pan 0.6
d5 $ g $ gDelay -- 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"
# crush (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 "^91" (slow 2)
-- $ mask "f(<1!16 2!16>,2,<1!4 0!4>)" -- TODO INTRO MASK THIS
$ novaOn "^59" (slice 8 "0 3 2 1 0 3 <2 6> 7") -- variant
$ novaOff "^59" (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
-- )
$ s "fepiano"
# n (slow 8 "<24 25>")
# gM' 0.3 1.5 "^83"
# cut 6
# pan 0.7
d7 $ (|- lpf 1000) $ g
$ fast 2 $ s "clap"
# gM' 0.3 1.5 "^84"
# room 0.4