mirror of
https://gitlab.dit.htwk-leipzig.de/computermusik-ws23/data-composition.git
synced 2025-07-05 01:01:46 +02:00
Add some results of playing around
This commit is contained in:
83
scratchpads/test.tidal
Normal file
83
scratchpads/test.tidal
Normal file
@ -0,0 +1,83 @@
|
||||
|
||||
-- EVAL IN CASE OF EARRAPE
|
||||
hush
|
||||
|
||||
setcps (120/60/4)
|
||||
|
||||
d1 $ stut 3
|
||||
(range 0.02 0.8 rand)
|
||||
(range (1/16) (3/16) square)
|
||||
$ s "sn:3"
|
||||
|
||||
d1 silence
|
||||
|
||||
d2 $ fast 2 $ s "808:7 [~ 808:7]"
|
||||
|
||||
d2 silence
|
||||
|
||||
|
||||
d3 $ s "bd:5!4" # gain 1.3
|
||||
|
||||
d3 $ stack [
|
||||
s "bd:5!4" # gain 1.3,
|
||||
sometimes (hurry 4) $ s "bd:5!4" # gain 1.3
|
||||
]
|
||||
|
||||
d3 silence
|
||||
|
||||
|
||||
d4 $ slow 10
|
||||
$ sometimes (# speed (-1))
|
||||
$ n (run 10) +| "0*40"
|
||||
# s "numbers"
|
||||
# begin (range 0.1 0.2 rand)
|
||||
# end (range 0.3 0.4 rand)
|
||||
# room 1
|
||||
# delay 1 # delayfeedback 0.8 # delaytime (1/8)
|
||||
# lock 1
|
||||
|
||||
d4 silence
|
||||
|
||||
-- "Space for Future Expansion"
|
||||
|
||||
d7 $ note "<[e4!4 [f4*10]] [e5!3 g5 [f5*10]] [e5!3 g5 [f5*10],g5!3 b5 [a5*10]] [e5!3 g5 [f5*10],g5!3 b5 [a5*10]]>"
|
||||
# s "jvbass"
|
||||
# room 1
|
||||
# delay 0.5
|
||||
# delayfeedback 0.8
|
||||
# delaytime 0.5
|
||||
|
||||
d7 silence
|
||||
|
||||
|
||||
d8 $ slow 4
|
||||
$ degradeBy 0.9
|
||||
$ sometimes rev
|
||||
$ n (run 32)
|
||||
# s "industrial"
|
||||
# room 1 # size 1
|
||||
# delay 0.5 # delayfeedback 0.5 # delaytime (1/4)
|
||||
# lock 1
|
||||
# speed (-4)
|
||||
# gain 0.7
|
||||
# release 0.9
|
||||
|
||||
d8 silence
|
||||
|
||||
d9 $ slow 5 $ loopAt 5 $ s "sheffield" # gain 0.5 # release 0.9
|
||||
|
||||
d9 silence
|
||||
|
||||
d10 $ jux ( sometimes rev ) $ loopAt 1 $ chop 4 $ s "breaks125" # delay 0.5 # delaytime (1/4)
|
||||
|
||||
d1 $ slow 8 $ s "tabla" <| n (run 26)
|
||||
|
||||
-- Something different:
|
||||
|
||||
d1 $ slow 2 $ s "arpy" <| up "c'maj(3,8) f'maj(3,8) ef'maj(3,8,1) bf4'maj(3,8)" # delay 0.5
|
||||
d2 $ s "can" <| n (run 16) # speed "0.125 1!15"
|
||||
d3 $ slow 2 $ s "speakspell" <| n (run 12) # speed "{-1 2 0.25? -0.5}%6"
|
||||
d4 $ jux (# delay 0.5) $ s "808bd:3" # gain 1.5 # delaytime (1/400) # lock 1
|
||||
d5 $ degradeBy 0.3 $ fast 8 $ s "[clak clak]!2" <| n (run 2) # gain "1 0.7 0.7 0.7"
|
||||
|
||||
hush
|
Reference in New Issue
Block a user