-
Notifications
You must be signed in to change notification settings - Fork 0
/
haunted.tidal
114 lines (87 loc) · 2.15 KB
/
haunted.tidal
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
-- 150
-- Metal revs
let fill1 = const $ degradeBy 0.3 $ sound "form-msp5:3*16" # begin (scale 0 0.5 (fast 2 sine)) # end (scale 0.05 0.06 $ sine1) # gain 0.8 # hpf 00
-- gamelan
let fill2 = const $ degradeBy 0.2 $ sound "form-msp5:4*16" # begin (scale 0 0.1 (fast 2 sine)) # end (scale 1 0.854 $ sine1) # room (scale 0.2 0.1 (slow 3 (sine))) # size (scale 0.1 0.9 (slow 2 (sine))) # gain 0.9 # shape 0.3 # pan (scale 0 1 saw1)
-- bassy
let fill3 = const $ degradeBy 0.3 $ sound "form-msp5:8*4" # begin (scale 0 0.4 $ sine1) # end (scale 0 0.3 $ sine1) # shape 0.4 # gain 0.9
-- master kiks (change degrade/*8)
-- form-msp5:1*8
cps (160/60/4)
-- Scratchy
d3
$ every 8 (# speed 3)
$ degradeBy 0.3 $ sound "form-msp5:3*4"
# shape 0.1
# gain 1
# end (scale 0.05 0.19 $ slow 4 (sine1))
# bpf (scale 500 4000 $ fast 2 (saw1))
# bpq 0.9
# pan (scale 0 1 $ fast 2(saw1))
# orbit ch3_4
d3 silence
d4
$ every 15 (silence1)
$ every 8 (silence1)
$ every 4 (silence1)
$ sometimesBy 0.25 (# crush 4)
$ degradeBy 0
$ sound "[ form-msp5:7*1, gabba*8? ]"
# gain "1 0.8"
# shape 0.5
# legato 1
# pan (scale 0 1 (slow 2 saw1))
# orbit ch1_2
d4 silence
$ degradeBy 0.3 $ sound "[imp*4, form-msp5:1*8, gabba*8?, [~ industrial:1*8]?]"
d4
$ sometimesBy 0.25 (# crush 4)
$ every 15 (silence1)
$ every 8 (silence1)
$ every 2 (silence1)
$ degradeBy 0.3 $ sound "[gabba*8, [~ industrial:1*8]?]"
# gain "1 0.8"
# shape 0.5
# speed 0.8
# orbit ch1_2
d4 silence
-- NOISE PAD
d5
$ stut 7 0.6 0.9
$ spread ($) [palindrome, fast 1, striate' 2 4, (# speed (scale 0.5 1 $ slow 5 $ sine1))]
$ sometimesBy 0.25 (# crush 4)
$ slow 3
$ sound "form-msp5:11"
# begin (scale 0 1 (slow 16 sine1))
# shape 0.5
# gain 0.8
# hpf 2000
# orbit ch3_4
d5 silence
-- LOW VOX PAD
d7
$ stut 7 0.6 0.5
$ slow 1
$ spread ($) [palindrome, striate' 2 16]
$ sound "form-msp6:3 ~"
# begin (choose [0, 0.6, 0.7])
# gain 0.9
# pan (scale 0 1 (slow 8 (sine)))
# speed 0.4
# accelerate 0
# legato 10
# hpf 500
# orbit ch3_4
# cutoff (scale 500 2000 $ slow 2 sine1)
d7 silence
-- Ringy subz
d2
$ slow 3
$ sound "tutorial3" # n (choose [-27,-27,-26])
# gain 0.8
# sustain 3.1
# shape 0.2
# coarse 4
# sustain 3
# orbit ch1_2
d2 silence